On Wed, 9 Nov 2005 12:16:52 -0600, JONES, CHARLIE wrote: >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.
How many records, on average are in these QSAM files? (Thousands, hundreds- of-thousands, millions, more?) Are any of these files opened/closed/reopened/reclosed during the run? >Are there any easy tricks to make the entire program run above the line? Perhaps. Others have commented on general methods, but since you have IDMS involved you may or may not be able to make use of them. >Or will we simply have to reduce file buffer sizes (Blocking Factor) and >reduce Working Storage array sizes? I wouldn't reduce the blocking factor but I might (probably would) consider reducing the number of buffers if you have cached DASD on FICON, ferinstance. It won't buy you much for very long though. Do you have JCL overrides for the BUFNO= specified in the JCL today? Just how small is your below-the-line private area, anyway? Is this program loading and executing IDMS in that region, too, or is there some other reason that you have hit a wall at 3.5MB to raise this issue? -- Tom Schmidt Madison, WI ---------------------------------------------------------------------- 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
