Advertisement
Guest User

Untitled

a guest
Oct 20th, 2017
224
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
JCL 1.11 KB | None | 0 0
  1. //INSTR  PROC                                                  
  2. //*CREATE HEADER                                              
  3. //CREAT1  EXEC PGM=IEFBR14                                    
  4. //NEW1      DD DSN=&SYSUID..TEMP.TEMP1,DISP=(NEW,CATLG,DELETE),
  5. //           DCB=(DSORG=PS,LRECL=80,RECFM=FB),                
  6. //           VOL=SER=(T2EDU1),                                
  7. //           SPACE=(TRK,(5,1))                                
  8. //                                                            
  9. //CREAT2  EXEC PGM=IEFBR14                                    
  10. //NEW2      DD DSN=&SYSUID..TEMP.TEMP2,DISP=(NEW,CATLG,DELETE),
  11. //           DCB=(DSORG=PS,LRECL=80,RECFM=FB),                
  12. //           VOL=SER=(T2EDU1),                                
  13. //           SPACE=(TRK,(5,1))                                
  14. //CREAT3 EXEC PGM=IEFBR14                                      
  15. //NEW3      DD DSN=&SYSUID..TEMP.TEMP3,DISP=(NEW,CATLG,DELETE),
  16. //          DCB=(DSORG=PS,LRECL=80,RECFM=FB),                  
  17. //          VOL=SER=(T2EDU1),  
  18. //          SPACE=(TRK,(5,1))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement