Tivoli Header
Administrator's Guide
Figure 104. ANRUSRXA
*----------------------------------------------------------------------
* Name: ANRUSRXA COPY
* Description: DSECT of the data structure passed by the USEREXIT
* receiver to the installations USEREXIT module.
*----------------------------------------------------------------------
PUSH PRINT
AIF ('&SYSPARM' NE 'SUP').AR001
PRINT OFF
.AR001 ANOP
ANRUSRXA DSECT
*
ANREVNT# DS F Event number
ANRSEVCD DS H Event severity code
ANRSEVIN EQU 2 ... Informational message
ANRSEVWA EQU 3 ... Warning message
ANRSEVER EQU 4 ... Error message
ANRSEVSV EQU 5 ... Sever message message
ANRSEVDI EQU 6 ... Diagnostic message
ANRSEVTX EQU 7 ... Text message
*
ANRAPTYP DS H Application type
ANRAPTBA EQU 1 ... Backup or Archive client
ANRAPTHS EQU 2 ... Space management client
ANRAPTAP EQU 3 ... API client
ANRAPTSR EQU 4 ... Server (e.g. server to server)
*
ANRSESID DS F Session ID
ANRVERSN DS F Version of this structure
ANREVTYP DS F Event type
ANREVTSR EQU 3 ... Server event
ANREVTCL EQU 5 ... Client event
*
ANRSTAMP DS 0CL6 Time stamp of event data
ANRYEAR DS X ... Years since base year
ANRBASYR EQU 1900 ... (base year)
ANRMONTH DS X ... Month (x'01' - x'0C')
ANRDAY DS X ... Day (x'01' - x'1F')
ANRHOUR DS X ... Hour (x'00' - x'18')
ANRMINUT DS X ... Minutes (x'00' - x'3B')
ANRSECND DS X ... Seconds (x'00' - x'3B')
ANRSRVRN DS CL65 Server name
ANRNODEN DS CL65 Node name
ANRCOMMM DS CL17 Communications Method
ANROWNER DS CL65 Owner name
ANRHLADR DS CL65 High-level address
ANRLLADR DS CL33 Low-level address
ANRSCHDN DS CL31 Schedule name
ANRDOMNN DS CL31 Domain name of node
ANREVDAT DS CL1600 Event text
DS 0D
*----------------------------------------------------------------------
* The actual length of the data in each of the character fields is
* provided; only the maximum lengths. The end of the data string
* string is indicated by a x'00' in each of the character fields.
* Since no lengths are being provided, you must determine the length
* of the data in each of the character fields.
ANRSRVLN EQU 64 Server name max length
ANRNODLN EQU 64 Node name max length
ANRCOMLN EQU 16 Communications Method max length
ANROWNLN EQU 64 Owner name max length
ANRHLALN EQU 64 High-level address max length
ANRLLALN EQU 32 Low-level address max length
ANRSCHLN EQU 30 Schedule name max length
ANRDOMLN EQU 30 Domain name of node max length
ANREVDLN EQU 1600 Event text max length
*----------------------------------------------------------------------
ANRUSXSZ EQU *-ANRUSRXA Size of structure in bytes
ANRUSXDW EQU ((*-ANRUSRXA)+7)/8 Size of structure in doublewords
*
EJECT
POP PRINT
[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]