Instream Procedure Program in JCL

INSTREAM
//TRGA13QQ JOB NOTIFY=TRGA13                          
//PRO1NAME PROC  PROG=DISP                            
//STEP1 EXEC PGM=&PROG                                
//STEPLIB DD DSN=TRGA13.MOULI.LOADLIB,DISP=SHR        
//SYSPRINT DD SYSOUT=A                                
// PEND                                                
//PRO2NAME PROC                                        
//STEP2 EXEC PGM=DISP2                                
//STEPLIB DD DSN=TRGA13.MOULI.LOADLIB,DISP=SHR        
//SYSIN DD DSN=TRGA13.MOULI.DATAPS,DISP=SHR            
//SYSPRINT DD SYSOUT=A                                
// PEND                                                
//PRO3NAME PROC                                        
//STEP3 EXEC PGM=DISP2                                
//STEPLIB DD DSN=TRGA13.MOULI.LOADLIB,DISP=SHR        
//SYSPRINT DD SYSOUT=A                                
// PEND                                                
//FST   EXEC PRO1NAME            
//FST1  EXEC PRO1NAME,PROG=DISP1  
//SEC   EXEC PRO2NAME            
//TRD   EXEC PRO3NAME            
//STEP3.SYSIN DD *                
    300.33                        
/*                                
//                                

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