I don't use a procedure but this is how I specify size and it works OK, no
size warning message:

//*********************************************************************/
//* STEP 1: COMPILE */
//*********************************************************************/
//ENTCOB EXEC PGM=IGYCRCTL,COND=(4,LT),
// PARM='LIB,NOC(E),TRUNC(BIN),SZ(8192K),MAP,LIST,X,SQL,F(W,W),
// CICS("SP")'

I use a REXX exec to build the entire JCL stream from a 3.4 member  list.
Also use something similar for BMS maps.


On Wed, May 1, 2013 at 10:06 AM, Graham Hobbs <[email protected]> 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
>



-- 
Wayne V. Bickerdike

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to