Re: wildcard utilities

2008-07-10 Thread SUBSCRIBE IBM-MAIN Jim
No, we don't have the ABR piece.

--
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



Re: wildcard utilities

2008-07-10 Thread SUBSCRIBE IBM-MAIN Jim
I really think I'm trying to make this more complicated than it is, but Barry's 
idea wasn't what I was looking for either.  I'm not looking for a listing of 
the 
incoming datasets for any other reason than to know what to print out each 
day. The print I'm looking for is the internals of all the incoming datasets 
which is a sysout of a job run.  There's got to be an easier way out there.  
Thanks for all the different ideas, but in my mind we haven't got there yet.

--
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



Re: wildcard utilities

2008-07-10 Thread Lizette Koehler
If you are z/OS V1.9 then you could look at using REXX and SDSF to review
the SYSOUT while it is on Spool,  Then create a file with REXX that lists
the sysouts you want to print?

Or create a last step with REXX to create a GDG that is collected later with
the information you need?

Perhaps a more linear explanation would help us.

For example:

If job x runs and creates the following dataset(s) or sysout(s) that contain
Y, then I want it in a list.
Then explain with the Y part is.  Is it a header, is it information in a
data set name, etc...


I am not clear on what you mean is the internals of all the incoming
datasets .  Can you clarify it more?

Lizette


 I really think I'm trying to make this more complicated than it is, but
 Barry's
 idea wasn't what I was looking for either.  I'm not looking for a
 listing of the
 incoming datasets for any other reason than to know what to print out
 each
 day. The print I'm looking for is the internals of all the incoming
 datasets
 which is a sysout of a job run.  There's got to be an easier way out
 there.
 Thanks for all the different ideas, but in my mind we haven't got there
 yet.

--
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



Re: wildcard utilities

2008-07-10 Thread Terry Sambrooks
Hi Jim,

I have watched the thread with interest and if I understand the requirement
correctly it is to produce a single printed output from multiple listings
exported from Control-M in to sequential data sets with consistent DCB
attributes, i.e. RECFM, LRECL etc.

If this assessment is correct then John McKown's post alluding to ISPF
LMDLIST with REXX as a batch job was a good starting point. The bit he left
to other's imagination was any code required to actually write the collected
data to spool once the data set list had been obtained. If you are able to
tackle the REXX side I believe this is one way to achieve your desired aim.

It was stated in another post that Control-M will allow any data set name to
be used. If this is the case could you encourage the use of a GDG. If each
of the prints were exported as a data set within the GDG, then producing the
ultimate report would be as simple as code the DSN on the input DD statement
to that of the GDG base entry name. This would then read all generations
automatically.

If using a standard naming convention is ruled out then John's suggestion is
I think the best so far.

Kind regards - Terry

Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore, Sheffield, S17 3LA, UK

Tel: +44 (0)114 262 0933
WEB: www.legac-e.co.uk

Company Reg: 3767263 at the above address

All outgoing E-mail is scanned, but it remains the recipient's
responsibility to ensure their system is protected from spy-ware, trojans,
viruses, and worms.  

--
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



Re: wildcard utilities

2008-07-10 Thread Wolfgang Schäfer

Jim,
if I understand correctly you want to do pattern matching (regular 
expressions) against some strings that your program extracts from some 
dataset?


If you can use C as programming language then there is a string function 
call fnmatch() that provides pattern matching as in Unix shell commands for 
filenames (*, %, [] things ...) - or of course the regex functionality 
(which is more complex). For the fnmatch function I wrote a rexx function 
which is a simple wrapper for the C library - if you are interested in that, 
contact me off-list.


regards
Wolfgang


