RGADT ;HIRMFO/GJC-ADT MESSAGE PROCESSING/ROUTING ;09/21/99
Source file <RGADT.m>
| 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 |
| 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 |