Lizette, For Cobol, the DATA parm determines where the work storage is loaded. DATA(31) means it will attempt to loaded above the line. However, the program must also be at least RMODE(31) or ANY. And if during the compile, there is any modules still in 24 mode, then the entire module will be 24 mode.
Everything in the load module must be 31, along with the DATA(31) to be in 31 mode. Jerry -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Lizette Koehler Sent: Friday, January 25, 2019 2:42 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Are there compiler options to move Working Storage in Cobol above the line? 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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
