MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Releasing the Virtual storage used by Load module in Rexx

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
TheGodfather
Beginner


Joined: 08 Jul 2003
Posts: 10
Topics: 3
Location: Tvm, Keralam, India

PostPosted: Thu Mar 08, 2007 12:03 am    Post subject: Releasing the Virtual storage used by Load module in Rexx Reply with quote

Hi All,

Our REXX programs calls a load module multiple times based on the input records. This processes running fine when no of records are less than 5 ( 5 times program module would be called - we had to go for this solution due to various reasons).

This is the problem.

Looks like the virtual storage used by the programs getting increased for every call to program module. Hence when the call is increased to 6 times we are getting the below error message

Code:
"FETCH FOR MODULE IDCTSLC0 FROM DDNAME -LNKLST- FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABLE."


5 time execution
Code:
PGM USED.........6,944K
SYSTEM USED........612K
TCB..............84,799
SRB...............2,890
I/O...............1,024


1 time execution
Code:
PGM USED.........2,804K
SYSTEM USED........604K
TCB..............21,776
SRB...............1,009
I/O.................324


Is there a way to release the virtual storage used by the program module after execution.

Our REXX program is already calling the program module using CALL *(program_name).

This is for my friend Suresh Kumar.
_________________
The Godfather
"I'll make an offer he can't refuse."
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Thu Mar 08, 2007 9:43 am    Post subject: Reply with quote

TheGodfather,

Check this link

http://www-1.ibm.com/support/docview.wss?rs=615&context=SSGTSD&q1=PQ88292&uid=swg1PK12802&loc=en_US&cs=utf-8&lang=en+en

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
TheGodfather
Beginner


Joined: 08 Jul 2003
Posts: 10
Topics: 3
Location: Tvm, Keralam, India

PostPosted: Fri Mar 09, 2007 12:31 am    Post subject: TSOEXEC solved the issue. Reply with quote

Thanks Kolusu! Smile

Suresh was able to solve the issue by calling the program module by using the TSOEXEC command. He told me he got answer from another forum.

Appreciate your time!
_________________
The Godfather
"I'll make an offer he can't refuse."
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Fri Mar 09, 2007 8:09 am    Post subject: Re: TSOEXEC solved the issue. Reply with quote

TheGodfather wrote:
Thanks Kolusu! Smile

Suresh was able to solve the issue by calling the program module by using the TSOEXEC command. He told me he got answer from another forum.

Appreciate your time!


Thanks for the feedback.
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group