fazillatheef wrote:Is there a function in REXX to get the names of the members in a PDS?
No there is no direct function in rexx but you may try this logic. It's working correctly for me and will get member name on the screen one by one as there is say statement, The member name is stored in the STEM MEMS.
/*REXX*/
INPUT = ' YOUR PDS NAME '
X = OUTTRAP(MEMS.)
/* TO GET THE MEMBER LIST FROM THE INPUT PDS */
"LISTDS '"INPUT"' MEM"
X = OUTTRAP(OFF)
DO I=7 TO MEMS.0
MEMS.I = STRIP(MEMS.I)
SAY 'MEMBER:'MEMS.I
END
EXIT
Posted: Wed Jun 18, 2008 2:56 pm