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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: RGADT1

Package: Clinical Information Resource Network

Routine: RGADT1


Information

RGADT1 ;HIRMFO/GJC-BUILD ADT MESSAGES (A01/A03) ;09/21/99

Source Information

Source file <RGADT1.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Registration 8 IN5^VADPT  (BLDEVN,BLDPD1,BLDPID)^VAFCQRY  FILE^VAFCTFU  TFL^VAFCTFU1  ($$EN,$$IN)^VAFHLPV1  $$EN1^VAFHLZPD  $$SEND^VAFHUTL  $$SITE^VASITE  
Health Level Seven 3 INIT^HLFNC2  GENERATE^HLMA  KILL^HLTRANS  
Kernel 3 ^%ZTLOAD  $$WHAT^XUAF4  $$KSP^XUPARAM  
Master Patient Index VistA 1 ($$ICNLC,$$IFLOCAL)^MPIF001  
Scheduling 1 PARSE^SDOE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Clinical Information Resource Network 2 RG ADT INPATIENT ENCOUNTER DRIVER  RG ADT OUTPATIENT ENCOUNTER DRIVER  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point to build/transmit ADT messages
; Messages built by this software are fired off by server protocols:
; RG ADT-A01 SERVER -or- RG ADT-A03 SERVER
EVENT ; build the HL7 message
EXIT ; kill and quit
BUILD ; build the ADT message
; EVN segment
COMMANUM(FROM,TO) ;Build comma seperated list of numbers
FAC(X) ; set facility information, in the form of the Station Number, into
; PV1(3).
; input: the entire PV1 segment
; yield: updated PV1 segment; PV1(3) has facility information (Sta. #)

External References

Name Field # of Occurrence
^%ZTLOAD EN+125
INIT^HLFNC2 EVENT+3
GENERATE^HLMA EVENT+6
KILL^HLTRANS EVENT+7
$$ICNLC^MPIF001 EN+46, EN+88
$$IFLOCAL^MPIF001 EN+47, EN+89
PARSE^SDOE EN+90
IN5^VADPT EN+49
BLDEVN^VAFCQRY BUILD+4
BLDPD1^VAFCQRY BUILD+10
BLDPID^VAFCQRY BUILD+6
FILE^VAFCTFU EN+114
TFL^VAFCTFU1 EN+102
$$EN^VAFHLPV1 BUILD+17
$$IN^VAFHLPV1 BUILD+15
$$EN1^VAFHLZPD BUILD+20
$$SEND^VAFHUTL EN+41
$$SITE^VASITE EN+100, EN+104
$$WHAT^XUAF4 FAC+4
$$KSP^XUPARAM FAC+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+46, EN+86, EN+88
^TMP("RGTRACE" EN+99, EXIT+1!
^TMP("SDEVT" EN+79, EN+81, EN+82

Label References

Name Line Occurrences
$$COMMANUM BUILD+13
$$FAC BUILD+18
BUILD EVENT+5
EVENT EN+116
EXIT EN+116, EN+125

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+48~
CNT BUILD+2~, BUILD+6*
DFN EN+44, EN+46, EN+47, EN+73~, EN+84*, EN+86, EN+88, EN+89, EN+102, EN+114
, BUILD+4, BUILD+6, BUILD+10, BUILD+15, BUILD+20
DGQUIET EN+99, EN+126!
ERR BUILD+2~, BUILD+6, BUILD+10
EVN BUILD+2~, BUILD+4
EVN(1 BUILD+5
FROM COMMANUM~, COMMANUM+8*, COMMANUM+9, COMMANUM+11, COMMANUM+12
HL EVENT+2!, EVENT+3, EVENT+4, EVENT+6, BUILD+4, BUILD+6, BUILD+10
HL("ECH" FAC+4, FAC+5
HL("ETN" BUILD+4
HL("FS" BUILD+17, FAC+5
HL("Q" BUILD+17
>> HLA("HLS" EVENT+8!, BUILD+5*, BUILD+6*, BUILD+10*, BUILD+15*, BUILD+17*, BUILD+18*, BUILD+20*
I EN+72~, EN+120*
LIST EN+102~
LIST( EN+102, EN+103, EN+104
OUT EN+102~*, EN+104*
OUTPUT COMMANUM+10~, COMMANUM+11*, COMMANUM+12*, COMMANUM+13
PD1 BUILD+9~, BUILD+10
PD1(1 BUILD+10
PID BUILD+6~
PID( BUILD+6
PID(1 BUILD+6
RGCHNG EN+102~*, EN+106*, EN+109*, EN+110*, EN+111*, EN+113
RGCNT BUILD+2~, BUILD+3*, BUILD+5*, BUILD+6, BUILD+7*, BUILD+10, BUILD+11*
RGDATE EN+42*, EN+53*, EN+55, EN+92*, EN+95, EN+98!, EN+103*, EN+105, EN+106, EN+107
, EN+114, EVENT+8!, EXIT+1!, BUILD+15
RGDG101 EN+43, EN+122, EVENT+8!
RGDLT EN+102~, EN+103*, EN+105, EN+106, EN+107
RGENVR EN+52*, EN+77*, EN+98!, EN+108, EN+109, EN+110, EN+111, EN+114, EVENT+8!, EXIT+1!
RGEVN EN+102~, EN+103*, EN+108
RGEVT EVENT+2*, EVENT+3, EVENT+6, EVENT+8!, EXIT+1!
RGFSTR EXIT+2!, BUILD+13*, BUILD+15, BUILD+17
RGLOCAL EN+46*, EN+88*, EN+98!, EXIT+1!
RGMOV EN+53*, EN+98!, EN+123, EXIT+1!, BUILD+15
RGOK EN+42*, EN+55*, EN+95*, EN+98!, EXIT+1!
RGPARSE EN+78~, EN+90!
RGPARSE( EN+91
RGPAT EXIT+1!
RGPROC EN+78~*, EN+79*, EN+81, EN+82
RGRSLT EVENT+6, EXIT+2!
RGSD101 EN+73, EN+122, EVENT+8!
RGSDOE EN+78~, EN+80*, EN+81*, EN+82, EN+90
RGSDOE(0 EN+82*, EN+84, EN+91
RGSITE EN+100~*, EN+114
RGTMP EN+78~, EN+91*, EN+92
RGTRACE EN+99*, EN+116, EXIT+2!
RGTYPE EN+50*, EN+51, EN+52, EN+77*, EN+98!, EN+118, EVENT+2, EVENT+8!, EXIT+2!, BUILD+15
, BUILD+17
>> SDAMEVT EN+73, EN+76, EN+77
>> SDHDL EN+79, EN+81, EN+82
>> SDOE EN+124
SEQ BUILD+2~, BUILD+6*, BUILD+10*
TO COMMANUM~, COMMANUM+9*, COMMANUM+12
U EN+91
VAERR EN+48~
VAIP EN+48~
VAIP("D" EN+49*
VAIP(1 EN+53
VAIP(2 EN+50
VAIP(3 EN+53
X EN+102~*, EN+103, EN+104, BUILD+6*, COMMANUM+10~, COMMANUM+12*, FAC~, FAC+5*, FAC+6
Y0 FAC+4~*, FAC+5
Y1 FAC+4~, FAC+5*
ZTDESC EN+117~, EN+118*
ZTDTH EN+117~, EN+119*
ZTIO EN+117~, EN+119*
>> ZTQUEUED EVENT+1
>> ZTREQ EVENT+1*
ZTRTN EN+117~, EN+119*
ZTSAVE EN+117~
ZTSAVE( EN+120*
ZTSAVE("RGDG101" EN+122*
ZTSAVE("RGMOV" EN+123*
ZTSAVE("RGSD101" EN+122*
ZTSAVE("SDOE" EN+124*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All