You can do something like this:
HLQ = 'DISK.TEST'
X = OUTTRAP("CATLINE.",99999,"NOCONCAT")
"LISTC LEVEL("HLQ")"
X = OUTTRAP("OFF")
DO LOGLINE = 1 TO CATLINE.0
DSN = WORD(CATLINE.LOGLINE,3)
SAY DSN
END
Note the limit on the number of entries returned (100k-1).
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of SUBSCRIBE IBM-MAIN Jim
Sent: Wednesday, July 09, 2008 8:03 AM
To: [email protected]
Subject: wildcard utilities
I have been struggling with a way to use wildcards as a means of not
having
to know all dataset names that may be created within a day's time. I
know
you can use wildcards within a IDCAMS using the LISTCAT ENTRIES
statement, but what I would really like is to be able to copy all the
wildcard
datasets to another single dataset for reporting type purposes. We have
quite a few products on our mainframe, but I really don't know the best
approach or software. Below is a brief example of what I want to
accomplish.
All the datasets are - ORG of PS, RECFM = FB, LRECL = 133, BLKSIZE =
5985
DISK.TEST.DATASETA
DISK.TEST.DATASETB
DISK.TEST.DATASETC
Hopefully use wildcard of DISK.TEST.** to pick up ALL datasets and then
copy to any other name I choose - DISK.BACKUP.DATASETS. Then using that
dataset to print out a single report in a viewable format.
Thanks in advance for any and all suggestions.
----------------------------------------------------------------------
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
NOTICE: This electronic mail message and any files transmitted with it are
intended
exclusively for the individual or entity to which it is addressed. The message,
together with any attachment, may contain confidential and/or privileged
information.
Any unauthorized review, use, printing, saving, copying, disclosure or
distribution
is strictly prohibited. If you have received this message in error, please
immediately advise the sender by reply email and delete all copies.
----------------------------------------------------------------------
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
