IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

REXX to XDC Job output to Dataset .


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 11:54 am
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
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 11:58 am
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

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 12:05 pm
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: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 12:11 pm
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

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 12:17 pm
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

Superior Member


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

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

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

Superior Member


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

PostPosted: Thu Jun 18, 2009 12:31 pm
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

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 12:38 pm
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: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 12:50 pm
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

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Thu Jun 18, 2009 12:52 pm
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

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 12:52 pm
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: 8797
Location: Welsh Wales

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

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

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 1:15 pm
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: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 1:34 pm
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

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Jun 18, 2009 1:42 pm
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
www.redbooks.ibm.com/abstracts/sg247419.html

and a click on the additional material link
to
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
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 1:43 pm
Reply with quote

I am sorry but i am not able to found a REXX to XDC output of step .

Can you please provide me the link .
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 1:48 pm
Reply with quote

shr_amar

Why do I bother ? My reply stated very very clearly that SDSF was the way to go, and nowhere did I mention the use of XDC and yet you still ask for an XDC solution.

Now go away and search for the correct terms as stated in my last reply.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Thu Jun 18, 2009 1:58 pm
Reply with quote

I gave you an example of how to release a job using the REXX-SDSF interface, others gave you links to the manuals.

Just go away, RTFM and only come back if you can post code that you have created but that is not yet working as it should.

Then and only then you are in a position to ask for further help!
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Thu Jun 18, 2009 2:08 pm
Reply with quote

My patience is little up yet icon_smile.gif... There is other way of doing what you look for, once posted by CG
CICS Guy wrote:
Check out Lionel B. Dyck. he has a great little tool, SDFSEXT, a generalized SDSF batch tool to extract all or part of your sysout into a dataset that you could do whatever you want with.
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Thu Jun 18, 2009 2:11 pm
Reply with quote

But yes I echo prino(Robert), please post the code that you have created -- some one will be around with a helping note...
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Thu Jun 18, 2009 2:42 pm
Reply with quote

well i haven't written any code . But i have tried to connect REXX- SDSF
using isfcalls as per prino and Manual example . It seems that this routine is not found .
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 18, 2009 3:35 pm
Reply with quote

shr_amar wrote:
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.


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


Explain to me the process of this super command that will wait until a batch job has finished and then know that it is time to perform SDSF or XDC actions.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts TRIM everything from input, output co... DFSORT/ICETOOL 1
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
Search our Forums:

Back to Top