0

この PGM のエラーを見つけるのを手伝ってくれませんか。それは私のためにコンパイルされません

         PGM                                                     

         DCL        VAR(&LIB) TYPE(*CHAR) LEN(10) VALUE('A2LIB14')  
         DCL        VAR(&MSG) TYPE(*CHAR) LEN(80) VALUE('*** S T + 
                      O P ***       READ YOU HAVE READ ALL +       
                      INSTRUCTIONS CAREFULLY')                     
         SNDMSG     MSG(MSG) TOUSR(*REQUESTER)                    
         DSPMSG                                                    
         ADDLIBLE   LIB(&LIB)                                      
         STRDFU     OPTION(*SELECT) FILE(&LIB/TVSHOWSL) MBR(*FIRST)
         CRTPF      FILE(TVSHOWS) RCDLEN(10)                 
         DSPOBJD    OBJ(TVSHOWSL1) OBJTYPE(*LF)               
         WRKJOB     JOB(**)                                        
         ENDPGM
4

1 に答える 1

1
  1. *LFDSPOBJDコマンドの有効な OBJTYPE パラメーターではありません。
  2. **WRKJOBコマンドの有効な JOB パラメーターではありません。
于 2015-08-20T21:06:18.283 に答える