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

Package: Dietetics

Routine: FHORE3


Information

FHORE3 ; HISC/REL - Cancel Early/Late Trays ;6/21/96 10:30 ;

Source Information

Source file <FHORE3.m>

Entry Points

Name Comments DBIA/ICR reference
S0
D0
CK
C1
D2
D21
D3
AB
KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Order Date Time Meal",!
  • Line Location: S0+0
Function Call: WRITE
  • Prompt: !,"No future early or late trays to cancel"
  • Line Location: S0+2
Function Call: READ
  • Formatting: !!
  • Prompt: "Cancel Which Early/Late Orders (or ALL)? "
  • Variable: MEAL
  • Timeout: DTIME
  • Line Location: D0+0
Function Call: WRITE
  • Prompt: " ... done"
  • Line Location: D0+2
Function Call: WRITE
  • Prompt: *7,!," Enter numbers, or range, of desired orders or ALL (E.G., 1,3,4 or 3-5 or 1,3-5 etc.)"
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !,$J(CT,4)," ",DTP
  • Line Location: D3+1
Function Call: WRITE
  • Prompt: $J(TIM,10)," ",$S(MEAL="B":"Breakfast",MEAL="N":" Noon ",1:" Evening")
  • Line Location: D3+2
Function Call: WRITE
  • Prompt: ?45,"Bagged Meal"
  • Condition for execution: BAG="Y"
  • Line Location: D3+2
Function Call: WRITE
  • Prompt: *7,!!,"Early/Late Tray operation TERMINATED - No change!"
  • Line Location: AB+0
Info |  Source |  Entry Points |  Interaction Calls