Look for SIZE in this snippet from a CICS book
http://publib.boulder.ibm.com/infocenter/cicsts/v2r3/index.jsp?topic=/com.ibm.cics.ts23.doc/dfhp3/dfhp3nq.htm
I think you are confusing passing parms to the DFHZITCL cataloged
procedure, with overriding a parm it passes to COBOL compiler.
In particular, look for the piece starting with
You can change compiler options by using any of the following methods:
George
On 4/30/2013 8:06 PM, Graham Hobbs wrote:
Hello,
Back again. Am at Dallas IIC z/OS, compiling a dozen COBOL/CICS pgms all having
a SIZE problem. The following JCL almost worked without SIZE:
//ACICSP01 JOB (CONRAD-C),'IBMUSE2',CLASS=A,MSGCLASS=0,MSGLEVEL=(1,1)
//MYLIBS JCLLIB ORDER=(DFH420.CICS.SDFHPROC)
//QKVSP01 EXEC PROC=DFHZITCL,
// INDEX=DFH420.CICS,
// LNGPRFX=IGY420,
// DSCTLIB=IBMUSE2.QKVS,
// PROGLIB=VENDOR.LINKLIB.SECOND)
//COBOL.SYSIN DD DSN=IBMUSE2.QKVS(QKVSP01),DISP=SHR
//LKED.SYSLMOD DD DSN=VENDOR.LINKLIB.SECOND(QKVSP01),DISP=SHR
.. but all compiles give ..
IGYOS4013-W The SIZE(MAX) option was specified together with the SQL or CICS
option. SIZE(nnnnn) option is recommended, where nnnnn is an explicit size
value (not MAX) that leaves enough storage in the user region for the DB2
coprocessor or CICS integrated translator services.
.. onto solutions .. goggling says use SIZE=4000K; tried various combos,
closest I got was with ..
QKVSP01 EXEC PROC=DFHZITCL,PARM=(SIZE=4000K,
INDEX=DFH420.CICS,
LNGPRFX=IGY420,
DSCTLIB=IBMUSE2.QKVS,
PROGLIB=VENDOR.LINKLIB.SECOND)
.. but this gave ..
STMT NO. MESSAGE
3 IEFC624I INCORRECT USE OF PERIOD IN THE PARM FIELD
.. so tried ..
QKVSP01 EXEC PROC=DFHZITCL,
SIZE=4000K,
INDEX=DFH420.CICS,
LNGPRFX=IGY420,
DSCTLIB=IBMUSE2.QKVS,
PROGLIB=VENDOR.LINKLIB.SECOND
.. and got
STMT NO. MESSAGE
3 IEFC001I PROCEDURE DFHZITCL WAS EXPANDED USING PRIVATE LIBRARY
DFH420.CICS.SDFHPROC
3 IEFC657I THE SYMBOL SIZE WAS NOT USED
Can anyone say where am wrong, how to specify a SIZE=4000K parm? Am guessing I
am simply placing or coding SIZE slightly incorrectly .. very frustrating.
Again, please, thanks
Graham Hobbs
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
