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
 
Copying JOB JCL from EJES to PS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
Author Message
Gnanas SNG

Senior Member


Joined: 06 Sep 2007
Posts: 416
Location: India

PostPosted: Tue Feb 05, 2008 4:08 pm    Post subject: Copying JOB JCL from EJES to PS
Reply with quote

My shop is using (E)JES JES3 Spool Interface Facility.

Is it possible to copy the JOB JCL from EJES to PS through REXX program, if Job Id is given as input.

Please provide the info to start the code.
Back to top
View user's profile Send private message
References
PostPosted: Tue Feb 05, 2008 4:08 pm    Post subject: Re: Copying JOB JCL from EJES to PS Reply with quote

Gautam512

Senior Member


Joined: 05 Oct 2005
Posts: 344
Location: Vizag / US

PostPosted: Wed Apr 16, 2008 3:02 am    Post subject:
Reply with quote

hi,

try doing an xdc againts ur job, i think u can copy the entire job into a PS.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 918
Location: Chennai - India

PostPosted: Wed Apr 16, 2008 3:48 am    Post subject: Reply to: Copying JOB JCL from EJES to PS
Reply with quote

gnanas,

How about using SDSF in batch?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 2527
Location: italy

PostPosted: Wed Apr 16, 2008 11:09 am    Post subject: Reply to: Copying JOB JCL from EJES to PS
Reply with quote

Gentlemen, gentlemen icon_smile.gif

please read before answering...
the OP is using eJes not sdsf
Back to top
View user's profile Send private message
Gnanas SNG

Senior Member


Joined: 06 Sep 2007
Posts: 416
Location: India

PostPosted: Wed Apr 16, 2008 2:59 pm    Post subject:
Reply with quote

Yes, We are using E-JES.
I did it manually.
Like this...

1. Use the "J" line command on the job, to view the JCL.

2. In the upper right corner, you'll see how many lines there are (e.g. "Line 1 of 37") On the command line, type "EXTRACT 1 37" or
however many lines there are.

3. You'll now see a typical allocation screen where you can save the JCL in its entirety.

I would think Batch EJES can be used to reterive JCL through either applicaion programs(REXX?) or PGM=<batch ejes module> with specific options.

Appreciating any inputs for this !
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 918
Location: Chennai - India

PostPosted: Wed Apr 16, 2008 10:28 pm    Post subject: Reply to: Copying JOB JCL from EJES to PS
Reply with quote

sorry enrico,

Quote:
the OP is using eJes not sdsf


I overlooked it ! Thanks for bringing it to my notice !
Back to top
View user's profile Send private message
Anuj D.

Senior Member


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

PostPosted: Thu Apr 17, 2008 10:40 am    Post subject:
Reply with quote

Hi Gnanas,

Any how I got intrested in this thread, little research made me to suggest two suggestions..give a try..

1.
Code:
//MYJOB
//STEP1 EXEC PGM=IEFBR14 (Could be anything)
//*
//XSYSMSG EXEC PGM=EJESLNK,REGION=64M
//EJESEXT DD DSN=HLQ.MYJOB.JESYSMSG.LIST,
// UNIT=DASD,SPACE=(TRK,1),
// DISP=(,CATLG,DELETE)
//EJESOUT DD SYSOUT=*,RECFM=FB,LRECL=240
//EJESIN DD DATA,DLM='@@'
JNAME MYJOB;SORT TIME D;STATUS
F MYJOB FIRST
:S
F JESYSMSG
:E
@@
//


This would extract the JESYMSG Log of same job into a QSAM; for the full JOB JCL try below control cards in above JOB.
Code:
//EJESIN DD DATA,DLM='@@'
JNAME MYJOB;SORT TIME D;STATUS
F MYJOB FIRST
@@
//


2. You can invoke EJES as a command processor under the batch TSO (PGM=IKJEFT01). Simply provide your system commands as input to that batch process.

Good Luck... icon_smile.gif
Back to top
View user's profile Send private message
Gnanas SNG

Senior Member


Joined: 06 Sep 2007
Posts: 416
Location: India

PostPosted: Thu Apr 17, 2008 5:49 pm    Post subject:
Reply with quote

Thanks, Anuj !

I am awaiting to get alias/name for <batch ejes module> and system commands for IKJEFT01 from System support.
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 Hours
Page 1 of 1