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 |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RACMP1

Package: Radiology Nuclear Medicine

Routine: RACMP1


Information

RACMP1 ;HISC/GJC,RVD-Complication Report (Part 2 of 3) ;05/13/09 11:08

Source Information

Source file <RACMP1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Radiology Nuclear Medicine 3 HEADER^RACMP2  $$EOS^RAUTL5  $$PTSEX^RAUTL8  
Kernel 1 $$FMTE^XLFDT  
VA FileMan 1 $$GET1^DIQ  

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
Radiology Nuclear Medicine 1 RACMP  

Entry Points

Name Comments DBIA/ICR reference
PRINT ; Output subroutine part one
PRT1 ; Output subroutine two
PRSC ;DISPLAY pregnancy screen and comment, patch 99
DIVCHK ; Output statistics within division, check for EOS on division
IMGCHK ; Check for EOS on I-Type

External References

Name Field # of Occurrence
$$GET1^DIQ PRSC+3
HEADER^RACMP2 PRT1+6, PRT1+17, DIVCHK+2, DIVCHK+8, DIVCHK+17, IMGCHK+2, IMGCHK+8, IMGCHK+16
$$EOS^RAUTL5 PRT1+6, PRT1+17, DIVCHK+2, DIVCHK+8, DIVCHK+17, IMGCHK+2, IMGCHK+8, IMGCHK+16
$$PTSEX^RAUTL8 PRSC+1
$$FMTE^XLFDT PRT1+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,RA3,?RATAB(2),RASSN,?RATAB(3),RADATE,?RATAB(4),RAPRC
  • Line Location: PRT1+9
Function Call: WRITE
  • Prompt: ?RATAB(5),"Physician: ",RAPHY,!?RATAB(3),RATME,?RATAB(4),RACOMP
  • Line Location: PRT1+10
Function Call: WRITE
  • Prompt: ?RATAB(5),"Interpreting Res. : ",RARES
  • Line Location: PRT1+11
Function Call: WRITE
  • Prompt: !?RATAB(5),"Staff Imaging Phys. : ",RASTF
  • Line Location: PRT1+12
Function Call: WRITE
  • Prompt: !,RA3,?RATAB(3),RADATE,?RATAB(4),RAPRC,!,RASSN,?RATAB(3),RATME
  • Line Location: PRT1+25
Function Call: WRITE
  • Prompt: ?RATAB(4),RACOMP
  • Line Location: PRT1+26
Function Call: WRITE
  • Prompt: !?RATAB(1),"Physician: ",RAPHY
  • Line Location: PRT1+27
Function Call: WRITE
  • Prompt: !?RATAB(1),"Interpreting Res. : ",RARES
  • Line Location: PRT1+28
Function Call: WRITE
  • Prompt: !?RATAB(1),"Staff Imaging Phys. : ",RASTF
  • Line Location: PRT1+29
Function Call: WRITE
  • Prompt: !?RATAB(1),"Tech: ",RATECH
  • Line Location: PRT1+33
Function Call: WRITE
  • Prompt: !,RALBL,$E(RACMPTX,1,65)
  • Line Location: PRT1+37
Function Call: WRITE
  • Prompt: !?$L(RALBL),$E(RALBL,66,100)
  • Condition for execution: $E(RALBL,66,100)]""
  • Line Location: PRT1+38
Function Call: WRITE
  • Prompt: !,RALN1
  • Line Location: PRT1+38
Function Call: WRITE
  • Prompt: !!?5,"Division: "_RADIV("X")
  • Line Location: DIVCHK+3
Function Call: WRITE
  • Prompt: !,"Complications: ",+$G(^TMP($J,"RACOMP",RADIV))
  • Line Location: DIVCHK+4
Function Call: WRITE
  • Prompt: " Exams: ",+$G(^TMP($J,"RAEXAM",RADIV))," % Complications: "
  • Line Location: DIVCHK+5
Function Call: WRITE
  • Prompt: "0"
  • Line Location: DIVCHK+6
Function Call: WRITE
  • Prompt: $J((+$G(^TMP($J,"RACOMP",RADIV))/+$G(^TMP($J,"RAEXAM",RADIV)))*100,6,2)
  • Line Location: DIVCHK+7
