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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: MPIFQ0

Package: Master Patient Index VistA

Routine: MPIFQ0


Information

MPIFQ0 ;ALB/RJS-QUERY HANDLER TOP LEVEL ; 9/12/12 3:01pm

Source Information

Source file <MPIFQ0.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Master Patient Index VistA 7 ($$CHANGE,$$GETDFN,$$GETICN,$$IFLOCAL,$$SETFICN,$$SETICN,$$SETLOC)^MPIF001  TWODFNS^MPIF002  $$A24^MPIFA24B  $$MPINODE^MPIFAPI  ($$HEREICN,A28,LOCAL)^MPIFQ3  RDT^MPIFSA3  VTQ1^MPIFVTQ  
VA FileMan 3 NOW^%DTC  ^DIC  EN^DIQ1  
Kernel 2 $$HL7TFM^XLFDT  ($$IEN,$$LKUP,$$NS)^XUAF4  
Registration 2 FILE^VAFCTFU  $$SITE^VASITE  
Clinical Information Resource Network 1 (EXC,START,STOP)^RGHLLOG  
Health Level Seven 1 $$EN^HLCSAC  
List Manager 1 $$SETSTR^VALM1  
Toolkit 1 ADD^XDRDADDS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Master Patient Index VistA 7 MPIF002  MPIFAPI  MPIFD1  MPIFDUP  MPIFQ1  MPIFQ3  MPIFRPC2  
Clinical Information Resource Network 1 RGRSENS  

Entry Points

