Page 1 of 1

Cobol error - CEE3191E

PostPosted: Wed Dec 08, 2010 12:15 pm
by walker164
Hi,
I'm a student learning Cobol and assembler. I'm getting this error here and i'm not sure how to fix it. I've been googling stuff and I believe i need to somehow set my STORAGE to STORAGE=(00,NONE,NONE,8K). How do I do this?

Also, this is my JCL where it's abending:
//*
//JSTEP06 EXEC PGM=ASS7,REGION=1024K,COND=(0,NE)
//STEPLIB DD DSN=KC03CA7.CSCI465.LOADLIB(ASS7),DISP=SHR
//        DD   DSN=CEE.SCEERUN,DISP=SHR
//SYSIN DD *
//MUTUALFD DD  DSN=KC02322.CSCI465.FA10(DATA6A),DISP=SHR
//CLOSEPRC DD  DSN=KC02322.CSCI465.FA10(DATA6B),DISP=SHR
//BROKESAL DD  DSN=KC02322.CSCI465.FA10(DATA6C),DISP=SHR
//PRINTER DD SYSOUT=*
//*


And this is the z/os abend output job file chunk:
   Condition Information for Active Routines                                                                                         
     Condition Information for CEEBADDM (DSA address 1E490478)                                                                       
       CIB Address: 1E490F78                                                                                                         
       Current Condition:                                                                                                           
         CEE3191E An attempt was made to initialize an AMODE24 application without using the ALL31(OFF) and STACK(,,BELOW) run-time 
 options.                                                                                                                           
       Location:                                                                                                                     
         Program Unit: CEEBADDM Entry: CEEBADDM Statement:  Offset: +000000DE


And this is where I found the storage stuff:
    Installation default             STACK(131072,131072,ANYWHERE,KEEP,524288,131072)                                               
    Installation default             STORAGE(NONE,NONE,NONE,0)                                                                       
    Installation default             TERMTHDACT(TRACE,,96)       


Thanks for any help

Re: Cobol error - CEE3191E

PostPosted: Wed Dec 08, 2010 3:52 pm
by Robert Sample
//JSTEP06 EXEC PGM=ASS7,REGION=1024K,COND=(0,NE),
//        PARM=''STORAGE=(00,NONE,NONE,8K)'
would be one way (although you may need a / in front of STORAGE after the single quote mark); there are other ways to do this. Google cee run time parameters for more details.

When this fails to fix your problem, come back and we'll help you resolve your REAL issue.