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

Package: Record Tracking

Routine: RTP31


Information

RTP31 ;MJK/TROY ISC,JLU/TROY ISC;Clinic Pull List; ; 5/7/87 12:22 PM ;

Source Information

Source file <RTP31.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Record Tracking 6 (BOR,NAME)^RTB  Q^RTP3  HD^RTP311  BAR^RTP32  ESC^RTRD  LINE^RTUTL3  
VA FileMan 3 (D,Y)^DIQ  ^DIWP  ^DIWW  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Record Tracking 1 RTP3  

Entry Points

Name Comments DBIA/ICR reference
RTQQ
PRT0
POSHD
PRTCHK
HDHCL
Q
PRT
RTQST
RTQ
HCL
HDPQ
COM
HD
HDPULL

External References

Name Field # of Occurrence
D^DIQ PRT+4, HD+1
Y^DIQ PRT+8, HDPULL+3
^DIWP COM+1
^DIWW COM+2
BOR^RTB PRT+6, PRT+7, PRT+8, PRT0
NAME^RTB PRT+3
Q^RTP3 Q
HD^RTP311 HD+3
BAR^RTP32 PRT+12
ESC^RTRD HD
LINE^RTUTL3 PRT+9, HDPQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"No lists needed to be produced."
  • Line Location: RTP31+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: Q+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: ?27,RTYPE
  • Condition for execution: (RTLNME'=RTCNME)!(RTCUR=1) $E(RTCNME,1,20) W:(RTL'=RT)!(RTCUR=1)
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: ?33,$J(RTQ,8),?42,$E(RTQST,1,12),?55,$E(RTQNME,1,15),?72,RTQTIME,?82,$E(RTCLOC,1,18),!
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: ?10,"/",RTHLOC
  • Line Location: PRT+14
Function Call: WRITE
  • Prompt: ?105,$E(Y,1,20),?127,$E(X,1,2)_":"_$E(X,3,4)
  • Line Location: PRT0+0
Function Call: WRITE
  • Prompt: $S($P(RTQ0,"^",6)="x":"[*** CANCELLED ***]",1:""),?67,$S(RTWARD]"":"[Current Ward: "_RTWARD_"]",RTDED]"":"[Deceased: "_RTDED_"]",1:"")
  • Line Location: PRTCHK+1
Function Call: WRITE
  • Prompt: !?5,"[Record Request Pull List, # ",RTJCOM,", for ",RTPNME,$S(RTLIST="U":" *** UPDATE ONLY ***",RTLIST="N":" *** REQUESTS NOT FILLABLE ONLY ***",1:""),"]"
  • Line Location: HDPULL+2
Function Call: WRITE
  • Prompt: " [Pull List Status: ",Y,"]"
  • Line Location: HDPULL+3
Function Call: WRITE
  • Prompt: !!?5,"COMMENT: "
  • Line Location: COM+0
Function Call: WRITE
  • Prompt: !,?5,"[Home location: ",RTHLN,"]",!
  • Line Location: HCL+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(190.1 PRT+8
^DD(194.2 HDPULL+3
^DIC(195.2 - [#195.2] PRT+5
^DPT - [#2] PRT+3, PRT+4
^RT - [#190] RTQST, PRT+6, PRT+7
^RTV(190.1 - [#190.1] PRT+16*
^RTV(194.2 - [#194.2] COM, COM+1
^TMP($J RTP31+2, RTP31+3, RTQ, PRT, PRT+15, HDPULL+3

Label References

Name Line Occurrences
@( PRT
HCL POSHD, HDHCL
HD RTP31+2, POSHD, HDHCL
HDHCL RTP31+3
HDPQ COM, COM+1
HDPULL PRT+1
POSHD RTP31+3
PRT RTQ
PRT0 PRT+15
PRTCHK PRT+15, PRT+16
Q RTP31+2, RTP31+3
RTQ RTP31+3
RTQQ RTQ
RTQST RTQ

Naked Globals

Name Field # of Occurrence
^( RTQST, PRT+3, PRT+4, PRT+15, HDPULL+3, COM+1
^("CL" PRT+6
^("RTRECV" RTP31+2
^("RTSEND" RTP31+2
^(0 PRT+3, PRT+5, PRT+7, COM+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C PRT+8*, HDPULL+3*
>> DIWF COM+1*
>> DIWL COM+1*
IOSL PRT
IOST HD
Q PRT+15*, PRT+17!
Q0 PRT+15*, PRT+17!, PRT0
>> RT RTQST*, PRT, PRT+6, PRT+7, PRT+13, PRT+15, PRT+17
>> RT0 RTQST*, PRT+3, PRT+4, PRT+5
RTC PRT+15*, PRT+16, COM+1*, COM+2!
RTC1 COM+1*, COM+2!
>> RTCLOC PRT+6*, PRT+13
>> RTCNME RTP31+3*, PRT+3*, PRT+9, PRT+13, PRT+14, PRT+17
>> RTCUR RTP31+3*, PRT+13, PRT+14, PRT+17*, HD*
>> RTCUR1 RTP31+3*, POSHD, POSHD+1*
>> RTDED PRT+3*, PRT+4*, PRTCHK, PRTCHK+1
>> RTDIG RTQ*
>> RTDIGIT RTP31+2*, RTP31+3*, RTQ*
RTESC RTP31+3, RTQ, PRT, HD!
>> RTHD RTP31+2*, PRT
>> RTHL RTP31+2*, RTP31+3*, RTQ, HDPULL+3, HCL, HCL+1, POSHD, HDHCL
>> RTHL1 RTP31+3*
>> RTHLN HCL*, HCL+1*, HCL+3
>> RTHLOC PRT+7*, PRT+14
>> RTJCOM RTQST*, HDPULL+2
>> RTL RTP31+3*, PRT+13, PRT+15, PRT+17*
>> RTLIST PRT+16, HDPULL+2
>> RTLNME RTP31+3*, PRT+9, PRT+13, PRT+14, PRT+17*
>> RTPAGE RTP31+2*, HD, HD+1*
>> RTPGFL RTP31+2*, RTP31+3*, HDHCL
>> RTPNME RTP31+2*, RTP31+3*, RTQ, HDPULL+1, HDPULL+2, HDPULL+3
>> RTPULL HDPULL+1, COM, COM+1
>> RTQ RTQ*, RTQST, PRT+13, PRT+15, PRT+16
>> RTQ0 RTQST*, PRT+8, PRTCHK, PRTCHK+1
RTQDT PRT+15*, PRT+17!
>> RTQNME PRT+8*, PRT+13
>> RTQST PRT+8*, PRT+13
>> RTQTIME PRT+8*, PRT+13
>> RTRDT PRT+16, HD+1
>> RTSORT PRT+14, PRT+16
>> RTTASK PRT, PRT+9, PRT+12, HD+2, HDPULL, HDPQ, HCL+2
>> RTTD PRT+3*, PRT+14
>> RTTDC RTQ*
>> RTTDX RTP31+3*, POSHD
>> RTTRG PRT+1, PRT+9, PRT+11*, HD*
RTWARD PRT+3*, PRT+17!, PRTCHK, PRTCHK+1
>> RTYPE PRT+5*, PRT+13
U PRT+7
>> X PRT+3*, PRT0*, COM+1*
>> Y PRT+3*, PRT+4*, PRT+6*, PRT+7*, PRT+8*, PRT0*, HD+1*, HDPULL+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All