VAFCQRY ;BIR/DLR-Query for patient demographics ;1/27/23 14:07
Source file <VAFCQRY.m>
Package | Total | Call Graph |
---|---|---|
Registration | 6 | BLDPID^VAFCQRY1 (BLDEVN,BLDPD1,CHKID)^VAFCQRY2 ($$DODD,$$DODF,$$DODNTPRV,$$DODOPT,$$LABE,$$NAMEOBX,$$PD1,$$PHARA,$$PV1,$$PV2,$$RADE,$$SECLOG,$$SIG,PRON,PROND,SEXOR,SEXORD)^VAFCSB $$EN^VAFHLZEL $$EN1^VAFHLZPD $$EN^VAFHLZSP |
Health Level Seven | 2 | GENACK^HLMA1 LINK^HLUTIL3 |
Kernel | 1 | $$LKUP^XUAF4 |
Master Patient Index VistA | 1 | $$GETICN^MPIF001 |
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 |
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"
|
Name | Field # of Occurrence |
---|---|
GENACK^HLMA1 | IN+17 |
LINK^HLUTIL3 | IN+16 |
$$GETICN^MPIF001 | IN+10 |
BLDPID^VAFCQRY1 | BLDPID+18 |
BLDEVN^VAFCQRY2 | BLDEVN+11 |
BLDPD1^VAFCQRY2 | BLDPD1+10 |
CHKID^VAFCQRY2 | IN+5 |
$$DODD^VAFCSB | BLDRSP+21 |
$$DODF^VAFCSB | BLDRSP+19 |
$$DODNTPRV^VAFCSB | BLDRSP+23 |
$$DODOPT^VAFCSB | BLDRSP+22 |
$$LABE^VAFCSB | BLDRSP+14 |
$$NAMEOBX^VAFCSB | BLDRSP+17 |
$$PD1^VAFCSB | BLDRSP+10 |
$$PHARA^VAFCSB | BLDRSP+13 |
$$PV1^VAFCSB | BLDRSP+11 |
$$PV2^VAFCSB | BLDRSP+12 |
$$RADE^VAFCSB | BLDRSP+15 |
$$SECLOG^VAFCSB | BLDRSP+25 |
$$SIG^VAFCSB | BLDRSP+16 |
PRON^VAFCSB | BLDRSP+32 |
PROND^VAFCSB | BLDRSP+33 |
SEXOR^VAFCSB | BLDRSP+26 |
SEXORD^VAFCSB | BLDRSP+27 |
$$EN^VAFHLZEL | BLDRSP+44 |
$$EN1^VAFHLZPD | BLDRSP+40 |
$$EN^VAFHLZSP | BLDRSP+43 |
$$LKUP^XUAF4 | MSH+7 |
HL7 Protocol Name | Call Tags |
---|---|
VAFC QRY-A19 SERVER | RESP |
VAFC ADR-A19 CLIENT | IN |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | IN+8, IN+10 |
^TMP("HLA" | IN+13*, IN+14*, IN+18!, BLDRSP+4*, BLDRSP+6*, BLDRSP+10*, BLDRSP+11*, BLDRSP+12*, BLDRSP+13*, BLDRSP+14* , BLDRSP+15*, BLDRSP+16*, BLDRSP+17*, BLDRSP+18*, BLDRSP+19*, BLDRSP+21*, BLDRSP+22*, BLDRSP+23*, BLDRSP+25*, BLDRSP+26* , BLDRSP+30*, BLDRSP+31*, BLDRSP+32*, BLDRSP+36*, BLDRSP+37*, BLDRSP+40*, BLDRSP+43*, BLDRSP+44* |
^XTMP("MPIF OLD RECORDS" | OLD+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CITY | IN+1~ |
CLAIM | IN+1~ |
CNT | BLDRSP+1~, BLDRSP+6*, BLDRSP+26~*, BLDRSP+28~, BLDRSP+29*, BLDRSP+30, BLDRSP+31, BLDRSP+32~*, BLDRSP+34~, BLDRSP+35* , BLDRSP+36, BLDRSP+37, BLDPID~, BLDPID+18 |
COMP | IN+1~, IN+18!, MSH+4*, MSH+7, QRD+7 |
DFN | IN+1~, IN+4, IN+5, IN+6, IN+9~, IN+10*, IN+11, IN+15, BLDRSP~, BLDRSP+4 , BLDRSP+6, BLDRSP+16, BLDRSP+17, BLDRSP+18, BLDRSP+19, BLDRSP+21, BLDRSP+22, BLDRSP+23, BLDRSP+25, BLDRSP+26 , BLDRSP+27, BLDRSP+32, BLDRSP+33, BLDRSP+40, BLDRSP+43, BLDRSP+44, QRD+11*, BLDEVN~, BLDEVN+11, BLDPD1~ , BLDPD1+10, BLDPID~, BLDPID+18, OLD~, OLD+1 |
DODD | BLDRSP+2~, BLDRSP+21* |
DODDISDT | BLDRSP+2~ |
DODF | BLDRSP+2~, BLDRSP+19* |
DODNP | BLDRSP+2~, BLDRSP+23* |
DODOPT | BLDRSP+2~, BLDRSP+22* |
ERR | BLDRSP+1~, BLDRSP+4, BLDRSP+6, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~, BLDPID+18 |
EVN | BLDRSP+1~, BLDRSP+4, BLDEVN~, BLDEVN+11 |
EVN(1 | BLDRSP+4 |
EVR | BLDEVN~, BLDEVN+11 |
HL | IN+17, BLDRSP+4, BLDRSP+6, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~, BLDPID+18 |
HL("ECH" | MSH+2, MSH+4, MSH+5, MSH+6 |
HL("EID" | IN+17 |
HL("EIDS" | IN+17 |
HL("FS" | IN+13, MSH+1, MSH+2, MSH+7, QRD+3, QRD+4, OLD+1 |
HL("MID" | IN+13, MSH+3 |
HL("Q" | MSH+2 |
HLA | IN+1~ |
>> HLECH | MSH+2* |
>> HLFS | MSH+2* |
>> HLL("LINKS" | IN+16* |
>> HLMTIENS | IN+17 |
>> HLNEXT | IN+3 |
>> HLNODE | IN+3, MSH+7, QRD+2 |
>> HLQ | MSH+2* |
>> HLQUIT | IN+3 |
>> HLRESLTA | IN+17 |
ICN | IN+1~, IN+5, IN+9~, IN+10*, IN+11, IN+12, QRD+10* |
ID | QRD+1~, QRD+7*, QRD+10, QRD+11, QRD+13 |
IDS | QRD+1~, QRD+4*, QRD+5 |
IEN | IN+1~, IN+16* |
LABE | BLDRSP+1~, BLDRSP+14* |
LVL | IN+1~, BLDRSP+28~, BLDRSP+29*, BLDRSP+31*, BLDRSP+34~, BLDRSP+35*, BLDRSP+37* |
LVL2 | IN+1~ |
NAMECOMP | BLDRSP+2~, BLDRSP+17* |
OLD | BLDRSP+2~, BLDRSP+18* |
PD1 | BLDRSP+1~, BLDRSP+10*, BLDPD1~, BLDPD1+10 |
PID | BLDRSP+1~, BLDRSP+6, BLDPID~, BLDPID+18 |
PID( | BLDRSP+6 |
PID(1 | BLDRSP+6 |
PRES | BLDRSP+1~, BLDRSP+13* |
PRON | BLDRSP+2~, BLDRSP+32 |
PRON( | BLDRSP+32 |
PRON(0 | BLDRSP+32 |
PROND | BLDRSP+2~, BLDRSP+33 |
PROND( | BLDRSP+35, BLDRSP+36, BLDRSP+37 |
PROND(0 | BLDRSP+33 |
PV1 | BLDRSP+2~, BLDRSP+11* |
PV2 | BLDRSP+1~, BLDRSP+12* |
QRD | QRD+1~ |
QRDAA | QRD+1~, QRD+7*, QRD+9, QRD+12 |
QRDNTC | QRD+1~, QRD+7*, QRD+10, QRD+11, QRD+13 |
RADE | BLDRSP+1~, BLDRSP+15* |
REP | IN+1~, MSH+5*, QRD+5 |
SAVEDFN | IN+1~, IN+4*, IN+8, IN+10 |
SECLVL | BLDRSP+2~, BLDRSP+25* |
SEQ | BLDRSP+1~, BLDRSP+4*, BLDRSP+6*, BLDRSP+39*, BLDRSP+40, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~ , BLDPID+18 |
SEXOR | BLDRSP+2~, BLDRSP+26 |
SEXOR( | BLDRSP+26 |
SEXOR(0 | BLDRSP+26 |
SEXORD | BLDRSP+2~, BLDRSP+27 |
SEXORD( | BLDRSP+29, BLDRSP+30, BLDRSP+31 |
SEXORD(0 | BLDRSP+27 |
SG | IN+1~, IN+3* |
SIDG | BLDRSP+2~, BLDRSP+16* |
SITE | IN+16, IN+18!, MSH+7* |
SSN | IN+1~, IN+5, IN+12, QRD+13* |
STATE | IN+1~ |
SUBCOMP | IN+1~, MSH+6*, QRD+7 |
VAFC | IN+1~, IN+3*, IN+16 |
VAFC( | IN+16 |
VAFC(0 | IN+16 |
VAFCCNT | IN+1~, IN+2*, IN+13*, IN+14*, IN+15, BLDRSP~, BLDRSP+4*, BLDRSP+6, BLDRSP+7*, BLDRSP+10* , BLDRSP+11*, BLDRSP+12*, BLDRSP+13*, BLDRSP+14*, BLDRSP+15*, BLDRSP+16*, BLDRSP+17*, BLDRSP+18*, BLDRSP+19*, BLDRSP+21* , BLDRSP+22*, BLDRSP+23*, BLDRSP+25*, BLDRSP+26*, BLDRSP+27*, BLDRSP+30, BLDRSP+31, BLDRSP+32*, BLDRSP+33*, BLDRSP+36 , BLDRSP+37, BLDRSP+40, BLDRSP+41*, BLDRSP+43*, BLDRSP+44* |
VAFCER | IN+1~, IN+2*, IN+11*, IN+12*, IN+13, IN+15, IN+18! |
VAFCFS | IN+18!, MSH+1* |
VAFCID | IN+18!, MSH+3* |
VAFCQRD | IN+14, IN+18!, QRD+2*, QRD+3, QRD+4 |
VAFCRCV | IN+18!, QRD+3* |
WSF | QRD+1~, QRD+5*, QRD+7 |
X | BLDRSP+1~, BLDRSP+6*, QRD+1~, QRD+5* |
ZEL | BLDRSP+2~, BLDRSP+44* |
ZSP | BLDRSP+2~, BLDRSP+43* |
Name | Field # of Occurrence |
---|---|
$T(@SG | IN+3 |