Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls