DataManager Batch Processing and Reporting › DataManager Daily Processing (CAKSLOAD) › The User Exit for CAKSLOAD

The User Exit for CAKSLOAD

This user exit provides a means of manipulating output data records before they are written to disk. Therefore, this exit point can modify the construct.

The following information describes the detail linkage conventions for interfacing to DataManager's user exit.

• This user exit should be written in Assembler Language.
• The user exit uses standard IBM linkage conventions.
• The exit routine must reside in a LNKLST library or in the library in which DataManager resides, as indicated by the STEPLIB DD statement, or in a library concatenated to the STEPLIB DD statement.
• It is not necessary to link edit an exit routine with any part of DataManager. The exit routine is compiled and linked independently of DataManager. DataManager uses a late binding technique of exit name specification.
• Every call to any exit point by DataManager is identical, except for EOF on input. That is, there is no first time flag or signal to the exit.
• Please note that this exit doesn't have to be reentrant (RENT) or reusable (REUS).
• The name of the exit's load module is up to you. The name you choose is specified in the CAKSLOAD_EXIT parameter in the CAIKSPAR file.
• A dummy load module with the default name of CA$KREX is supplied in the CAJRLOAD library. If no name is specified in the CAKSLOAD_EXIT parameter, this dummy module will be called.
• A default CA$KREX exit source and load module is provided, but we recommend that this source be used only as a sample in the creation of your own exit, and that you provide your own unique source and load module name.

This sample user exit is provided as member name CA$KREX in the CAJRSAMP library.

CA$KREX  CSECT
**********************************************************************
*
*       CA$KREX  -  DUMMY EXIT ROUTINE FOR CONSTRUCT ROUTINE
*
*  THIS ROUTINE SHOULD BE REPLACED BY THE USER IF HE NEEDS
*  AN EXIT ROUTINE. IT MUST FOLLOW STANDARD IBM LINKAGE CONVENTIONS.
*  THIS ROUTINE TAKES TWO PARAMETERS.
*  1) - POINTER TO THE OUTPUT BUFFER AFTER THE RDW (4 BYTES)
*  2) - POINTER TO THE AREA WHERE THE CONSTRUCT SHOULD BE
*
*  THIS DUMMY ROUTINE JUST RETURNS BACK WITH ZERO.
*
**********************************************************************
R1       EQU   1
R2       EQU   2
R3       EQU   3
R4       EQU   4
R5       EQU   5
R6       EQU   6
R7       EQU   7
R8       EQU   8
R9       EQU   9
R10      EQU   10
R11      EQU   11
R12      EQU   12
R13      EQU   13
R14      EQU   14
R15      EQU   15
         USING *,R15                ESTAB. BASE REG.
         STM   R14,R12,12(R13)      SAVE CALLERS REGS.
         LM    R8,R9,0(R1)          LOAD REGS. WITH CALLERS PARM LIST
*        REG 8 CONTAINS ADDRESS OF ORDBUF
*        REG 9 CONTAINS ADDRESS OF CONSTRUCT PTR
*
         LM    R14,R12,12(R13)      RESTORE CALLERS REGS.
         SLR   R15,R15              RETURN CODE IS ZERO
         BR    R14                  RETURN TO RPG FROM EXIT
SAVEAREA DC    18F'0'
         END