亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題 [打印本頁]

作者: nhxingliang    時(shí)間: 2005-08-18 16:43
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
我在練習(xí)對數(shù)據(jù)區(qū)的操作的編程的時(shí)候遇到下面的問題,麻煩大家給分析一下

謝謝大家!!!!!!!!!!!

首先我在我的庫里創(chuàng)建了數(shù)據(jù)區(qū) 如下:MYLIB/MYDAARA
我在網(wǎng)上找到如下程序:

*************** Beginning of data **********************
0001.00     I#DTA            DS                                      20                    
FMT J     .....I...........................PFromTo++DF i e l d+L1M1FrPlMnZr.
0002.00      I                                    1       8 CURDAT            
0003.00      I                                  11     16 CURTME            
0004.00     C                   *NAMVAR     DEFN MYDTAARA  #DTA     
0005.00     C                   *LOCK          IN#DTA                              
0006.00     C                                       TIME   DATTME 140               
0007.00     C                                        MOVE DATTME    CURDA
0008.00     C                                        MOVELDATTME    CURTME  
0009.00     C                                        OUT    #DTA                       
0010.00     C                                        UNLCK#DTA                        
0011.00     C                                        SETON                              LR  
    ****************** End of data***********************

可我在編譯的時(shí)候系統(tǒng)給出如下信息:
QRG4005    :文件名或記錄名未定義或無效

Qrg7030    :字段或指示符未定義

QRG1020  :寫至數(shù)據(jù)區(qū)域返回碼時(shí)出錯(cuò),未記錄編譯狀態(tài).

我不知道那除了出錯(cuò)了? 麻煩大家給指點(diǎn)一下.


謝謝大家!!!!!!!!!!!!!
作者: fairyboy    時(shí)間: 2005-08-18 17:43
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
你沒有建立MYDTAARA 引起的,先建立
作者: nhxingliang    時(shí)間: 2005-08-19 10:05
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
從編譯的屏幕上看,主要是沒有有定義#DTA和DATA兩個(gè)字段.
可是我在我的庫中已經(jīng)定義了DATA數(shù)據(jù)區(qū)域.

1.jpg.gif (19.07 KB, 下載次數(shù): 46)

1.jpg.gif

作者: pl421    時(shí)間: 2005-08-19 10:09
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
看看庫列表什么的.中文的400,爽.
作者: nhxingliang    時(shí)間: 2005-08-23 13:31
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
我在編譯之前先把庫加入到了庫列表.

然后在編譯還是出現(xiàn)上面的情形呀?


郁悶中.......................................
作者: qingzhou    時(shí)間: 2005-08-23 17:08
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
0004.00     C                   *NAMVAR     DEFN MYDTAARA  #DTA   
—>;
0004.00     C                   *DTAARA      DEFN MYDTAARA  #DTA
作者: kempzhang    時(shí)間: 2005-08-23 17:51
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
[quote]原帖由 "qingzhou"]    DEFN MYDTAARA  #DTA[/quote 發(fā)表:

這兩個(gè)參數(shù)qinzhou大哥能講講具體的差別嗎?
作者: qingzhou    時(shí)間: 2005-08-23 17:55
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
原帖由 "kempzhang" 發(fā)表:

這兩個(gè)參數(shù)qinzhou大哥能講講具體的差別嗎?

這幾天我抽空整理成一篇文章、專講DTAARA運(yùn)用的,請等待。。。
作者: nhxingliang    時(shí)間: 2005-08-24 08:01
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
謝謝了qingzhou大哥!!!!!!!!!

