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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FHORD9

Package: Dietetics

Routine: FHORD9


Information

FHORD9 ; HISC/REL/NCA/RVD - Diet Order Census ;7/1/94 14:24

Source Information

Source file <FHORD9.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Dietetics 5 EN2^FH  GETGM^FHOMRBL1  (GETRM,GETSM)^FHOMRBLD  DIV^FHOMUTL  ^FHORD91  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA FileMan 3 ^%DT  NOW^%DTC  ^DIC  

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

Package Total Caller Graph
Dietetics 3 FHORD11  FHORD93  FHPRO2  

Entry Points

Name Comments DBIA/ICR reference
D0
F0
Q1 ; Calculate census
WRD ; Calculate census for ward
W3
W4
CNT
U1
U2
U3
PROSG ;process outpatient data from ^tmp($j global.
REC ;for recurring meals
SPEC ;for special meals
GUEST ;for guest meals.
KIL

External References

Name Field # of Occurrence
^%DT F0
NOW^%DTC FHORD9+5, Q1+1
^%ZIS F0+2
^%ZISC F0+4
^DIC D0+1
EN2^FH F0+3
GETGM^FHOMRBL1 Q1+10
GETRM^FHOMRBLD Q1+12
GETSM^FHOMRBLD Q1+9
DIV^FHOMUTL FHORD9+6
^FHORD91 Q1+14
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Select PRODUCTION FACILITY: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: D0+0
Function Call: READ
  • Formatting: !!
  • Prompt: "Effective Date/Time: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: F0+0
Function Call: WRITE
  • Prompt: *7," Cannot be before TODAY!"
  • Line Location: F0+1
Function Call: WRITE
  • Prompt: !
  • Line Location: F0+2
Routine Call
  • DIC
  • Line Location:
    • D0+1
Routine Call
  • %ZIS
  • Line Location:
    • F0+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(119.71 - [#119.71] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(111 - [#111] REC+19, REC+20, SPEC+17, SPEC+18, GUEST+18
^FH(119.6 - [#119.6] Q1+2, REC+10, REC+11, REC+12, REC+15, SPEC+7, SPEC+8, SPEC+9, SPEC+12, GUEST+10
GUEST+11, GUEST+12, GUEST+15
^FH(119.71 - [#119.71] FHORD9+7
^FH(119.72 - [#119.72] WRD+1, REC+13, REC+14, SPEC+10, SPEC+11, GUEST+13, GUEST+14
^FH(119.73 - [#119.73] PROSG+2
^FH(119.9 - [#119.9] REC+16, SPEC+13, GUEST+16
^FHPT - [#115] W3W3+1, W3+3, W3+5, W3+6, U1U1+1, U3U3+1!, U3+2!
REC+25
^FHPT("AW" WRD+4
^TMP($J FHORD9+5!, Q1+1!, KIL!

Label References

Name Line Occurrences
CNT W3+7, W4
D0 D0+1
F0 FHORD9+7, F0F0+1
KIL FHORD9+6, D0F0F0+2, F0+3, F0+4
PROSG Q1+13
Q1 F0+4
U1 W3+3, W3+4, W3+5, U3
U2 U1+1
U3 U3+1, U3+2, U3+3
W3 WRD+4
W4 W3+3, W3+4, W3+5
WRD Q1+3, Q1+4

Naked Globals

Name Field # of Occurrence
^( Q1+2, U3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% FHORD9+5!, Q1+1!
>> %DT F0*
%ZIS F0+2!*, F0+4!
%ZIS("A" F0+2*
>> A1 W3+3*, U1*, U1+1, U2*, U3*, U3+1, U3+2
>> ADM WRD+4*, W3W3+1, W3+3, W3+5, W3+6, U1U1+1, U3U3+1
U3+2
>> CT Q1+1*
D Q1+1!
D( WRD+1*
>> D2 WRD+1*
DIC D0+1!*
DIC(0 D0+1*
DT FHORD9+5*, F0+1
DTIME D0F0
>> FHDFN WRD+4*, W3W3+1, W3+3, W3+5, W3+6, U1U1+1, U3U3+1
U3+2
>> FHDIET REC+9*, REC+16*, REC+19*, REC+20, SPEC+6*, SPEC+13*, SPEC+17*, SPEC+18, GUEST+9*, GUEST+16*
>> FHDIETN REC+18*, REC+19, SPEC+16*, SPEC+17, GUEST+17*, GUEST+18
>> FHDT REC+1*, REC+6, SPEC+4, GUEST+6
>> FHI REC+4*, REC+6, REC+7, REC+10, SPEC+2*, SPEC+4, SPEC+5, SPEC+7, GUEST+4*, GUEST+6
GUEST+7, GUEST+10
>> FHIJKDAT REC+7*, REC+17, REC+18, SPEC+5*, SPEC+14, SPEC+16, GUEST+7*, GUEST+17
>> FHJ REC+4*, REC+6, REC+7, SPEC+2*, SPEC+4, SPEC+5, GUEST+4*, GUEST+6, GUEST+7
>> FHK REC+6*, REC+7, REC+25, SPEC+4*, SPEC+5, GUEST+6*, GUEST+7
>> FHLD W3+6*, W3+8*, W3+9, W3+10
>> FHLOC REC+9*, REC+10*, REC+11, REC+12, REC+15, SPEC+6*, SPEC+7*, SPEC+8, SPEC+9, SPEC+12
GUEST+9*, GUEST+10*, GUEST+11, GUEST+12, GUEST+15
>> FHLST F0+3*
>> FHN REC+4*, REC+5, REC+6, REC+7, SPEC+2*, SPEC+3, SPEC+4, SPEC+5, GUEST+4*, GUEST+5
GUEST+6, GUEST+7
>> FHOR W3+6*
>> FHORD W3+2*, W3+3, W3+4, W3+5, W3+6, U1*, U1+1*
>> FHP FHORD9+7*, D0+1*, WRD+1, REC+14, SPEC+11, GUEST+14
>> FHPDIET REC+9*, REC+20*, REC+21, REC+22, SPEC+6*, SPEC+18*, SPEC+19, SPEC+20, GUEST+9*, GUEST+18*
GUEST+19, GUEST+20
>> FHPGM F0+3*
>> FHPLNM PROSG+1*, PROSG+2*, REC+5, SPEC+1*, SPEC+3, GUEST+3*, GUEST+5
>> FHRDAT REC+7*, REC+8, SPEC+5*, GUEST+7*, GUEST+8
>> FHREIEN REC+17*, REC+25
>> FHSER REC+9*, REC+11*, REC+12*, REC+13*, REC+14, REC+21, REC+22, REC+23, REC+26, REC+27
REC+28, SPEC+6*, SPEC+8*, SPEC+9*, SPEC+10*, SPEC+11, SPEC+19, SPEC+20, SPEC+21, GUEST+9*
GUEST+11*, GUEST+12*, GUEST+13*, GUEST+14, GUEST+19, GUEST+20, GUEST+21
>> FHSITE FHORD9+6, Q1+3, Q1+4, Q1+7*, Q1+9, Q1+10, Q1+12, PROSG+2, REC+15, SPEC+12
GUEST+15
>> FHSITENM Q1+8*
>> FHSTAT SPEC+14*, SPEC+15
>> FHTIM Q1+11*, Q1+12
>> FHTMPS REC+3*, REC+4, REC+6, REC+7, SPEC+1*, SPEC+2, SPEC+4, SPEC+5, GUEST+3*, GUEST+4
GUEST+6, GUEST+7
IO F0+4
IO("Q" F0+3
IOP F0+2!, F0+4!
>> K WRD+4*, W3+7*, W3+8, W3+9, W3+11, W3+12, W3+13, W4CNT
>> K1 U1*
>> N1 WRD+1*, W3+2*, W3+7
>> N2 WRD+1*
>> NOW Q1+1*
P Q1+1!
P( W3+8*, W3+9*, W3+11*, W3+12*, W3+13*, W4*, CNT*, REC+21*, REC+22*, REC+23*
REC+26*, REC+27*, REC+28*, SPEC+19*, SPEC+20*, SPEC+21*, GUEST+19*, GUEST+20*, GUEST+21*
>> POP F0+2
S WRD+1!, WRD+2
S( WRD+1*, WRD+3, W3+7
>> SP WRD+3*, WRD+4
>> TF W3+2*, W3+11, W3+13, W4
>> TIM F0*, F0+1, Q1+9, Q1+10, Q1+11, W3+3, W3+4, U1REC+1
U Q1+4, PROSG+2, REC+8, REC+11, REC+12, REC+14, REC+15, REC+16, REC+17, REC+18
REC+20, SPEC+8, SPEC+9, SPEC+11, SPEC+12, SPEC+13, SPEC+14, SPEC+16, SPEC+18, GUEST+8
GUEST+11, GUEST+12, GUEST+14, GUEST+15, GUEST+16, GUEST+17, GUEST+18
>> WRD Q1+2*, WRD+4
>> X D0*, F0*, Q1+2*, Q1+4, WRD+1, W3+6*, W3+8
>> X0 W3+1*, W3+2
>> X1 WRD+1*, WRD+3*, W3+2*, W3+3*, W3+4, W3+6*, W3+7*, U1+1*, U2*
>> X2 U3*, U3+1, U3+2
>> Y D0+1, F0
>> Z W3+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All