Routine: DGHTHL7

Package	Total	Call Graph
Registration	5	$$COMMANUM^VAFCADT2 BLDPID^VAFCQRY $$EVN^VAFHLEVN $$EN^VAFHLPD1 $$SITE^VASITE
Health Level Seven	4	$$HLNAME^HLFNC INIT^HLFNC2 GENERATE^HLMA LINK^HLUTIL3
Kernel	3	$$NOW^XLFDT $$HLNAME^XLFNAME $$STA^XUAF4
VA Fileman	2	^DIC ($$GET1,GETS)^DIQ

Package	Total	Caller Graph
Registration	2	DGHTENR DGHTINAC

Entry Points

Name	Comments	DBIA/ICR reference
PD1(DFN,COORD)	;Build PD1 segment
APP4MSH(PTRRCV)	;Determine sending and receiving application for MSH segment
BLDHL7(DGHTH,MSG)	;Build HL7 Registration message for Home Telehealth
EVN(TYPE,FLAG,DGEVDT)	;Build EVN segment
SNDHL7(MSG,PTRRCV,PROTNAME)
PID(DFN,HL,DGPID)	;Build PID segment
PIDVAL	;validate PID segment
BLDHL7I(DFN,MSG)	;Build HL7 Registration message for telehealth

External References

