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

Package: Dietetics

Routine: FHORE1


Information

FHORE1 ; HISC/REL - Early/Late Trays ;8/8/96 13:57 ;

Source Information

Source file <FHORE1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Dietetics 5 (DTP,TR)^FH  ALG^FHCLN  ^FHDPA  ^FHORE1A  EL^FHWOR3  
VA Fileman 2 ^%DT  (C,NOW)^%DTC  
Kernel 1 MSG^XQOR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHOREL2  

Entry Points

Name Comments DBIA/ICR reference
F1 ; Process order
F2
F3
F4
CUR
F6
F7
F8
F9
AB
KIL
OK
F10
DTP ; Printable Date
F16
DP
F15

External References

Name Field # of Occurrence
^%DT F2+1, F3+1, F9
C^%DTC F1+2
NOW^%DTC F1+1
DTP^FH F3
TR^FH F4, F6, F7+1, F10
ALG^FHCLN F2
^FHDPA FHORE1+2
^FHORE1A FHORE1+2, FHORE1+4
EL^FHWOR3 FHORE1+4
MSG^XQOR FHORE1+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: F2+0
Function Call: WRITE
  • Prompt: !,"Allergies: ",$S(ALG="":"None on file",1:ALG)
  • Line Location: F2+0
Function Call: WRITE
  • Prompt: *7,!," [ Cannot schedule more than 31 days in the future ]"
  • Line Location: F2+2
Function Call: WRITE
  • Prompt: *7," [ End before Start? ] "
  • Line Location: F3+2
Function Call: WRITE
  • Prompt: *7,!," [ Cannot schedule for more than 31 days in the future ]"
  • Line Location: F3+3
Function Call: WRITE
  • Prompt: !!?10,"Mon Tues Wed Thur Fri Sat Sun"
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !?10," M T W R F S X"
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !!,"Enter string of characters for desired days of week: e.g., MWF",!
  • Line Location: OK+2
Function Call: READ
  • Prompt: "Days of Week: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: WKD
  • Line Location: F4+0
Function Call: WRITE
  • Prompt: !,"Please enter the desired days of the week."
  • Line Location: F4+1
Function Call: READ
  • Timeout: DTIME
  • Line Location: F6+0
Function Call: WRITE
  • Prompt: *7,!,"Enter B for Breakfast, N for Noon , or E for Evening"
  • Line Location: F6+1
Function Call: WRITE
  • Prompt: *7,!!,"Early/Late Meal Already Ordered for this Date!"
  • Line Location: F6+2
Function Call: READ
  • Prompt: "Early or Late (E or L): "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X1
  • Line Location: F7+0
Function Call: WRITE
  • Prompt: *7,!,"Enter E for early tray, L for late tray"
  • Line Location: F7+2
Function Call: WRITE
  • Prompt: *7,!!,"No Early/Late Delivery Times -- Notify Dietetics"
  • Line Location: F7+5
Function Call: WRITE
  • Prompt: !,"Select Time: ( "
  • Line Location: F8+0
Function Call: WRITE
  • Prompt: K1,"=",N(K1)," "
  • Line Location: F8+0
Function Call: READ
  • Prompt: ") "
  • Timeout: DTIME
  • Variable: K1
  • Line Location: F8+1
Function Call: WRITE
  • Prompt: *7,!,"Enter the number of the desired time"
  • Line Location: F8+1
Function Call: WRITE
  • Prompt: *7,!!,"Patient is on a WITHHOLD ORDER at that time!"
  • Line Location: F9+1
Function Call: WRITE
  • Prompt: *7,!!,"Patient has NO DIET ORDER at that time!"
  • Line Location: F9+2
Function Call: READ
  • Prompt: "Bagged Meal: NO// "
  • Formatting: !
  • Timeout: DTIME
  • Variable: BAG
  • Line Location: F10+0
Function Call: WRITE
  • Prompt: *7," Enter Y or N"
  • Line Location: F10+0
