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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: MPIFDUP

Package: Master Patient Index VistA

Routine: MPIFDUP


Information

MPIFDUP ;BIRM/CMC-RESOLVE DUP ACTION ;DEC 2, 2005

Source Information

Source file <MPIFDUP.m>

Call Graph

Call Graph

Call Graph Total: 21

Package Total Call Graph
Master Patient Index VistA 10 $$GETDFN^MPIF001  COMPARE^MPIF002  $$A24^MPIFA24B  $$MPINODE^MPIFAPI  START^MPIFD1  GETDATA^MPIFQ0  ($$HEREICN,MSG3,PROMPT)^MPIFQ3  EDIT^MPIFQED  
RDT^MPIFSA3  VTQ1^MPIFVTQ  
Registration 3 NAME^VAFCPID2  BLDPID^VAFCQRY  $$SITE^VASITE  
VA FileMan 3 NOW^%DTC  ^DIE  EN^DIQ1  
Health Level Seven 2 $$EN^HLCSAC  INIT^HLFNC2  
Kernel 2 $$FMTE^XLFDT  ($$IEN,$$LKUP,$$NS)^XUAF4  
List Manager 1 $$SETSTR^VALM1  

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: 2

Package Total Caller Graph
Master Patient Index VistA 2 MPIFA24  MPIFD1  

Entry Points

