Operations › z/OS Environment › z/OS JCL

z/OS JCL

 //USLMAIN JOB(job accounting information)
 //LOGAPROC PROC OUTCLASS=A,                                          (1)
 //                    LOGALIB='YOUR.LOGA.LOADLIB',                   (2)
 //                    PROG=USLMAIN,                                  (3)
 //                    LOGDSN='IDMS.LGARCHIV',                        (4)
 //                    LOGUNIT=,                                      (5)
 //                    LOGVOL=,                                       (5)
 //                    SORTCYL='(5,5)',                               (6)
 //                    EXTCYL='(5,5)',                                (6)
 //                    EXTBLK=,                                       (7)
 //                    EXTDISP='(NEW,DELETE,DELETE)',                 (8)
 //                    BILLDSN='YOUR.LOGA.BILLFILE',                  (9)
 //                    BILLCYL='(5,5)',                               (6)
 //                    BILLBLK=,                                     (10)
 //                    BILDISP=CATLG                                 (11)
 //LOGA          EXEC  PGM=&PROG.
 //STEPLIB         DD  DSN=&LOGALIB.,DISP=SHR
 //SORTMSG         DD  SYSOUT=&OUTCLAS.
 //SYSOUT          DD  SYSOUT=&OUTCLAS.
 //AUDIT           DD  SYSOUT=&OUTCLAS.
 //REPORTS         DD  SYSOUT=&OUTCLAS.
 //SYSUDUMP        DD  SYSOUT=&OUTCLAS.
 //LOGFILE         DD  DSN=&LOGDSN.,
 //                    DISP=OLD&LOGUNIT.&LOGVOL.
 //SORTWK01        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //SORTWK02        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //SORTWK03        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //SORTWK04        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //SORTWK05        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //SORTWK06        DD  UNIT=DISK,SPACE=(CYL,&SORTCYL).
 //EXTRACT         DD  DSN=&EXTDSN.,
 //                    UNIT=DISK,SPACE=(CYL,&EXTCYL).,
 //                    DISP=&EXTDISP.&EXTBLK.
 //BILLFILE        DD  DSN=&BILLDSN.,
 //                UNIT=DISK,SPACE=(CYL,&BILLCYL).,
 //                DISP=(NEW,&BILDISP.,DELETE)&BILLBLK.
 //SYSIPT          DD  DDNAME=SYSIN
 //PEND
 //LOGA          EXEC  LOGAPROC,
 //* SPECIFY SORTLIB DD DSN=....              (if necessary)        (12)
 //* ENTER INPUT PARAMETERS HERE
  PROCESS , CONT=Y , IDMSXXXX=YES , RHDCRUAL=NO
   REPORT=HI-BPU
   REPORT=HI-SUM
   REPORT=BILLING,LEVEL=DETAIL
   REPORT=PROGRAM,LEVEL=SUMMARY
   REPORT=RANK, RANKWHAT=PG-IO, RANKHOW = HIGHEST