MVSFORUMS.com

Phantom · Posted: Mon Jan 13, 2003 2:20 am Post subject: Invoking a REXX program from JCL

I need to invoke a REXX routine from a JCL and pass certain parameters to the REXX routine.

Can somebody throw some light on it

Thanks & Regards,
Navin. J

Manas Biswal · Posted: Mon Jan 13, 2003 2:47 am Post subject:

You can run it using IKJEFT01. This program basically invokes the TSO environment from the JCL.

Something Like -

Phantom · Posted: Mon Jan 13, 2003 4:14 am Post subject:

Manas,

Thanks you for reply. I have used ISPPLIB & ISPMLIB but I haven't used ISPTLIB in any of my programs. Can you kindly explain me what is it. And also about SYSPROC, what should it contain ?

Thanks for you kind help,
Navin. J

Manas Biswal · Posted: Mon Jan 13, 2003 4:48 am Post subject:

Put your CLIST,REXX and Edit macro libraries in the SYSPROC. And put your ISPF table dataset in ISPTLIB.

Regards,
Manas

Phantom · Posted: Mon Jan 13, 2003 5:43 am Post subject:

Manas,

Thanks for your code. I tried it but I got an error. Pls find the attached the SYSTSPRT message.

READY
ISPSTART CMD(ADVFIND)
ISPI003 Following file was not preallocated:
ISPPROF
READY
END

I tried to invoke REXX program which uses a PANEL. I hope we can invoke a foreground (PANEL) job from a JCL. Here is the JCL I used.

Manas Biswal · Posted: Mon Jan 13, 2003 5:51 am Post subject:

Hi Navin,

How can you throw a panel if you are executing your REXX routine from a JCL. You cannot do it. We generally invoke such REXX rountines from JCL which do some processing and do not need any communication in the form of panels. If you are using panels, then use REXX in the foreground.

As far as the ISPPROF error is concerned, try giving the followinf DDNAME along with the others in IKJEFT01 -

Phantom · Posted: Mon Jan 13, 2003 6:32 am Post subject:

Manas,

Thank you very much for clarifying my doubts. since, you speficied PANEL libraries ISPPLIB... in your code I thought we can invoke a PANEL. Well, thanks for clarifying that.

Can you kindly tell why we need to use these PANEL libraries in the job when we cannot invoke a PANEL from a JCL.

thanks,
Navin. J

Manas Biswal · Posted: Mon Jan 13, 2003 8:19 am Post subject:

Hi Navin,

Frankly speaking I don't know. I use standard JCLs in our installation for running REXX routines. Yes, logically we don't need ISPPLIB in the JCL, but it is always there in the JCL and it contains a list of system datasets allocated to it. Maybe these system panel datasets are required for ISPF services but I am not sure. You will also probably get a JCL in yorub installation. Just concatenate your datasets to SYSPROC, ISPTLIB, ISPTABL and try running the job.
Maybe some other members of this board can help clarify on why we need ISPPLIB in the JCL to run REXX routines in batch.

Regards,
Manas

Phantom · Posted: Mon Jan 13, 2003 8:48 am Post subject:

Manas,

Thanks for your reply. I tried to run the jcl with the ISPPROF card as you specified, but still I got an error RC = 0998 saying that ISPSLIB is missing, then I provided the ISPSLIB card appropriately (ISPSLIB DD DSN = TSONJAY.ISPSLIB,DISP=SHR), then It showed me an error message (RC=0998) again saying that Message ISV010 is not found the ISPMLIB library. then I created a message PS in the ISPMLIB library. But still it gave an error RC = 0998 but without any error message.

Then I removed all ISPPLIB, ISPSLIB, ISPTLIB, ISPMLIB,... and ran the JCL and it worked fine. Here is the JCL.

//TSONJAYB JOB (ACCOUNT),'SRCHJCL',CLASS=E,
// TIME=(1440),
// MSGCLASS=X,NOTIFY=&SYSUID,MSGLEVEL=(1,1)
//R010 EXEC PGM=IKJEFT01
//SYSPROC DD DSN=TSONJAY.REXX.UTILS,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
ADDSAY 'HELLO'
/*
//* HELLO is the parameter I'm passing to the REXX routine
//

I am getting the ISPPROF not found error only when I specify 'ISPSTART CMD (ADDSAY)', but when I tried to run as shown above I got no errors.

Thanks & Regards,
Navin. J

taltyman · Posted: Mon Jan 13, 2003 8:55 am Post subject:

Using ispstart implies you want to use ispf services so that's why it needs the ispf files. Your code doesn't appear to need ispf services.

Mike · Posted: Mon Jan 13, 2003 5:38 pm Post subject:

In a follow up to Phantom's reply, basically there are three methods of invoking A rexx program via JCL, depending upon the environmental requirements.

The simplest method of running a Rexx program in batch is to utilise the IRXJCL program, however this has limitations in that TSO/E or ISPF environments are not available.

e.g

semigeezer · Posted: Mon Jan 13, 2003 10:28 pm Post subject:

And a reminder that a program to automatically create the JCL to invoke ISPF in batch using your shop's ISPF libraries can be found at http://www.sillysot.com/mvs under BATCHPDF

Manas Biswal · Posted: Tue Jan 14, 2003 12:59 am Post subject:

Hi Tallyman, Mike and Semigeezer,

One part of Phantom's question(well my question too now) still remains unanswered. Let us consider the case when we are using ISPF services in our REXX program. In that case we have to use ISPSTART and we have to specify ISPPLIB although we have nothing to do with panels. Why is that??

Regards,
Manas

semigeezer · Posted: Tue Jan 14, 2003 1:56 am Post subject:

ISPF just requires it. If for example, there is an error at run time, ISPF will normally display an error panel. Even though you can't see that in BATCH, ISPF is operating the same way it does in foreground. It processes panels in batch the same way it does in foreground so the panel libraries (and messages and skeletons) are required - just in case. The messages are, in fact, used for logging.

You'd see the same error in foreground if you were to run, without ISPPLIB, a command that doesn't display a panel such as
ISPSTART PGM(IEFBR14)

dorkhead · Posted: Wed Jan 15, 2003 5:37 am Post subject:

How can you throw a panel if you are executing your REXX routine from a JCL. You cannot do it.

technically this is feasible... it may be useful specially when using edit macros...
_________________
Dorkhead