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

Package: Master Patient Index VistA

Routine: MPIFUTL


Information

MPIFUTL ;BHM/RGY-CMOR Utilities ;FEB 26, 1998

Source Information

Source file <MPIFUTL.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 ^DIE  $$EXTERNAL^DILFD  GETS^DIQ  
Kernel 1 $$NS^XUAF4  
Master Patient Index VistA 1 $$PAT^MPIFNQ  
Registration 1 $$SITE^VASITE  

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 MPIFEXT3  MPIFREQ  

Entry Points

Name Comments DBIA/ICR reference
TYPE ;Set type of CMOR request change
MAIL() ;Get mailgroup for new requests
CHK1(D0) ;Check out a new request for patient data
CHK2(D0) ;Check out a new requeste for site
CCRDAT(PAT,ARR) ; API to return all known CMOR Change Request Information
; PAT - DFN of patient in Patient file (#2)
; ARR - Array to return information. First subscript will be request number, next will be the field number. field 9999 will be the display text
; ARR(0) will equal -1 eror message if there was a problem or no data found. If data is found, ARR(0) will equal the number of requests found.

External References

Name Field # of Occurrence
^DIE TYPE+2
$$EXTERNAL^DILFD MAIL+4
GETS^DIQ CCRDAT+11
$$PAT^MPIFNQ CHK1+5
$$SITE^VASITE CHK2+2
$$NS^XUAF4 CCRDAT+18, CCRDAT+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** Patient not defined for this request ***"
  • Line Location: CHK1+4
Function Call: WRITE
  • Prompt: !!,"*** Patient has not been assigned a CMOR Site ***",!
  • Line Location: CHK1+5
Function Call: WRITE
  • Prompt: !,"*** Patient already has an open request (",$P(^MPIF(984.9,OPEN,0),"^"),") ***"
  • Line Location: CHK1+8
Function Call: WRITE
  • Prompt: !!,"*** You must enter a site to send this request to ***"
  • Line Location: CHK2+1
Function Call: WRITE
  • Prompt: !!,"*** You cannot send a request to your own site ***"
  • Line Location: CHK2+2
Function Call: WRITE
  • Prompt: !!,"*** You cannot send a request to a site that isn't a treating facility for this patient ***"
  • Line Location: CHK2+5
Routine Call
  • DIE
  • Line Location:
    • TYPE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MPIF(984.9 - [#984.9] GETS^DIQ
^RGSITE(991.8 - [#991.8] Classic Fileman Calls,  EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCN(391.91 - [#391.91] CHK2+5
^MPIF(984.9 - [#984.9] CHK1+3, CHK1+6, CHK1+7, CHK1+8, CHK2+1, CHK2+2, CHK2+4, CCRDAT+6, CCRDAT+9, CCRDAT+10
, CCRDAT+17, CCRDAT+19
^RGSITE(991.8 - [#991.8] MAIL+2

Naked Globals

Name Field # of Occurrence
^(0 CHK1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR CCRDAT~, CCRDAT+5, CCRDAT+6, CCRDAT+16, CCRDAT+21, CCRDAT+22, CCRDAT+23
CNT CCRDAT+7~, CCRDAT+8*, CCRDAT+14*, CCRDAT+23
D0 CHK1~, CHK1+3, CHK1+6, CHK2~, CHK2+1, CHK2+2, CHK2+4
DA TYPE+1~, TYPE+2*
DIE TYPE+1~, TYPE+2*
DR TYPE+1~, TYPE+2*
IEN MAIL+1~, MAIL+2*, MAIL+3, MAIL+4, CCRDAT+7~, CCRDAT+8*, CCRDAT+9*, CCRDAT+10, CCRDAT+11, CCRDAT+12
, CCRDAT+17, CCRDAT+19
IENT CCRDAT+7~, CCRDAT+12*, CCRDAT+13, CCRDAT+15, CCRDAT+16
MGROUP MAIL+1~, MAIL+4*, MAIL+5, MAIL+6
MPIFA CCRDAT+7~
MPIFA( CCRDAT+13, CCRDAT+15, CCRDAT+16
OPEN CHK1+1~, CHK1+2*, CHK1+6, CHK1+7*, CHK1+8
PAT CHK1+1~, CHK1+3*, CHK1+4, CHK1+5, CHK1+6, CCRDAT~, CCRDAT+5, CCRDAT+6, CCRDAT+9
PT CHK2+3~, CHK2+4*, CHK2+5
REQN CCRDAT+7~, CCRDAT+15*, CCRDAT+16, CCRDAT+21, CCRDAT+22
SIEN CCRDAT+17~*, CCRDAT+18
SIEN2 CCRDAT+19~*, CCRDAT+20
SITE CHK2+3~, CHK2+4*, CHK2+5, CCRDAT+7~
STN CCRDAT+18~*, CCRDAT+21
STN2 CCRDAT+20~*, CCRDAT+21
TEXT CCRDAT+7~, CCRDAT+21*, CCRDAT+22
X CHK1+1~, CHK1+6*, CHK1+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All