Substitute (your_lib) with the library you want to contain the subsystem
i.e. QGPL.
WRKSHRPOOL and setup a shared pool with appropriate amount of memory and
activity levels use the shrpool name in the steps below.
Create Subsystem Description:
CRTSBSD SBSD(your_lib/ODBC) POOLS((1 *SHRPOOLx))
TEXT('Subsystem for ODBC jobs')
Duplicate the Default ODBC class:
CRTDUPOBJ OBJ(QPWFSERVER) FROMLIB(QSYS)
OBJTYPE(*CLS) TOLIB(QSYS) NEWOBJ(QPWFODBC)
Change its attributes:
CHGCLS CLS(QSYS/QPWFODBC ) RUNPTY(35)
**Or whatever RUNPTY you need**
Add a routing entry:
ADDRTGE SBSD(your_lib/ODBC) SEQNBR(1) CMPVAL(*ANY)
PGM(QCMD) CLS(QSYS/QPWFODBC) POOLID(1)
Add a pre start Job Entry:
ADDPJE SBSD(your_lib/ODBC) PGM(QZDASOINIT) INLJOBS(21)
THRESHOLD(20) ADLJOBS(5) CLS(QSYS/QPWFODBC)
**Use numbers specific to your installation**
Start the subsystem:
STRSBS SBSD(your_lib/ODBC)
You will need to add the starting of this subsystem
to the system start up program.
=======================
The next steps are done in iSeries Navigator:
Navigate <your_system><Network><Servers><iSeries Access>
Right Click on DataBase and select [Properties]
Click on the [Subsystems] tab
Click [Specific Clients] and click [Add]
In the Add Client screen: fill in the details
Either single IP address or a range of addresses
Select the subsystem you just created and setup
Click OK on each of the screens to save
your changes and exit iSeries Navigator.
**Changes take effect immediately.
To back-out changes:
From iSeries Navigator
Remove the selection from above,
then end the ODBC subsystem.
The jobs will then run the default QUSRWRK subsystem
You can use the same logic for any of the iSeries Access Servers
Central, Data Queue, File, Net Print, Remote Command, Signon and Server Mapper
