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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MPIF001

Package: Master Patient Index VistA

Routine: MPIF001


Information

MPIF001 ;ALB/RJS/CMC-UTILITY ROUTINE OF APIS ; 10/28/20 8:35pm

Source Information

Source file <MPIF001.m>

Entry Points

Name Comments DBIA/ICR reference
GETICN(DFN) ; This function returns the ICN, including checksum for a given
; DFN or -1^error message
; INPUT: DFN - ien in Patient file
  • ICR #2701
    • Status: Active
    • Usage: Supported
  • ICR #2701
    • Status: Active
    • Usage: Supported
  • ICR #7043
    • Status: Withdrawn
    • Usage: Private
    EXIT1 ;
    GETDFN(ICN) ; Returns DFN (ien Patient file) or -1^error message for a given ICN
    ; ICN - ICN for a given Patient in the Patient file
  • ICR #2701
    • Status: Active
    • Usage: Supported
    EXIT2 ;
    ICNLC(DFN) ;This API will return an ICN if one exists or create and return
    ; a Local ICN and update the appropriate fields if a Local was created
    ; DFN= Patient IEN
    ; Returns ICN (local or National including checksum) or -1^error msg
  • ICR #3072
    • Status: Active
    • Usage: Controlled Subscription
    CMOR2(DFN) ; Returns CMOR Site Name or -1^error message
    ; DFN = Patient IEN
  • ICR #2701
    • Status: Active
    • Usage: Supported
    CMORNAME(CIEN) ; Returns CMOR site name or -1^error message
    ; CIEN - ien from Institution file
  • ICR #2701
    • Status: Active
    • Usage: Supported
    GETVCCI(DFN) ; Returns CMOR or -1^error message for a given patient
    ; DFN - ien of patient in Patient file
  • ICR #2701
    • Status: Active
    • Usage: Supported
    EXIT3 ;
    CHANGE(DFN,VCCI) ;
    ; ** This function is only to be used by approved packages **
  • ICR #2703
    • Status: Active
    • Usage: Controlled Subscription
    REP
    EXIT4 ;
    SETICN(DFN,ICN,CHKSUM) ;
    ; ** this function is to only be used by approved packages **
  • ICR #2704
    • Status: Retired
    • Usage: Private
  • ICR #3553
    • Status: Active
    • Usage: Private
  • ICR #5121
    • Status: Active
    • Usage: Private
    EXIT5 ;
    SETLOC(DFN,DELFLAG) ;
    ; ** This function should be only used by approved packages **
  • ICR #2705
    • Status: Retired
    • Usage: Private
    EXIT6 ;
    IFLOCAL(DFN) ; This function is used to see if a patient has a local ICN
    ; DFN - ien of patient in Patient file
    ; returned: 0 = patient does not exist, dfn is not defined or no MPI node OR Patient does not have a local ICN
    ; 1 = patient has a Local ICN assigned
  • ICR #2701
    • Status: Active
    • Usage: Supported
    IFVCCI(DFN) ; this function returns 1 if your facility is the CMOR for the given pt
    ; DFN - ien of patient in Patient file
    ; returns: 1 = your site in the CMOR for this patient
    ; -1 = your site is not the CMOR for this patient
    ; 0^ERROR MSG
  • ICR #2701
    • Status: Active
    • Usage: Supported
    HL7CMOR(DFN,SEP) ; This function returns the CMOR station number and institution name for
    ; the given patient.
    ; DFN = ien for patient in Patient file
    ; SEP = delimiter to separate station number and name
    ; returned: Station Number <sep> Institution name
    ; -1^error message
  • ICR #2701
    • Status: Active
    • Usage: Supported
    EXIT7 ;
    ICN2DFN(ICN) ; - This function will return a DFN based on the ICN entered
    ; **60 (elz) MVI_793 this is the new function to use the new single
    ; ICN field/cross-reference. The full ICN value must be passed in
    QICN2DFN ;
    DFN2ICN(DFN) ; This function will return an ICN based on the DFN entered
    ; **60 (elz) MVI_793 this is the new function to use the new single
    ; ICN field. The full ICN value will be returned
    QDFN2ICN ;
    SETFICN(DFN,ICN) ; - Set the Full ICN value
    ; ** this function is to only be used by approved packages **
    QSETFICN ;
    LOCK ;
    UNLOCK ;

    FileMan Files Accessed Via FileMan Db Call

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