Function Call: WRITE
  • Prompt: !?5
  • Line Location: F10+1
Function Call: WRITE
  • Prompt: *7,!!,"Cannot Order a Meal for a Date/Time before now!"
  • Line Location: F15+0
Function Call: WRITE
  • Prompt: *7,!," Error - Illegal character or repeated day"
  • Line Location: F16+0
Function Call: WRITE
  • Prompt: *7,!!,"Early/Late Tray operation TERMINATED - No change!"
  • Line Location: AB+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.6 - [#119.6] DP
^FH(119.73 - [#119.73] DP+1
^FHPT - [#115] F6+2, DP, CUR, CUR+1

Label References

Name Line Occurrences
AB F2+1, F3+1, F4, F6, F6+2, F7, F7+5, F8+1, F9+1, F9+2
, F10, F15
CUR F9+1
DP F7+3
F1 FHORE1+2
F10 F9, F10
F15 F2+1, F9
F16 F4+1
F2 F2+1, F2+2, F3+2
F3 F3+1, F3+3
F4 F16
F6 F3+2, F6+1
F7 F6+2, F7+2
F8 F8+1
F9 F7+6
KIL FHORE1+2, FHORE1+4
OK F4+1

Naked Globals

Name Field # of Occurrence
^( F6+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% F1+1!, KIL!
%DT F2+1*!, F3+1*!, F9*, KIL!
%DT("A" F2+1*, F3+1*
%H KIL!
%I KIL!
%T KIL!
A1 CUR*, CUR+1, KIL!
ADM F6+2, DP, CUR, CUR+1, KIL!
>> ALG F2
ALL FHORE1+2*, KIL!
BAG F10*, F10+1*, KIL!
C KIL!
DA KIL!
DFN FHORE1+2, KIL!
DP DP*, DP+1, KIL!
DT F1+1*, F1+2, F2+1
DTE F9*, CUR, KIL!
DTIME F4, F6, F7, F8+1, F10
>> DTOUT F2+1, F3+1
DTP F3*, F3+1, KIL!
EDT F3+1*, F3+2, F3+3, F6+2, F9*, KIL!
FHDAY FHORE1+4, KIL!
FHDFN FHORE1+2, F6+2, DP, CUR, CUR+1, KIL!
FHLD F9+1, CUR*, CUR+1*, KIL!
FHOR F9+2, CUR*, CUR+1*, KIL!
FHORD CUR+1*, KIL!
FHORN FHORE1+2*, FHORE1+4*, KIL!
FHPAR F10, DP+1*, KIL!
FHPV KIL!
FHWF FHORE1+2, KIL!
I KIL!
K F4+1*, F6+2*, F7+3*, F7+4, KIL!
K1 F7+4*, F7+6*, F8*, F8+1*, F9, KIL!
K2 F7+4*, F7+5, F7+6, F8, F8+1, KIL!
KK CUR*, KIL!
MEAL F6*, F6+1, F6+2, F7+3, KIL!
MSG FHORE1+4!
N F7+4!, KIL!
N( F7+4*, F8, F9
NOW F1+1*, F9, KIL!
NUM F9*, KIL!
SDT F2+1*, F2+2, F3, F3+1, F3+2, F6+2, F9*, KIL!
SERV F7+3*, KIL!
TIM F9*, KIL!
U F2+1, F10
>> W1 DP*
WARD KIL!
WKD F3+2*, F4*, F4+1, KIL!
X F1+2, F2+1, F3+1, F4*, F6*, F7+1*, F9*, F10*, CUR+1*, KIL!
X1 F1+2*, F4+1*, F7*, F7+1*, F7+2, F7+3, KIL!
X2 F1+2*, F7+4*, KIL!
X31 F1+2*, F2+2, F3+3, KIL!
Y F2+1, F3+1*, F7+4, F9, DP*, DP+1*, DTP+1*, KIL!
Z F4+1*, KIL!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All