The following sample VSE JCL sets the COBOL II runtime option RTEREUS, which improves the performance of COBOL II programs that CA Ideal batch calls and preserves the working storage between calls of the COBOL II subprogram.
* $$ JOB JNM=IDLCOBII,CLASS=B,PRI=6,DISP=D
* $$ LST DISP=D,CLASS=L
// JOB IDLCOBII
// OPTION CATAL
PHASE IDLCOBII,*
// EXEC IGYCRCTL,SIZE=256K
CBL LIB,RENT,RES,NODYNAM
.... COBOL II SOURCE GOES HERE.
/*
// EXEC ASSEMBLY
IGZOPTV RTEREUS=YES
END
/*
// LIBDEF PHASE,CATALOG=CAI.USER
// EXEC LNKEDT
/&
* $$ EOJ
Make sure that the phase is available to your CA Ideal batch JCL LIBDEF statement. You can now call the program directly from a CA Ideal batch program.
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|