Name Comments DBIA/ICR reference
POT ;EXCEPTION HANDLER CALLS HERE ;**53 MPIC_1853 The POT module is obsolete and is no longer being called.
  • ICR #4464
    • Status: Active
    • Usage: Private
    EXC ; Exception Entry Point
    INIPARS ;
    LOOP1 ;
    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.
    EXIT
    END
    GETDATA(DIC,DA,MPIFAR,DR,EI) ;
    LOOP2 ;
    MSH ;
    MSA ;
    RDF ;
    QAK ;**43 added check for potential matches
    RDT ;
    RESEX(DFN,POT) ;look for any pv reject (234) exceptions and resolve them for this DFN

    External References

    Name Field # of Occurrence
    NOW^%DTC EXC+5, RESEX+8
    ^DIE RESEX+10
    EN^DIQ1 GETDATA+5
    $$EN^HLCSAC EXC+17
    INIT^HLFNC2 DECIDE+38
    $$GETDFN^MPIF001 RDT+11
    COMPARE^MPIF002 DECIDE+14
    $$A24^MPIFA24B DECIDE+43
    $$MPINODE^MPIFAPI EXC+3
    START^MPIFD1 DECIDE+46
    GETDATA^MPIFQ0 DECIDE+18
    $$HEREICN^MPIFQ3 RDT+15
    MSG3^MPIFQ3 DECIDE+42
    PROMPT^MPIFQ3 DECIDE+42
    EDIT^MPIFQED DECIDE+42
    RDT^MPIFSA3 RDT+3
    VTQ1^MPIFVTQ EXC+9
    NAME^VAFCPID2 DECIDE+28, DECIDE+29
    BLDPID^VAFCQRY DECIDE+39
    $$SETSTR^VALM1 RDT+16, RDT+17, RDT+18, RDT+19
    $$SITE^VASITE EXC+13
    $$FMTE^XLFDT DECIDE+20
    $$IEN^XUAF4 RDT+13
    $$LKUP^XUAF4 DECIDE+9
    $$NS^XUAF4 RDT+14

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Potential Match Review Option is Only Available for Potential Match Exceptions"
    • Line Location: POT+5
    Function Call: WRITE
    • Prompt: !,"Potential Match Review is Only Available for Exceptions still pending."
    • Line Location: POT+6
    Function Call: WRITE
    • Prompt: !,"Messaging outstanding please try again in a few minutes."
    • Line Location: POT+11
    Function Call: WRITE
    • Prompt: !!,"Attempting to connect to the Master Patient Index in Austin...",!,"If no SSN or inexact DOB or common name, this request",!,"may take some time, please be patient...",!
    • Line Location: EXC+16
    Function Call: WRITE
    • Prompt: !,"No Potential Matches Found.",!!,"Exception has been marked automatically as processed."
    • Line Location: DECIDE+2
    Routine Call
    • DIE
    • Line Location:
      • RESEX+10

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^RGHL7(991.1 - [#991.1] RESEX+5, RESEX+6, RESEX+7, RESEX+9, RESEX+11
    ^TMP("MPIFQ0" EXC+22!, END!
    ^TMP("MPIFVQQ" EXC+22!, DECIDE+2, DECIDE+5, DECIDE+6, END!, RDT+4, RDT+16*, RDT+20*
    ^TMP($J EXC+11*, EXC+20*

    Label References

    Name Line Occurrences
    @( LOOP1+7
    END DECIDE+45, DECIDE+46
    EXIT EXC+10, EXC+19, DECIDE+2
    GETDATA EXC+2
    RESEX DECIDE+41

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % EXC+5~, RESEX+8
    AL INIPARS+1~
    BIR DECIDE+17~, DECIDE+20*, DECIDE+22
    BIRTHDAY RDT+1~, RDT+12*, RDT+18
    CCMOR EXIT+1!
    CHECK INIPARS+1~, INIPARS+2!
    CHKSUM DECIDE+1~, DECIDE+9*
    CMOR RDT+1~, RDT+13*, RDT+14*, RDT+19
    COMMON DECIDE+1~, DECIDE+13*, DECIDE+14, DECIDE+15, DECIDE+17!
    DA GETDATA~, RESEX+3~, RESEX+10*!
    DA(1 RESEX+10*
    DATA DECIDE+1~, DECIDE+5*, DECIDE+7, DECIDE+8, DECIDE+9
    DATA( DECIDE+7*, DECIDE+8*, DECIDE+9*, DECIDE+22, DECIDE+24, DECIDE+27, DECIDE+29*, DECIDE+31, DECIDE+32, DECIDE+36!
    DFN EXC+2, EXC+3, EXC+8, EXC+9, EXC+11, EXC+20, DECIDE+14, DECIDE+18, DECIDE+19, DECIDE+20
    , DECIDE+39, DECIDE+41, DECIDE+42, DECIDE+43, RDT+11, RESEX~, RESEX+5, RESEX+6
    DIC GETDATA~
    DIE RESEX+3~, RESEX+10*!
    DIQ GETDATA+3~*
    DIQ(0 GETDATA+4*
    DR GETDATA~, RESEX+3~, RESEX+10*!
    DUZ RESEX+10
    EI GETDATA~, GETDATA+4
    ERR DECIDE+37~, DECIDE+39
    EXACT DECIDE+1~, DECIDE+34*, DECIDE+35*, DECIDE+36
    EXACT2 DECIDE+1~
    EXC DECIDE+1~
    FICN EXIT+1!
    FRSTNAME RDT+1~, RDT+5*, RDT+6
    HEADER EXC+6~, EXC+13*, EXC+14*, EXC+15
    HEREICN RDT+1~, RDT+15*, RDT+16
    HL EXC+6~, EXC+9, DECIDE+38, DECIDE+39, RDT+3
    HL("ECH" EXC+7*, EXC+8, EXC+13, MSH+1
    HL("FS" EXC+7*, EXC+13, EXC+14, QAK+3
    >> HLP("ACKTIME" EXC+4*, EXC+18!
    ICN DECIDE+1~, DECIDE+9*, RDT+1~, RDT+10*, RDT+11, RDT+15
    IEN RDT+1~, RDT+13*, RDT+14, RESEX+3~, RESEX+4*, RESEX+5*, RESEX+6, RESEX+7, RESEX+9, RESEX+10
    , RESEX+11
    IEN2 RESEX+3~, RESEX+6*, RESEX+7, RESEX+10
    INDEX INIPARS+1~, INIPARS+2*, DECIDE+3, DECIDE+5, DECIDE+6, DECIDE+14, DECIDE+46, RDT+2*, RDT+3, RDT+4
    , RDT+16, RDT+17, RDT+20
    LASTNAME RDT+1~, RDT+5*, RDT+6
    LOCDATA EXC+1~
    LOCDATA(2 EXC+3*
    MIDDLE RDT+1~, RDT+5*, RDT+7
    MORE DECIDE+1~, DECIDE+13*, DECIDE+14, DECIDE+15, DECIDE+17!
    MPICNT EXC+6~, EXC+8*, EXC+14
    MPICOMP INIPARS+1~, MSH+1*
    MPICS EXC+6~, EXC+8*, EXC+14
    MPIDC EXC+6~
    MPIDC( LOOP2+3, LOOP2+4, LOOP2+5
    MPIDONE LOOP2+1~, LOOP2+2*, LOOP2+3, LOOP2+4*
    MPIFAR GETDATA~, GETDATA+3
    MPIFD DECIDE+17~
    MPIFD(2 DECIDE+19, DECIDE+20
    MPIFINT EXIT!
    MPIFRES EXC+8*, EXIT!
    >> MPIFRPC EXC+21, EXIT+1
    >> MPIFRTN EXC+11*
    >> MPIFS EXC+21
    MPII LOOP2+1~, LOOP2+2*, LOOP2+5*
    MPIIN EXC+6~, EXC+8*
    MPIINM EXC+6~
    MPIJ LOOP1+6*, LOOP2+1~
    MPIMCNT EXC+6~, EXC+8*, EXC+14
    MPIMID DECIDE+32~*, DECIDE+34, DECIDE+35
    MPINODE LOOP1+2~, LOOP1+4!
    MPINODE( LOOP1+6, LOOP2+5*
    MPINODE(1 LOOP1+5
    MPIOUT EXC+6~, EXC+9
    MPIOUT(0 EXC+10, EXC+11, EXC+15!
    MPIOUT(1 EXC+15*
    MPIPOT QAK+1!*, QAK+2*
    MPIQRYNM EXC+4*, EXC+9, 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, QAK+3
    NAME DECIDE+17~, DECIDE+19*, DECIDE+28, DECIDE+31, DECIDE+33, DECIDE+36, RDT+1~, RDT+6*, RDT+7*, RDT+8*
    , RDT+17
    NAME3 DECIDE+17~, DECIDE+29*
    NMMN DECIDE+32~, DECIDE+33*, DECIDE+34, DECIDE+35
    NODE2 DECIDE+1~, DECIDE+6*, DECIDE+10
    PID2 DECIDE+37~, DECIDE+39, DECIDE+43
    POT RESEX~
    PROCDT RESEX+3~, RESEX+8*, RESEX+10
    >> PROCESS DECIDE+2*, DECIDE+44*, DECIDE+45
    REP LOOP1+2~
    >> RESLT DECIDE+43*
    SDFN EXIT!, QAK+3*
    SEG INIPARS+1~, RDT+1~, RDT+4*, RDT+5, RDT+6, RDT+9, RDT+10, RDT+12, RDT+13
    SEX DECIDE+17~, DECIDE+19*, DECIDE+24, RDT+1~, RDT+9*
    SG LOOP1+2~, LOOP1+5*, LOOP1+7
    SITE EXC+6~, EXC+13*
    SKIP INIPARS+1~
    SSN EXC+6~, DECIDE+17~, DECIDE+19*, DECIDE+26*, DECIDE+27, RDT+6*, RDT+18
    STRING RDT+1~, RDT+2*, RDT+16*, RDT+17*, RDT+18*, RDT+19*, RDT+20
    SUFF RDT+1~, RDT+5*, RDT+8
    TEST EXC+6~, EXC+17*, EXC+19, EXC+20
    TEXT DECIDE+1~
    TF INIPARS+1~
    TF2 INIPARS+1~
    TFLL INIPARS+1~
    THISGUY RDT+1~, RDT+11*
    TIME EXC+5~*, EXC+11, EXC+20
    TSSN EXC+3*, EXIT!
    TTF2 INIPARS+1~
    TWODFN LOOP1+3!, EXIT!
    VALMCNT EXIT+1!
    VALMLST EXIT+1!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All