SHARE
TWEET

Untitled

a guest Oct 20th, 2017 173 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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))
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top