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

Package: Radiology Nuclear Medicine

Routine: RAPRC1


Information

RAPRC1 ;HISC/FPT AISC/MJK-Procedure Workload Report ;10/21/97 09:08

Source Information

Source file <RAPRC1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Radiology Nuclear Medicine 3 (CLOSE,D)^RAUTL  $$EOS^RAUTL5  STOPCHK^RAUTL9  
Kernel 1 $$REPEAT^XLFSTR  
VA FileMan 1 ^%DT  

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 RAPRC  

Entry Points

Name Comments DBIA/ICR reference
Q ; kill variables, close device
RAMIS
PRT
PRT1
HD
DIV
DIV1
SAVEONE ; Save off the I-Type

External References

Name Field # of Occurrence
^%DT RAPRC1+5
CLOSE^RAUTL Q+5
D^RAUTL RAPRC1+3, RAPRC1+4, RAPRC1+5
$$EOS^RAUTL5 PRT+3, PRT1, DIV+6, DIV1
STOPCHK^RAUTL9 HD+7
$$REPEAT^XLFSTR RAPRC1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: Q+5
Function Call: WRITE
  • Prompt: !!?2,$S($D(RASUM):"DIVISION",1:"AMIS CATEGORY")," TOTALS",?35,$J(IN,5),?42,$J(OUT,5),?49,$J(TOT,5),?63,$J(WWU,5)
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !?2,RAPRC,?35,$J(RAIN,5),?42,$J(RAOUT,5),?49,$J(RATOT,5),?56,$J($S(TOT:(100*RATOT)/TOT,1:0),5,1),?63,$J(RAWWU,5),?70,$J($S(WWU:(RAWWU*100)/WWU,1:0),5,1)
  • Line Location: PRT1+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y>0
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !?9,">>>>> Detailed Procedure Workload Report <<<<<"
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: ?70,"Page: ",PAGE
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !!?5,"Division: ",RAY
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !?1,"Imaging Type: ",RAITYPE,?52,"For period: "
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: ?64,BEGDATE,?76,"to",!?5,"Run Date: ",RARUNDTE,?64,ENDDATE
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!?40,$S(RAMIS="MULP":"No. of Series",1:"Examinations"),?56,"Percent",?70,"Percent"
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,RA80DASH
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !!?2,"DIVISION TOTALS",?35,$J(IN,5),?42,$J(OUT,5),?49,$J(TOT,5),?63,$J(WWU,5)
  • Line Location: DIV+2
Function Call: WRITE
  • Prompt: !!,RA80DASH
  • Line Location: DIV+3
Function Call: WRITE
  • Prompt: !,$J($S(RAMIS:RAMIS,1:" "),2),"-",$E($S($D(^RAMIS(71.1,RAMIS,0)):$P(^(0),"^"),RAMIS="MULP":"SERIES OF AMIS CODES",1:"UNKNOWN"),1,30)
  • Line Location: DIV1+1
Function Call: WRITE
  • Prompt: ?35,$J(RAIN,5),?42,$J(RAOUT,5),?49,$J(RATOT,5),?56,$S(RAMIS="MULP":"",1:$J($S(TOT:(100*RATOT)/TOT,1:0),5,1)),?63,$J(RAWWU,5),?70,$J($S(WWU:(RAWWU*100)/WWU,1:0),5,1)
  • Line Location: DIV1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] RAPRC1+7
^RA(79.2 - [#79.2] SAVEONE+2
^RAMIS(71.1 - [#71.1] HD+6, DIV1+1
^TMP($J RAPRC1+7, Q+1!, RAMIS, PRT+1, DIV+1, DIV+4, DIV+6, SAVEONE+1, SAVEONE+3*

Label References

Name Line Occurrences
DIV RAPRC1+7
DIV1 DIV+1, DIV+4
HD RAPRC1+7, RAMIS, PRT1, DIV1
PRT RAMIS
PRT1 PRT+1
RAMIS RAPRC1+7

Naked Globals

Name Field # of Occurrence
^( RAPRC1+7, RAMIS, PRT+1, DIV+1, DIV+4
^(0 RAPRC1+7, HD+6, DIV1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT RAPRC1+5*!, Q+2!
A Q+2!
A1 Q+2!
BEGDATE RAPRC1+3*, Q+2!, HD+2
C Q+2!
DDH Q+2!
DUOUT Q+6!
ENDDATE RAPRC1+4*, Q+2!, HD+2
I Q+2!, PRT+1*, DIV+1*
IN Q+2!, PRT*, PRT+2, DIV*, DIV+2
IOF HD
IOSL PRT1, DIV1
J Q+2!, RAMIS*
OUT Q+2!, PRT*, PRT+2, DIV*, DIV+2
PAGE RAPRC1+6*, Q+2!, HD*
POP Q+6!
RA80DASH RAPRC1+6*, Q+2!, HD+5, DIV+3
RABEG Q+2!
RACCESS Q+4!
RACNI Q+2!
RACRT Q+2!
RAD0 Q+2!
RADFN Q+2!
RADIV RAPRC1+7*, Q+2!, RAMIS, PRT+1, DIV+1, DIV+4, DIV+6
RADTE Q+2!
RADTI Q+2!
RAEND Q+2!
RAEOS RAPRC1+6*, RAPRC1+7, Q+2!, RAMIS, PRT+3*, PRT1*, HD+7*, DIV+1, DIV+4, DIV+5
, DIV+6*, DIV1*
RAFL Q+2!
RAI Q+2!
RAIN Q+2!, PRT+1*, PRT1+1, DIV+1*, DIV+4*, DIV1+2
RAITNUM Q+2!, SAVEONE+1*, SAVEONE+2, SAVEONE+3
RAITYPE Q+2!, HD+2, SAVEONE+2*, SAVEONE+3
RAMES Q+6!
RAMIS Q+2!, RAMIS*, PRT+1, HD+3, HD+4, HD+6, DIV+1*, DIV+4*, DIV1+1, DIV1+2
RAMUL Q+2!
RANUM Q+3!
RAOR Q+3!
RAOUT Q+3!, PRT+1*, PRT1+1, DIV+1*, DIV+4*, DIV1+2
RAP0 Q+3!
RAPOP Q+3!
RAPORT Q+3!
RAPRC Q+3!, PRT+1*, PRT1+1
RAPRI Q+3!
RAPSTX Q+4!
RAQI Q+3!
RAQUIT Q+3!
RARUNDTE RAPRC1+5*, Q+3!, HD+2
RASTAT Q+3!
RASUM RAPRC1+7*!, Q+3!, PRT+2, HD+4, HD+6
RATOT Q+3!, PRT+1*, PRT1+1, DIV+1*, DIV+4*, DIV1+2
RAWT Q+3!
RAWWU Q+3!, PRT+1*, PRT1+1, DIV+1*, DIV+4*, DIV1+2
RAXIT Q+3!
RAY RAPRC1+7*, Q+3!, HD+1
RAZ RAPRC1+7*, Q+3!
TOT Q+3!, PRT*, PRT+2, PRT1+1, DIV*, DIV+2, DIV1+2
WWU Q+3!, PRT*, PRT+2, PRT1+1, DIV*, DIV+2, DIV1+2
X RAPRC1+5*, Q+3!
Y RAPRC1+3*, RAPRC1+4*, RAPRC1+5, Q+3!, PRT+1*, DIV+1*, DIV+4*
Z RAPRC1+7*, Q+3!, RAMIS*, PRT, DIV
ZTDESC Q+6!
>> ZTQUEUED HD+7
ZTSAVE Q+6!
>> ZTSTOP HD+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All