Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: VAFCQRY

Package: Registration

Routine: VAFCQRY


Information

VAFCQRY ;BIR/DLR-Query for patient demographics ;1/27/23 14:07

Source Information

Source file <VAFCQRY.m>

Call Graph

Call Graph

Call Graph Total: 10

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 27

Package Total Caller Graph
Master Patient Index VistA 7 MPIF51P  MPIFA24B  MPIFA28  MPIFA31B  MPIFA40  MPIFD1  MPIFDUP  
Outpatient Pharmacy 4 PSOHLDS1  PSOHLDS5  PSORELD1  PSOVDF1  
Registration 4 DGHTHL7  DGVTSA28  VAFC ADR-A19 CLIENT  VAFC QRY-A19 SERVER  
Adverse Reaction Tracking 2 GMRAIAD1  GMRAIAL1  
Clinical Information Resource Network 2 RGADT1  RGADTP  
Consult Request Tracking 2 GMRCCCRA  GMRCHL7H  
Automated Lab Instruments 1 LA7QRY1  
Clinical Case Registries 1 RORHL01  
Kernel 1 ^ORD(101  
Pharmacy Benefits Management 1 PSULRHL1  
Scheduling 1 SCDXMSG1  
Text Integration Utility 1 TIUCCRHL  

Entry Points

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
  • ICR #3630
    • Status: Active
    • Usage: Controlled Subscription
    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
  • ICR #3630
    • Status: Active
    • Usage: Controlled Subscription
    BLDPID(DFN,CNT,SEQ,PID,HL,ERR) ;build PID from File #2
  • ICR #3630
    • Status: Active
    • Usage: Controlled Subscription
    OLD(DFN) ; **902 MVI_4634 (ckn) Return OBX segment to flag a record as "old"

    External References

    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

    Used in HL7 Interface

    HL7 Protocol Name Call Tags
    VAFC QRY-A19 SERVER RESP
    VAFC ADR-A19 CLIENT IN

    Global Variables Directly Accessed

    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

    Label References

    Name Line Occurrences
    $$OLD BLDRSP+18
    @( IN+3
    BLDEVN BLDRSP+4
    BLDPID BLDRSP+6
    BLDRSP IN+15

    Local Variables

    Legend:

    >> 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*

    Marked Items

    Name Field # of Occurrence
    $T(@SG IN+3
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All