Here's what I have so far.
* The program is APF authorized and lives in a link listed library.
* The program uses MODESET to switch in and out of supervisory mode.
* The program has been added to IKJTSOxx AUTHPGM list.
* The program issues MVS command to modify a CICS region (f, region-name cemt
blah, blah) via SVC 34.
* The REXX itself is not allowed (by the Info Security folks) to issue the
commands.
The REXX Call is:
arg1 = 'PS0903A'
ADDRESS tso
Call CICSCMDT ARG1
say 'rc = ' rc
exit
The actual call is working. However, somewhere along the line I am losing the
authority to issue the MODESET command (which does work when the program is run
in batch mode). Therefore, I'm getting an S047 authorization abend with the
PSW pointing right at the MODESET statement (SVC 107).
Some of the reading I've done indicates a REXX seems to indicate I may need the
stub program for IKJEFTSR to keep the program authorized.
What say ye?
Betsy
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
