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

Package: Patient Data Exchange

Routine: VAQLED03


Information

VAQLED03 ;ALB/JFP,JRP - PDX, DISPLAY POSSIBLE MATCHES, SCREEN;01MAR93

Source Information

Source file <VAQLED03.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Patient Data Exchange 6 PT^VAQDIS01  EP^VAQLED02  ^VAQLED07  ($$INSERT,$$PATINFO,$$REPEAT)^VAQUTL1  $$GETDFN^VAQUTL97  ($$DASHSSN,$$DATE,$$DOBFMT)^VAQUTL99  
List Manager 3 EN^VALM  ($$SETFLD,$$SETSTR,CLEAR,PAUSE)^VALM1  EN^VALM2  
Registration 2 ^DPTDUP  DEM^VADPT  

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

Package Total Caller Graph
Patient Data Exchange 6 VAQ DUPLICATE  VAQ DUPLICATE PDX8  VAQ MATCHES PDX8  VAQ NEW PATIENT  VAQEXT04  VAQLED01  
Registration 4 VAQ DUPLICATE  VAQ DUPLICATE PDX8  VAQ MATCHES PDX8  VAQ NEW PATIENT  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EP ; -- Main entry point for the list processor
INIT ; -- Builds array of possible matches
SETD ; -- Set data for display in list processor
TMP ; -- Set the array used by list processor
HD ; -- Make header line for list processor
SEL ; -- Select possible match
EXP ; -- Displays MAS minimal information from patient file (2)
NEW ; -- Creates new patient in local database
EXIT ; -- Note: The list processor cleans up its own variables.
; All other variables cleaned up here.
MRGECHK ;CHECK FOR EXACT MATCH BEFORE ALLOWING MERGE

External References

Name Field # of Occurrence
^DPTDUP EP+10
DEM^VADPT SETD+2
EN^VALM EP+12
$$SETFLD^VALM1 SETD+3, SETD+4, SETD+5, SETD+7, SETD+8
$$SETSTR^VALM1 INIT+5, INIT+6
CLEAR^VALM1 MRGECHK+16
PAUSE^VALM1 MRGECHK+39
EN^VALM2 SEL+1, EXP+1
PT^VAQDIS01 EXP+7
EP^VAQLED02 MRGECHK+14
^VAQLED07 NEW+1
$$INSERT^VAQUTL1 HD+1, HD+2, HD+3, HD+4, HD+5, HD+6, MRGECHK+18, MRGECHK+25
$$PATINFO^VAQUTL1 MRGECHK+3
$$REPEAT^VAQUTL1 MRGECHK+28
$$GETDFN^VAQUTL97 EP+3, EP+4
$$DASHSSN^VAQUTL99 MRGECHK+30
$$DATE^VAQUTL99 MRGECHK+6
$$DOBFMT^VAQUTL99 SETD+6, MRGECHK+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking for potential duplicates and matches of remote patient "
  • Line Location: EP+2
Function Call: WRITE
  • Prompt: $C(7),X
  • Line Location: MRGECHK+19
Function Call: WRITE
  • Prompt: !,X,$C(7)
  • Line Location: MRGECHK+26
Function Call: WRITE
  • Prompt: !!,?22,"Name",?48,"SSN",?64,"DOB"
  • Line Location: MRGECHK+27
Function Call: WRITE
  • Prompt: !,?8,X,?43,$E(X,1,12),?60,$E(X,1,10)
  • Line Location: MRGECHK+29
Function Call: WRITE
  • Prompt: !," Local: ",LOCNAME,?43,$$DASHSSN^VAQUTL99(LOCSSN),?60,$$DOBFMT^VAQUTL99(LOCDOB,0)
  • Line Location: MRGECHK+30
Function Call: WRITE
  • Prompt: !,"Remote: ",VAQPTNM,?43,VAQESSN,?60,VAQEDOB
  • Line Location: MRGECHK+31
Function Call: WRITE
  • Prompt: !!!
  • Line Location: MRGECHK+32
Function Call: WRITE
  • Prompt: !,?3,"Pertinent patient data must match in order for the upload process"
  • Line Location: MRGECHK+33
Function Call: WRITE
  • Prompt: !,?3,"to continue. Local and remote patient should be verified using the"
  • Line Location: MRGECHK+34
Function Call: WRITE
  • Prompt: !,?3,"appropriate procedures. Once verified, the Load/Edit Patient Data"
  • Line Location: MRGECHK+35