Name Comments DBIA/ICR reference
JUMP
END
INTACTV ;Interactive standalone query
UPDATE(DFN,ICN,CMOR) ;
QAK ;**43 added check for potential matches
MSH ;
VTQ
INIPARS ;
RDT ;
RDF ;
EXIT
GETDATA(DIC,DA,MPIFAR,DR,EI) ;
DECIDE ;If no data in ^TMP that means the patient was not found in the MPI w/VTQ Query. So we go to A28 to add the patient to the MPI.
LOOP2 ;
CIRNEXC ; Exception Entry Point
  • ICR #2942
    • Status: Active
    • Usage: Private
    LOOP1 ;
    MSA ;

    External References

    Name Field # of Occurrence
    NOW^%DTC JUMP
    ^DIC INTACTV+3
    EN^DIQ1 GETDATA+5
    $$EN^HLCSAC JUMP+14
    $$CHANGE^MPIF001 UPDATE+14, UPDATE+16
    $$GETDFN^MPIF001 DECIDE+13, UPDATE+2
    $$GETICN^MPIF001 CIRNEXC+1
    $$IFLOCAL^MPIF001 CIRNEXC+1, CIRNEXC+5
    $$SETFICN^MPIF001 UPDATE+12
    $$SETICN^MPIF001 UPDATE+4
    $$SETLOC^MPIF001 UPDATE+8, UPDATE+9
    TWODFNS^MPIF002 UPDATE+3
    $$A24^MPIFA24B UPDATE+20
    $$MPINODE^MPIFAPI CIRNEXC+4, VTQ+3
    $$HEREICN^MPIFQ3 RDT+14
    A28^MPIFQ3 DECIDE+4, DECIDE+21
    LOCAL^MPIFQ3 JUMP+19
    RDT^MPIFSA3 RDT+3
    VTQ1^MPIFVTQ JUMP+6
    EXC^RGHLLOG UPDATE+21
    START^RGHLLOG DECIDE+12
    STOP^RGHLLOG DECIDE+21, DECIDE+39
    FILE^VAFCTFU UPDATE+31
    $$SETSTR^VALM1 RDT+15, RDT+16, RDT+17, RDT+18
    $$SITE^VASITE JUMP+10, UPDATE+7, UPDATE+16
    ADD^XDRDADDS DECIDE+18
    $$HL7TFM^XLFDT UPDATE+29
    $$IEN^XUAF4 DECIDE+11, UPDATE+28, RDT+12
    $$LKUP^XUAF4 UPDATE+13
    $$NS^XUAF4 RDT+13

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^TMP("MPIFQ0" JUMP+20!, END!
    ^TMP("MPIFVQQ" JUMP+20!, DECIDE+2, DECIDE+11, END!, UPDATE+23, UPDATE+26, UPDATE+27, RDT+4, RDT+15*, RDT+19*
    ^TMP($J JUMP+8*, JUMP+17*, UPDATE+5*, UPDATE+10*, UPDATE+18*

    Label References

    Name Line Occurrences
    @( LOOP1+7
    END INTACTV+4, CIRNEXC+1, CIRNEXC+6, VTQ, VTQ+6
    EXIT JUMP+7, JUMP+16, DECIDE+2, DECIDE+8
    GETDATA CIRNEXC+3, VTQ+2
    JUMP CIRNEXC+9
    UPDATE DECIDE+39

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % JUMP~
    AL INIPARS+1~
    BIRTHDAY RDT+1~, RDT+11*, RDT+17
    CCMOR DECIDE+10~, EXIT+1!
    CHANGE UPDATE+1~, UPDATE+14*, UPDATE+15*, UPDATE+16*, UPDATE+18
    CHECK INIPARS+1~, INIPARS+2!
    CHKSUM UPDATE+1~, UPDATE+2*, UPDATE+4, UPDATE+12
    CMOR DECIDE+11*, DECIDE+39, UPDATE~, UPDATE+13, RDT+1~, RDT+12*, RDT+13*, RDT+18
    CMOR1 UPDATE+13~*, UPDATE+14, UPDATE+15
    DA GETDATA~
    DATA DECIDE+10~, DECIDE+11*
    DFN INTACTV+1~, INTACTV+5*, CIRNEXC+1, CIRNEXC+3, CIRNEXC+4, CIRNEXC+5, CIRNEXC+6, VTQ, VTQ+2, VTQ+3
    , VTQ+6, JUMP+5, JUMP+6, JUMP+8, JUMP+17, JUMP+19, DECIDE+4, DECIDE+14, DECIDE+17, DECIDE+21
    , DECIDE+38, DECIDE+39, UPDATE~, UPDATE+3, UPDATE+4, UPDATE+5, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+12
    , UPDATE+14, UPDATE+16, UPDATE+18, UPDATE+20, UPDATE+21, UPDATE+31
    DIC INTACTV+2!, INTACTV+3*, GETDATA~
    DIC(0 INTACTV+3*
    DIQ GETDATA+3~*
    DIQ(0 GETDATA+4*
    DR GETDATA~
    DTOUT INTACTV+2!, INTACTV+4
    DUOUT INTACTV+2!, INTACTV+4
    EI GETDATA~, GETDATA+4
    EXACT DECIDE+1~
    EXACT2 DECIDE+1~
    EXC DECIDE+1~
    FICN EXIT+1!
    FRSTNAME RDT+1~, RDT+5*, RDT+6
    HEADER JUMP+1~, JUMP+10*, JUMP+11*, JUMP+12
    HEREICN RDT+1~, RDT+14*, RDT+15
    HL JUMP+1~, JUMP+6, RDT+3
    HL("ECH" JUMP+3*, JUMP+5, JUMP+10, MSH+1
    HL("FS" JUMP+3*, JUMP+10, JUMP+11
    >> HLP("ACKTIME" INTACTV+5*, CIRNEXC+7*, JUMP+2*, JUMP+15!
    ICN DECIDE+10~, DECIDE+11*, DECIDE+13, DECIDE+38, DECIDE+39, UPDATE~, UPDATE+2*, UPDATE+3, UPDATE+4, UPDATE+7
    , UPDATE+12, RDT+1~, RDT+10*, RDT+14
    IEN DECIDE+10~, DECIDE+11*, RDT+1~, RDT+12*, RDT+13
    INDEX INIPARS+1~, INIPARS+2*, DECIDE+8, DECIDE+11, UPDATE+23, UPDATE+26, UPDATE+27, RDT+2*, RDT+3, RDT+4
    , RDT+15, RDT+16, RDT+19
    LASTNAME RDT+1~, RDT+5*, RDT+6
    LOCAL UPDATE+1~, UPDATE+6*, UPDATE+7*, UPDATE+8, UPDATE+9, UPDATE+16, UPDATE+19
    LOCDATA CIRNEXC+2~, VTQ+1~
    LOCDATA(2 CIRNEXC+4*, CIRNEXC+6, VTQ+3*, VTQ+6, DECIDE+38
    MIDDLE RDT+1~, RDT+5*, RDT+7
    MPICNT JUMP+1~, JUMP+5*, JUMP+11
    MPICOMP INIPARS+1~, MSH+1*
    MPICS JUMP+1~, JUMP+5*, JUMP+11
    MPIDC JUMP+1~
    MPIDC( LOOP2+3, LOOP2+4, LOOP2+5
    MPIDONE LOOP2+1~, LOOP2+2*, LOOP2+3, LOOP2+4*
    MPIFAR GETDATA~, GETDATA+3
    MPIFINT INTACTV+3*, EXIT!
    MPIFLL INTACTV+1~, CIRNEXC+5*, CIRNEXC+6
    MPIFMDT UPDATE+24~, UPDATE+29*, UPDATE+30
    MPIFRES INTACTV+3*, EXIT!
    >> MPIFRPC INTACTV+4, INTACTV+6, CIRNEXC+1, CIRNEXC+6, JUMP+13, JUMP+18, DECIDE+3, DECIDE+38, EXIT+1
    >> MPIFRTN VTQ+6*, JUMP+8*, JUMP+19*, DECIDE+4*, DECIDE+21*, DECIDE+39*
    >> MPIFS JUMP+13, JUMP+18, DECIDE+3, DECIDE+38
    MPII LOOP2+1~, LOOP2+2*, LOOP2+5*
    MPIIN JUMP+1~, JUMP+5*
    MPIINM JUMP+1~
    MPIJ LOOP1+6*, LOOP2+1~
    MPIMCNT JUMP+1~, JUMP+5*, JUMP+11
    MPINODE LOOP1+2~, LOOP1+4!
    MPINODE( LOOP1+6, LOOP2+5*
    MPINODE(1 LOOP1+5
    MPINTF UPDATE+24~, UPDATE+27*, UPDATE+28, UPDATE+29, UPDATE+30
    MPINTFI UPDATE+24~, UPDATE+25*, UPDATE+26*, UPDATE+27
    MPIOUT JUMP+1~, JUMP+6
    MPIOUT(0 JUMP+7, JUMP+8, JUMP+12!
    MPIOUT(1 JUMP+12*
    MPIPOT QAK+1!*, QAK+2*
    MPIQRYNM CIRNEXC+7*, VTQ+5*, JUMP+4*, JUMP+6, EXIT!
    MPIQUIT LOOP1+2~, LOOP1+3*, LOOP1+4, LOOP2+3*, LOOP2+4, LOOP2+5
    MPIREP INIPARS+1~, MSH+1*
    MPIX LOOP1+2~*, LOOP1+4*
    MSG LOOP1+2~, LOOP1+4!, RDT+3
    MSG( LOOP1+6*
    MSG(1 LOOP1+5*, QAK+2
    NAME RDT+1~, RDT+6*, RDT+7*, RDT+8*, RDT+16
    NAME1 INTACTV+1~
    REP LOOP1+2~
    RESLT UPDATE+20~*, UPDATE+21
    RGLOG UPDATE+1~
    SEG INIPARS+1~, RDT+1~, RDT+4*, RDT+5, RDT+6, RDT+9, RDT+10, RDT+11, RDT+12
    SETICN UPDATE+1~, UPDATE+4*, UPDATE+5
    SETLOC UPDATE+1~, UPDATE+6*, UPDATE+8*, UPDATE+9*, UPDATE+10
    SEX RDT+1~, RDT+9*
    SG LOOP1+2~, LOOP1+5*, LOOP1+7
    SITE JUMP+1~, JUMP+10*
    SKIP INIPARS+1~
    SNM DECIDE+10~
    SNM2 DECIDE+10~
    SSN JUMP+1~, RDT+6*, RDT+17
    STRING RDT+1~, RDT+2*, RDT+15*, RDT+16*, RDT+17*, RDT+18*, RDT+19
    SUFF RDT+1~, RDT+5*, RDT+8
    TEST JUMP+1~, JUMP+14*, JUMP+16, JUMP+17
    TEXT DECIDE+1~
    TF INIPARS+1~
    TF2 INIPARS+1~
    TFIEN UPDATE+24~, UPDATE+28*, UPDATE+30
    TFLL INIPARS+1~
    TFSTRG UPDATE+24~, UPDATE+30*, UPDATE+31
    TICN DECIDE+10~, DECIDE+13*, DECIDE+14, DECIDE+17, UPDATE+1~, UPDATE+2*, UPDATE+3
    TIME JUMP~*, JUMP+8, JUMP+17, UPDATE+5, UPDATE+10, UPDATE+18
    TMP UPDATE+1~, UPDATE+12*
    TSSN CIRNEXC+4*, VTQ+3*, EXIT!
    TTF2 INIPARS+1~
    TWODFN LOOP1+3!, DECIDE+18*, DECIDE+38, EXIT!, UPDATE+3
    VALMCNT EXIT+1!
    VALMLST EXIT+1!
    X INTACTV+2!
    XDRFL DECIDE+16~, DECIDE+17*, DECIDE+18
    XDRLST DECIDE+16~, DECIDE+18
    XDRLST(1 DECIDE+17*
    XDRSLT DECIDE+16~, DECIDE+18
    Y INTACTV+2!, INTACTV+4, INTACTV+5
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All