Re: Cobol Working Storage Size Limit

Rod,
That limit of 3,000,000 is for a single group item, not the entire working
storage area. I threw together a quick COBOL program to see how big working
storage could get and managed to get to 16,771,000. Going much past that
resulted in the following error in the compiler listing:
CPF6563 40 Program was too large to be created.
A little more digging showed up the following message:
MCH2802 Program larger than limit at instruction number X'0000',
error code X'000A'.
Error code 000A says that "The program requires more than 16776960 bytes of
storage for either the ASF (automatic storage frame) or SSF (static storage
frame)."
Error code 000B for message MCH2802 says that "The program requires more
than 16777216 bytes for all data and instructions."

With your working storage size currently at 7,689,321, it looks like you
have lots more room; depending, of course, on the size of your actual
program code. If you do a DSPPGM on your program, you can get the program
size, static storage size, etc. That should give you an idea on how much
more room you have to grow.
Would it be possible to convert the program to ILE? Looking at the Compiler
Limits in the ILE manual, it shows the limit on a single group item in
working storage is up to 16,711,568, and I was able to define a working
storage of 150,000,000 (10 * 15,000,000) without any problems.
Hope this helps!
Richard

-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Rod Verity
Sent: Friday, May 16, 2008 1:27 PM
To: cobol400-l@xxxxxxxxxxxx
Subject: Re: [COBOL400-L] Cobol Working Storage Size Limit


I had asked this question earlier and I was referred to the Cobol/400
manual that listed the Compile Limits. I am not sure if I am reading this
right but the Working Storage limit they list here, I believe, is for any
one group item(eg. 01 level) not for the total Working Storage. My OPM
program that I am concerned with has a working storage size of 7,689,321 so
I am wondering if this is getting close to the limit or not. The limit
shown in the compiler limit for group item size is 3,000,000 so I hope that
doesn't mean the entire working storage. The program compiles and runs so I
expect not.
Thanks for your help,
Rod

Please consider the environment before printing this email.

This message, including any attached documents, is intended for the
addressees only. It may contain information that is confidential,
privileged and/or exempt from disclosure. No rights to privilege or
confidentiality have been waived. Any unauthorized use or disclosure is
prohibited. If you have received this message in error, please reply to the
sender by e-mail and delete or destroy all copies of this message.
______________________________________________________
Avant d'imprimer ce courriel, pensez à l'environnement.

Ce message, incluant tous les documents joints, est à l'intention des
destinataires visés seulement. Il peut contenir des renseignements
confidentiels, protégés et/ou ne pouvant pas être divulgués. Aucune
renonciation n'est faite quant à sa nature confidentielle et privilégiée.
Par conséquent, toute diffusion ou utilisation non autorisée est
strictement interdite. Si vous avez reçu ce message par erreur, veuillez
en aviser immédiatement l'expéditeur par retour de courriel et en détruire
toutes les copies existantes.