Routine: HLOSRVR1

Package	Total	Call Graph
Health Level Seven	8	$$ACTION^HLOAPP $$SAVEMSG^HLOF778 (ADDMSG2,ADDSEG)^HLOMSG $$PARSEHDR^HLOPRS END^HLOSRVR NEWMSG^HLOSRVR2 COUNT^HLOSTAT ($$READHDR,$$READSEG,CLOSE)^HLOT
Kernel	1	(,UNWIND)^%ZTER

Package	Total	Caller Graph
Health Level Seven	3	HLOAPI HLOCLNT1 HLOSRVR

Entry Points

Name	Comments	DBIA/ICR reference
DEL777(IEN777)	;delete a record from file 777 where the read did not complete
DEL778(IEN778)	;delete a record from file 778 where the read did not complete
SQUISH(SEG)	;
DUP(HLMSTATE)	;
READMSG(HLCSTATE,HLMSTATE)	;
ERROR	;error trap
CHECKMSG(HLMSTATE)	;
SPLITHDR(HDR)	;
ADDAC(HLMSTATE)	;adds the AC xref for the message that was just received

External References

Name	Field # of Occurrence
^%ZTER	ERROR+5, ERROR+11
UNWIND^%ZTER	ERROR+22
$$ACTION^HLOAPP	CHECKMSG+17
$$SAVEMSG^HLOF778	READMSG+66
ADDMSG2^HLOMSG	READMSG+57
ADDSEG^HLOMSG	READMSG+52, READMSG+65
$$PARSEHDR^HLOPRS	READMSG+20
END^HLOSRVR	ERROR+2
NEWMSG^HLOSRVR2	READMSG+23
COUNT^HLOSTAT	READMSG+75
$$READHDR^HLOT	READMSG+16
$$READSEG^HLOT	READMSG+31, READMSG+37
CLOSE^HLOT	READMSG+22, READMSG+77

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HLA - [#777]	DEL777+2!
^HLB - [#778]	DUP+23, CHECKMSG+23, DEL778+2!
^HLB("AC"	ADDAC+5*, DUP+18
^HLB("B"	READMSG+44
^HLTMP("LOG ALL ERRORS"	ERROR+5
^TMP("HL7 ERRORS"	ERROR+17*, ERROR+19!

Label References

Name	Line Occurrences
$$DUP	READMSG+27
ADDAC	READMSG+74
CHECKMSG	READMSG+73
DEL777	READMSG+70
DEL778	READMSG+70
SPLITHDR	READMSG+17, READMSG+55
SQUISH	SPLITHDR+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	SQUISH+6~, SQUISH+16
A(	SQUISH+12*
ACK	READMSG+13~
ACTION	CHECKMSG+10~, CHECKMSG+17, CHECKMSG+18
CODE	READMSG+38~, READMSG+42*, READMSG+43, READMSG+50, READMSG+63
COUNT	SQUISH+6~, SQUISH+8, SQUISH+13, SQUISH+14*
DUP	DUP+11~, DUP+12, DUP+18, DUP+19, DUP+28*, DUP+30
FROM	ADDAC+3~, ADDAC+4, ADDAC+5, DUP+11~, DUP+17, DUP+18
FS	READMSG+35~, READMSG+36, READMSG+42, READMSG+56, SPLITHDR+3~, SPLITHDR+5, SPLITHDR+6, SPLITHDR+8
HDR	CHECKMSG+11*, CHECKMSG+17, SPLITHDR~, SPLITHDR+4
HDR("ACCEPT A	CK TYPE" , CHECKMSG+12
HDR("PROCESSI	NG ID" , CHECKMSG+27
HDR("RECEIVIN	G FACILITY" , CHECKMSG+35, CHECKMSG+36, CHECKMSG+37, CHECKMSG+38, CHECKMSG+39
HDR(1	SPLITHDR+5, SPLITHDR+6, SPLITHDR+8, SPLITHDR+10*
HDR(2	SPLITHDR+9*
HLCSTATE	READMSG~, READMSG+16, READMSG+22, READMSG+23, READMSG+31, READMSG+37, READMSG+75, READMSG+77
HLCSTATE("LINK"	ERROR+14
HLCSTATE("MES	SAGE ENDED" , READMSG+21*, READMSG+66, READMSG+68, READMSG+77, READMSG+78
HLCSTATE("SYSTEM"	CHECKMSG+27, CHECKMSG+35, CHECKMSG+38, CHECKMSG+39, CHECKMSG+40, SQUISH+7
HLMSTATE	READMSG~, READMSG+23, READMSG+27, READMSG+52, READMSG+57, READMSG+65, READMSG+66, READMSG+73, READMSG+74, ADDAC~ , DUP~, CHECKMSG~
HLMSTATE("ACK	TO" , READMSG+48, READMSG+49, READMSG+50, READMSG+51, CHECKMSG+17, CHECKMSG+21, CHECKMSG+23, CHECKMSG+24*, CHECKMSG+34
HLMSTATE("BATCH"	READMSG+46, READMSG+60, READMSG+61, READMSG+62, READMSG+63, READMSG+64, READMSG+75
HLMSTATE("BODY"	READMSG+70, READMSG+71*
HLMSTATE("HDR"	READMSG+26, READMSG+36, READMSG+75, ADDAC+4, ADDAC+5, DUP+17, DUP+18, DUP+19, CHECKMSG+11
HLMSTATE("ID"	READMSG+24, READMSG+49, ADDAC+5, DUP+15, DUP+18
HLMSTATE("IEN"	READMSG+70, READMSG+71*, ADDAC+5
HLMSTATE("MSA"	READMSG+26, DUP+24, DUP+25, DUP+26, DUP+27, CHECKMSG+16, CHECKMSG+17, CHECKMSG+24, CHECKMSG+27, CHECKMSG+40* , CHECKMSG+41*
HLMSTATE("ORI	GINAL MODE" , CHECKMSG+12, CHECKMSG+16
HLMSTATE("STATUS"	CHECKMSG+16, CHECKMSG+17, CHECKMSG+18, CHECKMSG+21, CHECKMSG+24, CHECKMSG+25, CHECKMSG+27, CHECKMSG+40*
HLMSTATE("UNS	TORED LINES" , READMSG+66
I	READMSG+13~, SQUISH+6~, SQUISH+8, SQUISH+9, SQUISH+10, SQUISH+12
IEN	READMSG+38~, READMSG+44, READMSG+45, READMSG+51, READMSG+64, DUP+11~, DUP+12, DUP+18, DUP+23
IEN777	DEL777~, DEL777+2
IEN778	DEL778~, DEL778+2
J	SQUISH+6~, SQUISH+8, SQUISH+12, SQUISH+14
K	SQUISH+6~, SQUISH+11*, SQUISH+12
LEN	SQUISH+6~, SQUISH+10*, SQUISH+11
MAX	SQUISH+6~, SQUISH+7*, SQUISH+14
MSA	READMSG+38~, READMSG+41*, READMSG+42
NEWMSGID	READMSG+38~, READMSG+56*, READMSG+62
NODE	DUP+22~, DUP+23, DUP+24, DUP+26, DUP+27, CHECKMSG+22~, CHECKMSG+23, CHECKMSG+24, CHECKMSG+25
OLDMSGID	READMSG+38~, READMSG+42*, READMSG+44, READMSG+45, READMSG+48, READMSG+61
PASS	CHECKMSG+10~, CHECKMSG+31, CHECKMSG+34, CHECKMSG+35, CHECKMSG+36, CHECKMSG+37, CHECKMSG+38, CHECKMSG+39*, CHECKMSG+40, CHECKMSG+41
QUEUE	CHECKMSG+10~, CHECKMSG+17, CHECKMSG+18
SEG	READMSG+13~, READMSG+16, READMSG+17, READMSG+20, READMSG+23, READMSG+31, READMSG+37, READMSG+52, READMSG+55, READMSG+57 , READMSG+65, SQUISH~, SQUISH+15!, SQUISH+16*
SEG(	SQUISH+9, SQUISH+10, SQUISH+12
SEG(1	READMSG+39, READMSG+41, SQUISH+4
SEG(2	READMSG+39, READMSG+41, READMSG+56
SEG(3	READMSG+41
SEGTYPE	READMSG+38~, READMSG+39, READMSG+40, READMSG+43, READMSG+47, READMSG+54, READMSG+59
STORE	READMSG+13~, READMSG+15, READMSG+25, READMSG+27*, READMSG+30, READMSG+68, READMSG+72
SUBIEN	READMSG+60~*, READMSG+61, READMSG+62, READMSG+63, READMSG+64
TEMP	SPLITHDR+3~
TEMP(1	SPLITHDR+6*, SPLITHDR+8, SPLITHDR+10
TEMP(2	SPLITHDR+7, SPLITHDR+8, SPLITHDR+9
WANTACK	CHECKMSG+10~, CHECKMSG+13, CHECKMSG+15, CHECKMSG+17, CHECKMSG+24, CHECKMSG+27, CHECKMSG+40, CHECKMSG+41

Customize PDF page

Package: Health Level Seven

Routine: HLOSRVR1

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: