請教一個關于rpg里面e行的定義！

sjbao

在e行中定義如下
     F*******************************************
     E                    @@I        48  1      
     E                    ARY          35  1      
     E                    @@V        80  1      
     E                    @OV     1   3 44      
     E                    TY         9999  2      
     E                    TD         9999  3      
     E                    OP        9999  2      
     E                    KN         9999  1      
     E                    VL         9999 20      

能否有人解釋一下，這個是定義的作用按f4的提示是
                                                                                   
     From          To        Table      - Entries per --      Length               
   Filename     Filename     Name       Record     Table     of Entry    P/B/L/R   
                             TY                    9999          2                 
    Decimal       Sequence     Alternate      Length                 Decimal      
   Positions       (A,D)         Name        of Entry    P/B/L/R    Positions      
                                                                                   
   Sequence       Comment                                                         
                  TYPE - 01/15                                                    不知道這個是什么作用

尘

就是定义数组

tfnywu

DEFINE  ARRAY .

範例1 ,   變數 wk1      Entries per table --   5   
      Entries per record -- 1   
       length = 1
表示 變數  wk1 ,   內含 5 組 entries .  
並且於程式最下方 ** 標註 array 的內容 .  由程式員事先定義內容值 (CONSTANT )  :
  A. PERFECT
   B. GOOD ++
   C. GOOD
   D. NOT GOOD
   E. BAD      

範例2 ,   變數 wk2 ,  WK3
       Entries per table --  12   
       Entries per record -- 不定義   
       length = 10 , 0
表示 變數  wk2 ,   WK3 , 各自包含 12 組 entries .  
   方便程式 RUN TIME 讀取DATA 或 計算結果 , 存放於 該變數的 12 ENTRIES .
   WK2  COULE BE  某類商品 12 個月份 的  入庫數量 .  (12 組 )  
   WK3  COULE BE  某類商品 12 個月份 的  出庫數量 .  (12 組 )