KMPSGE ;OAK/KAK/JML - Master Routine ;9/1/2015
Source file <KMPSGE.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;-- this routine can only be run as a TaskMan background job
|
|
LOOP(HANG,SESSNUM,OS) | ;
|
|
PACK(SESSNUM,SITENUM) | ||
WAIT(HANG,MAXJOB) | ||
RUN() | ;-- number of currently running jobs
|
|
TOOLNG | ;-- job has been running too long
|
|
ERR1 | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("ERRTN" | ERR1+2 |
^%ZOSF("MGR" | EN+22 |
^%ZOSF("PROD" | EN+22 |
^%ZOSF("TRAP" | EN+38, ERR1+1 |
^DIC(4 - [#4] | PACK+12, PACK+13 |
^KMPS(8970.1 - [#8970.1] | EN+23, EN+24 |
^XTMP("KMPS" | EN+26, EN+27*, EN+28!, EN+29!, EN+37*, LOOP+10, LOOP+14, LOOP+21, LOOP+29, LOOP+36 , PACK+21*, WAIT+13, RUN+4, ERR1+6* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | EN+4~, EN+44*, EN+49*, EN+50* |
COMPDT | EN+4~, EN+57*, EN+59, PACK+11~, PACK+20*, PACK+21, PACK+30 |
DUZ | PACK+15* |
GBL | LOOP+8~ |
HANG | EN+4~, EN+11*, EN+50, EN+54, LOOP~, LOOP+10, WAIT~, WAIT+13 |
I | LOOP+8~, LOOP+19*, LOOP+20, LOOP+21, LOOP+22, LOOP+23, LOOP+25, LOOP+26 |
J | LOOP+15~, LOOP+21* |
JEND | LOOP+15~, LOOP+18*, LOOP+21 |
KMPSVOLS | EN+4~ |
KMPSZE | EN+4~, ERR1+1*, ERR1+4 |
LOC | EN+4~, EN+24*, EN+39 |
MAXJOB | EN+4~, EN+9*, EN+50, WAIT~, WAIT+13 |
MGR | EN+4~, EN+22* |
N | PACK+11~, PACK+12*, PACK+13 |
NM | PACK+11~, PACK+13*, PACK+23 |
NOWDT | EN+4~, EN+15*, EN+20, EN+27, EN+37, EN+39, EN+58, EN+59, LOOP+27, LOOP+34 , LOOP+36, LOOP+44, TOOLNG+7, ERR1+7 |
OS | EN+4~, EN+17*, EN+18, EN+37, EN+54, EN+58, LOOP~, LOOP+18, LOOP+24, LOOP+26 |
OUT | LOOP+15~, LOOP+18*, LOOP+19, LOOP+21* |
PROD | EN+5~, EN+22*, EN+23*, EN+39 |
PTCHINFO | EN+5~, EN+34*, EN+37 |
QUIT | EN+5~, EN+53*, EN+55, LOOP+12, LOOP+16*, LOOP+31*, LOOP+38*, TOOLNG+4* |
RESULT | EN+6~, EN+56*, EN+57 |
RETURN | PACK+11~, PACK+30*, PACK+32 |
RUN | WAIT+11~, WAIT+13*, WAIT+15, RUN+1~, RUN+3*, RUN+4*, RUN+6 |
SESSNUM | EN+5~, EN+13*, EN+20, EN+37, EN+39, EN+52, EN+54, EN+56, EN+58, EN+59 , LOOP~, LOOP+10, LOOP+27, LOOP+34, LOOP+36, LOOP+44, PACK~, PACK+23, TOOLNG+7, ERR1+7 |
SITENUM | EN+5~, EN+13*, EN+28, EN+37, EN+39, EN+52, EN+56, EN+58, LOOP+36, PACK~ , PACK+12, PACK+13, PACK+21, PACK+25, PACK+26 |
>> SYS("UCI" | EN+46, EN+47 |
TEMP | EN+5~, EN+39* |
TEXT | EN+5~, EN+20, EN+58, EN+59, LOOP+15~, LOOP+27, LOOP+30~, LOOP+34, LOOP+37~, LOOP+44 , TOOLNG+2~, TOOLNG+7, ERR1+3!, ERR1+7 |
TEXT( | LOOP+20*, LOOP+21*, LOOP+22*, LOOP+23*, LOOP+25*, LOOP+26* |
TEXT(1 | EN+19*, LOOP+17*, LOOP+32*, LOOP+39*, TOOLNG+5*, ERR1+4* |
TEXT(2 | LOOP+22*, LOOP+33*, LOOP+40*, TOOLNG+6*, ERR1+5* |
TEXT(3 | LOOP+41* |
TEXT(4 | LOOP+42* |
TEXT(5 | LOOP+43* |
U | EN+13*, EN+23, EN+24, EN+27, EN+37, EN+39, EN+57, PACK+12*, PACK+13, PACK+21 , PACK+30 |
UCI | EN+5~ |
UCIVOL | EN+5~ |
UCIVOL1 | LOOP+8~ |
VOL | EN+6~, EN+45*, EN+46*, EN+47, LOOP+15~, LOOP+18*, LOOP+21*, RUN+1~, RUN+3*, RUN+4* |
X | EN+6~, EN+32*, EN+38*, EN+58*, PACK+11~, ERR1+1* |
XMDUZ | PACK+15~* |
XMSUB | PACK+11~, PACK+23* |
XMTEXT | PACK+11~, PACK+25*, PACK+26* |
XMY | PACK+11~ |
XMY("S.KMP1-SAGG-SERVER@FO-ALBANY.DOMAIN.EXT" | PACK+27* |
XMZ | PACK+11~, PACK+30 |
XMZSENT | EN+6~, EN+57*, EN+58 |
>> ZTQUEUED | EN+2 |
ZUZR | EN+6~, ERR1+1* |