Function Call: WRITE
  • Prompt: !,"Contrast Media Complications: ",+$G(^TMP($J,"RACMRE",RADIV))
  • Line Location: DIVCHK+9
Function Call: WRITE
  • Prompt: " C.M. Exams: ",+$G(^TMP($J,"RACOMP",RADIV))
  • Line Location: DIVCHK+10
Function Call: WRITE
  • Prompt: " % C.M. Comp.: "
  • Line Location: DIVCHK+11
Function Call: WRITE
  • Prompt: "0"
  • Line Location: DIVCHK+12
Function Call: WRITE
  • Prompt: $J((+$G(^TMP($J,"RACMRE",RADIV))/+$G(^TMP($J,"RACOMP",RADIV)))*100,6,2)
  • Line Location: DIVCHK+13
Function Call: WRITE
  • Prompt: !,"Complications: ",+$G(^TMP($J,"RACOMP",RADIV,RAITYPE))
  • Line Location: IMGCHK+3
Function Call: WRITE
  • Prompt: " Exams: ",+$G(^TMP($J,"RAEXAM",RADIV,RAITYPE))
  • Line Location: IMGCHK+4
Function Call: WRITE
  • Prompt: " % Complications: "
  • Line Location: IMGCHK+5
Function Call: WRITE
  • Prompt: "0"
  • Line Location: IMGCHK+6
Function Call: WRITE
  • Prompt: $J((+$G(^TMP($J,"RACOMP",RADIV,RAITYPE))/+$G(^TMP($J,"RAEXAM",RADIV,RAITYPE)))*100,6,2)
  • Line Location: IMGCHK+7
Function Call: WRITE
  • Prompt: !,"Contrast Media Complications: ",+$G(^TMP($J,"RACMRE",RADIV,RAITYPE))
  • Line Location: IMGCHK+9
Function Call: WRITE
  • Prompt: " C.M. Exams: ",+$G(^TMP($J,"RACOMP",RADIV,RAITYPE))
  • Line Location: IMGCHK+10
Function Call: WRITE
  • Prompt: " % C.M. Comp.: "
  • Line Location: IMGCHK+11
Function Call: WRITE
  • Prompt: "0"
  • Line Location: IMGCHK+12
