hi,
pls clear my question.
In cobol, how to submit one job from another job
hi pls clear my question
Moderators: dbzTHEdinosauer, Moderator Group
- Kalicharan
- Moderator
- Posts: 31
- Joined: Wed Feb 08, 2006 1:51 pm
Hi,
With Internal Reader - INTRDR, u can submit one job from another
Internal reader routines allow TSO jobs or application programs(like COBOL) to submit job streams to JES3 using output data sets. When a job stream enters the system, data management assigns the data sets directly to an internal reader. If an internal reader is not available, the system dynamically creates one. When JES3 schedules the internal reader, input service can proceed to process the data set as an input stream.
As mentioned, an application program can create a job and pass it to the JES3 internal reader. To pass the job to the internal reader, the program must write the job to a data set for which SYSOUT=(class,INTRDR) has been specified. The internal reader reads the job, then gives it to JES3 where the job is processed like other reader-submitted jobs.
If the submitter of an internal reader job is either a TSO user or has an associated TSO userid, the TSO userid will be propagated to the submitted job.
To display a list of all the internal readers in the system at any one time, issue the *INQUIRY,A,D=INTRDR command.
As the workload slows, input service will automatically terminate internal readers when they are no longer required.
The operator can also stop the internal reader by issuing a *CANCEL,INTRDR or a *CANCEL,J=jobno command
Thanks
Kalicharan.
With Internal Reader - INTRDR, u can submit one job from another
Internal reader routines allow TSO jobs or application programs(like COBOL) to submit job streams to JES3 using output data sets. When a job stream enters the system, data management assigns the data sets directly to an internal reader. If an internal reader is not available, the system dynamically creates one. When JES3 schedules the internal reader, input service can proceed to process the data set as an input stream.
As mentioned, an application program can create a job and pass it to the JES3 internal reader. To pass the job to the internal reader, the program must write the job to a data set for which SYSOUT=(class,INTRDR) has been specified. The internal reader reads the job, then gives it to JES3 where the job is processed like other reader-submitted jobs.
If the submitter of an internal reader job is either a TSO user or has an associated TSO userid, the TSO userid will be propagated to the submitted job.
To display a list of all the internal readers in the system at any one time, issue the *INQUIRY,A,D=INTRDR command.
As the workload slows, input service will automatically terminate internal readers when they are no longer required.
The operator can also stop the internal reader by issuing a *CANCEL,INTRDR or a *CANCEL,J=jobno command
Thanks
Kalicharan.
Internal Reader - INTRDR
Thanks Kali, good explanation.
Supriya,
Following code may helpful to you.
Thanks,
Krishna
Supriya,
Following code may helpful to you.
Code: Select all
//**********************************************************************
//**************THIS IS A ROUTINE WHICH CALLS ANOTHER JCL ***
//**********************************************************************
//***************************************
//STEP05 EXEC PGM=IEBGENER
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=DRAL.XXXXXX.JCLLIB(AUTO),DISP=SHR <-- JCL needs to be submitted
//SYSUT2 DD SYSOUT=(A,INTRDR)
//SYSIN DD DUMMY
//***********************************************************
Thanks,
Krishna
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page