Routine: HLOTCP

Package	Total	Call Graph
Kernel	3	CALL^%ZISTCP ($$FMDIFF,$$NOW)^XLFDT $$ADDRESS^XLFNSLK
Health Level Seven	1	$$CHKSTOP^HLOPROC

Package	Total	Caller Graph
Health Level Seven	3	HLOCLNT1 HLOSRVR HLOUSR1

Name	Comments	DBIA/ICR reference
OPEN(HLCSTATE,LOGICAL)	;
RETRY	;
ZB25
ZB26
ZB27
ZB28
DNS(DOMAIN)	;
WRITEHDR(HLCSTATE,HDR)	;
WRITESEG(HLCSTATE,SEG)	;
FLUSH	;flushes the HL7 package buffer, and the system TCP buffer when full
READSEG(HLCSTATE,SEG)	;
READHDR(HLCSTATE,HDR)	;
CLOSE(HLCSTATE)	;
ENDMSG(HLCSTATE)
READ(BUF)	;
ZB31	;
ZB32	;
SETTIME(TIME)	;
GETTIME(HLCSTATE)	;
PUTTIME(HLCSTATE)	;

Name	Field # of Occurrence
CALL^%ZISTCP	ZB28+13
$$CHKSTOP^HLOPROC	ZB26+2
$$FMDIFF^XLFDT	ZB31+17
$$NOW^XLFDT	ZB31+12, ZB31+16
$$ADDRESS^XLFNSLK	DNS+1

Name	Line Occurrences
Function Call: READ	Variable: *A Timeout: HLCSTATE("READ Line Location: ZB26+2
Function Call: READ	Variable: BUF Timeout: HLCSTATE("READ Line Location: READSEG+31

Name	Line Occurrences (* Changed, ! Killed)
^HLCS(870 - [#870]	ZB28+20*
^HLTMP("READ TIMEOUT"	GETTIME+4, PUTTIME+3*

Name	Line Occurrences
$$DNS	OPEN+34, ZB28+18
$$READ	READSEG+32
$$READSEG	READHDR+6
$$WRITESEG	WRITEHDR+11, ENDMSG+3
CLOSE	ZB26+2, FLUSH+6, READSEG+47
FLUSH	WRITESEG+5, ENDMSG+4
PUTTIME	CLOSE+3
RETRY	ZB28+18
SETTIME	ZB31+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	ZB25+3~, ZB26+2*
BUF	READSEG+11~, READSEG+15, READSEG+17, READSEG+19, READSEG+20, READSEG+23, READSEG+24, READSEG+28, READSEG+32, READSEG+35* , READSEG+38, READSEG+41, READSEG+44, READ~, ZB31+5, ZB31+13, ZB31+21
COUNT	READSEG+11~, READSEG+12, READSEG+18, READSEG+35, READSEG+38, READSEG+41, READSEG+45, READSEG+50
DATA	GETTIME+3~, GETTIME+4*, GETTIME+5, GETTIME+8, GETTIME+9
DNSFLAG	OPEN+12~, OPEN+14, OPEN+34, ZB28+18*, ZB28+20
DOMAIN	DNS~, DNS+1
HDR	WRITEHDR~, READHDR~, READHDR+5!
HDR(	READHDR+15*
HDR(1	WRITEHDR+9
HDR(2	WRITEHDR+10
HLCSTATE	OPEN~, ZB26+2, WRITEHDR~, WRITEHDR+11, WRITESEG~, FLUSH+6, READSEG~, READSEG+47, READHDR~, READHDR+6 , CLOSE~, CLOSE+3, ENDMSG~, ENDMSG+3, GETTIME~, PUTTIME~
HLCSTATE("BUFFER"	WRITEHDR+3!, WRITEHDR+4, WRITEHDR+5, WRITESEG+2, WRITESEG+5, WRITESEG+7, FLUSH+7, FLUSH+9, FLUSH+11, FLUSH+28! , FLUSH+29, FLUSH+30
HLCSTATE("CLOSE"	OPEN+24*
HLCSTATE("CONNECTED"	OPEN+18, OPEN+31, RETRY+11, RETRY+16, ZB26, ZB26+2, ZB28+2, ZB28+3, ZB28+10, ZB28+14 , ZB28+15, ZB28+18, ZB28+20, WRITESEG+8, FLUSH+6, READSEG+47
HLCSTATE("DEVICE"	OPEN+30, RETRY+4, RETRY+5, RETRY+8, RETRY+9, RETRY+12, RETRY+14, RETRY+17, RETRY+20, RETRY+21* , ZB25+1, ZB26+1, ZB28+2, ZB28+4, ZB28+8, ZB28+15*, FLUSH+6, READSEG+32, CLOSE+1, ENDMSG+6
HLCSTATE("END	MESSAGE" , OPEN+23*
HLCSTATE("FLUSH"	OPEN+30, RETRY+6, RETRY+19*, FLUSH+26, ENDMSG+7
HLCSTATE("LINK"	OPEN+16, OPEN+17, OPEN+29, OPEN+34, ZB28+18, ZB28+20, GETTIME+4, PUTTIME+3
HLCSTATE("MES	SAGE ENDED" , READSEG+8, READSEG+26, READSEG+38, READSEG+53*, SAGE STARTED" , READSEG+23, READSEG+38
HLCSTATE("OPE	N TIMEOUT" , ZB28+13
HLCSTATE("REA	D HEADER" , OPEN+19, D SEGMENT" , OPEN+21, D TIMEOUT" , ZB26+2, CLOSE+3, ZB31+5, ZB31+21, SETTIME+5* , SETTIME+7, SETTIME+11, SETTIME+12, GETTIME+6, GETTIME+8, GETTIME+9, GETTIME+10, PUTTIME+3
HLCSTATE("READ"	READSEG+15, READSEG+16, READSEG+44
HLCSTATE("SERVER"	OPEN+16, OPEN+29, OPEN+34, RETRY+7, RETRY+23, RETRY+24, ZB28+18, ZB31+4
HLCSTATE("SYSTEM"	RETRY+2, RETRY+18, WRITESEG+5, FLUSH+6, READSEG+47
HLCSTATE("TCP	BUFFER $X" , OPEN+26, FLUSH+16, FLUSH+19, FLUSH+23, FLUSH+25, FLUSH+27, ENDMSG+5, ENDMSG+9, BUFFER SIZE" , OPEN+30, RETRY+3, RETRY+22, ZB28+7, ZB28+12, FLUSH+4, BUFFER" , OPEN+25, FLUSH+18, FLUSH+22* , FLUSH+26, FLUSH+27, ENDMSG+7, ENDMSG+8
HLCSTATE("WRI	TE HEADER" , OPEN+20, TE SEGMENT" , OPEN+22
I	WRITESEG+1~, WRITESEG+3, WRITESEG+4, WRITESEG+6, WRITESEG+7, FLUSH+8~, FLUSH+9, FLUSH+11, READHDR+3~, READHDR+7* , READHDR+10, READHDR+11, READHDR+12, READHDR+14, READHDR+15, SETTIME+4~, SETTIME+7*
INC	FLUSH+14~, FLUSH+16*, FLUSH+17, FLUSH+22, FLUSH+24
IO	ZB28+15
IO(0	OPEN+30
IP	OPEN+12~, OPEN+16, OPEN+34, ZB28+8, ZB28+13, ZB28+18*, ZB28+20
J	READHDR+3~, READHDR+15*
LAST	WRITESEG+1~, WRITESEG+3*, WRITESEG+6
LINE	FLUSH+10~, FLUSH+11, FLUSH+13, FLUSH+17, FLUSH+18, FLUSH+19, FLUSH+20, FLUSH+22, FLUSH+24*
LOGICAL	OPEN~, OPEN+29, RETRY+4, RETRY+8, RETRY+9, RETRY+20
MAX	FLUSH+1~, FLUSH+4, FLUSH+16, FLUSH+23, FLUSH+25, SETTIME+4~, SETTIME+6, SETTIME+7*, SETTIME+8
>> POP	ZB28+14
PORT	OPEN+12~, OPEN+17*, RETRY+5, RETRY+21, ZB28+13
RETURN	ZB31+1~, ZB31+2, ZB31+6, ZB31+15, ZB31+19, ZB31+22*, ZB32+2
SEG	WRITEHDR+8~, WRITEHDR+11, WRITESEG~, READSEG~, READSEG+6!, READSEG+51!, READHDR+3~, READHDR+6, ENDMSG+1~, ENDMSG+3
SEG(	WRITESEG+4, WRITESEG+6, WRITESEG+7, READSEG+35, READSEG+38, READSEG+41, READSEG+45!, READSEG+50, READHDR+10, READHDR+11! , READHDR+12*, READHDR+14!, READHDR+15
SEG(1	WRITEHDR+9, READSEG+20, READSEG+24, READSEG+28, ENDMSG+2*
SEG(2	WRITEHDR+10*
SEG(99999	WRITESEG+3
SEGMENT	FLUSH+1~, FLUSH+2, FLUSH+7, FLUSH+9, FLUSH+11
SUCCESS	READSEG+11~, READSEG+12, READSEG+21, READSEG+25, READSEG+32, READSEG+35, READSEG+38, READSEG+43, READSEG+50, READSEG+52 , READSEG+54, READHDR+3~, READHDR+4, READHDR+6, READHDR+10, READHDR+13, READHDR+15, READHDR+16
T1	ZB31+11~, ZB31+12*, ZB31+17
T2	ZB31+11~, ZB31+16*, ZB31+17
>> TCPCHAN	RETRY+9, RETRY+14
>> TCPDEV	RETRY+8
TEMP	SETTIME+4~, SETTIME+7, SETTIME+8, SETTIME+9, SETTIME+10, SETTIME+11
TIME	SETTIME~, SETTIME+5

Customize PDF page

Package: Health Level Seven

Routine: HLOTCP

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: