
平臺(tái) 論壇博客文庫(kù)

› 論壇 › 操作系統(tǒng) › AS400 › 問(wèn)個(gè)問(wèn)題 ~~~！

最近訪問(wèn)板塊

查看: 6300 | 回復(fù): 4

問(wèn)個(gè)問(wèn)題 ~~~！ [復(fù)制鏈接]

法號(hào)戒色

白手起家

論壇徽章:: 0

電梯直達(dá)

1樓 [收藏(0)] [報(bào)告]

發(fā)表于 2009-03-12 15:44 |只看該作者 |倒序?yàn)g覽

我正在看一本cl 有些地方不是很理解希望高手能夠解答
LOOP2:  RTVDTAARA DTAARA(FTPINS (&LNNO 1)) RTNVAR(&FTPINS)
               IF                COND(&FTPINS *EQ '1') THEN (DO)
                  CHGVAR VAR(&FTPINSCNT)    VALUE((&FTPINSCNT + 1)
                  DLYJOB       DLY(30)
                  IF                COND(&FTPINS *EQ '1') THEN (DO)
                     CHGDTAARA DTAARA(FTPINS (&LNNO 1)) VALUE('0')
..............................我想知道第一行是什么含義  還有 DLYJOB DLY（30）是什么含義還有最后一行的含義  謝謝了

文庫(kù)|博客

Apache官方強(qiáng)心劑：開(kāi)源不受出口管理?xiàng)l例約束！
Linux基礎(chǔ)命令---lynx瀏覽器
Dell R740服務(wù)器設(shè)置磁盤直通,不做RAID虛擬磁盤陣列
Linux基礎(chǔ)命令---elinks文本瀏覽器
Linux基礎(chǔ)命令---wget下載工具

ellading

白手起家

論壇徽章:: 0

2樓 [報(bào)告]

發(fā)表于 2009-03-12 16:32 |只看該作者

回復(fù) #1 法號(hào)戒色的帖子

1. RTVDTAARA DTAARA(FTPINS (&LNNO 1)) RTNVAR(&FTPINS)
這句的意思是將 FTPINS 這個(gè) DTAARA的值從變量&LNNO位置取1個(gè)長(zhǎng)度賦值給變量&FTPINS
DTAARA是之前在系統(tǒng)中定義好的，相當(dāng)于系統(tǒng)的公共變量。
例如：DTAARA： FTPINS ='20080903567'
變量：&LNNO=9
則變量 &FTPINS='5'
對(duì)應(yīng)的 CHGDTAARA DTAARA(FTPINS (&LNNO 1)) VALUE('0')這句是改變DTAARA FTPINS的值，就是將其變量&LNNO處的值更改為'0',如果執(zhí)行了這句，則 FTPINS ='20080903067'

2. DLYJOB DLY（30）這句是JOB延遲30s,至于為什么要設(shè)置延遲，就要看你的程序是干什么用的了。