IBM大型机实战教程

2.6

将JES2JOB1中的文件改为如下形式即可

//JES2JOB1  JOB
//COMBINE   EXEC PGM=IRXJCL,PARM='COMBINE'
//SYSEXEC   DD DSN=MTM2020.PUBLIC.SOURCE,DISP=SHR
//SYSTSPRT  DD DSN=&SYSUID..OUTPUT(JES2JOB1),DISP=SHR
//SYSTSIN   DD DUMMY
//ITEM      DD DSN=MTM2020.PUBLIC.INPUT(ITEM),DISP=SHR
//PRICE     DD DSN=MTM2020.PUBLIC.INPUT(PRICE),DISP=SHR
//LOCATION  DD DSN=MTM2020.PUBLIC.INPUT(LOCATION),DISP=SHR

2.8

将z05191.INPUT文件夹中的MERGECMD文件改成如下形式：（该行代码第一个是空格）

 MERGE FORMAT=CH,FIELDS=(1,9,A)

将zoamerge文件改成如下形式运行即可

（注意将z05191改成你自己的ID）

if
mvscmd --pgm=sort --args='MSGPRT=CRITICAL,LIST' \
   --sortin01='Z05191.INPUT(NAMES1)' \
   --sortin02='Z05191.INPUT(NAMES2)' \
   --sysin='Z05191.INPUT(MERGECMD)' \
   --sortout='Z05191.OUTPUT(ZOAMERGD)' \
   --sysout=*
then echo "It worked!"
else
echo "It didn't work"
fi

2.9

将cc_check.py的代码改成如下形式

注意：有关Z05191的部分需要改成你自己的ID