|
[snip]
What is the value of
WRKSYSVAL QCTLSBSD
on your system?
[/snip]
* Display System Value *
* System value . . . . . : QCTLSBSD *
* Description . . . . . : Controlling subsystem *
* Controlling subsystem . . . : QCTL *
* Library . . . . . . . . . : QSYS *
[snip]
Also
DSPSYSVAL QSTRUPPGM
record that. The default is QSYS/QSTRUP
[/snip]
* Display System Value *
*System value . . . . . : QSTRUPPGM *
*Description . . . . . : Startup program *
*Startup program . . . . . . : QSTRUP Name, *NONE *
* Library . . . . . . . . . : QSYS Name *
[snip]
CRTSRCPF QTEMP/QCLSRC
RTVCLSRC PGM(QSYS/QSTRUP) SRCFILE(QTEMP/QCLSRC)
DSPPFM QTEMP/QCLSRC
You will see a section like this:
...
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:
[/snip]
Yes, I see exactly that.
--
QBATCH is currently empty as there are no batch jobs running, but they do
run in QBATCH. The current list for QCTL is as follows:
* Opt Subsystem/Job User Type CPU % Function Status
*
* QCTL QSYS SBS .0 DEQW
*
* QSYSSCD QPGMR BCH .0 PGM-QEZSCNEP EVTW *
and a pile of users in QBASE...
*Opt Subsystem/Job User Type CPU % Function Status *
* QBASE QSYS SBS .0 DEQW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
* XX XXXXX INT .0 MNU-XXXXXX DSPW *
* XX XXXXX INT .0 MNU-XXXXXX DSPW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
* XX XXXXX INT .0 PGM-XXXXXX DSPW *
--
Scott Williams
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.