Urgent!! REXX EXEC Load Module and TSO/E Commands



IBM's Command List programming language & Restructured Extended Executor

Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby samjovial » Fri Nov 13, 2015 7:44 pm

Hi All,

I have a requirement where I need to compile/link edit my REXX script and invoke the load module using "EXEC PGM=PGMA". I am able to do that, but commands like VGET/VPUT, ALLOC, SYSDSN etc are failing. What can I do them to work in my script? I am not allowed to invoke the script through IKJEFT01, pls advise, its urgent.
samjovial
 
Posts: 7
Joined: Tue Sep 29, 2015 7:25 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby NicC » Fri Nov 13, 2015 7:58 pm

Have you included the ISPF datasets in your JCL? Examples exist in the forum.
Pleases do not use 'urgent' or similar in your titles/posts. If you want urgent get a consultant in.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby samjovial » Fri Nov 13, 2015 8:08 pm

hi Nick,

Sorry for using the work 'urgent'.

Are you referring to the below datasets?? If yes, I did include and getting return code "-3"

Pls suggest.

//ISPPROF DD RECFM=FB,LRECL=80,SPACE=(TRK,(2,2,2))
//ISPPLIB DD DSN=ISP.SISPPENU,DISP=SHR
//ISPMLIB DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
//ISPTLIB DD DSN=ISP.SISPTENU,DISP=SHR
//ISPLOG DD SYSOUT=*,RECFM=FB,LRECL=133
samjovial
 
Posts: 7
Joined: Tue Sep 29, 2015 7:25 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby Akatsukami » Fri Nov 13, 2015 9:00 pm

You have to invoke the program using the ISPSTART command to get ISPF running, and that can only be done through TSO.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby samjovial » Sat Nov 14, 2015 2:43 am

Hi Aktasukami,

I have to invoke only with EXEC PGM=PROG. Is there anything I can link/edit so that I can use those commands?
samjovial
 
Posts: 7
Joined: Tue Sep 29, 2015 7:25 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby Akatsukami » Sat Nov 14, 2015 2:56 am

I'm not familiar with compiled Rexx, but I very much doubt it. You could try establishing a TSO environment with a LINKMVS IKJTSOEV, but I can't think how you'd start ISPF after that.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Urgent!! REXX EXEC Load Module and TSO/E Commands

Postby Pedro » Tue Nov 24, 2015 10:57 pm

I do not think you can do what you want to do. You have a requirement that cannot be fulfilled. Perhaps you can explain the reasons for the requirement.

On the other hand, I was able to have some success several years ago, not with a rexx program, but with an assembler program.
   XCTL (2,14),EP=IKJEFT01 

The XCTL is the 'transfer control' macro. In this way, you can have an arbitrary program name, but have it still do IKJEFT01 work. See "MVS Programming: Assembler Services Guide" for more information.

The tricky part is that IKJEFT01 is APF authorized... I think the calling program has to also be APF authorized. Properly protected systems will not allow you to put your load module in an APF data set without a stringent review and approval process.

//MYTSO  EXEC PGM=MYTSO,PARM='%MYREXX'
//STEPLIB  DD DISP=SHR,DSN=APF.MYTSO.LOAD   

Register 1 should continue to point to the original parameter list for more flexibility.

note: if for some reason, you are prohibited from using IKJEFT01 and you try to circumvent the rules, it could be grounds for termination.
Pedro Vera
User avatar
Pedro
 
Posts: 686
Joined: Thu Jul 31, 2008 9:59 pm
Location: Silicon Valley
Has thanked: 0 time
Been thanked: 53 times


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post