Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGHTHL7

Package: Registration

Routine: DGHTHL7


Information

DGHTHL7 ;ALB/JAM - Home Telehealth Patient Sign-up HL7;10 January 2005 ; 9/25/07 10:18am

Source Information

Source file <DGHTHL7.m>

Call Graph

Call Graph Total: 14

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  

Caller Graph

Caller Graph Total: 2

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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All