Charlie, 16x5x27998=2MB, so it looks to me like someone has already bumped your BUFNO or Blksize!
Lots of ways to skin a cat - If the files are all different sizes then I would set BUFNO=1 for the smaller files, so there will be minimum impact on performance. Someone mentioned striping using more storage, but I understand that B/QSAM buffers with Extended Format datasets go above the line. If so, would it help to convert the files to Extended Format? Finally, you account for 3.5MB of Region. I assume you have a Region of 8-12MB available so what is using the other 4-8MB? Ron > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On > Behalf Of JONES, CHARLIE > Sent: Thursday, 10 November 2005 2:17 AM > To: IBM-MAIN@BAMA.UA.EDU > Subject: COBOL Program exhausting below the line storage > > Compiler: PP 5655-G53 IBM Enterprise COBOL for z/OS and OS/390 3.2.0 > > > > We have a LARGE COBOL application program that is exhausting below the > line storage and > > abending. There are 16 QSAM files and an IDMS Database. > > > > > > Sub Pool 0 (File Buffers 1.5meg) and Sub Pool 2 (Working Storage 2meg) > are using > > about 3.5meg total > > > > Are there any easy tricks to make the entire program run above the line? > > Or will we simply have to reduce file buffer sizes (Blocking Factor) and > > reduce Working Storage array sizes? > > > > > > > > Charlie > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html