- Original Message - 
From: SUBSCRIBE IBM-MAIN Jim [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Thursday, July 10, 2008 2:17 PM
Subject: Re: wildcard utilities


I really think I'm trying to make this more complicated than it is, but 
Barry's
idea wasn't what I was looking for either.  I'm not looking for a listing 
of the

incoming datasets for any other reason than to know what to print out each
day. The print I'm looking for is the internals of all the incoming 
datasets
which is a sysout of a job run.  There's got to be an easier way out 
there.
Thanks for all the different ideas, but in my mind we haven't got there 
yet.


--
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



--
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



Re: wildcard utilities

2008-07-10 Thread SUBSCRIBE IBM-MAIN Jim
Thanks to all for the input.  I recruited a co-worker with Rexx experience and
John McKown's idea does work to fit our needs.  The one question my 
co-worker had was if there might even be other utilities that might not require 
like DCB's.   

--
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



Re: wildcard utilities

2008-07-10 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of SUBSCRIBE IBM-MAIN Jim
 Sent: Thursday, July 10, 2008 1:35 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: wildcard utilities
 
 Thanks to all for the input.  I recruited a co-worker with 
 Rexx experience and
 John McKown's idea does work to fit our needs.  The one question my 
 co-worker had was if there might even be other utilities that 
 might not require 
 like DCB's.   

Well, if you do the I/O in the REXX program itself by using EXECIO, then
the DCBs can be unlike. But that is a lot more overhead in the program.
DFSORT, with the correct control cards, can copy to unlike DCB
attributes. It can even convert from FB to VB or vice versa.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

--
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



wildcard utilities

2008-07-09 Thread SUBSCRIBE IBM-MAIN Jim
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



Re: wildcard utilities

2008-07-09 Thread John Kington
Jim,

 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
snip
I am not sure I understand what you are trying to do but I would use
dcollect to gather information on dasd datasets and extract similar data
from your tape management product if I wanted to generate a list of
datasets created yesterday or whatever date.
Regards,
John

--
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



Re: wildcard utilities

2008-07-09 Thread Jack Kelly
snip
use wildcards as a means of not having  to know all dataset names that may 
be created within a day's time.
unsnip

You may want to look at DFDSS or FDR. You can do a TYPRUN=NORUN option 
(DSS) to simply get a list or do the copy/move. both products have wild 
cards as well as selection criteria.

Jack Kelly
202-502-2390 (Office)

--
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



Re: wildcard utilities

2008-07-09 Thread Hal Merritt
You can do something like this:

HLQ = 'DISK.TEST'
X = OUTTRAP(CATLINE.,9,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: IBM-MAIN@BAMA.UA.EDU
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



Re: wildcard utilities

2008-07-09 Thread Ulrich Krueger
Jim,
Have you thought about using the Catalog Search Interface within a REXX Exec
to retrieve the dataset information you need? Then process the results to
create the necessary JCL or allocation statements.
Please search the IBM-Main Archives for references to IGGCSI or Catalog
Search Interface. Also look at your SYS1.SAMPLIB for IGGCSI.. members.


Regards,
Ulrich Krueger

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of SUBSCRIBE IBM-MAIN Jim
Sent: Wednesday, July 09, 2008 06:03
To: IBM-MAIN@BAMA.UA.EDU
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

--
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



Re: wildcard utilities

2008-07-09 Thread SUBSCRIBE IBM-MAIN Jim
I have had great suggestions so far, but I have tried DFDSS and FDR and not 
gotten results I was looking for. Might not be using the parameters correctly.
I think I will detail this more on my wishes and the collective group can offer 
more ideas.  We have an automated scheduler software on our mainframe 
called Control-M that will copy a jcl sysout to a file on whichever jobs we 
choose.  Those are the datasets in the format shown below that I wish to 
create a single report from. 
Organization  . . . : PS   
Record format . . . : FB   
Record length . . . : 133  
Block size  . . . . : 5985 
When I use DFDSS or FDR the dataset I try and create for printing comes up 
in either a VBA or U format.  And I am not strong enough with sort or some 
other method to create the report.  I really don't care about creating a 
dataset at all, if I can simply print the incoming datasets from the wildcard 
list.
Below is an example of one of the datasets sysouts and I would like to keep 
that intact.  This is not a completed sysout example, but wanted to save lines.

13.27.16 JOB01736  MONDAY,30 JUN 2008  
13.27.16 JOB01736  IRR010I  USERID OMVSKERN IS ASSIGNED TO THIS 
JOB.   
13.27.27 JOB01736  ICH70001I OMVSKERN LAST ACCESS AT 13:26:33 ON 
MONDAY, JUNE 3
13.27.27 JOB01736  $HASP373 SYUT105  STARTED - INIT 17   - CLASS X - 
SYS TECH  
13.27.27 JOB01736  IEF403I SYUT105 - STARTED - 
TIME=13.27.27   
13.27.31 JOB01736  ---TIMINGS (
13.27.31 JOB01736  -JOBNAME  STEPNAME PROCSTEPRC   EXCP   CONN
TCBSR
13.27.31 JOB01736  -SYUT105  STEP01   00 83 69.00.0
13.27.31 JOB01736  IEF404I SYUT105 - ENDED - 
TIME=13.27.31 
13.27.31 JOB01736  -SYUT105  ENDED.  NAME-OPERATIONTOTAL 
TCB CPU TI
13.27.32 JOB01736  $HASP395 SYUT105  ENDED 

--
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



Re: wildcard utilities

2008-07-09 Thread Lizette Koehler
We need the JCL and a 3.4 print of the dataset you are creating.

Put in the JCL you are using.

Lizette

--
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



Re: wildcard utilities

2008-07-09 Thread McKown, John
 -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: IBM-MAIN@BAMA.UA.EDU
 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.

ISPF's LMDLIST can do that. I don't know really what you want to do, but
below is an example in REXX.

/* REXX */
PARSE ARG PATTERN
ADDRESS ISPEXEC
LMDINIT LISTID(LISTID) LEVEL(PATTERN)
IF RC  0 THEN DO
   SAY LMDINIT RC=RC
   EXIT RC
END
DSN= 
DO FOREVER
   LMDLIST LISTID(LISTID) OPTION(LIST) DATASET(DSN) STATS(YES)
   IF RC  0 THEN LEAVE
   SAY PROCESSING DSN=DSN
   /* DO WHATEVER YOU WANT WITH THIS DSN HERE */
   /* COPY CONTENTS OF DSN */
   ADDRESS TSO ALLOC DDN(SYSUT1) DSN('DSN') SHR REUSE
   ADDRESS TSO CALL *(IEBGENER)
   ADDRESS TSO FREE DDN(SYSUT1)
END
LMDLIST LISTID(LISTID) OPTION(FREE)

JCL to execute the above example would look like:

//STEP010  EXEC  PGM=IKJEFT1B,
// REGION=4096K,TIME=NOLIMIT,
// PARM=''
//SYSTSPRT DD  SYSOUT=*
//ISPPROF  DD  SPACE=(TRK,(10,10,100)),
// DCB=(SYS1.MACLIB)
//ISPLOG   DD  SYSOUT=*,
// LRECL=121,RECFM=FBA,
// BLKSIZE=121,BUFNO=1
//ISPLIST  DD  SYSOUT=*,
// LRECL=121,RECFM=FBA,
// BLKSIZE=121,BUFNO=1
//ISPPLIB  DD  DSN=ISP.SISPPENU,
// DISP=SHR
//ISPTLIB  DD  DSN=ISP.SISPTENU,
// DISP=SHR
//ISPMLIB  DD  DSN=ISP.SISPMENU,
// DISP=SHR
//ISPSLIB  DD  DSN=ISP.SISPSLIB,
// DISP=SHR
//SYSPROC  DD  DSN=ISP.SISPCLIB,
// DISP=SHR
//SYSEXEC  DD  DSN=TSH009.REXX.EXEC,
// DISP=SHR
// DD  DSN=ISP.SISPEXEC,
// DISP=SHR
//SYSTSIN  DD  *
EXECUTIL SEARCHDD(YES)
PROFILE PREFIX(myid)
ISPSTART CMD(%LMDLIST TSH009.**)
/*
//SYSUT2 DD DSN=MY.OUTPUT.DSN,
// DISP=(MOD,CATLG,CATLG),
// UNIT=SYSDA,SPACE=(CYL,(200,100),RLSE),
// DCB=(...)
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY



--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

--
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



Re: wildcard utilities

2008-07-09 Thread SUBSCRIBE IBM-MAIN Jim
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)   
//SYSINDD* 
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



Re: wildcard utilities

2008-07-09 Thread Tony B.
Can you customize Control-M to create datasets with a certain naming
convention?  For example the output files would be called:

SPECHLQ.CONTROLM.COPIED.SYSOUT.whatever-the-job-name-is

 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of SUBSCRIBE IBM-MAIN Jim
Sent: Wednesday, July 09, 2008 1:47 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: wildcard utilities

I have had great suggestions so far, but I have tried DFDSS and FDR and not
gotten results I was looking for. Might not be using the parameters
correctly.
I think I will detail this more on my wishes and the collective group can
offer more ideas.  We have an automated scheduler software on our mainframe
called Control-M that will copy a jcl sysout to a file on whichever jobs we
choose.  Those are the datasets in the format shown below that I wish to
create a single report from. 
Organization  . . . : PS   
Record format . . . : FB   
Record length . . . : 133
Block size  . . . . : 5985
When I use DFDSS or FDR the dataset I try and create for printing comes up
in either a VBA or U format.  And I am not strong enough with sort or some
other method to create the report.  I really don't care about creating a
dataset at all, if I can simply print the incoming datasets from the
wildcard list.
Below is an example of one of the datasets sysouts and I would like to keep
that intact.  This is not a completed sysout example, but wanted to save
lines.

13.27.16 JOB01736  MONDAY,30 JUN 2008 

13.27.16 JOB01736  IRR010I  USERID OMVSKERN IS ASSIGNED TO THIS 
JOB.   
13.27.27 JOB01736  ICH70001I OMVSKERN LAST ACCESS AT 13:26:33 ON MONDAY,
JUNE 3
13.27.27 JOB01736  $HASP373 SYUT105  STARTED - INIT 17   - CLASS X - 
SYS TECH
13.27.27 JOB01736  IEF403I SYUT105 - STARTED - 
TIME=13.27.27   
13.27.31 JOB01736  -
--TIMINGS (
13.27.31 JOB01736  -JOBNAME  STEPNAME PROCSTEPRC   EXCP   CONN
TCBSR
13.27.31 JOB01736  -SYUT105  STEP01   00 83 69.00
.0
13.27.31 JOB01736  IEF404I SYUT105 - ENDED - 
TIME=13.27.31 
13.27.31 JOB01736  -SYUT105  ENDED.  NAME-OPERATIONTOTAL 
TCB CPU TI
13.27.32 JOB01736  $HASP395 SYUT105  ENDED


--
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

--
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



Re: wildcard utilities

2008-07-09 Thread SUBSCRIBE IBM-MAIN Jim
Yes, Control-M can create the dataset with any name up to 44 characters.

--
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



Re: wildcard utilities

2008-07-09 Thread Schwarz, Barry A
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,ddd) - after the DUMP line to specify the
date of interest.  You mentioned usually wanting yesterday's datasets.
In this case, you can replace the ddd 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)   
//SYSINDD* 
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



Re: wildcard utilities

2008-07-09 Thread SUBSCRIBE IBM-MAIN Jim
I have to move on to some other things for now, but want to try Barry's idea.

--
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



Re: wildcard utilities

2008-07-09 Thread Stephen Mednick
You say you tried FDR and that you have quite a few other products, do you 
happen
to have ABR as well that incorporates FDREPORT? 

Stephen Mednick
Computer Supervisory Services
Sydney, Australia 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of SUBSCRIBE IBM-MAIN Jim
 Sent: Thursday, 10 July 2008 4:47 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: wildcard utilities
 
 I have had great suggestions so far, but I have tried DFDSS 
 and FDR and not gotten results I was looking for. Might not 
 be using the parameters correctly.
 I think I will detail this more on my wishes and the 
 collective group can offer more ideas.  We have an automated 
 scheduler software on our mainframe called Control-M that 
 will copy a jcl sysout to a file on whichever jobs we choose. 
  Those are the datasets in the format shown below that I wish 
 to create a single report from. 
 Organization  . . . : PS   
 Record format . . . : FB   
 Record length . . . : 133
 Block size  . . . . : 5985
 When I use DFDSS or FDR the dataset I try and create for 
 printing comes up in either a VBA or U format.  And I am not 
 strong enough with sort or some other method to create the 
 report.  I really don't care about creating a dataset at all, 
 if I can simply print the incoming datasets from the wildcard list.
 Below is an example of one of the datasets sysouts and I 
 would like to keep that intact.  This is not a completed 
 sysout example, but wanted to save lines.
 

--
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



Re: wildcard utilities

2008-07-09 Thread Farley, Peter x23353
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of SUBSCRIBE IBM-MAIN Jim
 Sent: Wednesday, July 09, 2008 3:44 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: wildcard utilities
 
 I have to move on to some other things for now, but want to try
 Barry's idea.

Do you need something as simple as this?

//LISTDS   EXEC PGM=IKJEFT1B 
//SYSTSPRT DD SYSOUT=*   
//SYSTSIN  DD *  
 EXEC 'SYS1.SAMPLIB(IGGCSIRX)' EXEC  
SYS*.*SAMP*  
//*  

That will print the names of all the datasets beginning with SYS* and
containing SAMP in the second qualifier to the SYSTSPRT DD.  You can
also use the .** suffix to get other datasets with longer names, like
this:

//LISTDS   EXEC PGM=IKJEFT1B   
//SYSTSPRT DD SYSOUT=* 
//SYSTSIN  DD *
 EXEC 'SYS1.SAMPLIB(IGGCSIRX)' EXEC
SYS2.**
//*

HTH

Peter
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.


--
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