RGADT1 ;HIRMFO/GJC-BUILD ADT MESSAGES (A01/A03) ;09/21/99
Source file <RGADT1.m>
| 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 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Clinical Information Resource Network | 2 | RG ADT INPATIENT ENCOUNTER DRIVER RG ADT OUTPATIENT ENCOUNTER DRIVER |
| Kernel | 1 | ^ORD(101 |
| 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. #) |
| 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 |
| 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 |
| >> | 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* |