Function Call: WRITE
  • Prompt: $J((+$G(^TMP($J,"RACMRE",RADIV,RAITYPE))/+$G(^TMP($J,"RACOMP",RADIV,RAITYPE)))*100,6,2)
  • Line Location: IMGCHK+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAO(75.1 - [#75.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] PRINT+4, DIVCHK+15
^RADPT - [#70] PRT1+13, PRT1+14, PRT1+15, PRT1+30, PRT1+31, PRSC+2, PRSC+4, PRSC+5
^TMP($J PRINT+3, PRINT+5, PRINT+7, PRINT+9, PRINT+11, PRINT+12, DIVCHK+4, DIVCHK+5, DIVCHK+6, DIVCHK+7
DIVCHK+9, DIVCHK+10, DIVCHK+12, DIVCHK+13, DIVCHK+14, DIVCHK+16, IMGCHK+3, IMGCHK+4, IMGCHK+6, IMGCHK+7
IMGCHK+9, IMGCHK+10, IMGCHK+12, IMGCHK+13, IMGCHK+14
^VA(200 - [#200] PRT1+16, PRT1+32

Label References

Name Line Occurrences
DIVCHK PRINT+19
IMGCHK PRINT+17
PRSC PRT1+21, PRT1+36
PRT1 PRINT+13

Naked Globals

Name Field # of Occurrence
^( PRT1+31

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
I PRINT+1~, PRT1+1*, PRT1+2, PRT1+13*, PRT1+14*, PRT1+15, PRT1+30*, PRT1+31*
IOM PRT1+8
IOSL PRT1+5, PRT1+17, DIVCHK+2, DIVCHK+8, IMGCHK+2, IMGCHK+8
IOST PRT1+6, DIVCHK+17, IMGCHK+16
J PRINT+1~, PRT1+15*, PRT1+16, PRT1+31*, PRT1+32
R3 PRSC+4~*, PRSC+6, PRSC+7
>> RA0 PRINT+12*, PRINT+13, PRT1+2
>> RA1 PRINT+2*, PRINT+3*, PRINT+4, PRINT+5, PRINT+7, PRINT+9, PRINT+11, PRINT+12, DIVCHK+14, IMGCHK+14
RA10 IMGCHK+1~, IMGCHK+14*, IMGCHK+15
>> RA2 PRINT+4*, PRINT+5*, PRINT+6, PRINT+7, PRINT+9, PRINT+11, PRINT+12, IMGCHK+14
>> RA3 PRINT+6*, PRINT+7*, PRINT+9, PRINT+11, PRINT+12, PRT1+9, PRT1+25
>> RA4 PRINT+8*, PRINT+9*, PRINT+11, PRINT+12, PRT1+4
>> RA5 PRINT+10*, PRINT+11*, PRINT+12, PRT1+13, PRT1+14, PRT1+15, PRT1+30, PRT1+31, PRSC+2, PRSC+4
PRSC+5
RA6 DIVCHK+1~, DIVCHK+14*, DIVCHK+15
RA7 DIVCHK+16~*
>> RACMPTX PRT1+22, PRT1+37
>> RACOMP PRT1+10, PRT1+26
RADATE PRINT+1~, PRT1+4*, PRT1+9, PRT1+25
>> RADFN PRT1+13, PRT1+14, PRT1+15, PRT1+30, PRT1+31, PRSC+1, PRSC+2, PRSC+4, PRSC+5
>> RADIV PRINT+4*, DIVCHK+4, DIVCHK+5, DIVCHK+6, DIVCHK+7, DIVCHK+9, DIVCHK+10, DIVCHK+12, DIVCHK+13, DIVCHK+15*
DIVCHK+16, IMGCHK+3, IMGCHK+4, IMGCHK+6, IMGCHK+7, IMGCHK+9, IMGCHK+10, IMGCHK+12, IMGCHK+13
>> RADIV("X" PRINT+4*, DIVCHK+3, DIVCHK+15*
RAINVDT PRINT+1~, PRT1+4*, PRT1+13, PRT1+14, PRT1+15, PRT1+30, PRT1+31, PRSC+2, PRSC+4, PRSC+5
>> RAITYPE PRINT+6*, DIVCHK+16*, IMGCHK+3, IMGCHK+4, IMGCHK+6, IMGCHK+7, IMGCHK+9, IMGCHK+10, IMGCHK+12, IMGCHK+13
IMGCHK+15*
RALBL PRINT+1~, PRINT+2*, PRT1+22, PRT1+37, PRT1+38
>> RALN PRINT+2
RALN1 PRINT+1~, PRINT+2*, PRT1+22, PRT1+38
RAOR751 PRSC+2~*, PRSC+3
RAPCOMM PRSC+4~, PRSC+5*, PRSC+7
>> RAPHY PRT1+10, PRT1+27
>> RAPRC PRT1+9, PRT1+25
>> RARES PRT1+11, PRT1+28
>> RASSN PRT1+9, PRT1+25
>> RASTF PRT1+12, PRT1+29
>> RATAB(1 PRT1+27, PRT1+28, PRT1+29, PRT1+33
>> RATAB(2 PRT1+9
>> RATAB(3 PRT1+9, PRT1+10, PRT1+25
>> RATAB(4 PRT1+9, PRT1+10, PRT1+25, PRT1+26
>> RATAB(5 PRT1+10, PRT1+11, PRT1+12, PRT1+18
RATECH PRINT+1~, PRT1+16*, PRT1+18, PRT1+32*, PRT1+33
>> RATME PRT1+10, PRT1+25
>> RAXIT PRINT+3, PRINT+5, PRINT+7, PRINT+9, PRINT+11, PRINT+17, PRINT+19, PRT1+5, PRT1+6*, PRT1+13
PRT1+14, PRT1+17*, PRT1+18, PRT1+22, DIVCHK+2*, DIVCHK+8*, DIVCHK+17*, IMGCHK+2*, IMGCHK+8*, IMGCHK+16*
U PRSC+2, PRSC+6, PRSC+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All