Name	Field # of Occurrence
^DIC	SNDHL7+36
$$GET1^DIQ	EVN+13, APP4MSH+6, APP4MSH+8, APP4MSH+10, APP4MSH+11
GETS^DIQ	SNDHL7+37
$$HLNAME^HLFNC	EVN+13
INIT^HLFNC2	BLDHL7+17, BLDHL7I+12, SNDHL7+16
GENERATE^HLMA	SNDHL7+43
LINK^HLUTIL3	SNDHL7+40
$$COMMANUM^VAFCADT2	PID+9, PID+10
BLDPID^VAFCQRY	PID+11
$$EVN^VAFHLEVN	EVN+9
$$EN^VAFHLPD1	PD1+8
$$SITE^VASITE	EVN+17, EVN+18, APP4MSH+7, APP4MSH+8
$$NOW^XLFDT	BLDHL7I+14
$$HLNAME^XLFNAME	PD1+11
$$STA^XUAF4	BLDHL7+41

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(101 - [#101]	Classic Fileman Calls, GETS^DIQ
^VA(200 - [#200]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	BLDHL7I+7
^TMP("HLS"	SNDHL7+15

Label References

Name	Line Occurrences
$$APP4MSH	SNDHL7+18
$$EVN	BLDHL7+22, BLDHL7I+17
$$PD1	BLDHL7+35
$$PID	BLDHL7+27, BLDHL7I+24
PIDVAL	BLDHL7+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APPINFO	SNDHL7+14~, SNDHL7+18*, SNDHL7+19, SNDHL7+31, SNDHL7+33
>> ARRAY1(	SNDHL7+38
ARRY4HL7	SNDHL7+14~, SNDHL7+15*, SNDHL7+22, SNDHL7+26, SNDHL7+27, SNDHL7+46
CLPROT	SNDHL7+14~, SNDHL7+38*, SNDHL7+42
COMP	EVN+7~, EVN+12*, EVN+14, EVN+15, EVN+16, BLDHL7I+10~
CONSULT	BLDHL7+9~, BLDHL7+40
COORD	BLDHL7+9~, BLDHL7+35, PD1~, PD1+7, PD1+10, PD1+11
DFN	BLDHL7+9~, BLDHL7+27, BLDHL7+35, PID~, PID+8, PID+11, PD1~, PD1+7, PD1+8, BLDHL7I~ , BLDHL7I+7
DGARRAY	SNDHL7+14~, SNDHL7+40
DGARRAY(	SNDHL7+41
DGARRAY(0	SNDHL7+41
>> DGDFN	BLDHL7I+24
DGEVDT	EVN~, EVN+9
DGHTH	BLDHL7~
DGHTH(	BLDHL7+11, BLDHL7+12, BLDHL7+13
DGNAME	PD1+6~, PD1+11
DGNAME("FIELD"	PD1+10*
DGNAME("FILE"	PD1+10*
DGNAME("IENS"	PD1+10*
DGPID	PID~, PID+11
DGPID(	PID+12
DGPID(0	PID+12
DGVEN	BLDHL7I+9~, SNDHL7+40
DGX	BLDHL7+9~, BLDHL7+30, BLDHL7+31, BLDHL7+32, PID+7~, PID+12, PID+13, PIDVAL+3, PIDVAL+5, PIDVAL+6 , PIDVAL+9, PIDVAL+10, BLDHL7I+9~, BLDHL7I+23~, BLDHL7I+26, BLDHL7I+27*, BLDHL7I+28
DIC	SNDHL7+14~, SNDHL7+36*
DIC(0	SNDHL7+36*
DUZ	EVN+13, EVN+14
DUZ(2	BLDHL7+41
ERR	BLDHL7+9~, BLDHL7+11, BLDHL7+12, BLDHL7+14, BLDHL7+29, PIDVAL+5, PIDVAL+7, PIDVAL+9, PIDVAL+10, BLDHL7I+10~ , BLDHL7I+25*
EVENTDT	BLDHL7+9~, BLDHL7+22
EVN	BLDHL7+10~, BLDHL7+22, BLDHL7+23, BLDHL7+24, EVN+7~, EVN+9, EVN+10, EVN+18, EVN+19, BLDHL7I+9~ , BLDHL7I+17, BLDHL7I+18, BLDHL7I+20
EVNTDT	BLDHL7I+10~, BLDHL7I+14*, BLDHL7I+17
FLAG	EVN~, EVN+8, EVN+9
FLC	PIDVAL+2~, PIDVAL+6*, PIDVAL+9, PIDVAL+10
FLDS	PID+7~, PID+9, PID+10, PID+11, PIDVAL+2~, PIDVAL+3, PIDVAL+7, PIDVAL+8, BLDHL7I+9~
FLN	PIDVAL+2~, PIDVAL+3, PIDVAL+6, PIDVAL+8, PIDVAL+9
FLN(	PIDVAL+6*, PIDVAL+9, PIDVAL+10
FLN(0	PIDVAL+3*
HL	BLDHL7+10~, BLDHL7+17, BLDHL7+27, PID~, PID+11, BLDHL7I+9~, BLDHL7I+12, BLDHL7I+24, SNDHL7+14~, SNDHL7+16
HL(""	BLDHL7+18, BLDHL7I+13, SNDHL7+17
HL("ECH"	EVN+12, EVN+13
HLECH	BLDHL7+10~, PD1+11, BLDHL7I+9~, SNDHL7+14~, APP4MSH+7, APP4MSH+8, APP4MSH+10, APP4MSH+11
HLFS	BLDHL7+10~, BLDHL7+40, BLDHL7+41, BLDHL7+42, EVN+18, PD1+11, BLDHL7I+9~, SNDHL7+14~
HLL	SNDHL7+14~
HLL("LINKS"	SNDHL7+42*
HLMTIEN	SNDHL7+14~
HLP	SNDHL7+14~, SNDHL7+43
HLP("PRIORITY"	SNDHL7+34*
HLP("SUBSCRIBER"	SNDHL7+30, SNDHL7+31, SNDHL7+32, SNDHL7+33
HLQ	BLDHL7+10~, BLDHL7I+9~, SNDHL7+14~
HLRESLT	SNDHL7+14~, SNDHL7+43, SNDHL7+48
KILLARRY	SNDHL7+14~, SNDHL7+21, SNDHL7+28, SNDHL7+46
LINE	BLDHL7+10~, BLDHL7+19, BLDHL7+24, BLDHL7+30, BLDHL7+32, BLDHL7+37, BLDHL7+43, BLDHL7+45, BLDHL7I+9~, BLDHL7I+15 , BLDHL7I+19, BLDHL7I+20, BLDHL7I+26, BLDHL7I+28
LINK	SNDHL7+14~, SNDHL7+41*, SNDHL7+42
MSG	BLDHL7~, BLDHL7+15, BLDHL7+19, BLDHL7+23, BLDHL7+24, BLDHL7+30, BLDHL7+32, BLDHL7+37, BLDHL7+43, BLDHL7I~ , BLDHL7I+8, BLDHL7I+15, BLDHL7I+18, BLDHL7I+20, BLDHL7I+25, BLDHL7I+26, BLDHL7I+28, SNDHL7~, SNDHL7+11, SNDHL7+13 , SNDHL7+22, SNDHL7+24, SNDHL7+27
NSTR	PIDVAL+2~, PIDVAL+10*
PD1	BLDHL7+10~, BLDHL7+35, BLDHL7+36, BLDHL7+37, PD1+6~, PD1+8, PD1+9, PD1+11*, PD1+12
PID	BLDHL7+10~, BLDHL7+27, BLDHL7+28, BLDHL7I+24, BLDHL7I+25
PROT4HL7	BLDHL7I+10~, BLDHL7I+11*, BLDHL7I+12
PROTNAME	BLDHL7+9~, BLDHL7+16*, BLDHL7+17, SNDHL7~, SNDHL7+16, SNDHL7+36, SNDHL7+43
PTRRCV	SNDHL7~, SNDHL7+12, SNDHL7+18, APP4MSH~, APP4MSH+5, APP4MSH+6, APP4MSH+10, APP4MSH+11
PV1	BLDHL7+10~, BLDHL7+40, BLDHL7+41, BLDHL7+42*, BLDHL7+43, BLDHL7I+9~
RCVFAC	APP4MSH+4~, APP4MSH+10, APP4MSH+11, APP4MSH+12
SIEN	SNDHL7+14~
SNDFAC	APP4MSH+4~, APP4MSH+7, APP4MSH+8, APP4MSH+9*, APP4MSH+12
STR	PIDVAL+2~, PIDVAL+4*, PIDVAL+9, PIDVAL+10
SUBCOMP	EVN+7~, EVN+12*, EVN+15, EVN+16, EVN+17, BLDHL7I+10~
TYPE	EVN~, EVN+8, EVN+9
U	BLDHL7+23, BLDHL7+28, BLDHL7+36, SNDHL7+42
USERID	EVN+7~, EVN+14, EVN+15, EVN+16, EVN+17, EVN+18, BLDHL7I+10~
USRNAM	EVN+7~, EVN+13*, EVN+14, BLDHL7I+10~
VAFPID	BLDHL7+9~, BLDHL7+27, BLDHL7I+9~, BLDHL7I+24
VAFPID(	BLDHL7+30, BLDHL7+31, BLDHL7+32, PIDVAL+5, PIDVAL+6, PIDVAL+9, PIDVAL+10, BLDHL7I+26, BLDHL7I+27, BLDHL7I+28
VAFPID(0	BLDHL7+30, BLDHL7I+26
VALCHK	BLDHL7+9~, BLDHL7+12*, BLDHL7+14
VENDOR	BLDHL7+9~
X	BLDHL7+10~, BLDHL7+11, BLDHL7+12, BLDHL7+13, PIDVAL+2~, PIDVAL+7, PIDVAL+8, PIDVAL+9, PIDVAL+10, SNDHL7+36*
Y	BLDHL7+10~, PIDVAL+2~, PIDVAL+7*, PIDVAL+8, PIDVAL+9, PIDVAL+10, SNDHL7+37
Z	PIDVAL+2~

Customize PDF page

Package: Registration

Routine: DGHTHL7

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: