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

Package: Imaging

Routine: MAGDIR8A


Information

MAGDIR8A ;WOIFO/PMK,JSJ - Read a DICOM image file ; Jul 14, 2021@09:50:40

Source Information

Source file <MAGDIR8A.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Imaging 3 $$GMRCIEN^MAGDFCNV  $$ANPREFIX^MAGDSTAB  ($$ISIHS,DEM)^MAGSPID  
VA FileMan 2 $$FIND1^DIC  $$GET1^DIQ  
Radiology Nuclear Medicine 1 $$ACCFIND^RAAPI  

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

Package Total Caller Graph
Imaging 3 MAGDIR81  MAGDRPC4  MAGVSTDY  

Entry Points

Name Comments DBIA/ICR reference
RADLKUP ; Radiology patient/study lookup -- called by ^MAGDIR81
; (also invoked by ^MAGDEXC4, ^MAGDFND4 and ^MAGDIW1)
RADLKUP1 ; not an entry point
CONLKUP ; CPRS Consult/Procedure patient/study lookup -- called by ^MAGDIR81
LABLKUP ; Lab patient/study lookup -- called by ^MAGDIR81
PIDCHECK() ; compare VistA patient ID with DICOM patient ID
COMPARE(A,B) ; pattern match checker

External References

Name Field # of Occurrence
$$FIND1^DIC LABLKUP+3
$$GET1^DIQ RADLKUP1+24, CONLKUP+4, CONLKUP+6, CONLKUP+10, CONLKUP+11, LABLKUP+4, LABLKUP+5, LABLKUP+9, LABLKUP+11, LABLKUP+12
, LABLKUP+13, LABLKUP+15, LABLKUP+16
$$GMRCIEN^MAGDFCNV CONLKUP+3
$$ANPREFIX^MAGDSTAB RADLKUP1+8
$$ISIHS^MAGSPID PIDCHECK+40
DEM^MAGSPID PIDCHECK+36
$$ACCFIND^RAAPI RADLKUP1+3, RADLKUP1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] GET1^DIQ
^LR - [#63] GET1^DIQ
^LRO(68 - [#68] FIND1^DIC,  GET1^DIQ
68.02 GET1^DIQ
^RA(72 - [#72] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("UPPERCASE" PIDCHECK+9
^RADPT - [#70] RADLKUP1+15, RADLKUP1+17, RADLKUP1+18, RADLKUP1+20, RADLKUP1+22
^RAMIS(71 - [#71] RADLKUP1+27

Label References

Name Line Occurrences
$$COMPARE PIDCHECK+45, PIDCHECK+46, PIDCHECK+47
RADLKUP1 RADLKUP+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A COMPARE~, COMPARE+1, COMPARE+2, COMPARE+5, COMPARE+7, COMPARE+8, COMPARE+9, COMPARE+10, COMPARE+11
ABBR LABLKUP+1~, LABLKUP+2*, LABLKUP+3
>> ACNUMB CONLKUP+3, LABLKUP+2, LABLKUP+12
ANPREFIX RADLKUP1+7~, RADLKUP1+8*, RADLKUP1+9
B COMPARE~, COMPARE+1, COMPARE+2, COMPARE+5, COMPARE+7, COMPARE+8, COMPARE+9, COMPARE+10, COMPARE+11
CASE LABLKUP+1~, LABLKUP+2*, LABLKUP+7
>> CASENUMB RADLKUP1+2, RADLKUP1+3, RADLKUP1+9, PIDCHECK+31
CHECK PIDCHECK+1~, PIDCHECK+45*, PIDCHECK+46*, PIDCHECK+47*, PIDCHECK+48*, PIDCHECK+49
CONPROC CONLKUP+2~, CONLKUP+12*
CPTCODE RADLKUP+5~, RADLKUP1+25*, RADLKUP1+28*
CPTNAME RADLKUP+6~, RADLKUP1+25*, RADLKUP1+29*
>> DATETIME RADLKUP1+20*
>> DCMPID PIDCHECK+40*, PIDCHECK+41*
>> DFN RADLKUP1+17*, CONLKUP+4*, CONLKUP+5, LABLKUP+16*, PIDCHECK+32
DIQUIET PIDCHECK+7~, PIDCHECK+36*
EXAMSTS RADLKUP+7~, RADLKUP1+23*, RADLKUP1+24*, CONLKUP+1~, CONLKUP+6*, CONLKUP+7
>> FIRSTDCM PIDCHECK+12*, PIDCHECK+19*, PIDCHECK+20, PIDCHECK+23*, PIDCHECK+26*, PIDCHECK+46
FIRSTVAH PIDCHECK+2~, PIDCHECK+38*, PIDCHECK+39*, PIDCHECK+46
FMYEAR LABLKUP+1~, LABLKUP+6*, LABLKUP+7
>> GMRCIEN CONLKUP+3*, CONLKUP+4, CONLKUP+6, CONLKUP+10, CONLKUP+11
I RADLKUP+13~, RADLKUP+19*, RADLKUP+20, PIDCHECK+7~, PIDCHECK+29*, COMPARE+4~, COMPARE+6*, COMPARE+7, COMPARE+8, COMPARE+9
, COMPARE+10, COMPARE+11
IDDCM PIDCHECK+3~, PIDCHECK+29*, PIDCHECK+48
IDVAH PIDCHECK+4~, PIDCHECK+40*, PIDCHECK+41*, PIDCHECK+48
IENS LABLKUP+1~, LABLKUP+7*, LABLKUP+9, LABLKUP+11, LABLKUP+12, LABLKUP+13
>> INSTLOC PIDCHECK+36
>> LASTDCM PIDCHECK+12*, PIDCHECK+19*, PIDCHECK+23*, PIDCHECK+45
LASTVAH PIDCHECK+5~, PIDCHECK+38*, PIDCHECK+45
LENGTH COMPARE+4~, COMPARE+5*, COMPARE+6, COMPARE+13
LIST RADLKUP+13~, RADLKUP+18*, RADLKUP+19, RADLKUP+20, RADLKUP1+1~, RADLKUP1+3, RADLKUP1+10
LIST(1 RADLKUP1+13
LRAA LABLKUP+1~, LABLKUP+3*, LABLKUP+4, LABLKUP+5, LABLKUP+7
>> LRDFN LABLKUP+9*, LABLKUP+10, LABLKUP+15, LABLKUP+16
>> LRI LABLKUP+13*
>> LRSS LABLKUP+4*
MATCH COMPARE+4~, COMPARE+5*, COMPARE+7*, COMPARE+8*, COMPARE+9*, COMPARE+10*, COMPARE+11*, COMPARE+13
>> MIDCM PIDCHECK+13*, PIDCHECK+20*, PIDCHECK+24*, PIDCHECK+47
MIVAH PIDCHECK+6~, PIDCHECK+39*, PIDCHECK+47
>> PID PIDCHECK+29
>> PNAMEDCM PIDCHECK+9*, PIDCHECK+11, PIDCHECK+12, PIDCHECK+13, PIDCHECK+15, PIDCHECK+16, PIDCHECK+17*, PIDCHECK+19, PIDCHECK+20, PIDCHECK+23
, PIDCHECK+24
>> PNAMEVAH PIDCHECK+37*, PIDCHECK+38
>> PROCDESC RADLKUP1+25*, RADLKUP1+28*, RADLKUP1+29, CONLKUP+10*, LABLKUP+5*
PROCIEN RADLKUP+8~, RADLKUP1+23*, RADLKUP1+26, RADLKUP1+27
RADATA RADLKUP+16!
RADATA( RADLKUP+21*
RADATA("EXAMSTS" CONLKUP+8*, PIDCHECK+33
RADPT1 RADLKUP+10~, RADLKUP1+14*, RADLKUP1+15, RADLKUP1+17, RADLKUP1+18, RADLKUP1+20, RADLKUP1+22
RADPT2 RADLKUP+11~, RADLKUP1+14*, RADLKUP1+18, RADLKUP1+20, RADLKUP1+22
RADPT3 RADLKUP+12~, RADLKUP1+14*, RADLKUP1+22
RAIX RADLKUP+9~
STRIPPEDCASENUMB RADLKUP1+7~, RADLKUP1+9*, RADLKUP1+10
VA PIDCHECK+7~
VA("PID" PIDCHECK+40
>> VADM(1 PIDCHECK+37
>> VADM(2 PIDCHECK+41
VAERR PIDCHECK+7~
VARIABLE RADLKUP+13~, RADLKUP+20*, RADLKUP+21
X RADLKUP+13~, RADLKUP1+3*, RADLKUP1+5, RADLKUP1+10*, RADLKUP1+13*, RADLKUP1+14, RADLKUP1+17*, RADLKUP1+22*, RADLKUP1+23, PIDCHECK+7~
, PIDCHECK+9*
Y PIDCHECK+7~, PIDCHECK+9
YEAR LABLKUP+1~, LABLKUP+2*, LABLKUP+6
Z RADLKUP+13~, RADLKUP1+27*, RADLKUP1+28, CONLKUP+2~, CONLKUP+11*, CONLKUP+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All