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

Package: Record Tracking

Routine: RTSM4


Information

RTSM4 ;MJK/TROY ISC;Site Manager's Menu(cont); ; 5/15/87 9:01 AM ;

Source Information

Source file <RTSM4.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Record Tracking 5 CREATE^RTQ2  (12,S1943)^RTSM1  (CNT,GET)^RTSM6  ^RTSM61  (CLOSE,DATE,ZIS)^RTUTL  
VA FileMan 3 ^%DT  NOW^%DTC  D^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: 6

Package Total Caller Graph
Record Tracking 5 RT SM-REC-CLINIC-REQUEST  RTSM  RTSM1  RTSM3  RTSM8  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
CHK ;H 3 K I S:$D(^UTILITY("RTDPTSORT","START")) I=$P(^("START"),"^",2) G CHKQ:'$D(I)
CHKQ
XMES ;W !!?3,"Outpatient labels cannot be created until ^UTILITY(""RTDPTSORT"")",!?3,"is totally compiled." Q
MES
16 ;;Initialize Request By Clinics
START
Q16
APP
RTQ
REQ
ONETIM

External References

Name Field # of Occurrence
^%DT 16+1
NOW^%DTC START, START+8
D^DIQ START, START+6, START+8
CREATE^RTQ2 RTQ
12^RTSM1 CHKQ
S1943^RTSM1 ONETIM+5
CNT^RTSM6 RTQ
GET^RTSM6 START
^RTSM61 START+4
CLOSE^RTUTL Q16
DATE^RTUTL 16+1
ZIS^RTUTL 16+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Global compilation seems to be progressing in an ordering fashion.",!?40,"[Current DFN being processed: ",I,"]"
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: " cannot be created until the RECORD TRACKING SORT GLOBAL"
  • Line Location: MES+1
Function Call: WRITE
  • Prompt: !?2,"is totally compiled."
  • Line Location: MES+2
Function Call: WRITE
  • Prompt: @IOF,!,"Clinic Record Requests Initialization Program",!!,"Start Time: ",Y
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !!,"Number of requests made or reaffirmed:"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !?3,Y," = ",$E(RTSCOUNT(RTMASS,Z)_" ",1,6)_$S($D(RTSCOUNT(RTRAD,Z)):" X-ray Requests = "_RTSCOUNT(RTRAD,Z),1:"")
  • Line Location: START+6
Function Call: WRITE
  • Prompt: " 0"
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !!,"Finished Time: ",Y
  • Line Location: START+8
Function Call: WRITE
  • Prompt: "."
  • Line Location: RTQ+0
Function Call: WRITE
  • Prompt: DFN," "
  • Line Location: ONETIM+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(195.4 - [#195.4] START
^DPT - [#2] ONETIM+3
^RTV(194.3 - [#194.3] ONETIM, ONETIM+1, ONETIM+2, ONETIM+4*, ONETIM+7*
^RTV(195.9 - [#195.9] APP, REQ
^SC - [#44] START+2, APP+1, RTQ

Label References

Name Line Occurrences
APP START+2
Q16 16+1, 16+2
RTQ APP+1
START 16+2

Naked Globals

Name Field # of Occurrence
^( APP, APP+1, REQ
^("RAD" START
^(0 START+2, APP, APP+1, REQ, ONETIM*, ONETIM+1*, ONETIM+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % START, START+8
%DT 16+1*!, Q16+1!
%DT(0 16+1*
%I Q16+1!
D0 Q16+1!
DA Q16+1!
DFN Q16!, APP+1*, ONETIM+3*, ONETIM+4, ONETIM+5, ONETIM+6
DIC Q16+1!
DIE Q16+1!
DR Q16+1!
DT 16+1*
IO START
IOF START
>> LDFN ONETIM+3*, ONETIM+6*, ONETIM+7
>> POP 16+2
RTA Q16+1!
>> RTAPL 16+2*
RTAPLX 16+2*!
RTBEG Q16!, APP+1
RTBKGRD START*, START+3*, Q16+1!, RTQ*
>> RTCT ONETIM+3*, ONETIM+6*, ONETIM+7
RTDESC 16+2*, Q16!
>> RTDIV 16+2*
RTDIVX 16+2*!
RTEND 16+1*, Q16!, APP+1
RTEXCLUD Q16!
>> RTIRE MES
RTMAS START+1*, START+3*, Q16!, APP, RTQ*, RTQ+1*, REQ
RTMASS START*, START+1, START+3, START+6, START+7, Q16!, RTQ, RTQ+1
RTPGM 16+2*, Q16!
RTPL Q16!, APP+1*, RTQ
RTRAD START*, START+6, START+7, Q16+1!, RTQ
RTSC START+2*, Q16!, APP, APP+1, RTQ, REQ
RTSCOUNT Q16!
RTSCOUNT( START+6, START+7
RTTM Q16!, APP+1*, RTQ
RTVAR 16+2*, Q16!
SDPL Q16!, RTQ*
SDSC Q16!, RTQ*
SDTTM Q16!, RTQ*
X 16+1*, Q16+1!, APP*, REQ*, ONETIM+5*
Y 16+1, START*, START+6*, START+8*, Q16+1!, REQ*
Z START+6*, Q16!
>> ZTQUEUED RTQ, ONETIM+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All