Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //INSTR PROC
- //*CREATE HEADER
- //CREAT1 EXEC PGM=IEFBR14
- //NEW1 DD DSN=&SYSUID..TEMP.TEMP1,DISP=(NEW,CATLG,DELETE),
- // DCB=(DSORG=PS,LRECL=80,RECFM=FB),
- // VOL=SER=(T2EDU1),
- // SPACE=(TRK,(5,1))
- //
- //CREAT2 EXEC PGM=IEFBR14
- //NEW2 DD DSN=&SYSUID..TEMP.TEMP2,DISP=(NEW,CATLG,DELETE),
- // DCB=(DSORG=PS,LRECL=80,RECFM=FB),
- // VOL=SER=(T2EDU1),
- // SPACE=(TRK,(5,1))
- //CREAT3 EXEC PGM=IEFBR14
- //NEW3 DD DSN=&SYSUID..TEMP.TEMP3,DISP=(NEW,CATLG,DELETE),
- // DCB=(DSORG=PS,LRECL=80,RECFM=FB),
- // VOL=SER=(T2EDU1),
- // SPACE=(TRK,(5,1))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement