VAFCQRY ;BIR/DLR-Query for patient demographics ;1/27/23 14:07
Source file <VAFCQRY.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IN | ;process in the patient query
|
|
| RESP | ;Response processing initiated from the MPI.
|
|
| ROUTE | ;Routine logic initiated from the MPI.
|
|
| BLDRSP(DFN,VAFCCNT) | ;
|
|
| MSH | ;process MSH segment
|
|
| QRD | ;process QRD segment
|
|
| BLDEVN(DFN,SEQ,EVN,HL,EVR,ERR) | ;build EVN for TF last treatment date and event reason
; At this point only sequence one and two are supported ; Variable list ; DFN - internal PATIENT (#2) number ; SEQ - variable consisting of sequence numbers delimited by commas ; that will be used to build the message ; EVN (passed by reference) - array location to place EVN segment result, the array can have existing values when passed. ; HL - array that contains the necessary HL variables (init^hlsub) ; EVR - event reason that triggered this message ; ERR - array that is used to return an error |
|
| BLDPD1(DFN,SEQ,PD1,HL,ERR) | ;
; At this point only sequence 3 is supported ; Variable list ; DFN - internal PATIENT (#2) number ; SEQ - variable consisting of sequence numbers delimited by commas ; that will be used to build the message ; PD1 (passed by reference) - array location to place PD1 segment result, the array can have existing values when passed. ; HL - array that contains the necessary HL variables (init^hlsub) ; ERR - array that is used to return an error |
|
| BLDPID(DFN,CNT,SEQ,PID,HL,ERR) | ;build PID from File #2
|
|
| OLD(DFN) | ; **902 MVI_4634 (ckn) Return OBX segment to flag a record as "old"
|
| HL7 Protocol Name | Call Tags |
|---|---|
| VAFC QRY-A19 SERVER | RESP |
| VAFC ADR-A19 CLIENT | IN |
