Routine: HLLP

Package	Total	Call Graph
Health Level Seven	4	(,CHK)^HLCHK IN^HLTF STATUS^HLTF0 ^HLZTCP
Kernel	3	(,HOME)^%ZIS ^%ZISC $$S^%ZTLOAD
VA Fileman	1	DT^DICRW

Entry Points

Name	Comments	DBIA/ICR reference
CHKSEND	;Check if there are HL7 messages to send
ERR	;Trap error
SEND	;Send a Message
INIT	;Initialize Variables
CHKREC	;Check if there are HL7 messages to receive
EX
REC	;Receive a Message
CSUM	;Calculate Checksum
EXIT
REC1
CS1
LOOP	;Infinite loop to check for HL7 messages to send/receive
SENDN

External References

Name	Field # of Occurrence
^%ZIS	INIT+5, INIT+7
HOME^%ZIS	INIT+6
^%ZISC	ERR+1
$$S^%ZTLOAD	LOOP+1
DT^DICRW	INIT+7
^HLCHK	CHKREC+2
CHK^HLCHK	CS1+4
IN^HLTF	CS1+4
STATUS^HLTF0	CHKSEND+7, CHKSEND+9, CHKSEND+11, CS1+2, CS1+3
^HLZTCP	INIT+2

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X#245 Line Location: REC1+0
Function Call: READ	Timeout: DTIME Variable: X0 Line Location: REC1+1
Function Call: READ	Timeout: DTIME Variable: X1#246 Line Location: REC1+2
Function Call: READ	Timeout: DTIME Variable: X2 Line Location: REC1+8
Function Call: WRITE	Prompt: X Line Location: SEND+2
Function Call: WRITE	Prompt: X Line Location: SENDN+1
Function Call: WRITE	Prompt: X Line Location: SENDN+2
Routine Call	%ZIS Line Location: INIT+6
Routine Call	%ZIS Line Location: INIT+5 INIT+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("EOFF"	INIT+9, INIT+10
^%ZOSF("ERRTN"	ERR+1
^%ZOSF("LPC"	INIT+11
^%ZOSF("OS"	INIT+9
^%ZOSF("RM"	INIT+11
^%ZOSF("TRAP"	INIT+5
^%ZOSF("TRMON"	INIT+11
^%ZOSF("TRMRD"	INIT+11
^%ZOSF("TYPE-AHEAD"	INIT+7
^HL(770 - [#770]	LOOP+1, CHKSEND+2
^HL(772 - [#772]	CHKSEND+3, CHKSEND+4
^TMP("HL"	REC1+1, REC1+5, REC1+7, SEND+2, SENDN, SENDN+1, SENDN+2*
^TMP("HLR"	ERR+1!, CS1!, EX!, REC+1!, REC1+2*
^TMP("HLS"	ERR+1!, CHKSEND+12*, EX!, SENDN+1
^XMB(3.9 - [#3.9]	CHKSEND+8, CHKSEND+10, CHKSEND+12

Label References

Name	Line Occurrences
@(	ERR+1
CHKREC	LOOP+1, CHKREC+1
CHKSEND	LOOP+1
CS1	CS1
CSUM	REC1+1, REC1+2, SEND+2, SENDN, SENDN+1
EX	CHKSEND+3, CHKSEND+4, CHKSEND+6, CHKSEND+8, CHKSEND+10, CS1+1, CS1+2, CS1+3
EXIT	INIT+5, INIT+6, INIT+7
REC	CHKREC+1, CS1
REC1	REC1
SEND	CS1
SENDN	CHKREC+1

Naked Globals

Name	Field # of Occurrence
^(	SENDN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INIT+7, INIT+8!
%H	INIT+8!
%I	INIT+8!
DTIME	INIT+8*, REC1, REC1+1, REC1+2, REC1+8
HLAC	CS1+2, CS1+3, EX!
>> HLB	REC1+6*, REC1+7
>> HLC	REC1+6*, REC1+7
>> HLC1	CHKREC+1, CSUM+1, REC+1, REC1+6, REC1+7, SEND+1, SENDN+2
>> HLC2	CHKREC+1, CSUM+1, REC+1, REC1+6, SEND+1, SENDN+2
>> HLCSUM	REC1+6*, REC1+7
HLDA	CHKSEND+3*, CHKSEND+4, CHKSEND+7, CHKSEND+9, CHKSEND+11, CS1+2, CS1+3, EX!
HLDA0	CHKSEND+4*, CHKSEND+5, CHKSEND+12, EX!
HLDTOUT	CHKREC+1, CHKREC+2, CS1, CS1+1, REC+1!, REC1, REC1+1, REC1+2, REC1+6, REC1+8
HLERR	CHKREC+1!, CHKREC+2!, EX!, REC1+6*, SENDN
HLI	CHKSEND+12, EX!, REC+1, REC1+1, REC1+5, SENDN, SENDN+1
>> HLII	REC1+4*, REC1+5
>> HLION	INIT+5, INIT+6*, LOOP+1, REC1+1, REC1+5, REC1+7, SEND+2, SENDN, SENDN+1, SENDN+2
HLJ	CHKSEND+12*, EX!
>> HLK	REC1+2*
HLL	REC+1!
HLL(	REC1+2*
HLL(1	ERR+1!, CS1+3
>> HLLOG	LOOP+1*, REC1+1, REC1+2, REC1+7, SEND+2, SENDN, SENDN+1, SENDN+2
>> HLLPC	INIT+11*, CSUM+1, REC1+6, SENDN+2
>> HLMID	CS1+4
HLMSG	CS1+2, CS1+3, EX!
>> HLMTN	CS1+4
>> HLNDAP	CHKSEND+1, CHKSEND+2
>> HLNDAP0	INIT+8, CHKSEND+2*, CHKSEND+3
HLSDATA	CHKREC+1!, CS1!, EX!, SENDN+1*
HLSDATA(	SENDN
HLSDATA(1	CHKREC+1*
HLSDT	CHKSEND+12*, EX!, SENDN, SENDN+1
>> HLTIME	INIT+7, CS1+4, REC+1, REC1+1, REC1+2, REC1+5, REC1+7, SEND+2, SENDN, SENDN+1 , SENDN+2
HLTRIED	CHKSEND+12, CS1, EX!
>> HLTRIES	INIT+8*, CS1
>> HLTRM	INIT+11*, REC1, REC1+2
HLXMZ	CHKSEND+5*, CHKSEND+6, CHKSEND+8, CHKSEND+9, CHKSEND+10, CHKSEND+11, CHKSEND+12, CS1+4!
IO	INIT+7, CHKREC+2, CHKREC+3
IO(0	INIT+7, INIT+9, INIT+10, REC1, REC1+1, REC1+2, REC1+8, SEND+2, SENDN, SENDN+1 , SENDN+2
ION	INIT+6
IOP	INIT+5, INIT+7!
>> IOT	INIT+2
>> POP	INIT+5, INIT+6, INIT+7
U	CHKSEND+3
X	INIT+5, INIT+8!, INIT+11, CSUM+1, REC1, REC1+1, REC1+2, REC1+6, SEND+1~, SEND+2 , SENDN, SENDN+1, SENDN+2*
>> X0	CS1, CS1+2, REC1+1*
>> X1	CS1+2, REC1+2, REC1+4, REC1+5*, REC1+6
>> X2	REC1+8*
Y	CSUM+1, REC1, REC1+2, REC1+6, SEND+1~, SENDN+2
>> ZTSTOP	LOOP+1*

Customize PDF page

Package: Health Level Seven

Routine: HLLP

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: