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

Package: Imaging

Routine: MAGDRA1


Information

MAGDRA1 ;WOIFO/LB,JSL,SAF -Routine for DICOM fix ; 09/15/2004 13:34

Source Information

Source file <MAGDRA1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Imaging 2 ($$IMG,$$LCASE,$$PROC,$$PTINFO,MAGDY)^MAGDRA2  $$PIDLABEL^MAGSPID  
Kernel 1 $$FMTE^XLFDT  
Radiology Nuclear Medicine 1 EN1^RAUTL20  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Imaging 1 MAGDRA2  

Entry Points

Name Comments DBIA/ICR reference
LOOP ;Loop thru ^TMP($J,"RAE1" global
PRT ;
HEAD ;
SEL ;
SET ;
CHECK ;

External References

Name Field # of Occurrence
^DIR SEL+7
$$IMG^MAGDRA2 PRT+4
$$LCASE^MAGDRA2 LOOP+17, LOOP+31
$$PROC^MAGDRA2 SET+3
$$PTINFO^MAGDRA2 LOOP+36
MAGDY^MAGDRA2 SET+7
$$PIDLABEL^MAGSPID HEAD+1
EN1^RAUTL20 LOOP+20
$$FMTE^XLFDT LOOP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?1,ENTRIES,?5,PSET,?6,CASE_$$IMG^MAGDRA2(RARPT),?12,$E(PROC,1,28)
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: ?41,DATE,?52,$E(ESTAT,1,12),?67,$E(LOC,1,12)
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: @IOF,"Patient: ",MAGNME,?50,$$PIDLABEL^MAGSPID(),": ",MAGPID
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!,?3,"Case #",?12,"Procedure",?41,"Exam Date",?52,"Status of"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: "Exam",?69,"Imaging Loc"
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !?3,"--------",?12,"-------------",?41,"---------"
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: ?52,"--------------",?67,"-----------"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !,"There is a database problem with the entry selected.",!
  • Line Location: CHECK+7
Function Call: WRITE
  • Prompt: !,"There are no procedures for the entry selected.",!
  • Line Location: CHECK+11
Routine Call
  • DIR
  • Line Location:
    • SEL+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RADPT - [#70] CHECK+5
^TMP($J LOOP+3, LOOP+9, LOOP+10, LOOP+27, LOOP+28

Label References

Name Line Occurrences
CHECK SEL+10
HEAD PRT+2, PRT+3
PRT LOOP+41
SEL LOOP+43, PRT+6, SEL+10
SET LOOP+43

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CASE LOOP+4~, LOOP+13*, LOOP+17, LOOP+32, PRT+4
CCASE LOOP+4~
CDATE LOOP+4~, LOOP+11*, LOOP+12, LOOP+17, LOOP+29*, LOOP+30*, LOOP+31
CNI CHECK+2~, CHECK+4*, CHECK+5
CODE LOOP+4~
DATA LOOP+4~, LOOP+10*, LOOP+13, LOOP+14, LOOP+15, SET+1*
DATE LOOP+4~, LOOP+11*, LOOP+12*, PRT+5
DIR SEL+1~
DIR("?" SEL+3*, SEL+4*
DIR("A" SEL+5*, SEL+6*
DIR(0 SEL+2*
>> DTOUT SEL+8
>> DUOUT SEL+8
ENTRIES LOOP+4~, LOOP+8*, LOOP+10*, LOOP+39, PRT+2, PRT+4, PRT+5, SEL+2, SEL+3
ENTRY LOOP+4~, LOOP+8*, LOOP+9*, LOOP+10, LOOP+11, LOOP+16, LOOP+26, LOOP+29
ERR LOOP+4~
ESTAT LOOP+4~, LOOP+14*, PRT+5
INDEX LOOP+4~
INDEX( LOOP+39*, LOOP+43, SEL+10, SEL+11, SET+2, SET+3, SET+4, SET+5, SET+6, CHECK+4
, CHECK+9
IOF HEAD+1
IOSL PRT+3
LOC LOOP+5~, LOOP+14*, PRT+5
MAGCASE LOOP+5~, LOOP+17*, LOOP+28*, LOOP+31*, LOOP+39, SET+2*
MAGCNI LOOP+5~, SET+6*
MAGCPT LOOP+5~
>> MAGDFN LOOP+3, LOOP+9, LOOP+10, LOOP+16, LOOP+27, LOOP+28, CHECK+3, CHECK+5
MAGDTI LOOP+5~, SET+4*
>> MAGNME LOOP+35, LOOP+37*, HEAD+1
>> MAGPID LOOP+35, LOOP+37*, HEAD+1
MAGPIEN LOOP+5~, SET+3*
MAGPRC LOOP+5~, SET+3*
MAGPSET LOOP+5~, LOOP+21*, LOOP+32*, LOOP+39
MAGPST LOOP+5~, SET+5*
OLDCNI LOOP+6~, LOOP+22*, LOOP+24*, LOOP+25, LOOP+26, LOOP+30
OLDDT LOOP+6~, LOOP+8*, LOOP+22, LOOP+41*
OLDENTRY LOOP+6~, LOOP+26~*, LOOP+27, LOOP+28, LOOP+30
OUT LOOP+6~, LOOP+9, LOOP+43, LOOP+44!, SEL+9*, SEL+11*
PROC LOOP+6~, LOOP+13*, LOOP+39, PRT+4
PSET LOOP+6~, LOOP+21*, LOOP+23*, LOOP+24, LOOP+25, PRT+4
PTINFO LOOP+6~, LOOP+36*, LOOP+37
RACNI LOOP+6~, LOOP+16*, LOOP+24, LOOP+30*, LOOP+39
RADFN LOOP+6~, LOOP+16*
RADTI LOOP+6~, LOOP+16*, LOOP+22, LOOP+30*, LOOP+39, LOOP+41, CHECK+2~, CHECK+4*, CHECK+5
RAMELOW LOOP+7~, LOOP+19!
>> RAMEMLOW LOOP+23
RAPRTSET LOOP+7~, LOOP+19!, LOOP+23
RARPT LOOP+6~, LOOP+15*, PRT+4
REIN LOOP+7~
STAT LOOP+7~, LOOP+13*, LOOP+14
X LOOP+7~, LOOP+43, PRT+1*, SET+2, SET+3, SET+4, SET+5, SET+6
Y LOOP+7~, PRT+1*, SEL+10, SEL+11*, SET+1!, CHECK+4, CHECK+6*, CHECK+9, CHECK+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All