0

我想就这个 JCL 寻求帮助......我似乎无法让它工作。我在大型机上运行它。我得到 RC 16。

//X544582Z  JOB (T,92958888P),                      
//          'N=TSO.X544582',                        
//          CLASS=S,                                
//          MSGCLASS=H,                             
//          MSGLEVEL=(1,1),                         
//          REGION=32M,                             
//          NOTIFY=&SYSUID                          
//*         TYPRUN=SCAN                             
//JOBLIB    DD DSN=X544582.LOADLIB1,DISP=SHR        
//COPY      EXEC PGM=SORT                           
//SYSOUT    DD   SYSOUT=*                           
//SORTIN    DD DSN=X544582.CMIGRATE.INPUT01,DISP=SHR
//SORTOUT   DD DSN=X544582.CMIGRATE.INPUT02,DISP=SHR
//SYSIN     DD *                                    
  OPTION COPY                                       
  OUTREC BUILD=(1,1172,TRAN=ATOE)                   
/*                                                  
//                                                  
4

1 回答 1

2

RC=16 只是表示有问题,这是 SORT 无法处理的。

猜测:

  1. 你的输入是 VB,你应该有:

    选项复制
    OUTREC BUILD=(5,TRAN=ATOE)

    表示“5从位置 5 到当前记录的末尾”。

  2. 您的输入是 FB,并且您的记录长度小于 1172。

于 2014-04-21T08:24:45.703 回答