Use of the following commands can be monitored at two exit points with an exit routine.
CREATE-FILE
CREATE-FILE-GENERATION
CREATE-FILE-GROUP
MODIFY-FILE-ATTRIBUTES
MODIFY-FILE-GENERATION-SUPPORT
MODIFY-FILE-GROUP-ATTRIBUTES.
In addition, it is possible to monitor the CATAL macro.
The request exit routine can reject or modify a CATALOG request.
The return exit routine can initiate the appropriate logging or recording actions after the execution of a CATALOG request.
Return exit (070)
The following information is passed to the exit routine:
R1 = A(EX070 exit parameter area) R12 = A(TPR program manager) R13 = A(save area of calling component) R14 = A(indirect return) R15 = A(exit routine)
The exit routine cannot send a return code to the system module. The return from the return exit routine is followed by the return from CATALOG processing. The exit routine must set the value X'0000' or X'0004' for the maincode in the standard header of the parameter area. If the maincode contains any other value, the following message appears on the console:
% DMS06B9 CALLING SYSTEM EXIT (&00) RESULTS IN ERROR CODE (&01)
Request exit (071)
The register settings are the same as for the return exit.
The return code for the calling system module is sent in the maincode of the standard header of the exit parameter area. The following values are possible:
X'0000' | CATALOG processing is performed with the CATALOG parameter area, which may have been modified by the exit routine. |
X'0004' | The CATALOG request is rejected with error code X'0513'. DMS0513 USE OF SPECIFIED COMMAND OR 'CATAL' MACRO RESTRICTED BY SYSTEM ADMINISTRATOR. COMMAND OR MACRO REJECTED. |
other | Same as for X'0004'; in addition the following message is displayed on the console:
|
Notes
Registers 12, 13 and 14 must not be destroyed by the exit routine.
The exit routine can set or modify the AUDIT parameter without the user having any means of influencing or preventing the change.
DSECT
EX070 MF=D
MFTST MF=D,PREFIX=D,MACID=MAX,ALIGN=F, C
DMACID=MAX,SUPPORT=(D,C,L),DNAME=MAXMDL
DMAXMDL DSECT ,
*,##### PREFIX=D, MACID=MAX #####
* Parameterarea
DMAXHDR FHDR MF=(C,DMAX),EQUATES=NO Standard-Header
DMAXHDR DS 0A
DMAXFHE DS 0XL8 0 GENERAL PARAMETER AREA HEADER
*
DMAXIFID DS 0A 0 INTERFACE IDENTIFIER
DMAXFCTU DS AL2 0 FUNCTION UNIT NUMBER
* BIT 15 HEADER FLAG BIT,
* MUST BE RESET UNTIL FURTHER NOTICE
* BIT 14-12 UNUSED, MUST BE RESET
* BIT 11-0 REAL FUNCTION UNIT NUMBER
DMAXFCT DS AL1 2 FUNCTION NUMBER
DMAXFCTV DS AL1 3 FUNCTION INTERFACE VERSION NUMBER
*
DMAXRET DS 0A 4 GENERAL RETURN CODE
DMAXSRET DS 0AL2 4 SUB RETURN CODE
DMAXSR2 DS AL1 4 SUB RETURN CODE 2
DMAXSR1 DS AL1 5 SUB RETURN CODE 1
DMAXMRET DS 0AL2 6 MAIN RETURN CODE
DMAXMR2 DS AL1 6 MAIN RETURN CODE 2
DMAXMR1 DS AL1 7 MAIN RETURN CODE 1
DMAXFHL EQU 8 8 GENERAL OPERAND LIST HEADER LENGTH
*
DMAXCRC DS F CATAL-Returncode
DMAXCPL DS A Addr der CATAL-PL
DMAX# EQU *-DMAXHDR
In the case of the return exit, the MAXCRC field contains the return code of CATAL processing
CATALOG parameter list
The DSECT for the CATALOG parameter area is generated by means of the CATAL macro:
[name] CATAL MF=D[,PREFIX=prefix/*],VERSION=3
The MAXCPL field of the exit parameter area contains a pointer to the CATALOG parameter area. The CATALOG parameter area must be generated in the format valid as of BS2000/OSD-BC V3.0 (VERSION=3).