Folks,
I thankyou - still not resolved - going to bed:-(. Back on Thursday, bad day
tomorrow, experiments todo.
If it's this ugly for COBOL/CICS, my next week will be COBOL/CICS/DB2
compiles .. yuk
Graham
----- Original Message -----
From: "Graham Hobbs" <gho...@cdpwise.net>
Newsgroups: bit.listserv.ibm-main
To: <IBM-MAIN@LISTSERV.UA.EDU>
Sent: Tuesday, April 30, 2013 8:06 PM
Subject: Compile COBOL/CICS pgms on z/OS problem
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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
