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

Package: Prosthetics

Routine: RMPRUTL2


Information

RMPRUTL2 ;PHX/HPL-Patient Letter Date look-up in chronological order ;05/22/1995

Source Information

Source file <RMPRUTL2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Prosthetics 3 DIV4^RMPRSIT  GETPAT^RMPRUTIL  EN1^RMPRUTL2  
VA FileMan 2 EN^DIQ1  ^DIR  

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

Package Total Caller Graph
Prosthetics 4 RMPOLF2  RMPRFO1  RMPRFO2  RMPRUTL2  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;entry point to ask patient
EN ;entry point pass RMPRDFN
ASK ;get record
EXIT ;common exit point

External References

Name Field # of Occurrence
EN^DIQ1 EN+14
^DIR ASK+3
DIV4^RMPRSIT EN1+1
GETPAT^RMPRUTIL EN1+2
EN1^RMPRUTL2 EN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),?5,"NO LETTERS FOR THIS PATIENT!"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"#",?5,"Patient",?28,"Type of letter",?45,"Employee"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: ?65,"Date of letter"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,RMPR("L")
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,"End of Patient's Letter Listing."
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"Enter '^' to stop or "
  • Line Location: ASK+2
Routine Call
  • DIR
  • Line Location:
    • ASK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(665.4 - [#665.4] EN+4, EN+10, EN+13

Label References

Name Line Occurrences
ASK EN+21, EN+23
EXIT EN+22, EN+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EN+5~, EN+12*, EN+13*, EN+14, EN+17, EN+18, EN+19, ASK+1
>> DFN EN+3
DIC EN+5~, EN+6*
DIQ EN+5~, EN+6*
DIR ASK+3~
DIR(0 ASK+3*
DR EN+5~, EN+6*
DTOUT EN+22, ASK+4, EXIT+1!
DUOUT EN+22, ASK+4, EXIT+1!
RB EN+5~, EN+6*, EN+15*, EN+21*
RI EN+5~, EN+6*, EN+14*, EN+16, EN+23*, ASK+3
RI( EN+14*, EN+23, ASK+5
RMPLET EN+5~
>> RMPR EN1+1
>> RMPR("L" EN+9
RMPRBDT EN+5~, EN+6*, EN+10*, EN+13, ASK+1, EXIT+1!
>> RMPRDFN EN1+2, EN+3*, EN+4, EN+10, EN+13
>> RMPRIN EN+4*, EN+6*, EN+21, EN+23, ASK+5*
RMPRLET EN+14, EN+20!
RMPRLET( EN+17, EN+18, EN+19
RO EN+5~, EN+6*, EN+10, EN+13, ASK+4*, ASK+5*
Y EN+5~, ASK+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All