MVSFORUMS.com

tarandeep_singh · Beginner Joined: 07 Mar 2005 Posts: 6 Topics: 3

Does working storage variables in any case hold the values of the previous run of the code
actually I am facing a case where the working storage variables are retaining the values that the program had when it was called previously; this program is called several times and if not initialized retains its old values exactly
Is this possible in a general case
Thanks
Taran

kolusu · Posted: Mon Mar 07, 2005 9:48 am Post subject:

tarandeep_singh,

How are you calling the subroutine? Is it statically or dynamically? If you are calling statically , then you can issue a CANCEL statement before returning to the main program.

Or call the subroutine dynamically , so that your subroutine is always in the initial state for every call.

Check this link for cancelling a sub program

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3PG10/4.1.3.2.1?SHELF=&DT=20020923143836&CASE=

Check this link for cancel command

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR10/6.2.5?DT=20020920180651

Hope this helps...

Cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

Cogito-Ergo-Sum · Posted: Mon Mar 07, 2005 12:45 pm Post subject:

Yes, it will hold the old values if you do not meddle with PROGRAM-ID of the IDENTIFICATION DIVISION.

With

Novice · Beginner Joined: 27 Dec 2002 Posts: 46 Topics: 15

Kolusu,

Does a Dynamic call always initializes working storage variables for each invocation? This is not what I got when I tried the following example. Let me know if I missed out some thing

SureshKumar · Intermediate Joined: 23 Jan 2003 Posts: 211 Topics: 21

Novice,
In a dynamic call the Working Storage is initialized once for a "Run Unit". In case of CICS it's just once, but if called in Batch more often then the WS needs to be Initialized or other methods lime "IS INITIAL".

Novice · Beginner Joined: 27 Dec 2002 Posts: 46 Topics: 15

Thanks Suresh.

Novice