I表中记录名后加01有何作用

aps01

   请问下:
     IIPH400PO    01
     I              PECST                           XPECST
上面I输入表中记录名IPH400PO后面加01有何用处及作用???
多谢!!

cuilei286

就是个排序的玩意。我们这两位都随便写的。

aps01

排序???应该不是的,不过愿闻其详!!!

cuilei286

额，具体是啥意思，我也不懂，其他知道的大侠说说。

uxyzp

是说rpg3里面用的？

aps01

是rpg3中用的

q疯哥p

the indicator will be set on when the corresponding file is process in a program cycle.

majorw

rpg程式有二種寫法,此01屬cycle寫法中detail time使用的indicator
以此例看較完整程式應如下:
     FIPH400POIP  E           K        DISK                  <--- 其中檔名後之I-唯讀 ,P-設為primary file
   **
     IIPH400PO    01                                              <--- 對映讀取record之indicator設定為01,每讀到一筆 01 就*ON
     I              PECST                           XPECST       <--- 將IPH400PO檔案中PECST欄位名稱變更為XPECST
     **   
     C   01                EXSR   DTL01                         <--- 01 *ON 時就執行 DTL01 Subroutine
     **-----------------------------------------------  
     C      DTL01       BEGSR                             
     **----------------------------------------------------  
     C     'PECST=  '  DSPLY     XPECST               
     C                          .               
     C                          .         
     C                       ENDSR

yayuyo

我见过的一种用法好像是这样的

FFILEA  IP
FFILEB  IS

IFILEA  01
...
IFILEB  02
...

C  01      EXSR @FILEA
C  02      EXSR @FILEB
......

我是这么理解的：因为这里有Primary和Second File，记录的读取是系统控制的
而我们一般想要知道当前读到的到底是哪个file的记录，所以可以通过设置01,02这些indicator来识别
C表里面根据不同的indicator来处理不同的recorder

上面的实例应该还有对FILEA和FILEB设置M指示器的，具体有点忘了：）
   

franliu

有些逻辑文件会有多个记录格式,来自不同的物理文件,

用这个方法程序就知道读到的记录来自那个物理文件啦.