IBM Mainframe Forum

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.

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.

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

You have to invoke the program using the ISPSTART command to get ISPF running, and that can only be done through TSO.

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?

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.

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.

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.


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.