So everything looked fine, RENT, DATA(31), ALL31(off), RMODE(ANY)

But after doing an AMBLIST on the application load module, there was one module 
in 24bit mode  -  everything else was 31.

So as I understand it, if there is one 24bit module, then the entire process 
will run below the line including the working storage.

Learned something new.


Thank you every one


Lizette


> -----Original Message-----
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
> Alan Young
> Sent: Friday, January 25, 2019 1:00 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Are there compiler options to move Working Storage in Cobol
> above the line?
> 
> Also ask them to look at the file buffers.
> 
> 
> If VSAM files are used, AMP='RMODE31=ALL' on each DD will move control blocks
> and buffers above the line.
> 
> 
> Check to see that files are not excessively buffered or if the specified
> buffers can be reduced a bit to free storage.
> 
> 
> On sequential DDs with low EXCP activity, try reducing buffers on those with
> something lower than the system default like BUFNO=1, 2 or 3.
> 
> 
> Alan
> 
> 
> ________________________________
> From: "Savor, Thomas (Alpharetta)" <thomas.sa...@fiserv.com>
> Sent: Thursday, January 24, 2019 20:25
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Are there compiler options to move Working Storage in Cobol
> above the line?
> 
> DATA(31) - allocates working storage above-the-line
> DATA(24) - allocates working storage below-the-line
> 
> ALL31 being OFF - is probably what is needed in a mixed  environment.
> ALL31 being ON - would say that you have no below-the-line programs for COBOL
> to deal with.
> 
> 
> Thanks,
> 
> Tom Savor
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Lizette Koehler
> Sent: Thursday, January 24, 2019 9:42 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Are there compiler options to move Working Storage in Cobol
> above the line?
> 
> So when I look at the compiler options, they have DATA(31)
> 
> ALL31 in LE is OFF
> 
> Only things I can think of for now.
> 
> Lizette
> 
> ----------------------------------------------------------------------
> 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

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to