Routine: INHOTM

Package	Total	Call Graph
IHS Generic Interface System	8	$$PRIO^INHB1 ENO^INHE ^INHOM ^INHOS ^INHOT ULOG^INHU $$ERRMSG^INHU1 SETENV^INHUT7
Kernel	1	(AUDCHK,AUDSTP,ITIME)^XUSAUD
Uncategorized	1	$$REPLACE^UTIL

Package	Total	Caller Graph
IHS Generic Interface System	7	INHOTM1 INHVCRA INHVCRL INHVCRLD INHVTMT INTSTO INTSTR

Entry Points

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
END	;Exit here
HALT	;Halt process
TYPE(DA)	;Return type of transaction ; Input: DA - ien of transaction
NEXTDA(PRIO,DTTM,NO)	;Get next transaction off queue ; Output: PRIO ; DTTM - Date,Time of transaction ; opt NO - Node to $Q ; Returns: DA - next transaction
ERROR	;Error module for server
KILL	;Kill entry from INLHSCH
SRVR(INBPN,INHSRVR)	;Output controller background processor - server
SVLOOP	;Loop through transactions in the server queue
WAIT()	;max wait time before shutting down ; Return 0 to shut down 1 to not shut down
RUN()	;Function to decide if routine should continue to run
TRANSOK()	;Verify transaction is ok to process
LOOP	;Main loop
NEWSRV	;Try to start new server

External References

