Cobol error - CEE3191E



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

Cobol error - CEE3191E

Postby walker164 » Wed Dec 08, 2010 12:15 pm

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
walker164
 
Posts: 1
Joined: Wed Dec 08, 2010 12:08 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Cobol error - CEE3191E

Postby Robert Sample » Wed Dec 08, 2010 3:52 pm

//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.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times


Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post