Advertisement
Guest User

Untitled

a guest
Oct 19th, 2017
234
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
JCL 0.85 KB | None | 0 0
  1. //E00022T JOB VICTQ001,'E00022',                                      
  2. //            TIME=(0,4),NOTIFY=&SYSUID,CLASS=A,MSGCLASS=X TYPRUN=SCAN
  3. //STEP0  EXEC PGM=IEFBR14,                                            
  4. //            TIME=(0,5),REGION=250K                                  
  5. //ALLOCDD  DD DSN=&SYSUID..JCLCRS.INPUT,DISP=SHR                      
  6. //STEP1  EXEC PGM=IEFBR14,                                            
  7. //            TIME=(0,5),REGION=250K,COND=(0,NE)                      
  8. //STEP2  EXEC PGM=IEFBR14,                                            
  9. //            TIME=(0,5),REGION=250K,COND=((0,NE,STEP0),(4,GT,STEP1))  
  10. //STEP3  EXEC PGM=IEFBR14,                                            
  11. //            TIME=(0,5),REGION=250K,                                  
  12. //            COND=((0,NE,STEP0),(4,GT,STEP1),EVEN)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement