Even though you called it a print file, the dataset you create is
actually a dump file. That is the reason the DCB is not what you
expect. It is also the reason your sort did not provide anything
expected.
Unless I misunderstand, for this effort you do not want the actual data
in the new print files created by Control-M. You merely want a list of
the DSNs created on a certain date. If this is correct:
Your TAPE DD statement should be named SYSPRINT. Delete the
existing SYSPRINT. The space parameter seems excessive for a list of
DSNs.
Add a TAPE DD statement with DUMMY or DSN=NULLFILE.
Add PARM='TYPRUN=NORUN' to your EXEC statement.
Add "BY(CREDT,EQ,yyyyddd) -" after the DUMP line to specify the
date of interest. You mentioned usually wanting "yesterday's datasets".
In this case, you can replace the yyyyddd with "*,-1".
Your list of datasets will be in the SYSPRINT output along with other
DSS messages. Check the DFSMS Storage Administration Reference manual
for the details and other options.
-----Original Message-----
From: SUBSCRIBE IBM-MAIN Jim [mailto:snip]
Sent: Wednesday, July 09, 2008 12:08 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: wildcard utilities
The scheduler software is generating the dataset. It basically invokes
JES and makes a copy of whatever sysouts you choose(leaving original
sysout in queue). Not sure if you saw my latest post, but please let me
know if additional information is needed. If your talking about the
DFDSS jcl I have attempted to use to create a working print dataset, see
below :
//DRTSTRPT JOB ,'DRPRT',CLASS=X,
// MSGLEVEL=(1,1),MSGCLASS=X,REGION=4096K
//*********************************************************
***********
//STEP010 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//TAPE DD DSN=UN.DRPRINT.FILE,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3390,
// DCB=(BLKSIZE=5985,LRECL=133,RECFM=FB),
// SPACE=(CYL,(5,2),RLSE,,ROUND)
//SYSIN DD *
DUMP DATASET(INCLUDE(UN.DRRPT.**)) -
OUTDDNAME(TAPE)
/*
//
The UN.DRPRINT.FILE file created by the utility actually becomes :
Organization . . . : PS
Record format . . . : U
Record length . . . : 133
Block size . . . . : 23408
I attempted to sort certain records from that dataset and came up with
an ugly mess.
----------------------------------------------------------------------
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
