Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
REXX to XDC Job output to Dataset .
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
Author Message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 11:54 am    Post subject: REXX to XDC Job output to Dataset .
Reply with quote

Hello All ,

I have searched the forum for my requirement and i am not able to found the correct solution .

I want to create a REXX utility which should be invoked at the time of job submission , so that all the spool output of the job saves into a dataset .
Given below is the spool of a completed job i want XDC all the SYSPRINT/SYSOUT to a dataset.

JESMSGLG JES2
JESJCL JES2
JESYSMSG JES2
SYSPRINT YYYYDAY P00RPL
SYSOUT XXXBDAY TCPO502

I do not want to modify jobs to include extra steps. It should be like that when we SUB the job we enter SUB TSO XDC . So that REXX will be activated to take XDC of the o/p.

NOTE :- Please not i want to save output of STEP like SYSOUT (inside) not the print of spool.

Thanks In advance .
Back to top
View user's profile Send private message
References
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 6471
Location: Brussels once more ...

PostPosted: Thu Jun 18, 2009 11:58 am    Post subject:
Reply with quote

OK, so why would you want an XDC of the job before it executes, or just as soon as it starts to execute ?
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 12:05 pm    Post subject:
Reply with quote

I want XDC to be start at the end of JOB but doing XDC several time manaully (to XDC all the Steps) i want that should be taken care by REXX to save all the step output to PDS
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 6471
Location: Brussels once more ...

PostPosted: Thu Jun 18, 2009 12:11 pm    Post subject:
Reply with quote

Then it looks like either you change the jobs to add a final step, or continue to do it manually.

Do you not have a spool collector like SAR, or whatever to automatically do this ?
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 12:17 pm    Post subject:
Reply with quote

Thanks Expat ,

Atleast can we discuss here to create a rexx that will XDC all the steps of Job to a PDS .

Regards
Back to top
View user's profile Send private message
Anuj Dhawan

Global Moderator


Joined: 22 Apr 2006
Posts: 4067
Location: Mumbai, India

PostPosted: Thu Jun 18, 2009 12:26 pm    Post subject:
Reply with quote

Just another alternative, consider adding a SDSF step?
Back to top
View user's profile Send private message
Anuj Dhawan

Global Moderator


Joined: 22 Apr 2006
Posts: 4067
Location: Mumbai, India

PostPosted: Thu Jun 18, 2009 12:31 pm    Post subject:
Reply with quote

and you may be intrested in this thread: XDC using REXX... Facing problem.. please guide.
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 12:38 pm    Post subject:
Reply with quote

Anuj ,

I have gone through this earlier and this relates to take a print of the SDSF screen not the output of step.

I want to XDC output of any step of JOB .
Suppose a job have SYSout . I want to create a member(SYSOUT) in a PDS which should contain output of SYSOUT.

regards
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 6471
Location: Brussels once more ...

PostPosted: Thu Jun 18, 2009 12:50 pm    Post subject:
Reply with quote

shr_amar wrote:
I have gone through this earlier and this relates to take a print of the SDSF screen not the output of step.regards

I suggest that you search again, and again, and again until you find what Anuj means.

There are numerous examples of unloading whatever spool segment to a dataset. Where on earth you got the idea that SDSF is used only a screen print is way beyond me.
Back to top
View user's profile Send private message
prino

Active User


Joined: 07 Feb 2009
Posts: 225
Location: Oostende, Belgium

PostPosted: Thu Jun 18, 2009 12:52 pm    Post subject:
Reply with quote

Use the REXX to SDSF interface:

Code:
/* REXX */
trace ?r
rc = isfcalls('on')
isfowner  = 'PRINO*'
isfprefix = 'PRINO*'

address sdsf "isfexec i"

do ix = 1 to jname.0
  if pos("PRINOCOM", jname.ix) = 1 then
    address sdsf "isfact i token('"token.ix"') parm(np a)"
end

rc = isfcalls('off')


The above example releases a JOB.

I'm sure you can use XDC in a similar way.
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 12:52 pm    Post subject:
Reply with quote

To make it more clear let me explain it again .

A job went sucessfull which is present in spool . This job contains 100 steps .

I want to xdc output of all 100 steps into a pds . if i am going it to do manually i have to type XDC 100 time in front of the job .

Using REXX I just want to enter JOBNAME And JOBID and XDC all steps of this JCL into PDS.

Is this possible ?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 6471
Location: Brussels once more ...

PostPosted: Thu Jun 18, 2009 1:10 pm    Post subject:
Reply with quote

YES
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

New User


Joined: 02 May 2005
Posts: 87
Location: DELHI

PostPosted: Thu Jun 18, 2009 1:15 pm    Post subject:
Reply with quote

Expat ,

I will be really gratefull if you provide me the solution .

Regards
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 6471
Location: Brussels once more ...

PostPosted: Thu Jun 18, 2009 1:34 pm    Post subject:
Reply with quote

The solution of using SDSF in batch to capture output from jobs has been discussed many times on the forum.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 5391
Location: italy

PostPosted: Thu Jun 18, 2009 1:42 pm    Post subject: Reply to: REXX to XDC Job output to Dataset .
Reply with quote

Quote:
I will be really gratefull if you provide me the solution .

this is a help forum, not a do it for me one icon_evil.gif

a quick and dirty search for Ibm redbooks sdsf rexx would have taken You

to
http://www.redbooks.ibm.com/abstracts/sg247419.html

and a click on the additional material link
to
ftp://www.redbooks.ibm.com/redbooks/SG247419/

were You could have downloaded the sources of the samples
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 HoursGoto page 1, 2  Next
Page 1 of 2