小弟期待著..................................
作者: ibmas400    時(shí)間: 2005-08-24 17:41
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題

  1.   列  . . . :       1  71           編輯                            LIB/QRPGSRC
  2. SEU==>;                                                                MYDTAARA
  3. FMT DS .....IDsname....NODsExt-file++.............OccrLen+....................
  4.         ******************** 數(shù)據(jù)開始 *****************************************
  5. 0001.00      I#DTA        DS                             20                     
  6. 0003.00      I                                        1   8 CURDAT              
  7. 0004.00      I                                       11  16 CURTME              
  8. 0005.00      C           *NAMVAR   DEFN MYDTAARA  #DTA                          
  9. 0006.00      C           *LOCK     IN   #DTA                                    
  10. 0007.00      C                     TIME           DATTME140                     
  11. 0008.00      C                     MOVE DATTME    CURDAT                        
  12. 0009.00      C                     MOVELDATTME    CURTME                        
  13. 0010.00      C                     OUT  #DTA                                    
  14. 0011.00      C                     UNLCK#DTA                                    
  15. 0012.00      C                     SETON                     LR                 
  16. 0013.00      C                     RETRN                                       
  17.         ******************** 數(shù)據(jù)結(jié)束 *****************************************
  18.                                                                                 
  19.                                                                                 
  20.                                                                                 
  21.                                                                                 
  22. F3= 退出   F4= 提示   F5= 刷新   F9= 檢索   F10= 光標(biāo)   F11= 切換              
  23. F16= 重復(fù)查找         F17= 重復(fù)更改       F24= 其余鍵                          
  24.                                          (C) COPYRIGHT IBM CORP. 1981, 2002.   
復(fù)制代碼


我也本地測試了一下,先創(chuàng)建一個(gè)名為MYDTAARA的字符形的數(shù)據(jù)區(qū),然后編譯RPG,發(fā)現(xiàn)LZ有2個(gè)比較明顯的錯(cuò)誤:
1、“ C                     MOVE DATTME    CURDAT ”行應(yīng)該是CURDAT,而不是CURDA;
2、程序最后一行少一句“ C                     RETRN ”;
但編譯結(jié)果還是出現(xiàn)了一個(gè)30級別的*QRG7044的錯(cuò)誤信息,也找了半天沒找出原因。
錯(cuò)誤信息如下:

  1.                                顯示假脫機(jī)文件                                   
  2.   文件 . . . . . :   MYDTAARA                          頁/行     2/23         
  3.   控制 . . . . . .                                     列         1 - 75        
  4.   尋找 . . . . . .                                                              
  5.   *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+   
  6.        1300  C                     RETRN                                       
  7.              * * * * *    源結(jié)束    * *                  * * *                  
  8.              其他診斷消息                                                      
  9.   * 7044       700   DATTME 必須是數(shù)字字段,才能進(jìn)行此操作。                    
  10.    5722WDS V5R2M0  020719                IBM RPG/400                           
  11.                             交叉引用                                            
  12.     字段引用:                                                                  
  13.            字段         屬性      參考   ( M= 已修改  D= 已定義)              
  14.           *LOCK                600                                             
  15.           *NAMVAR              500                                             
  16.           #DTA        DS(20)   100D  500   600  1000  1100                     
  17.                       EXTNAME  MYDTAARA                                         
  18.           CURDAT      A(8)     300D  800M                                       
  19.           CURTME      A(6)     400D  900M                                       
  20.           DATTME      A(140)   700D  800   900                                 
  21.           MYDTAARA             500                                             
  22.                                                                         尚有 ...
  23. F3= 退出  F12= 取消    F19= 左    F20= 右     F24= 其余鍵                     
  24.                                                                                 
復(fù)制代碼


哪位高人指點(diǎn)一下?
作者: nhxingliang    時(shí)間: 2005-08-25 10:29
標(biāo)題: 對數(shù)據(jù)區(qū)的操作的問題
今天我又重新編譯了一下,原程序沒有錯(cuò)誤.

但在最后給出了一條信息是:
QRG1020  :寫至數(shù)據(jù)區(qū)域返回碼時(shí)出錯(cuò),未記錄編譯狀態(tài).

不知是什么原因,請高手指點(diǎn)一下,謝謝!!




歡迎光臨 Chinaunix (http://72891.cn/) Powered by Discuz! X3.2