I have the following REXX:
/******************************** REXX ********************************/
/* */
/*TRACE R */
/* */
ADDRESS ISPEXEC
/* */
"LMDINIT LISTID(LISTID) VOLUME(SYHD99)"
/* */
DO FOREVER
"LMDLIST LISTID("LISTID") DATASET(DSNAME)"
IF rc > 0 THEN
LEAVE
/* */
SAY dsname
END
/* */
"LMDLIST LISTID("LISTID") OPTION(FREE)"
/* */
"LMDFREE LISTID("LISTID")"
/* */
SAY '==================================='
/* */
"LMDINIT LISTID(LISTID) VOLUME(SYHD99)"
/* */
DO FOREVER
"LMDLIST LISTID("LISTID") DATASET(DSNAME)"
/* */
IF rc > 0 THEN
LEAVE
/* */
SAY dsname
END
/* */
"LMDLIST LISTID("LISTID") OPTION(FREE)"
/* */
"LMDFREE LISTID("LISTID")"
/* */
RETURN
/* */
As you can see, this REXX contains 2 identical parts.
However, the output differs:
DFHSMD.BACK.T203206.SYS3.GOL.J5314
DFHSMD.BACK.T353406.SYS3.GOL.J5314
SYS1.VTOCIX.SYHD99
===================================
SYS1.VTOCIX.SYHD99
I don't understand the difference between the 1st en the 2nd part.
Could someone explain why the output differs?
Thanks
Hans Visser
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
