Program Code : Code For Catalog 000001 //CATLOG11 PROC 000002 //STEP1 EXEC PGM=IEFBR14 ...
Program Code :
Code For Catalog
000001 //CATLOG11 PROC
000002 //STEP1 EXEC PGM=IEFBR14
000003 //DD1 DD DSN=OZA090.ANN13.PS,DISP=(NEW,CATLG,DELETE),
000004 // SPACE=(TRK,(1,3),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
000005 //
000001 //OZA09012 JOB NOTIFY=&SYSUID
000002 //DDI JCLLIB ORDER=OZA090.PROC.PDS
000003 //STEP2 EXEC PROC=PROC
000004 //STEP1.DD1 DD DSN=OZA090.ANN154.PS
000005 //SYSPRINT DD SYSOUT=*
000006 //SYSOUT DD SYSOUT=*
000007 //SYSIN DD *
000008 /*
000009 //
Code For Instream :
000001 //OZA090BB JOB NOTIFY=&SYSUID
000002 //AB PROC
000003 //STEP1 EXEC PGM=IEFBR14
000004 //DD1 DD DSN=OZA090.BALA123.PS,
000005 // DISP=(NEW,CATLG,DELETE),
000006 // SPACE=(TRK,(1,2),RLSE),
000007 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
000008 // PEND
000009 //STEP2 EXEC PROC=AB
000010 //STEP1.DD1 DD DSN=OZA090.BALL.PS,SPACE=(CYL,(2,3),RLSE)
000011 //SYSPRINT DD SYSOUT=*
000012 //SYSOUT DD SYSOUT=*
000013 //
No comments
Post a Comment