INHFTM ;DGH,FRW,JSH,JPD; 11 Oct 1999 20:39 ; GIS Formatter background controller
Source file <INHFTM.m>
Package | Total | Caller Graph |
---|---|---|
IHS Generic Interface System | 1 | INHFTM1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
INRHB(INBPN,MESS,SRVR,UPDT) | ;Update background process file
; Input: ; INBPN-Background process ien ; MESS-Text ; SRVR-Server # ; LAST- 1 Update 3rd piece to $H, 0 leave 3rd piece |
|
WAIT() | ;max wait time before shutting down
; Return 0 to shut down 1 to not shut down |
|
HALT | ;Halt process
|
|
NEXTDA(PRIO,DTTM,NOD) | ;Get next transaction off queue
|
|
REQUE | ;Look for queue entries that were "in process" at prior shut-down
|
|
BACK(INTSK,INHSRVMO) | ;Background program entry point
|
|
JL | ;Loop through jobs at priority PRIO
|
|
NEWSRV(INJCODE) | ;Attempt to start a new server
|
|
SRVR(INBPN,INHSRVR) | ; Format Controller background process - server
|
|
ERROR | ;Error module for server
|
|
RUN() | ;should process continue to run
|
|
TMLOOP | ;Main loop to process transactions
|
|
LOOP | ;Main loop to process transactions
|
Name | Field # of Occurrence |
---|---|
$$NOW^%ZTFDT | JL+15 |
$$PRIO^INHB1 | SRVR+25 |
ENF^INHE | ERROR+7, JL+21 |
ERROR^INHF | BACK+7 |
$$ERRMSG^INHU1 | ERROR+3 |
SETENV^INHUT7 | SRVR+21 |
UPDTUIF^INTQRY | JL+16 |
SETDT^UTDT | BACK+10 |
$$REPLACE^UTIL | INHFTM+27 |
AUDCHK^XUSAUD | SRVR+24 |
AUDSTP^XUSAUD | HALT+5 |
ITIME^XUSAUD | SRVR+24, LOOP+4 |
TTSTP^XUSAUD | JL+18 |
TTSTRT^XUSAUD | JL+10 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("AVJ" | INHFTM+24 |
^%ZOSF("PRIORITY" | SRVR+25, BACK+6 |
^%ZOSF("SIGNOFF" | RUN+4 |
^%ZOSF("TRAP" | SRVR+19, ERROR+1, BACK+4 |
^DIJUSV( | HALT+3! |
^INLHFTSK - [#4000.1] | REQUE+3, REQUE+4, ERROR+6, BACK+5, BACK+7, BACK+8, BACK+13, BACK+14, BACK+15, JL+19! |
^INLHFTSK("AH" | REQUE+5, REQUE+6*, LOOP+5, LOOP+8, LOOP+11!, LOOP+12 |
^INLHFTSK("B" | JL+19! |
^INLHFTSK("COUNT" | INHFTM+23* |
^INRHB("RUN" | INHFTM+23*, TMLOOP+3, TMLOOP+4, TMLOOP+5*, NEWSRV+12, NEWSRV+15*, NEWSRV+16, NEWSRV+18, RUN+3, RUN+4! , SRVR+16, SRVR+20*, HALT+1!, HALT+2, LOOP+2*, INRHB+7*, INRHB+8* |
^INRHSITE(1 | INHFTM+24, INHFTM+25, INHFTM+26, RUN+3, SRVR+27, SRVR+28, BACK+6, BACK+11 |
^INRHT - [#4000] | BACK+16, JL+6, JL+8 |
^INRHT("AC" | BACK+16 |
^INTHOS(1 | INHFTM+27, SRVR+17, ERROR+2, BACK+4 |
^INTHPC - [#4004] | SRVR+23, JL+10 |
Name | Line Occurrences |
---|---|
$$NEXTDA | TMLOOP+7, LOOP+6, NEXTDA+20 |
$$RUN | INHFTM+29, TMLOOP+10, NEWSRV+21, SRVR+18, SRVR+31 |
$$WAIT | SRVR+31 |
BACK | LOOP+14 |
HALT | ERROR+8 |
INRHB | TMLOOP+2, TMLOOP+9, NEWSRV+20, LOOP+1, LOOP+9 |
JL | BACK+18, BACK+19 |
LOOP | SRVR+31 |
NEWSRV | TMLOOP+10 |
REQUE | INHFTM+28 |
TMLOOP | INHFTM+29 |
Name | Field # of Occurrence |
---|---|
^( | BACK+16, INRHB+7*, INRHB+8* |
^("SIGNOFF" | RUN+4 |
^(0 | REQUE+4, JL+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | ERROR+6*, ERROR+7 |
BP | BACK+1~, BACK+2*, BACK+3 |
CNT | REQUE+2~, REQUE+3*, REQUE+5* |
DA | LOOP+6*, LOOP+7, LOOP+11, LOOP+14, NEXTDA+6!, NEXTDA+8*, NEXTDA+18*, NEXTDA+20*, NEXTDA+21, ERROR+4 , ERROR+6 |
DAY | NEXTDA+6~, NEXTDA+8*, NEXTDA+18 |
>> DEST | JL+6*, JL+11 |
DTTM | TMLOOP+7, LOOP+6, LOOP+11, NEXTDA~, NEXTDA+13*, NEXTDA+15, NEXTDA+20 |
DUZ | HALT+3, BACK+8*, JL+21 |
DUZ(2 | BACK+9* |
>> ER | JL+8*, JL+20 |
>> ERROR | JL+21 |
>> ERROR(1 | JL+8* |
>> I | BACK+16* |
>> IN | TMLOOP+7*, TMLOOP+9 |
INA | JL+3~, JL+4*, JL+21 |
>> INAVJ | INHFTM+24*, NEWSRV+14 |
INBPN | INHFTM+23, TMLOOP+2, TMLOOP+3, TMLOOP+4, TMLOOP+5, TMLOOP+9, NEWSRV+12, NEWSRV+15, NEWSRV+16, NEWSRV+18 , NEWSRV+20, RUN+3, SRVR~, SRVR+16, SRVR+18, SRVR+20, SRVR+23, HALT+1, HALT+2, LOOP+1 , LOOP+2, LOOP+9, BACK+2, BACK+3~*, JL+10, INRHB~, INRHB+7, INRHB+8 |
INCREF | NEXTDA+6~, NEXTDA+13*, NEXTDA+17 |
INDA | JL+3~, JL+4*, JL+21 |
INDIPA | BACK+4~, BACK+13*, JL+4 |
INDTTMZ | BACK+1~, BACK+8*, JL+15*, JL+16 |
>> INFSHNG | INHFTM+26*, NEWSRV+21 |
INHANG | INHFTM+25*, TMLOOP+9, NEWSRV+17, SRVR+27*, SRVR+30, LOOP+5, LOOP+10, WAIT+2, BACK+1~ |
INHER | SRVR+19!, ERROR+3, ERROR+7 |
INHER(1 | ERROR+3* |
INHER(2 | ERROR+4* |
INHMWAIT | SRVR+28*, SRVR+29, WAIT+3, BACK+1~ |
INHSRVMO | INHFTM+24*, BACK~ |
INHSRVR | NEWSRV+10~, NEWSRV+12*, NEWSRV+15, NEWSRV+16, NEWSRV+18, SRVR~, SRVR+16, SRVR+18, SRVR+20, SRVR+24 , HALT+1, HALT+2, LOOP+1, LOOP+2, LOOP+4, LOOP+9, BACK+2, BACK+3~*, JL+10 |
INHWAIT | SRVR+30*, LOOP+13*, WAIT+2*, WAIT+3, BACK+1~ |
INIDA | BACK+4~, BACK+8*, BACK+14*, JL+4 |
INJ | BACK+4~, BACK+17 |
INJ( | BACK+16*, BACK+18, JL+1 |
INJCODE | NEWSRV~, NEWSRV+17 |
INLK | NEWSRV+10~, NEWSRV+11*, NEWSRV+13*, NEWSRV+19 |
INORDIV | BACK+1~, BACK+8* |
INORDUZ | BACK+1~, BACK+8* |
INPNAME | SRVR+23~*, SRVR+24, LOOP+4 |
>> INSHTDN | SRVR+29*, WAIT+2, WAIT+3 |
>> INSHTDN1 | SRVR+30*, WAIT+2*, WAIT+3 |
>> INTNAME | JL+6*, JL+10 |
INTSK | BACK~, BACK+5, BACK+7, BACK+8, BACK+13, BACK+14, BACK+15, JL+8, JL+14, JL+16 , JL+19 |
>> INTT | BACK+8*, BACK+16, JL+19 |
INV | JL+5! |
>> JOB(1 | INHFTM+27*, TMLOOP+10 |
MESS | INRHB~, INRHB+7, INRHB+8 |
MODE | INHFTM+24*, NEWSRV+12, SRVR+30*, BACK+1~ |
>> N | TMLOOP+7* |
>> ND | NEXTDA+15*, NEXTDA+18 |
NOD | NEXTDA~, NEXTDA+9*, NEXTDA+10*, NEXTDA+11, NEXTDA+13, NEXTDA+18, NEXTDA+19*, NEXTDA+20 |
>> NT | NEXTDA+15*, NEXTDA+18 |
PRIO | TMLOOP+7, REQUE+2~, REQUE+4*, REQUE+5, REQUE+6, LOOP+6, LOOP+11, NEXTDA~, NEXTDA+13*, NEXTDA+17 , NEXTDA+19, NEXTDA+20, BACK+18*, BACK+19*, JL+1 |
>> SCR | JL+6*, JL+8, JL+11, JL+14 |
SRVR | INRHB~, INRHB+7 |
SV | BACK+1~, BACK+2*, BACK+3 |
TIME | REQUE+2~, REQUE+4*, REQUE+5, REQUE+6, NEXTDA+6~, NEXTDA+8*, NEXTDA+18 |
>> TRT | JL+1*, JL+6, JL+8, JL+11, JL+21 |
TSK | REQUE+2~, REQUE+3*, REQUE+4, REQUE+5, REQUE+6 |
U | INHFTM+24, INHFTM+25, INHFTM+26, REQUE+4, SRVR+23, SRVR+27, SRVR+28, ERROR+7, BACK+5*, BACK+6 , BACK+8, BACK+9, BACK+16, JL+6, JL+8, JL+10, INRHB+7, INRHB+8 |
UIF | JL+5!, JL+14, JL+16 |
UPDT | INRHB~, INRHB+6*, INRHB+7, INRHB+8 |
X | NEWSRV+21*, SRVR+19*, ERROR+1*, BACK+4*~, BACK+6*, BACK+8*, BACK+9 |
>> XUAUDIT | SRVR+24, HALT+5, LOOP+4, JL+10, JL+18 |
Y | NEWSRV+10~, NEWSRV+14 |
>> Z | JL+11*, JL+14 |