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

Package: Radiology Nuclear Medicine

Routine: RASTRPT1


Information

RASTRPT1 ;HISC/SS-Status Tracking Statistics Report ;4/28/00 10:00

Source Information

Source file <RASTRPT1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Radiology Nuclear Medicine 4 $$NAMCODE^RACPTMSC  MINUTS^RAUTL1  $$EOS^RAUTL5  STOPCHK^RAUTL9  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RASTRPT  

Entry Points

Name Comments DBIA/ICR reference
HDR3 ; Header for detailed report by requesting locations
GETLOC() ;P20 by SS
ISTHERE(RAIM,RADV,RALOC) ;Does this requesting location have exams is in ^TMP($J..)
CPT
RPTP20 ;P20, create report by requesting locations from ^TMP with proc details
SUM2
SUM1
STRT
RPTP20S ;P20, create report by requesting locations from ^TMP proc summary
LST
BP2
PUTNOST(RAIM1,RADV1,RA20J) ;P20 by SS Display all locations which have not exams
DET1
GETPROC() ;P20 by SS
DET2
PROC

External References

Name Field # of Occurrence
$$NAMCODE^RACPTMSC CPT+1
MINUTS^RAUTL1 DET1+3, DET2+1, SUM1+2, SUM2+3
$$EOS^RAUTL5 DET1+4, DET2+2, SUM1+3, SUM2+4, SUM2+8, STRT+2, LST
STOPCHK^RAUTL9 HDR3+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR3+2
Function Call: WRITE
  • Prompt: !,?20,"** Status Tracking Statistics Report **",?71,"Page: ",$J(RAPG,3)
  • Line Location: HDR3+3
Function Call: WRITE
  • Prompt: !,?20,"Procedure Detail by Requesting Location"
  • Line Location: HDR3+4
Function Call: WRITE
  • Prompt: !,?19,"Division Summary Requesting Location Details"
  • Line Location: HDR3+5
Function Call: WRITE
  • Prompt: !?14,"(Only requesting locations with data are included)"
  • Line Location: HDR3+6
Function Call: WRITE
  • Prompt: !!,?2,"Run Date: ",$E(DT,4,5),"/",$E(DT,6,7),"/",$E(DT,2,3)
  • Line Location: HDR3+7
Function Call: WRITE
  • Prompt: ?42,"For Period: ",$E(BEGDATE,4,5),"/",$E(BEGDATE,6,7),"/",$E(BEGDATE,2,3)," - ",$E(ENDDATE,4,5),"/",$E(ENDDATE,6,7),"/",$E(ENDDATE,2,3)
  • Line Location: HDR3+8
Function Call: WRITE
  • Prompt: !?2,"Division: ",$E($P($G(RACCESS(DUZ,"DIV",RADV,+$O(RACCESS(DUZ,"DIV",RADV,0)))),U,2),1,25),?40,"Imaging Type: ",$E(RAIMAGE(0),1,25)
  • Line Location: HDR3+9
Function Call: WRITE
  • Prompt: !?2,"Requesting Location: ",$E(RARL,1,76)
  • Line Location: HDR3+11
Function Call: WRITE
  • Prompt: !!,?10,"From: ",$S($D(^RA(72,+RAFR,0)):$P(^(0),"^"),1:"Unknown"),!,?10,"To : ",$S($D(^RA(72,+RATO,0)):$P(^(0),"^"),1:"Unknown")
  • Line Location: HDR3+12
Function Call: WRITE
  • Prompt: !,?33,"Minimum",?45,"Maximum",?57,"Average",!,?34,"Time",?46,"Time",?58,"Time",?67,"Number of",!
  • Line Location: HDR3+13
Function Call: WRITE
  • Prompt: ?4,"Procedure (CPT)"
  • Line Location: HDR3+14
Function Call: WRITE
  • Prompt: ?31,"(DD:HH:MM)",?43,"(DD:HH:MM)",?55,"(DD:HH:MM)",?67,"Procedures"
  • Line Location: HDR3+15
Function Call: WRITE
  • Prompt: !,?4,"---------------"
  • Line Location: HDR3+16
Function Call: WRITE
  • Prompt: !?31,"----------",?43,"----------",?55,"----------",?67,"----------",!
  • Line Location: HDR3+17
Function Call: WRITE
  • Prompt: !
  • Line Location: DET1+0
