IBM Enterprise Console, Manual

Page: 48 / 194

CRTJOBD JOBD(QGPL/STARTADP)
JOBQ(QSYSNOMAX)
TEXT(’Start TEC adapter after IPL.’)
RQSDTA(’CALL QGPL/STRADPCL’)
3. Add an auto start job entry in QSYSWRK using the previous job description:
ADDAJE SBSD(QSYSWRK)
JOB(TECAMSGQ)
JOBD(QGPL/STARTADP)
This program runs at the start of QSYSWRK subsystem and ends quickly after
doing the STRTECADP command.
Changing the AS/400 Startup Program
The system value QSTRUPPGM (startup program) contains the name of the
program to execute after IPL. This program can be modified to add the starting of
adapters.
1. Retrieve the code in the startup program:
RTVCLSRC PGM(QSYS/program-name) SRCFILE(QGPL/QCLSRC)
SRCMBR(program-name)
2. Modify the source:
PGM
DCL VAR(&STRWTRS) TYPE(*CHAR) LEN(1)
DCL VAR(&CTLSBSD) TYPE(*CHAR) LEN(20)
QSYS/STRSBS SBSD(QCMN)
STRTCP
MONMSG MSGID(CPF0000)
QSYS/STRSBS SBSD(QSERVER)
MONMSG MSGID(CPF0000)
STRTECADP EVTADP(AL
CFGFILE(’/QSYS.LIB/QUSRSYS.LIB/CFG_ALERT.FILE/ALRCFG.MBR’)
MONMSG MSGID(CPF0000)
DONE:
RETURN
CHGVAR VAR(&CPYR) VALUE(&CPYR)
ENDPGM
3. Create the program and put it in the QSYS library:
CRTCLPGM PGM(QSYS/program-name) SRCFILE(QGPL/QCLSRC)
SRCMBR(program-name)
Note:
The startup program runs under user profile QPGMR. By default,
QPGMR
does not have authority to the AS/400 alert adapter commands
and programs. You must either grant QPGMR authority to the
commands and programs (“Starting the Adapter” on page 27) or have
the startup program adopt QSECOFR authority and be owned by
QSECOFR
.
Multiple AS/400 Alert Adapters
To support another AS/400 alert adapter to monitor a different alert filter or
another data queue within the same filter, create the following additional files:
v
Configuration file: Specifies the filter to monitor and data queue to monitor.
v
CDS file: Defines new classes to match the alerts being monitored.
v
BAROC file: Required if new classes are identified in the CDS file.
v
Rules file: Required if new rules are added.
36
IBM Tivoli Enterprise Console: Adapters Guide