Function Call: WRITE
  • Prompt: !,?3,"option, which is found in the Registration Menu, should be used to"
  • Line Location: MRGECHK+36
Function Call: WRITE
  • Prompt: !,?3,"correct the information."
  • Line Location: MRGECHK+37
Function Call: WRITE
  • Prompt: !
  • Line Location: MRGECHK+38
Routine Call
  • VALM
  • Line Location:
    • EP+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("VAQIDX" INIT+1!, TMP+4*, SEL+5, EXP+5, EXIT+3!
^TMP("VAQL3" INIT+1!, TMP+2*, TMP+3*, EXIT+3!

Label References

Name Line Occurrences
MRGECHK SEL+8
SETD INIT+3
TMP INIT+5, INIT+6, SETD+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN INIT+2*, INIT+3*, TMP+4, EXP+6*, EXIT+4!
DFNARR EP+1!, EXIT+3!
DFNARR( EP+3*, EP+4*, EP+11*
>> DFNPT SEL+7*, MRGECHK+3
>> DFNTR TMP+4, SEL+6*
DIFF MRGECHK+1~, MRGECHK+9*, MRGECHK+10*, MRGECHK+11*, MRGECHK+12*, MRGECHK+14, MRGECHK+21*, MRGECHK+22*, MRGECHK+23
DOB EP+6~, EP+8*
DPTD EP+11, EP+12!, EXIT+4!
DPTD( EP+11, INIT+3
DPTKD EP+6~, EP+9*
DPTKS EP+6~, EP+9*
DPTNM EP+6~, EP+7*
IOSL MRGECHK+38
LOCDOB MRGECHK+1~, MRGECHK+6*, MRGECHK+7*, MRGECHK+12, MRGECHK+30
LOCNAME MRGECHK+1~, MRGECHK+4*, MRGECHK+10, MRGECHK+30
LOCSSN MRGECHK+1~, MRGECHK+5*, MRGECHK+11, MRGECHK+30
SDAT SEL+5*, SEL+6, SEL+7, EXP+5*, EXP+6, EXIT+4!
SDI SEL+3*, SEL+4*, SEL+5, EXP+3*, EXP+4*, EXP+5, EXIT+4!
SSN EP+6~, EP+7*
TMP MRGECHK+1~, MRGECHK+3*, MRGECHK+4, MRGECHK+5, MRGECHK+6, MRGECHK+17*, MRGECHK+18, MRGECHK+20*, MRGECHK+21*, MRGECHK+22*
, MRGECHK+23*, MRGECHK+24*, MRGECHK+25
U SETD+5, SETD+6, SEL+6, SEL+7, EXP+6
VA SETD+10!
VA("PID" SETD+8
VADM SETD+10!
VADM(1 SETD+4
VADM(2 SETD+5
VADM(3 SETD+6
VAERR SETD+6*, SETD+7, SETD+10!
VALMBCK SEL+10!, EXP+8*, NEW+2!
>> VALMCNT INIT+2*, TMP+1*, TMP+2, TMP+3
>> VALMHDR(1 HD+1*, HD+2*, HD+3*
>> VALMHDR(2 HD+4*, HD+5*, HD+6*
>> VALMHDR(3 HD+7*
VALMY SEL+2, EXP+2, EXIT+4!
VALMY( SEL+4, EXP+4
>> VAQBCK SEL+9*
>> VAQCHK EP+12
>> VAQDFN EP+3*, EP+4*, EP+11*
VAQECNT INIT+2*, INIT+4, SETD+1*, SETD+3, TMP+3, TMP+4, EXIT+4!
>> VAQEDOB HD+5, MRGECHK+31
>> VAQESSN HD+6, MRGECHK+31
>> VAQIDOB EP+8, MRGECHK+12
>> VAQISSN EP+4, EP+7, MRGECHK+11
>> VAQPTNM EP+3, EP+7, HD+4, MRGECHK+10, MRGECHK+31
X INIT+5*, INIT+6*, SETD+3*, SETD+4*, SETD+5*, SETD+7*, SETD+8*, TMP+2, EXIT+4!, MRGECHK+18*
, MRGECHK+19, MRGECHK+25*, MRGECHK+26, MRGECHK+28*, MRGECHK+29, MRGECHK+38*
>> XQORNOD(0 SEL+1, EXP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All