i want to find out whether a member of a pds is already existing or not in rexx., if exists how to delete it..could u help me by quoting some syntax to do it.......i found out LISTDSI function in rexx....but it is useful in finding out only the information regarding pds...but it is not giving any information regarding member a pds...
rec = listdsi(pds)-------it is giving out information
rec = listdsi (pds(member))-----it is not responding
Just refer the following sample code -
dsname='PDSNAME' || '(' || memname ||')'
if (sysdsn("'"dsname"'") = 'OK') then
Do Normal Processing
if (sysdsn("'"dsname"'") \= 'MEMBER NOT FOUND') then
say 'Member not present ...'
say 'Error while processing the PDS ' PDSNAME