IBM Mainframe Forum

Hi,

I have a question regarding cobol string function NATIONAL-OF and DISPLAY-OF giving error while using strings which are of PIC X(4000000) size. My requirement is to convert a string having PIC x(4000000) into unicode format.
MOVE FUNCTION DISPLAY-OF (FUNCTION NATIONAL-OF
(WSV-MQ-DUMMY1(1:WSV-MESSAGE-LEN) , 500) , 1208)
The above is working for X(1000000) .

The error while using X(4000000) :
CEE0813S Insufficient storage was available to satisfy a get storage (CEECZST) request.
The traceback information could not be determined.
<> LEAID ENTERED (LEVEL 06/15/2011 AT 18.20)
<> LEAID PROCESSING COMPLETE. RC=0

How do I resolve this ?

Thanks,
Navya

Provide more storage to the program.

How much storage does your JCL give the program now? And is the program compiled with DATA(31)? Is the program linkage edited / bound with AMODE(31) RMODE(ANY)?

Hi,

The JCL has REGION=0M. The program compiled has AMODE(31) RMODE(ANY).

Hello and welcome to the forum,

Repeat: is the program compiled with DATA(31)?

Have you talked with your Operations or Scheduling support to ask if a different JOB Class might help?

The program compiled has AMODE(31) RMODE(ANY).

This does not answer the question about whether or not the program can use storage above the line (compile option DATA(31) tells you that).

Are you aware that many sites use JES exits to restrict the amount of storage allocated when a programmer uses REGION=0M? If not, then you need to learn that. And the question STILL remains -- how much storage is the program getting already? If you did know about the restriction, then you should not have given the answer you did.

There is a good description of your error message with Programmer Response suggestions.

Have you tried doing the 4m thing in four 1m-byte chunks? You have nested functions with data of a huge size, and the "strain" of that might be leading to far more storage than necessary being used.