- Create a subsystem description:
CRTSBSD SBSD(MYLIB/MYINTER) POOLS((1 *BASE) (2 *INTERACT))
- Create a class
CRTCLS CLS(MYLIB/MYCLASS) RUNPTY(20)
- add routing entries to your subsystem:
ADDRTGE SBSD(MYLIB/MYINTER) SEQNBR(10) CMPVAL(QCMDI) PGM(QSYS/QCMD) POOLID(2)
ADDRTGE SBSD(MYLIB/MYINTER) SEQNBR(9999) CMPVAL(*ANY) PGM(QSYS/QCMD) POOLID(2)
- Create a job queue, and add the job queue entry to your new subsystem:
CRTJOBQ JOBQ(MYLIB/MYJOBQ)
ADDJOBQE SBSD(MYLIB/MYINTER) JOBQ(MYLIB/MYJOBQ) MAXACT(200)
- Set up the workstation name entries. Remove all the *ALL workstation type
entries first, and then add the appropriate workstation name entries:
RMVWSE SBSD(QSYS/QINTER) WRKSTNTYPE(*ALL)
ADDWSE SBSD(QSYS/QINTER) WRKSTN(QPADEV*)
ADDWSE SBSD(MYLIB/MYINTER) WRKSTN(PC*)
- Finally, you can update your system startup program to start your new
subsystems automatically.