Function Call: WRITE
  • Prompt: RACPT
  • Line Location: DET1+1
Function Call: WRITE
  • Prompt: ?32,$P(RAPROC,"^",4),?44,$P(RAPROC,"^",2)
  • Line Location: DET1+2
Function Call: WRITE
  • Prompt: ?56,Y,?70,$J($P(RAPROC,"^",5),5)
  • Line Location: DET1+3
Function Call: WRITE
  • Prompt: !,?31,"----------",?43,"----------",?55,"----------",?67,"----------",!,?4,"Overall:"
  • Line Location: DET2+0
Function Call: WRITE
  • Prompt: ?32,$P(RASUM,"^",4),?44,$P(RASUM,"^",2)
  • Line Location: DET2+0
Function Call: WRITE
  • Prompt: ?56,Y,?70,$J($P(RASUM,"^",5),5)
  • Line Location: DET2+1
Function Call: WRITE
  • Prompt: !,?4,"From: ",$S($D(^RA(72,RAFR,0)):$P(^(0),"^"),1:"Unknown"),!,?4,"To : ",$S($D(^RA(72,+RATO,0)):$P(^(0),"^"),1:"Unknown")
  • Line Location: SUM1+0
Function Call: WRITE
  • Prompt: ?32,$P(RASUM,"^",4),?44,$P(RASUM,"^",2)
  • Line Location: SUM1+1
Function Call: WRITE
  • Prompt: ?56,Y,?70,$J($P(RASUM,"^",5),5),!
  • Line Location: SUM1+2
Function Call: WRITE
  • Prompt: !,?31,"----------",?43,"----------",?55,"----------",?67,"----------",!,?4,"From: ",$S($D(^RA(72,+RA(1),0)):$P(^(0),"^"),1:"Unknown"),!,?4,"To : ",$S($D(^RA(72,+RA,0)):$P(^(0),"^"),1:"Unknown")
  • Line Location: SUM2+0
Function Call: WRITE
  • Prompt: ?32,$P(RACOMP,"^",4),?44,$P(RACOMP,"^",2)
  • Line Location: SUM2+1
Function Call: WRITE
  • Prompt: ?56,Y
  • Line Location: SUM2+3
Function Call: WRITE
  • Prompt: !!?4,"Total number of exams moved to a status of COMPLETE"
  • Line Location: SUM2+5
Function Call: WRITE
  • Prompt: !?4,"for period ",$E(BEGDATE,4,5),"/",$E(BEGDATE,6,7),"/",$E(BEGDATE,2,3)," - ",$E(ENDDATE,4,5),"/",$E(ENDDATE,6,7),"/",$E(ENDDATE,2,3),": ",?70,$J(RAZZSS1,5)
  • Line Location: SUM2+6
Function Call: WRITE
  • Prompt: !?2,RA20B,!?2,RA20C
  • Line Location: STRT+0
Function Call: WRITE
  • Prompt: !?2,RA20A
  • Line Location: STRT+2
