AS400 RPGLE在模块中定义显示文件

时间:2012-06-28 13:22:41

标签: ibm-midrange rpgle

我一直在阅读有关在ILE中创建模块和服务程序的内容,但在模块内部定义显示窗口(提示屏幕)方面我找不到多少。我尝试了以下操作,但是一直收到一个错误,即RECNO参数(此处为RRN)未定义(* RNF7004)。 知道我做错了什么......或者我可以获得更多信息......

    H NOMAIN                                                
    FWDWFACV   CF   E             WORKSTN                   
    F                                     SFILE(FACSFL:RRN) 
    FZMFL01    IF   E           K DISK                        
    D/COPY CUSSRCV6/QCPYSRC,TOOLS                           
    P WDWFAC          B                   EXPORT            
    DWDWFAC           PI                                    
    DWFAC                            2A                     
    DWFDESC                         20A   options(*nopass)  
    D RRN             S              3S 0 inz(0)            
    D WKFLAG          S              1S 0                   
    /free                                                   

1 个答案:

答案 0 :(得分:1)

附加到显示文件的RRN变量可能需要是全局的(在模块外部定义)。