MVSFORUMS.com

[tarandeep_singh]

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]

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 - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu

[Cogito-Ergo-Sum]

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

With

[Novice]

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]

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]

Thanks Suresh.

Novice