Routine: INHOU

Information

INHOU ;JSH,DP; 09 Nov 1999 11:21 ;Output Driver utilities

Source Information

Source file <INHOU.m>

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
IHS Generic Interface System	9	$$VER^INHB ENT^INHE ($$GL,GET)^INHOU (REQ,REQ1)^INHOU1 QTSK^INHOU3 MC^INHOU4 ERROR^INHS EDIT^INHT ULOG^INHU
Uncategorized	2	$$NOW^UTDT $$YN^UTSRD
VA Fileman	2	^DIC ^DIE

Caller Graph

Caller Graph Total: 52

Package	Total	Caller Graph
IHS Generic Interface System	52	INHMS1 INHOU INHRDUP INHS INHUACK INHUSEN INHUSEN2 INHUSEN3 INHUSEN4 INHUSEN5 INHUSEN7 INHUSEQ INHUSEQ2 INHUT2 INHUTC51 INHUVUT INHUVUTX INHVAM INHVATR INHVATRP INHVAX INHVMTR INHVTMT1 INTSTR1 INTSTR2 INTSUSN1 IS00003 IS00003A IS00003B IS00003C IS00003D IS00003E IS00003F IS00005 IS00005A IS00010 IS00016 IS00016A IS00017 IS00017A IS00017B IS00018 IS00018A IS00018B IS00021 IS00021A IS00021B IS00022 IS00022A IS00025 IS00026 IS00027

Entry Points

Name	Comments	DBIA/ICR reference
GETNEXT	; Get next entry from UIF
CK1	; ; Quit if last record encountered.
MC	;Mark as complete (need INH MESSAGE EDIT key to do this)
GQ
GET(%U,%I)	;Get a line from message - internal call
EDIT	;Edit a message in an ERROR state
GETLINE(%U,%L,%D,%I,%C)	;Function which returns the next line from a UIF entry
REQ	;Reque an Entry for processing
GL(%U,%L)	;Function which returns first 250 characters of the next line from a UIF entry
REQ1	;Reque an Entry for processing
VERIFY()	;Function returns a 1 if OUTPUT CONTROLLER is running, 0 otherwise
QTSK	;Display currently queued entries
EDIT1
DONE	; If no valid seg found and end of entries or next valid entry is ; located, log error if missing required. Indicate next valid UIF entry ; (or set to last entry in file if no valid remaining entries), and ; Q 0 (no further processing in current loop)
NOL(UIF)	;Function to return the number of lines for Entry #UIF
UPDATE(%U,%S,%M)
CHECKSEG(INSEG,INREQ,INLVL)	; Validate segs for required and unexpected
NEXT(%D)	;Function to return next UIF entry queued
GQ2

External References

