IBM Enterprise Console manual Starting an AS/400 Adapter after an IPL

Starting an AS/400 Adapter after an IPL

Two methods can be used to automatically start an AS/400 message adapter after an IPL:

vAdding an autostart job to a job queue

vModifying the AS/400 start-up program to call the STRTECADP command

Adding an Autostart Job to QSYSWRK

1.Create a CL program that invokes the STRTECADP command, for example:

a.Edit a source file member to add CL statements:

STRSEU QGPL/QCLSRC STRADPCL

b.Enter the following in the source file member. You can have a STRTECADP command for each adapter you would like to start:

PGM

STRTECADP EVTADP(SYSOPR) + CFGFILE(’/QSYS.LIB/QUSRSYS.LIB/CFG_MSG.FILE/MSGCFG.MBR’)

ENDPGM

Note: Ensure that TCP/IP service is started on the AS/400 system before starting a message adapter.

c.Create the program using the previous source member:

CRTCLPGM PGM(QGPL/STRADPCL) SRCFILE(QGPL/QCLSRC)

2.Create a job description that calls the previous program and use QSYSNOMAX as the Job Queue:

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 (start-up 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 start-up 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(SYSOPR)+ CFGFILE(’/QSYS.LIB/QUSRSYS.LIB/CFG_MSG.FILE/MSGCDS.MBR’) MONMSG MSGID(CPF0000)

52IBM Tivoli Enterprise Console: Adapters Guide