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 <[email protected]> On Behalf Of > Alan Young > Sent: Friday, January 25, 2019 1:00 AM > To: [email protected] > 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)" <[email protected]> > Sent: Thursday, January 24, 2019 20:25 > To: [email protected] > 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:[email protected]] On > Behalf Of Lizette Koehler > Sent: Thursday, January 24, 2019 9:42 PM > To: [email protected] > 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 > [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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
