RGADT ;HIRMFO/GJC-ADT MESSAGE PROCESSING/ROUTING ;09/21/99
Source file <RGADT.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Information Resource Network | 3 | EN^RGRSDYN $$EN^RGRSMSH ($$SEG1,INITIZE)^RGRSUTIL |
| Health Level Seven | 2 | $$FMDATE^HLFNC GENACK^HLMA1 |
| Kernel | 2 | $$LKUP^XUAF4 $$KSP^XUPARAM |
| Master Patient Index VistA | 2 | $$GETDFN^MPIF001 $$MPINODE^MPIFAPI |
| Registration | 1 | FILE^VAFCTFU |
| VA FileMan | 1 | $$FIND1^DIC |
| 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-A01 CLIENT RG ADT-A03 CLIENT |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;entry point to process local ADT messages.
|
|
| KILL | ; kill and exit
|
|
| DYNROU(RGDCEVT) | ; dynamic message routing, but first need to update the
; TREATING FACILITY LIST (TFL-391.91) file at the local site ; input-{RGDCEVT=event type |
|
| EVN() | ; pass back the EVN segment.
|
|
| GENACK | ; Compile the 'ACK' segment, generate the 'ACK' message.
|
|
| SFCMOR(DFN,SFAC) | ; sent from CMOR? Determine if the patient's CMOR sent
; this VistA HL7 message ; input: DFN (patient dfn); SFAC (sending facility, ptr file 4) ; yield: 1 if sent from CMOR of patient, else 0 |
|
| SFN(X) | ; return the station number of the sending facility; PV1(3)
; input: PV1 segment ; yield: station number of sending facility |
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | EN+34, DYNROU+6 |
| $$FMDATE^HLFNC | DYNROU+5 |
| GENACK^HLMA1 | GENACK+3 |
| $$GETDFN^MPIF001 | EN+36 |
| $$MPINODE^MPIFAPI | SFCMOR+4 |
| EN^RGRSDYN | DYNROU+16 |
| $$EN^RGRSMSH | EN+21 |
| $$SEG1^RGRSUTIL | EN+26, EN+27, EN+32, EN+35 |
| INITIZE^RGRSUTIL | EN+19 |
| FILE^VAFCTFU | EN+45, DYNROU+11 |
| $$LKUP^XUAF4 | EN+23, EN+38 |
| $$KSP^XUPARAM | DYNROU+4 |
| HL7 Protocol Name | Call Tags |
|---|---|
| RG ADT-A01 CLIENT | EN |
| RG ADT-A03 CLIENT | EN |
| FileNo | Call Tags |
|---|---|
| ^VAT(391.72 - [#391.72] | FIND1^DIC |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | DYNROU+11, SFCMOR~, SFCMOR+4 |
| >> HL("ECH" | EN+28, SFN+4, SFN+5 |
| >> HL("EID" | GENACK+2 |
| >> HL("EIDS" | GENACK+2 |
| >> HL("FS" | EN+28, EN+32, EN+35, EN+36, GENACK+1, SFN+3 |
| >> HL("MID" | GENACK+1 |
| >> HL("MTN" | EN+17 |
| >> HLA("HLA" | GENACK+1* |
| >> HLA("HLS" | EVN+2, EVN+3 |
| >> HLARYTYP | GENACK+2*, GENACK+3 |
| >> HLEID | GENACK+2*, GENACK+3 |
| >> HLEIDS | GENACK+2*, GENACK+3 |
| >> HLFORMAT | GENACK+2*, GENACK+3 |
| HLINKP | KILL+1! |
| HLINKX | KILL+1! |
| HLL | KILL+1! |
| >> HLMTIENS | GENACK+3 |
| >> HLRESTLA | GENACK+3 |
| I | EVN+1~*, EVN+2*, EVN+3 |
| RGDC | EN+18!, KILL+1! |
| RGDCDFN | EN+18!, EN+36*, EN+45, KILL+1! |
| RGDCEDT | DYNROU+3!, DYNROU+5*, DYNROU+11, DYNROU+17! |
| RGDCERR | EN+18!, KILL+1!, GENACK+1 |
| RGDCEVN | EN+18!, EN+32*, EN+34*, EN+45, KILL+1! |
| RGDCEVT | DYNROU~, DYNROU+16 |
| RGDCEVT1 | EN+18!, EN+35*, KILL+1! |
| RGDCEVTR | DYNROU+3!, DYNROU+6*, DYNROU+11, DYNROU+17! |
| RGDCFROM | EN+23*, EN+39, EN+45, KILL+1! |
| RGDCPID | EN+18!, EN+26*, EN+36, KILL+1! |
| RGDCPV1 | EN+27*, EN+28, EN+38, KILL+1! |
| RGDCSFN | EN+18!, EN+38*, EN+39*, EN+45, KILL+1! |
| RGDCSITE | DYNROU+3!, DYNROU+4*, DYNROU+11, DYNROU+17! |
| RGDCV | EN+18!, EN+21*, EN+23, EN+45, KILL+1! |
| RGFLG | EN+18!, EN+19*, EN+28*, EN+38, EN+39, KILL+1! |
| SFAC | SFCMOR~, SFCMOR+4 |
| U | EN+19*, EN+23, EN+45, DYNROU+4*, DYNROU+5, DYNROU+6, DYNROU+11, EVN+3 |
| X | EVN+1~, EVN+2, EVN+3*, EVN+5, SFN~, SFN+3 |
| Y | SFN+3~*, SFN+4*, SFN+5 |