Name	Field # of Occurrence
$$PRIO^INHB1	SRVR+12
ENO^INHE	TRANSOK+4, TRANSOK+5, ERROR+3
^INHOM	SVLOOP+24
^INHOS	SVLOOP+22
^INHOT	SVLOOP+20
ULOG^INHU	TRANSOK+4, TRANSOK+5
$$ERRMSG^INHU1	ERROR+3
SETENV^INHUT7	SRVR+11
$$REPLACE^UTIL	INHOTM+19
AUDCHK^XUSAUD	SRVR+15
AUDSTP^XUSAUD	HALT+5
ITIME^XUSAUD	SRVR+15, SVLOOP+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("AVJ"	INHOTM+16
^%ZOSF("PRIORITY"	SRVR+12
^%ZOSF("SIGNOFF"	RUN+5
^%ZOSF("TRAP"	SRVR+9, ERROR+1
^DIJUSV(	HALT+3!
^INLHSCH	SVLOOP+3, SVLOOP+6, SVLOOP+10, TRANSOK+4!, KILL+1!
^INLHSCH("DEST"	KILL+1!
^INRHB("RUN"	INHOTM+12, END+1!, NEWSRV+3, NEWSRV+8, NEWSRV+9, NEWSRV+10, RUN+2, RUN+4, RUN+5!, SRVR+6 , SRVR+10, HALT+1!, HALT+2, SVLOOP+1, INRHB+7, INRHB+8
^INRHD - [#4005]	TYPE+3
^INRHSITE(1	INHOTM+13, INHOTM+16, INHOTM+17, RUN+3, SRVR+17, SRVR+18, SRVR+20
^INTHOS(1	INHOTM+18, SRVR+7, ERROR+2
^INTHPC - [#4004]	SRVR+14
^INTHU - [#4001]	TYPE+2, TRANSOK+1, TRANSOK+3

Label References

Name	Line Occurrences
$$NEXTDA	LOOP+3, SVLOOP+6, NEXTDA+14
$$RUN	INHOTM+22, LOOP+5, NEWSRV+2, NEWSRV+14, SRVR+8, SRVR+25
$$TRANSOK	SVLOOP+11
$$TYPE	SVLOOP+8, TRANSOK+2
$$WAIT	SRVR+25
HALT	ERROR+5
INRHB	LOOP+1, LOOP+4, NEWSRV+13
KILL	SVLOOP+9, TRANSOK+5
LOOP	INHOTM+22
NEWSRV	LOOP+5
SVLOOP	SRVR+25

Naked Globals

Name	Field # of Occurrence
^(	INRHB+7, INRHB+8
^("SIGNOFF"	RUN+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	TRANSOK+2*
BP	SVLOOP+14~, SVLOOP+17*, SVLOOP+18
DA	LOOP+3, LOOP+4, TYPE~, TYPE+2, SVLOOP+6, SVLOOP+8, SVLOOP+20, SVLOOP+22, SVLOOP+24, NEXTDA+5! , NEXTDA+6, NEXTDA+12, NEXTDA+14*, NEXTDA+15, TRANSOK+1, TRANSOK+2, TRANSOK+3, TRANSOK+4, TRANSOK+5, KILL+1 , ERROR+3
DAY	NEXTDA+5~, NEXTDA+6*, NEXTDA+12
>> DEST	TYPE+2*, TYPE+3, TRANSOK+4, TRANSOK+5, KILL+1, ERROR+3
>> DEV	SRVR+25*, SVLOOP+20
>> DOM	TYPE+3*
DTTM	LOOP+3, SVLOOP+6, SVLOOP+14~, NEXTDA~, NEXTDA+6, NEXTDA+10, NEXTDA+14, TRANSOK+4, KILL+1
DUZ	HALT+3, SVLOOP+16~
DUZ("AG"	SVLOOP+16*
>> H	SVLOOP+6*
INAVJ	INHOTM+16*, NEWSRV+6, SVLOOP+14~
INBPN	INHOTM+12, END+1, LOOP+1, LOOP+4, NEWSRV+3, NEWSRV+8, NEWSRV+9, NEWSRV+10, NEWSRV+13, RUN+2 , RUN+4, SRVR~, SRVR+5, SRVR+6, SRVR+10, SRVR+14, HALT+1, HALT+2, SVLOOP+1, SVLOOP+17 , SVLOOP+18~*, INRHB~, INRHB+7, INRHB+8
INCUTOFF	INHOTM+15, SRVR+18, SVLOOP+14~, NEXTDA+12
INDUZ	SVLOOP+16~*
INDUZ("AG"	SVLOOP+16
>> INFSHNG	INHOTM+17*, NEWSRV+14
INHANG	INHOTM+13, LOOP+4, SRVR+17, SRVR+24, SVLOOP+3, SVLOOP+6, SVLOOP+14~, SVLOOP+25, WAIT+2
INHER	SRVR+9!, ERROR+3
>> INHJOB(4	INHOTM+19*, NEWSRV+9
INHMWAIT	SRVR+20*, SRVR+22, SVLOOP+14~, WAIT+3
INHO	SVLOOP+14~
>> INHSRVMO	INHOTM+16*
>> INHSRVNO	NEWSRV+3*, NEWSRV+8, NEWSRV+9, NEWSRV+10
INHSRVR	SRVR~, SRVR+5, SRVR+6, SRVR+10, SRVR+15, HALT+1, HALT+2, SVLOOP+1, SVLOOP+5, SVLOOP+17 , SVLOOP+18~*
INHWAIT	SRVR+24, SVLOOP+8, SVLOOP+14~, WAIT+2*, WAIT+3
INJOB	SVLOOP+14~
INLKFLG	NEWSRV+1~, NEWSRV+4, NEWSRV+12
INPNAME	SRVR+14~*, SRVR+15, SVLOOP+5
INSHTDN	SRVR+22, SRVR+23, SVLOOP+14~, WAIT+2, WAIT+3
INSHTDN1	SRVR+24, SVLOOP+14~, WAIT+2, WAIT+3
INTHROT	INHOTM+14*, NEWSRV+9, SVLOOP+14~
>> JOB	INHOTM+18*, INHOTM+19
MES	TRANSOK+4!, TRANSOK+5!
MESS	INRHB~, INRHB+7, INRHB+8
MODE	INHOTM+14, NEWSRV+3, SRVR+24, SVLOOP+14~
>> N	LOOP+3*
>> ND	NEXTDA+10*, NEXTDA+12
NO	NEXTDA~, NEXTDA+7, NEXTDA+8, NEXTDA+9, NEXTDA+10, NEXTDA+12, NEXTDA+13*, NEXTDA+14
>> NT	NEXTDA+10*, NEXTDA+12
>> P	NEXTDA+10*, NEXTDA+11, NEXTDA+12, NEXTDA+13
PRIO	LOOP+3, SVLOOP+6, SVLOOP+14~, NEXTDA~, NEXTDA+12*, NEXTDA+14, TRANSOK+4, KILL+1
SRVR	INRHB~, INRHB+7
SV	SVLOOP+14~, SVLOOP+17*, SVLOOP+18
TIME	NEXTDA+5~, NEXTDA+6*, NEXTDA+12
>> TYPE	TYPE+2, TYPE+3, TYPE+4, SVLOOP+8*, SVLOOP+20, SVLOOP+22, SVLOOP+24, TRANSOK+5
U	INHOTM+13, INHOTM+14, INHOTM+15, INHOTM+16, INHOTM+17, TYPE+2, TYPE+3, SRVR+14, SRVR+17, SRVR+18 , SRVR+20, SVLOOP+14~, INRHB+7, INRHB+8
UPDT	INRHB~, INRHB+6*, INRHB+7, INRHB+8
X	INHOTM+11~, INHOTM+13, INHOTM+14, INHOTM+15, NEWSRV+14, SRVR+9, SRVR+12, ERROR+1*
>> XUAUDIT	SRVR+15, HALT+5, SVLOOP+5
>> Y	NEWSRV+7

Customize PDF page

Package: IHS Generic Interface System

Routine: INHOTM

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: