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
 
JCL To Execute A REXX Program
Goto page Previous  1, 2
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
Author Message
Ajay Baghel

Active User


Joined: 25 Apr 2007
Posts: 121
Location: Bangalore

PostPosted: Sun Mar 23, 2008 4:10 pm    Post subject: Reply to: JCL To Execute A REXX Program
Reply with quote

why not use:

Code:
//STEP1 EXEC PGM=IKJEFT01,
// PARM='%rexxpgm-name  YOURPDSNAME'     
//SYSEXEC  DD DSN=REXX-PDS-NAME,DISP=SHR                       
//SYSTSPRT DD  SYSOUT=*                                                 
//MYINDD   DD  DSN=Input file if any
//SYSTSIN  DD  DUMMY   



In the rexx pgm, you can receive the pds name as an argument and later on continue with your logic (LISTDS with MEMBERS parameter).

eg: http://ibmmainframes.com/post-51855.html

Thanks,
Ajay
Back to top
View user's profile Send private message
References
PostPosted: Sun Mar 23, 2008 4:10 pm    Post subject: Re: Reply to: JCL To Execute A REXX Program Reply with quote

nirenchan

New User


Joined: 21 Jul 2005
Posts: 10
Location: USA

PostPosted: Thu Jun 26, 2008 3:21 am    Post subject: Reply to: JCL To Execute A REXX Program
Reply with quote

HI,

I want to invoke one TSO Command using REXX.
we use one command called DSNSRCH for searching strings in particualar dsn. I want to use the same in JCL

like through JCL I 've to pass the search string so that it will pass the strings to Rexx program and the Rexx program can invoke the DSNSRCH and this will give the output to my Output Dataset.

can any one help me ?

Regards,
Niren.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 399
Location: work

PostPosted: Thu Jun 26, 2008 4:45 am    Post subject: Reply to: JCL To Execute A REXX Program
Reply with quote

quoting Ajay:
Quote:
why not use:

Code:

//STEP1 EXEC PGM=IKJEFT01,
// PARM='%rexxpgm-name  YOURPDSNAME'     
//SYSEXEC  DD DSN=REXX-PDS-NAME,DISP=SHR                       
//SYSTSPRT DD  SYSOUT=*                                                 
//MYINDD   DD  DSN=Input file if any
//SYSTSIN  DD  DUMMY   


In the rexx pgm, you can receive the pds name as an argument and later on continue with your logic (LISTDS with MEMBERS parameter).


The code is slightly modified to show that you can pass multiple parameters
Code:

//STEP1 EXEC PGM=IKJEFT01,
// PARM='%rexxpgm-name  parameter1 parm2'   

be sure to follow the rest of Ajay's example.

The example shows %rexxpgm-name, but I believe it can be any TSO command. You could probably call your DSNSRCH command directly. Use the same parameters that you would use if called from TSO.
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 Previous  1, 2
Page 2 of 2