Function Call: WRITE
  • Prompt: !?2,RA20B,!?2,RA20C
  • Line Location: STRT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(72 - [#72] HDR3+12, SUM1, SUM2
^RAMIS(71 - [#71] CPT
^TMP( STRT+2
^TMP($J RPTP20+4, RPTP20+5, RPTP20+7, RPTP20S+5, RPTP20S+6, RPTP20S+8, PROC, PROC+1, PROC+2, SUM2+1
, SUM2+2, SUM2+7, ISTHERE+3

Label References

Name Line Occurrences
$$ISTHERE STRT+2
CPT DET1+1
DET1 PROC
DET2 PROC+2
HDR3 RPTP20+7, RPTP20S+5, DET1+4, SUM1+3, SUM2+4, STRT, STRT+2
LST STRT+2
PROC RPTP20+7
PUTNOST RPTP20+11
RPTP20S RPTP20+10
STRT LST+2
SUM1 RPTP20S+8
SUM2 BP2

Naked Globals

Name Field # of Occurrence
^("COMPLETE" SUM2+1
^(0 HDR3+12, SUM1, SUM2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BEGDATE HDR3+8, SUM2+6
DT HDR3+7, CPT+1
DUZ HDR3+9
>> ENDDATE HDR3+8, SUM2+6
I1 RPTP20S+3~
I2 RPTP20S+3~
IOF HDR3+1, HDR3+2
IOSL DET1+4, SUM1+3, SUM2+4, STRT+2
IOST HDR3+1, HDR3+2, DET1+4, DET2+2, SUM1+3, SUM2+4, SUM2+8, STRT+2, LST
>> RA SUM2
>> RA(1 SUM2
RA20 GETLOC+1~*, GETLOC+2, GETLOC+3, GETLOC+4, GETPROC+1~*, GETPROC+2*, GETPROC+3*, GETPROC+4
RA20A PUTNOST+1~, STRT+1*, STRT+2*, ISTHERE+1~, ISTHERE+2*, ISTHERE+3*
RA20B PUTNOST+1~, PUTNOST+3*, STRT, STRT+2, ISTHERE+1~, ISTHERE+2*, ISTHERE+3*, ISTHERE+4
RA20C PUTNOST+1~, PUTNOST+3*, STRT, STRT+2, ISTHERE+1~
RA20FL PUTNOST+1~, PUTNOST+3*, STRT+2*, LST+1
RA20J PUTNOST~, STRT+2
RA20PASS PUTNOST+1~, PUTNOST+3*, STRT, STRT+2, LST, LST+1, LST+2*
>> RA20RLOC RPTP20+11, HDR3+6, GETLOC+2, GETLOC+3
>> RACCESS( HDR3+9
>> RACOMP SUM2+1*, SUM2+3
>> RACPT DET1+1, CPT*, CPT+1, CPT+2*
>> RACTR HDR3+18*, DET1+3*, SUM1+2*
RADV RPTP20+2, RPTP20S+2, HDR3+9, ISTHERE~, ISTHERE+3
RADV1 RPTP20+2~*, RPTP20+4, RPTP20+5, RPTP20+7, RPTP20+11, RPTP20S+2~*, RPTP20S+5, RPTP20S+6, RPTP20S+8, PROC
, PROC+1, PROC+2, SUM2+1, SUM2+2, SUM2+7, PUTNOST~, STRT+2
>> RAFR RPTP20+5*, RPTP20+7, RPTP20S+6*, RPTP20S+8, HDR3+12, PROC, PROC+1, PROC+2, SUM1
RAIM ISTHERE~, ISTHERE+3
RAIM1 PUTNOST~, STRT+2
>> RAIMAGE RPTP20+4, RPTP20+5, RPTP20+7, RPTP20+11, RPTP20S+5, RPTP20S+6, RPTP20S+8, PROC, PROC+1, PROC+2
, SUM2+1, SUM2+2
>> RAIMAGE(0 HDR3+9
RALOC ISTHERE~, ISTHERE+3
>> RAPG HDR3+1*, HDR3+2, HDR3+3
>> RAPRC PROC*, CPT
RAPROC PROC*, DET1+2, DET1+3, DET1+5!
>> RAPROCED GETPROC+2, GETPROC+3
RARL RPTP20+1~, RPTP20+2*, RPTP20+4*, RPTP20+5, RPTP20+7, RPTP20S+1~, RPTP20S+2*, RPTP20S+5*, RPTP20S+6, RPTP20S+8
, HDR3+11, PROC, PROC+1, PROC+2, SUM2+1, SUM2+2
RASUM RPTP20S+8*, PROC+2*, DET2, DET2+1, DET2+3!, SUM1+1, SUM1+2, SUM1+4!
>> RATO RPTP20+6*, RPTP20+7*, RPTP20S+7*, RPTP20S+8*, HDR3+12, PROC, PROC+1, PROC+2, SUM1
>> RAXIT RPTP20+4, RPTP20+5, RPTP20+7, RPTP20S+5, RPTP20S+6, RPTP20S+8, BP2, HDR3+19*, PROC, PROC+1
, DET1+4*, DET2+2*, SUM1+3*, SUM2+4*, SUM2+8*, STRT+2*, LST*
RAZZSS1 SUM2+2~*, SUM2+6
RAZZSSFL RPTP20+3~*, RPTP20S+4~*, HDR3+4, HDR3+10, HDR3+12, HDR3+14, HDR3+16, HDR3+18, DET1+1, PUTNOST+2*
RAZZZ CPT+1*, CPT+2, CPT+3!
U HDR3+9
>> X DET1+3*, DET2+1*, SUM1+2*, SUM2+3*
>> Y DET1+3, DET2+1, SUM1+2, SUM2+3
>> ZTQUEUED HDR3+19
>> ZTSTOP HDR3+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All