Looks like it didn't come through quite right. The first few lines of
REXX got concatenated somehow after I hit SEND. They should be:
/* SEARCH A PDS WITH MEMBER NAME WITH PDSPRE PREFIX, PDSSUF SUFFIX, FOR
FINDSTR*/
TRACE O
ARG PDSDSN "PRE(" PDSPRE ")" "SUF(" PDSSUF ")" "FIND(" FINDSTR ")" .
PDSDSN = STRIP(PDSDSN)
Gary Diehl
Systems Administration
"One machine can do the work of fifty ordinary people. No machine can do
the work of one extraordinary person." -Elbert Hubbard
----------------------------------------------------------------------
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
