Understanding the Exit Communication Area

When a call is made to the request or result validation exit, the Exit Communication Area passes information to the exit program.

The Exit Communication Area contains information that is passed to either a request or result validation exit program when a call is made to that program.

The MACRO library includes a description of the Exit Communication Area (EXITAREA):


 ***********************************************************************
 *  COMMUNICATION AREA PASSED TO THE REQUEST/RESULT EXITS              *
 ***********************************************************************
 EXITAREA DSECT
 XHEADER  DS    CL8                      EYE CATCHER
 XREASON  DS    CL8                      REASON FOR CALLING EXIT
 XUSERID  DS    CL8                      USER IDENTIFICATION
 XTERMID  DS    CL4                      TERMINAL IDENTIFICATION
 XDATE    DS    CL8                      DATE IN MM/DD/YY FORMAT
 XTIME    DS    CL8                      TIME IN HH:MM:SS FORMAT
 XSERVER  DS    CL8                      NAME OF SERVER
 XDBSID   DS    CL30                     DATABASE SYSTEM ID
 XDBUID   DS    CL30                     DATABASE USER ID
 *––––––––––––––––––––––––––––*
 *  REQUEST EXIT INFORMATION  *
 *––––––––––––––––––––––––––––*
 XREQINFO DS    0CL28                    REQUEST INFORMATION
 XREQNAME DS    CL8                      REQUEST NAME
 XREQADDR DS    F                        ADDRESS OF REQUEST BUFFER
 XREQFUNC DS    CL8                      REQUEST FUNCTION
 XREQOPT  DS    CL8                      REQUEST OPTION
 *––––––––––––––––––––––––––––*
 *  RESULT EXIT INFORMATION   *
 *––––––––––––––––––––––––––––*
 XRESINFO DS    0CL36                    RESULT INFORMATION
 XRESNAME DS    CL8                      RESULT NAME
 XRESOPT  DS    CL8                      RESULT OPTION
 XRESTYPE DS    CL3                      RESULT TYPE
 XRESFILL DS    CL1                      FILLER
 XRESCODE DS    F                        DB2 RETURN CODE
 XRESROWS DS    F                        NO. OF ROWS IN RESULT
 XRESSIZE DS    F                        NO. OF BYTES IN RESULT
 XRESQNAM DS    CL8                      TEMPORARY STORAGE QUEUE NAME
 *–––––––––––––––––––––––––––––––––––––––––––––––––––*
 *  VALUES THAT CAN BE MODIFIED BY THE EXIT PROGRAM  *
 *–––––––––––––––––––––––––––––––––––––––––––––––––––*
 XACTION  DS    CL8                      ACTION TO BE TAKEN
 XDDBNAME DS    CL8                      DEFAULT DATABASE NAME
 XDTSNAME DS    CL8                      DEFAULT TABLESPACE NAME
 XERRMSG  DS    CL70                     ERROR MESSAGE
 XFILLER  DS    CL30                     FILLER