|
View previous topic :: View next topic
|
| Author |
Message |
srikanth_cts
New User
Joined: 27 Feb 2008
Posts: 25
Location: Phoenix, AZ,USA
|
|
|
|
Hello Folks,
I require some help in selecting a SYSPRINT or SYSOUT of a JOB using the PROCSTEP when we have multiple SYSPRINT or SYSOUT in the SPOOL.
Here is the Scenario:
| Code: |
NPDDNAME StepName ProcStep DSID Owner C Dest Rec-Cnt Page
JESMSGLG JES2 2 JOBNAME Q LOCAL 32
JESMSGLG JES2 2 JOBNAME 7 LOCAL 32
JESMSGLG JES2 2 JOBNAME I LOCAL 32
JESJCL JES2 3 JOBNAME Q LOCAL 331
JESJCL JES2 3 JOBNAME 7 LOCAL 331
JESJCL JES2 3 JOBNAME I LOCAL 331
JESYSMSG JES2 4 JOBNAME Q LOCAL 395
JESYSMSG JES2 4 JOBNAME 7 LOCAL 395
JESYSMSG JES2 4 JOBNAME I LOCAL 395
SYSPRINT JOBNAME S010 102 JOBNAME Q LOCAL 34
SYSPRINT JOBNAME S020 102 JOBNAME I LOCAL 34
SYSPRINT JOBNAME S030 102 JOBNAME 7 LOCAL 34
SYSPRINT JOBNAME S040 104 JOBNAME Q LOCAL 52
SYSPRINT JOBNAME S050 104 JOBNAME I LOCAL 52
SYSPRINT JOBNAME S060 104 JOBNAME 7 LOCAL 52 |
I wanted to select the SYSPRINT of S020.
As of now I am using the following JCL to get to that particular SYSPRINT.
| Code: |
//SPOOLINF JOB (@),
// 'SPOOL SEARCH',MSGCLASS=X,CLASS=X,NOTIFY=&SYSUID
//JOBNAME EXEC PGM=SDSF
//ISFOUT DD SYSOUT=*
//ISFIN DD *
PRE JOBNAME
OWNER
ST
FIND JOBNAME LAST
++?
FIND SYSPRINT LAST
FIND SYSPRINT PREV
FIND SYSPRINT PREV
FIND SYSPRINT PREV
FIND SYSPRINT PREV
++S
PRINT ODSN 'MYID.LOG.SDSF.JOBNAME' * NEW
PRINT |
Can anyone suggest me a better code.
Thanks!
Sreek |
|
| Back to top |
|
 |
Aaru
Senior Member
Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India
|
|
|
|
srikanth,
You can use FILTER to get the actual stepname and then FIND the dd name.
Check the following code:
| Code: |
++?
FILTER STEPNAME EQ S020
FIND SYSPRINT
++S |
This would select the SYSPRINT of step S020. |
|
| Back to top |
|
|
srikanth_cts
New User
Joined: 27 Feb 2008
Posts: 25
Location: Phoenix, AZ,USA
|
|
|
|
Hi Aaru,
The solution you suggested had worked. Just one correction I made is:
| Code: |
++?
FILTER ProcStep EQ S020
FIND SYSPRINT
++S
|
|
|
| Back to top |
|
|
srikanth_cts
New User
Joined: 27 Feb 2008
Posts: 25
Location: Phoenix, AZ,USA
|
|
|
|
Thanks a Ton! , Aaru
Sreek |
|
| Back to top |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India
|
|
|
|
| Not a Problem ! You are welcome. |
|
| Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table
|
|
|
|
| Take a look at Lionel B. Dyck's great little tool, SDFSEXT, a generalized SDSF batch tool to extract all or part of your sysout into a dataset that could be emailed. |
|
| Back to top |
|
|
|
|
