How to release the panel library PDS after the rexx program is over

[ramkrishnapally]

Hi,
I'm facing a problem that might have a very simple solution. Unfortunately, I don't know the solution.
I have a REXX program which uses a panel. I'm using the following statement to define the panel library.
"ISPEXEC LIBDEF ISPPLIB DATASET ID('SXKMOU.REXX.SKELLIB')"
FYI, SXKMOU.REXX.SKELLIB is a common library that is accessible by all the users in normal conditions.
Even when the program execution is over, this dataset is not released from my user id and hence when someone else tries to use this library for some other purpose they are not able to.
What can I do to release this library from my user id once my program execution is over.

Thanks in advance.

 

[rexxhead]

address ISPEXEC "LIBDEF ISPPLIB"

BTW, it is very bad practice to

"ISPEXEC LIBDEF ISP...."

since you are probably in address TSO when you do it. That mantra dispatches a fresh ISPEXEC to handle the command. You should, instead, use 'address ISPEXEC' to direct the text to the currently-running ISPEXEC environment.

Secondly, when using LIBDEF I recommend you use the "STACK" option.

Thirdly, a LIBDEF typically only has to exist for a very short time:

address ISPEXEC
"LIBDEF ISPPLIB DATASET ID(.....) STACK"
"DISPLAY PANEL(ZONKO)"
"LIBDEF ISPPLIB"

and should be scrubbed as soon as it is no longer needed. You can always re-establish it if you need it again.



Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster