IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

CLIST - Virtual storage allocation error


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 121
Location: India

PostPosted: Tue Dec 19, 2023 11:14 am
Reply with quote

Hi All,

I am executing a clist from Ready prompt and its giving below error (Only few people are getting this error..)

Virtual storage allocation error

I have kept tracing parameters and executed my CLIST and the below is tace output
Code:

 READY                                                                         
APLUP                                                                           
 ALLOC FI(W1000) DA('&SYSUID..TST0000.PVTWKSPS') SHR REUSE                     
 ALLOC FI(W1000) DA('TESTIDS.TST0000.PVTWKSPS') SHR REUSE                       
 ALLOC FI(F0) DA('&SYSUID..TST0000.PVTFILES') SHR REUSE                         
 ALLOC FI(F0) DA('TESTIDS.TST0000.PVTFILES') SHR REUSE                         
 ALLOC FI(APL2HELP) DA('SYS1.APL.SAP2HELP') SHR REUSE                           
 ALLOC FI(APL2HELP) DA('SYS1.APL.SAP2HELP') SHR REUSE                           
 ALLOC FI(APL2PROF) DA('SYS1.APL.SAP2PROF') SHR REUSE                           
 ALLOC FI(APL2PROF) DA('SYS1.APL.SAP2PROF') SHR REUSE                           
 ALLOC FI(APL2LANG) DA('SYS1.APL.SAP2LANG') SHR REUSE                           
 ALLOC FI(APL2LANG) DA('SYS1.APL.SAP2LANG') SHR REUSE                           
 ALLOC FI(ADMSYMBL) DA('SYS1.GDDM.SADMSYM'                                     
           'SYS1.APL.SAP2SYMB') SHR REUSE                                       
 ALLOC FI(ADMSYMBL) DA('SYS1.GDDM.SADMSYM'                                     
           'SYS1.APL.SAP2SYMB') SHR REUSE                                       
 ALLOC FI(AP2TN011) DA('SYS1.APL.SAP2NICK'                                     
         'OEM.FSM124.NAMES'                                            'OEM.IEDI
TV2.NAMES') SHR REUSE                                                           
 ALLOC FI(AP2TN011) DA('SYS1.APL.SAP2NICK'                                     
         'OEM.FSM124.NAMES'                                            'OEM.IEDI
TV2.NAMES') SHR REUSE                                                           
 ***                                                                           
 ALLOC FI(IEDITREX) DA('OEM.IEDITV2.REXX') SHR REUSE                           
 ALLOC FI(IEDITREX) DA('OEM.IEDITV2.REXX') SHR REUSE                           
 ALLOC FI(APLDUMP)  SYSOUT(X)                   /*L FORMATTED DUMPS   */       
 ALLOC FI(APLDUMP)  SYSOUT(X)                   /*L FORMATTED DUMPS   */       
 ALLOC FI(APLTRACE) SYSOUT(X)                    /* TRACE DIAGNOSTICS */       
 ALLOC FI(APLTRACE) SYSOUT(X)                    /* TRACE DIAGNOSTICS */       
 ALLOC FI(CPYSWAP)  NEW SP(3 10) CYLINDERS   /* WS OVERFLOW IN )COPY  */       
 ALLOC FI(CPYSWAP)  NEW SP(3 10) CYLINDERS   /* WS OVERFLOW IN )COPY  */       
 ALLOC FI(CPYSPILL) NEW SP(3 10) CYLINDERS   /* DATA OVERFLOW IN )COPY*/       
 ALLOC FI(CPYSPILL) NEW SP(3 10) CYLINDERS   /* DATA OVERFLOW IN )COPY*/       
 APL2 AI(&AISIZE) AP(&APNAMES) CA(&CASE) CO(&CODE) DA(&DATEFORM)             DBC
S(&DBCS) DE(&DEBUG) DS(&DSOPEN) EX(&EXCLUDE) FR(&FREESIZE)          HI(&HILIGHT)
 ID(&ID) IN(&INPUT) LO(&LOADLIB) PR(&PROFILE)              &QUIET RUN(&RUN) SH(&
SHRSIZE) SM(&SMAPL) SV(&SVMAX)                    TE(&TERMCODE) WS(&WSSIZE) XA(&
XA) SY(&SYSDEBUG) TR(&TRACE)                                                   
 APL2 AI() AP() CA() CO() DA()             DBCS() DE() DS() EX() FR(200K)       
   HI() ID() IN() LO() PR(DEFAULT)               RUN() SH() SM() SV()           
         TE(1) WS(80%) XA() SY() TR()                                           
  Virtual storage allocation error                                         
 FREE FI(AP2TN011                            /*                       */       
IEDITREX                            /* IEDIT REXX INTERFACE  */        APLDUMP 
                           /* DUMPS                 */        APLTRACE         
                  /* TRACES                */        APL2HELP                   
 ***


Any suggestions?[/b]
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Tue Dec 19, 2023 4:24 pm
Reply with quote

Logon with a bigger region?
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 121
Location: India

PostPosted: Tue Dec 19, 2023 5:06 pm
Reply with quote

Hi Prino,

I am logging in with maximum available size

Size ===> 2096128


Thanks..
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Dec 20, 2023 12:58 am
Reply with quote

Issue:
Code:
PROFILE MSGID


And recreate the problem. It should give you a message number.

But the problem occurs in a separate program, APL2, and that is where the trace should be.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Dec 20, 2023 1:37 am
Reply with quote

The problem occurs in a separate program, APL2, and that is where the trace should be.

It looks like it accepts a parameter:
Code:
 TR(&TRACE)

Look at the source for APL2 to determine what the parameter should be.
Back to top
View user's profile Send private message
Joerg.Findeisen

Senior Member


Joined: 15 Aug 2015
Posts: 1255
Location: Bamberg, Germany

PostPosted: Wed Dec 20, 2023 11:44 am
Reply with quote

TSO PROF VARSTORAGE(HIGH) could also be of help.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CICS vs LE: STORAGE option CICS 0
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Insufficient Storage ABENDS & Debugging 7
Search our Forums:

Back to Top