Name	Field # of Occurrence
^DIC	EDIT+3
^DIE	UPDATE+12
$$VER^INHB	VERIFY+1
ENT^INHE	UPDATE+14
$$GL^INHOU	CHECKSEG+47
GET^INHOU	GETNEXT+1
REQ^INHOU1	REQ+5
REQ1^INHOU1	REQ1+5
QTSK^INHOU3	QTSK+1
MC^INHOU4	MC+1
ERROR^INHS	DONE+4
EDIT^INHT	EDIT+7
ULOG^INHU	UPDATE+11
$$NOW^UTDT	UPDATE+12
$$YN^UTSRD	EDIT1+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^INTHU - [#4001]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^INLHSCH	UPDATE+17!
^INLHSCH("DEST"	NEXT+3, NEXT+4, UPDATE+16!
^INRHD - [#4005]	EDIT+5
^INTHU - [#4001]	GETLINE+9, GETLINE+11, GETLINE+13, GET+7, GET+9, GET+11, GL+4, GL+5, NOL+1, NOL+2 , EDIT1+2*, UPDATE+9, UPDATE+13

Label References

Name	Line Occurrences
CK1	CHECKSEG+53, CHECKSEG+56
DONE	CHECKSEG+53, CHECKSEG+56
EDIT1	EDIT+5
GETNEXT	CHECKSEG+56
GQ	GETLINE+11, GETLINE+12
GQ2	GET+9, GET+10
REQ1	EDIT1+3

Naked Globals

Name	Field # of Occurrence
^("ED"	EDIT+5
^(0	GETLINE+12, GETLINE+13, GET+10, GET+11, NOL+2, EDIT1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	NOL+1~, NOL+2*, NOL+3
%C	GETLINE~, GQ*
%D	GETLINE~, GETLINE+7!, GETLINE+12*, NEXT~, NEXT+2, NEXT+3, NEXT+4
%D(	GETLINE+13*!
%I	GETLINE~, GQ, GET~, GQ2
%L	GETLINE~, GETLINE+8, GETLINE+10, GQ*, GL~, GL+3, GL+5
%M	UPDATE~, UPDATE+11, UPDATE+14
%S	UPDATE~, UPDATE+8, UPDATE+11, UPDATE+14, UPDATE+15
%U	GETLINE~, GETLINE+8, GETLINE+9, GETLINE+11, GETLINE+13, GET~, GET+7, GET+9, GET+11, GL~ , GL+3, GL+4, GL+5, UPDATE~, UPDATE+8, UPDATE+9, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+14 , UPDATE+16, UPDATE+17
>> CNT	GQ2*
DA	EDIT+7, UPDATE+10~, UPDATE+12
>> DATA	CHECKSEG+40, CHECKSEG+42, CHECKSEG+47, CHECKSEG+52, CK1+6
DDSAVE	EDIT+1~
DDSPARM	EDIT+1~, EDIT+6*
>> DDSSAVE	EDIT1
>> DELIM	CHECKSEG+40, CHECKSEG+52, GETNEXT+3
DES	EDIT+1~, EDIT+4*, EDIT+5
DEST	UPDATE+10~, UPDATE+13*, UPDATE+14, UPDATE+16
DIC	EDIT+1~, EDIT+2*
DIC("A"	EDIT+2*
DIC(0	EDIT+2*
DIE	EDIT+7, UPDATE+10~, UPDATE+12
DR	UPDATE+10~, UPDATE+12*
DUZ	EDIT1+2
DWFILE	EDIT+1~, EDIT+5*, EDIT1
H	UPDATE+10~, UPDATE+16*, UPDATE+17
I	GETLINE+10~, GETLINE+13, GETLINE+14, GET+8~, GET+11, GET+12, NOL+1~, NOL+2*
INCURSEG	CHECKSEG+33~, CHECKSEG+52, CK1+4, CK1+6, CK1+9, CK1+14, CK1+19, GETNEXT+3
INDATA	CHECKSEG+33~, CK1+6, GETNEXT+1*, GETNEXT+2, GETNEXT+3
>> INDEFSEG(	CK1+9, CK1+14, CK1+19
INDONE	CHECKSEG+33~, CHECKSEG+44, CHECKSEG+53, CHECKSEG+56, CHECKSEG+57, CK1+2, CK1+4, CK1+19, GETNEXT+2
INILCT	CHECKSEG+33~, CHECKSEG+44*
INLOW	CHECKSEG+33~, CHECKSEG+44, DONE+5, CK1+14, GETNEXT+2
INLVL	CHECKSEG~, CK1+14, CK1+19
INMATCH	CHECKSEG+33~, CHECKSEG+44, CHECKSEG+53, CHECKSEG+56, CHECKSEG+58, CK1+6
INREQ	CHECKSEG~, CHECKSEG+40, CHECKSEG+42, CHECKSEG+47, CHECKSEG+57, DONE+4
INSEG	CHECKSEG~, CHECKSEG+40, DONE+4, CK1+6
INY	EDIT+1~, EDIT+3*, EDIT+7, EDIT1+2, EDIT1+3
L	GETLINE+10~, GETLINE+11, GETLINE+13, GETLINE+14, GQ, GET+8~, GET+9, GET+11, GET+12, GQ2 , GL+5~, GL+6, GL+7
>> LCT	GET+8, GQ2, CHECKSEG+44, CHECKSEG+47, CHECKSEG+57, DONE+5, CK1+14, GETNEXT+2*
LINE	GET+7!, GET+10*, GETNEXT+1
LINE(	GET+11*!
P	NEXT+2~, NEXT+3*, NEXT+4
PRIO	EDIT+1~, EDIT1+2, UPDATE+10~, UPDATE+13, UPDATE+16, UPDATE+17
U	EDIT+4, EDIT1+2, UPDATE+13
UIF	NOL~, NOL+1, NOL+2, CHECKSEG+47, GETNEXT+1
X	NOL+1~, NOL+2, VERIFY+1~, EDIT1+3*
>> Y	EDIT+3, EDIT1+3
>> Y(0	EDIT+4

Customize PDF page

Package: IHS Generic Interface System

Routine: INHOU

Call Graph Total: 13

Caller Graph Total: 52