Catalog and Instream Proc in JCL

Program Code :

Code For Catalog :

000001 //CATLOG11 PROC A=OZA090.ANN22.PS
000002 //STEP1 EXEC PGM=IEFBR14
000003 //DD1 DD DSN=&A,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 //STEP1 EXEC PROC=PROC,A=OZA090.ANN13.PS
000004 //SYSPRINT DD SYSOUT=*
000005 //SYSOUT DD SYSOUT=*
000006 //SYSIN DD *
000007 /*
000008 //

Code For Instream :

000001 //OZA090BB JOB NOTIFY=&SYSUID
000002 //AB PROC A=0ZA090.BAL2.PS
000003 //STEP1 EXEC PGM=IEFBR14
000004 //DD1 DD DSN=&A,
000005 // DISP=(NEW,CATLG,DELETE),
000006 // SPACE=(CYL,(2,3),RLSE),
000007 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
000008 // PEND
000009 //STEP2 EXEC PROC=AB,A=OZA090.BALUU.PS
000010 //SYSPRINT DD SYSOUT=*
000011 //SYSOUT DD SYSOUT=*
000012 //

0 comments:

Computers TopOfBlogs Technology Blogs Mainframe interview question and answers,mainframe jobs,cobol,vsam,jcl,cics,db2,rdbms,mvs,tso,ispf,ibm,hcl,tcs,cts,wibro Blog Directory