Example : Sample JCL to convert" JCL chart built by ACMU Shell script built by ACMU

JCL Flow Chart for JOB H86BN55

Click on elements to show details


JOB H86BN55


Step DELFICH


Step EDITION

0052 //SYSIN    DD DISP=SHR,DSN=HH123B.DATE.PARM(DATE5)
Fermer/Close
0025 //EDITION  EXEC PGM=IKJEFT01,REGION=0M
Fermer/Close
0026 //SPI2MSTR DD  DSN=HH123B.CICS.SPITAB2.SPI2MSTR,DISP=SHR
Fermer/Close
0027 //FEDT     DD  DSN=HH123B.K.H33ABC03.EDITION.SAVE(0),DISP=SHR
Fermer/Close
0028 //DETAS1   DD  DUMMY,
0029 //             DCB=(LRECL=160,RECFM=FBA,BLKSIZE=0)
Fermer/Close

0030 //DETAPP   DD  DUMMY,
0031 //             DCB=(LRECL=175,RECFM=FBA,BLKSIZE=0)
Fermer/Close
0032 //DETAS2   DD  DUMMY,
0033 //             DCB=(LRECL=160,RECFM=FBA,BLKSIZE=0)
Fermer/Close
0034 //DETAS3   DD  DUMMY,
0035 //             DCB=(LRECL=160,RECFM=FBA,BLKSIZE=0)

Fermer/Close
0036 //DETAP    DD  DUMMY,
0037 //             DCB=(LRECL=160,RECFM=FBA,BLKSIZE=0)
Fermer/Close
0038 //DETAM    DD  DSN=HH123B.X.H33ABC03.DETAM,
0039 //             VOL=SER=HHSDB1,
0040 //             DISP=(NEW,CATLG,CATLG),
0041 //             UNIT=3390,SPACE=(CYL,(300,150),RLSE),
0042 //             DCB=(LRECL=160,RECFM=FBA,BLKSIZE=0)
Fermer/Close
0043 //SYSTSPRT DD SYSOUT=*
Fermer/Close
0044 //SYSPRINT DD SYSOUT=*
Fermer/Close
0045 //SYSDBOUT DD SYSOUT=*
Fermer/Close
0046 //SYSOUT   DD SYSOUT=*
Fermer/Close


Step DELMICRO


Step EDDETAM

0065 //ENTREE   DD  DSN=HH123B.X.H33ABC03.DETAM,DISP=SHR
Fermer/Close
0064 //SYSPRINT DD  SYSOUT=*
Fermer/Close
0066 //SORTIE   DD  DSN=HH123B.HHSCOMP.H33ABC03.DETAM,DISP=(,CATLG,DELETE),
0067 //             UNIT=3390,SPACE=(CYL,(250,200),RLSE),VOL=SER=HHSDB1,
0068 //             DCB=(LRECL=133,RECFM=FBA,BLKSIZE=26600)
Fermer/Close

END OF JOB H86BN55

Contact us for details