Calling the SA z/OS Exit from Your DFSAOE00 Module
If neither of the above methods suits your installation, it is possible to directly call the EVIPVEX1 module from your DFSAOE00 exit routine.
Input parameters are:
- Register 1 points to the SXPL (standard Exit Parameter List) as supplied by IMS to the DFSAOE00 exit.
LA R1,SXPL ; Load address of SXPL
L R15,=V(EVIPVEX1) ; get address of routine
BALR R14,R15 ; invoke the exitYou are responsible for the correct setting of the AOE0RPLY field. Note that after calling EVIPVEX1, the AOE0RPLY field will be set as specified in Using the SA z/OS Exit without the z/OS Exit Router.
The DFSAOE00 exit uses the last four words of the storage that is pointed to by SXPLASWA. These 16 bytes are reserved for internal SA z/OS control information. If the values are changed, unpredictable results may occur.
The EVIPVEX1 module uses the last three words of the storage that is pointed to by AOE0WRKA, the dynamic 256-byte work area of DFSAOE00. Make sure that DFSAOE00 does not use more than 244 bytes of this area. Otherwise, EVIPVEX1 will change the remaining buffer and hence unpredictable results may occur.