MVSFORUMS.com

[karavi2000]

Hi,

When I was writing a REXX to browse a dataset using ISPEXEC and when I tried to browse a empty dataset, my program got abended saying "Empty PDS member or an Empty sequential data set". Is there any way we can trap that and make a normal routine EXIT instead of getting abended. I have here also the code which I used to browse the dataset.

ADDRESS ISPEXEC
"ISPEXEC BROWSE DATASET("Dataset_Name")"

Thanks & Regards,
Ravishankar

[sriramla]

In the beginning of your program, use:
ADDRESS ISPEXEC "CONTROL ERRORS RETURN"

This ensures that the return code is given back to the application in the variable RC that you can interrogate for further actions. For example, after your "BROWSE DATASET" command, check RC. RC=0 means succes; RC=4 means warning etc.. Refer Manual for further details.
Hope this helps.

[karavi2000]

Hi Sriramla,

Yeah. I got that. I am able to trap the return code when adding "CONTROL ERRORS RETURN" to ISPEXEC. Thanks for your help.

With Cheers....

Thanks & Regards,
Ravishankar