Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MPIFAPI

Package: Master Patient Index VistA

Routine: MPIFAPI


Information

MPIFAPI ;CMC/BP-APIS FOR MPI ;DEC 21, 1998

Source Information

Source file <MPIFAPI.m>

Entry Points

Name Comments DBIA/ICR reference
EN2() ;NEW ENTRY POINT FOR LOCALS
  • ICR #2702
    • Status: Active
    • Usage: Supported
    AGN2
    SETUP ;
    MPILINK() ;returns MPI logical Link
  • ICR #2702
    • Status: Active
    • Usage: Supported
    SUBNUM(DFN) ; returns SCN from MPI node for given DFN
    ; DFN - ien of patient file
    ; returns: -1^error message << always returns.
  • ICR #2702
    • Status: Active
    • Usage: Supported
    MPINODE(DFN) ; returns MPI node for given DFN
    ; DFN - patient file ien
    ; returns: -1^error message or MPI node from patient file
  • ICR #2702
    • Status: Active
    • Usage: Supported
    GETADFN(ICN) ; return DFN ONLY if ICN is the active ICN
    ; ICN - Integration Control Number for patient to be returned
    ; returns: -1^error message
    ; DFN - IEN for the patient entry in the Patient file (#2)
  • ICR #2702
    • Status: Active
    • Usage: Supported
    AICN2DFN(ICN) ; return DFN ONLY if Full ICN is the active ICN
    UPDATE(DFN,ARR,MPISILNT,REMOVE) ;api to edit 'mpi','mpifhis' and 'mpicmor' nodes
  • ICR #2706
    • Status: Active
    • Usage: Controlled Subscription
    MPIQ(DFN) ;MPI QUERY
    MPIQQ(PDFN) ; Entry point for queuing d/c
    ; Returned is -1^error message OR Task #
    WRTLN ;**37 Write intro text ONLY if there are fields to ask
    VALDT(VAL) ;**37 Validate value passed in.
    VIC40(DFN,ICN) ; -- only allowed for approved package use
    ; this will file the FULL icn for a patient and update correlations
    ; so the local site is now a subscribing package. This is used with the
    ; VIC 4.0 card registration where PV data was obtained from MVI.
    CARDLOG(MPIFID,MPIFTYPE,MPIFEVNT) ; - Function to log cards swiped or scanned
    ; input: MPIFID = ID from card swiped or scanned
    ; MPIFTYPE = type of card, either VHIC or CAC
    ; MPIFEVNT = type of event, either SWIPE or SCAN

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $C(7),!!,"Patient is being edited. No attempt will be made to connect to the MPI."
    • Line Location: MPIQ+2
    Function Call: WRITE
    • Prompt: !!,"Please verify or update the following information:",!
    • Line Location: WRTLN+1

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls
    ^MPIF(984.1 - [#984.1] Classic Fileman Calls
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call