If a user is to change the class, forms, destinations, and/or copies of one or more files of any job the ROJES2XT is an essential tool for every CA Roscoe system.
Background:
Although the ROJES2XT is distributed with Roscoe, this exit is assembled by the user and must be installed into JES. It does not become active until the JESPARMS are correctly modified and the exit is initialized by a warm start of JES or an IPL.
Environment:
IBM JES2 (Job Entry Subsystem 2)
Instructions:
To ASSEMBLE the ROJES2XT
Be sure you have the latest source for ROJES2XT for your version of z/OS. To assemble ROJES2XT use USERMOD MRO6029 in the Roscoe SAMPJCL. ROJES2XT must be reassembled, re-link edited and replaced in JES every time you update MVS or JES. It is recommended that the ROJEX2XT be put in the CSA.
Verify that the SYSLIBS are in the following order:
SYS1.SHASMAC
CAI.RO60MAC
SYS1.MACLIB
SYS1.MODGEN
The JESPARMS
The JESPARMS must be updated as shown below and the load module ROJES2XT must be moved from the RO60LIB to a link-listed load library.
LOADMOD(ROJES2XT) STORAGE=CSA EXIT(5) ROUTINE=(RO$EXIT5),STATUS=ENABLED,TRACE=NO
Warning: You cannot change the name ROJES2XT.
The ROJES2XT must be the first exit in the list. If you have another exit you need to add, enter the JESPARMS this way:
LOADMOD(ROJES2XT) STORAGE=CSA LOADMOD(xxxxxxxx) STORAGE=yyy EXIT(5) ROUTINE=(RO$EXIT5,zzzzzzz),STATUS=ENABLED,TRACE=NO
To initialize or reload the exit, JES2 must be warm started, or the system must be ipled.
To DISPLAY the JESPARMS for EXIT5
To display the JESPARMS for EXIT5 enter the JES2 command $D EXIT5 on the console.
Example:
$D EXIT5 $HASP823 EXIT(5) 924 $HASP823 EXIT(5) STATUS=ENABLED,ENVIRON=JES2, $HASP823 ROUTINES=(RO$EXIT5),SPLEVEL=CHECK,TRACE=YES, $HASP823 USECOUNT=0
TO DISPLAY ROJES2XT STATS
To display the ROJES2XT stats, enter the JES2 command $D MOD(ROJES2XT) on the console.
Example:
$D MOD(ROJES2XT) $HASP468 MODULE(ROJES2XT) 960 $HASP468 MODULE(ROJES2XT) ADDRESS=00176EE0,ASSEMBLY=(12/16/04, $HASP468 11.46),ENVIRON=JES2,EXITPTS=(), $HASP468 FMID=HJE7708,IBMJES2=NO,LASTAPAR=, $HASP468 LENGTH=001120,LOADMOD=ROJES2XT, $HASP468 MACLEVEL=6,ROUTINES=(RO$EXIT5), $HASP468 SPLEVEL=CHECK,TABLES=()
To TEST ROJES2XT
An easy way to test the ROJES2XT is to execute a simple IEFBR14 job with no steps. When you attach the job, and issue a status job you will see 3 files all marked "NOPRINT" Now set one of the three files to print, changing the class to a valid class and printer. Issue the "Detach Job" command.
If you look on SYSLOG you will see:
Additional Information:
Requirements are on page 11-15 of the Roscoe System Reference Guide. Also see Chapter 11. ATTACH JOB, CONSOLE and DISPLAY
Note: The RO60LIB should not be linklisted.