Wednesday, December 25, 2013

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(...)
/*