How To ?

Q) How do you fire a ba tch job from a CICS transaction ?

A) Define an extrapartition TDQ as an internal reader and write the JCL to it. Terminate the JCL with /*EOF.

Q)  How can you submit a job from COBOL programs?

A) Write JCL  cards to a dataset with //xxxxxxx SYSOUT= (A,INTRDR) where 'A' is output class, and dataset should be opened for output in the program. Define a 80 byte record layout fo r the file.

Q) How to code instream data in a PROC ?
A) Code SYSIN DD DUMMY in the PROC, and then override this from the JCL with instream data.
 

Q)  How  do  you  run  a  COBOL  batch  program  from  a  JCL?    How  do  you  run  a  COBOL/DB2 program?

A)  To run a non DB2 program,

//STEP001 EXEC PGM=MYPROG

To run a DB2 program,

//STEP001 EXEC PGM=IKJEFT01

//SYSTSIN DD *

DSN SYSTEM(....)

RUN PROGRAM(MYPROG)

PLAN(.....)  LIB(....)  PARMS(...)

/*