The ARGENT Subsystem

A subsystem description object is supplied with the Argent Agent for iSeries. The subsystem is named ARGENT and resides in library ARGENT. This subsystem description object contains a job queue entry specifying a job queue named ARGENT. The default job description object is also named ARGENT and references job queue ARGENT.

When you first install and configure the Argent Agent for iSeries, Argent strongly recommends that you perform your initial deployment and testing using the ARGENT subsystem. It is suitable for use in most environments and is compatible with your existing system management policies.

Note: only advanced iSeries work management experts should change or modify the ARGENT subsystem description object.

The ARGENT subsystem contains an auto-start job entry which invokes the Argent Agent for iSeries. When you issue the

STRSBS ARGENT/ARGENT

command, the ARGENT subsystem is started, and the Argent Agent for iSeries is started automatically.

When you issue the

ENDSBS ARGENT

command or the PWRDWNSYS command, the subsystem will end in accordance with IBM’s design and documentation for these commands. If the Argent Agent for iSeries is active at the time the ENDSBS command or the PWRDWNSYS command is issued, the resulting termination of the agent is considered to be abnormal. The messages sent to the Argent Agent for iSeries message queue and the log file will reflect this.

Modifying The iSeries IPL Start Up Program

This section is intended for use by advanced iSeries system programming and administration experts only and should not be used without the involvement and agreement of the security officer and IT administrators for the system.

This section also assumes the availability of the IBM-provided source code editing tools and the Control Language (C/L) compiler.

IBM’s documentation for the iSeries shows how to modify the IPL start up program. Before beginning any activities described in this section, please reference the IBM documentation at:

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/rzal2/rzal2chgiplstartup.htm

Retrieving The C/L Source

You can use the

RTVCLSRC PGM(QSYS/QSTRUP) SRCFILE(QGPL/QCLSRC) SRCMBR(*PGM)

command to retrieve the source for the IPL start up program and edit the source using the

WRKMBRPDM FILE(QGPL/QCLSRC) MBR(QSTRUP)

command. The source member should appear similar to the following:


/********************************************************************/

/*                                                                  */

/* 5722SS1 V5R3M0 040528     RTVCLSRC Output     01/09/06 14:49:03  */

/*                                                                  */

/* Program name . . . . . . . . . . . . . . :   QSTRUP            PN*/

/* Library name . . . . . . . . . . . . . . :   QSYS              PL*/

/* Original source file . . . . . . . . . . :   S000039122        SN*/

/* Library name . . . . . . . . . . . . . . :   $BLDSS1           SL*/

/* Original source member . . . . . . . . . :   S000039122        SM*/

/* Source file change                                               */

/*   date/time  . . . . . . . . . . . . . . :   11/30/03 20:06:43 SC*/

/* Patch option . . . . . . . . . . . . . . :   *NOPATCH          PO*/

/* User profile . . . . . . . . . . . . . . :   *USER             UP*/

/* Text . . . :                                                   TX*/

/* Owner  . . . . . . . . . . . . . . . . . :   QSYS              OW*/

/* Patch change ID  . . . . . . . . . . . . :                     PC*/

/* Patch APAR ID  . . . . . . . . . . . . . :                     PA*/

/* User mod flag  . . . . . . . . . . . . . :   *NO               UM*/

/*                                                                ED*/

/********************************************************************/

     PGM

     DCL VAR(&STRWTRS) TYPE(*CHAR) LEN(1)

     DCL VAR(&CTLSBSD) TYPE(*CHAR) LEN(20)

     DCL VAR(&CPYR) TYPE(*CHAR) LEN(90) VALUE('5722-SS1 (C) COPYRIGHT-

 IBM CORP 1980, 2000. LICENSED MATERIAL - PROGRAM PROPERTY OF IBM')

     QSYS/STRSBS SBSD(QSERVER)

     MONMSG MSGID(CPF0000)

     QSYS/STRSBS SBSD(QUSRWRK)

     MONMSG MSGID(CPF0000)

     QSYS/RLSJOBQ JOBQ(QGPL/QS36MRT)

     MONMSG MSGID(CPF0000)

     QSYS/RLSJOBQ JOBQ(QGPL/QS36EVOKE)

     MONMSG MSGID(CPF0000)

     QSYS/STRCLNUP

     MONMSG MSGID(CPF0000)

     QSYS/RTVSYSVAL SYSVAL(QCTLSBSD) RTNVAR(&CTLSBSD)

     IF COND((&CTLSBSD *NE 'QCTL      QSYS      ') *AND (&CTLSBSD *NE-

 'QCTL      QGPL      ')) THEN(GOTO CMDLBL(DONE))

     QSYS/STRSBS SBSD(QINTER)

     MONMSG MSGID(CPF0000)

     QSYS/STRSBS SBSD(QBATCH)

     MONMSG MSGID(CPF0000)

     QSYS/STRSBS SBSD(QCMN)

     MONMSG MSGID(CPF0000)

DONE:

     QSYS/STRSBS SBSD(QSPL)

     MONMSG MSGID(CPF0000)

     QSYS/RTVSYSVAL SYSVAL(QSTRPRTWTR) RTNVAR(&STRWTRS)

     IF COND(&STRWTRS = '0') THEN(GOTO CMDLBL(NOWTRS))

     CALL PGM(QSYS/QWCSWTRS)

     MONMSG MSGID(CPF0000)

NOWTRS:

     RETURN

     CHGVAR VAR(&CPYR) VALUE(&CPYR)

     ENDPGM

To modify the system’s IPL start up program to automatically start the ARGENT subsystem, you will need to change and re-compile this program.

Modifying The C/L Source

The change that’s needed is simply to insert the following two lines in the program immediately after the NOWTRS: tag and before the RETURN statement:

QSYS/STRSBS SBSD(ARGENT/ARGENT)

MONMSG MSGID(CPF0000)

After successfully making the source code change, the relevant segment of the program should look like this


     CALL PGM(QSYS/QWCSWTRS)

     MONMSG MSGID(CPF0000)

NOWTRS:

     QSYS/STRSBS SBSD(ARGENT/ARGENT)

     MONMSG MSGID(CPF0000)

     RETURN

     CHGVAR VAR(&CPYR) VALUE(&CPYR)

Re-Compiling The IPL Start Up Program

After you end your edit session, you can compile the program with the following command:

CRTCLPGM QSYS/QSTRUP QGPL/QCLSRC

The next time the system is re-IPLE’ed, the ARGENT subsystem will be started, and the Argent Agent for iSeries will automatically start.