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

Package: Lab Service

Routine: LRUMDS


Information

LRUMDS ;AVAMC/REG - MD SELECTED PATIENT GROUPS ;10/15/91 19:22 ;

Source Information

Source file <LRUMDS.m>

Entry Points

Name Comments DBIA/ICR reference
S
W
C
D
EN1 ;from LRUMD2
EN ; from LRUMD
SEL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Line Location: LRUMDS+2
Function Call: WRITE
  • Prompt: !!?19,"1. Single patient",!?19,"2. Group of patients",!?19,"3. Patients for a ward",!?19,"4. Patients for a clinic"
  • Line Location: LRUMDS+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: LRUMDS+3
Function Call: WRITE
  • Prompt: !
  • Line Location: S+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !
  • Line Location: C+0
Function Call: WRITE
  • Prompt: " ",Z
  • Line Location: D+1
Function Call: WRITE
  • Prompt: " ",X,"n't meet on ",Z," ",Y
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !?21,Y,". ",A
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: $C(7),!,"You have no groups to select from."
  • Line Location: EN1+2
Function Call: READ
  • Formatting: !
  • Prompt: "Select group number: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !,$C(7),"Select a number from 1-",Y-1
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !,"Print ALL test lists "
  • Line Location: EN+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !!,"Enter test list number(s): "
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !!,"To see the tests for the above numbers use the",!,"'Enter/edit user defined lab test lists' option."
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: $C(7),!,"No CONTROL CHARACTERS, LETTERS or more than 200 characters allowed."
  • Line Location: SEL+3
Function Call: WRITE
  • Prompt: $C(7),!,"START with a NUMBER !!",!
  • Line Location: SEL+4
Info |  Source |  Entry Points |  Interaction Calls