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 |  Local Variables  | All
Print Page as PDF
Routine: FHADM3

Package: Dietetics

Routine: FHADM3


Information

FHADM3 ; HISC/REL - Additional Meals Report ;1/23/98 16:07

Source Information

Source file <FHADM3.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
Dietetics 2 (DTP,EN2)^FH  ^FHMADM3  
VA FileMan 2 ^%DT  (C,DOW,NOW)^%DTC  

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

Package Total Caller Graph
Dietetics 1 FHADMR3  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Print Meal Report
; Check for multidivisional site
Q1 ; Process Printing the Meal Report
HDR
LN
N1
DT ; Get From/To Dates
D1
D2
KIL

External References

Name Field # of Occurrence
^%DT D1, D2
C^%DTC Q1+5
DOW^%DTC Q1+2
NOW^%DTC Q1+3
^%ZIS EN1+5
^%ZISC EN1+7
DTP^FH Q1+1, Q1+3, N1+4
EN2^FH EN1+6
^FHMADM3 EN1+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The report requires a 132 column printer.",!
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !," Total",?10,"|",S(1),S(2),S(3),S(4),S(5),S(6),S(19)," |",S(7),S(8),S(9),S(10),S(11),S(12),S(20)," |",S(13),S(14),S(15),S(16),S(17),S(18),S(21)," |",S(22),!
  • Line Location: Q1+7
Function Call: WRITE
  • Prompt: !,HDT,?50,"A D D I T I O N A L M E A L S",?125,"Page ",PG
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !!?(131-$L(DTE)\2),DTE
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,?10,"|",?21,"B R E A K F A S T",?48,"|",?64,"N O O N",?86,"|",?99,"E V E N I N G",?124,"| TOTAL"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?10,"| Opt. Emp. Paid OOD Vol. Grt. Total | Opt. Emp. Paid OOD Vol. Grt. Total | Opt. Emp. Paid OOD Vol. Grt. Total |"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"-----------------------------------------------------------------------------------------------------------------------------------"
  • Line Location: LN+0
Function Call: WRITE
  • Prompt: !,$P("Sun Mon Tue Wed Thu Fri Sat"," ",DOW)," ",$E(DTP,1,6)
  • Line Location: N1+5
Function Call: WRITE
  • Prompt: "|",N(1),N(2),N(3),N(4),N(5),N(6),N(19)," |",N(7),N(8),N(9),N(10),N(11),N(12),N(20)," |",N(13),N(14),N(15),N(16),N(17),N(18),N(21)," |",N(22)
  • Line Location: N1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: *7," [Must Start before Today!] "
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: *7," [Must End before Today!] "
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: *7," [End before Start?] "
  • Line Location: D2+2
Routine Call
  • %ZIS
  • Line Location:
    • EN1+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(117 - [#117] N1
^FH(119.9 - [#119.9] EN1+2

Label References

Name Line Occurrences
D1 D1, D1+1, D2+2
D2 D2, D2+1
DT EN1+3
HDR Q1+3, N1+4
KIL EN1+3, EN1+5, EN1+6, EN1+7
LN Q1+7
N1 Q1+5
Q1 EN1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % Q1+3
>> %DT D1*, D2*
>> %DT("A" D1*, D2*
%ZIS EN1+5!*, EN1+7!
%ZIS("A" EN1+5*
>> D1 Q1+5*, N1, N1+4
>> DOW Q1+2*, Q1+5*, N1+5
DT D1+1, D2+1
>> DTE Q1+1*, HDR+1
>> DTOUT D1, D2
>> DTP Q1+1*, Q1+3*, N1+4*, N1+5
>> EDT Q1+1, Q1+5, D2*, D2+1, D2+2
>> FHLST EN1+6*
>> FHPGM EN1+6*
>> HDT Q1+3*, HDR
IO EN1+7
IO("Q" EN1+6
IOF HDR
IOP EN1+5!, EN1+7!
IOSL N1+4
IOST HDR
>> K Q1+4*, Q1+6*, N1+1*, N1+3*
>> L1 Q1+5*, N1*, N1+1*
>> L2 N1+1*
>> N N1+1*
>> N( N1*, N1+1*, N1+3*
>> N(1 N1+6
>> N(10 N1+6
>> N(11 N1+6
>> N(12 N1+6
>> N(13 N1+6
>> N(14 N1+6
>> N(15 N1+6
>> N(16 N1+6
>> N(17 N1+6
>> N(18 N1+1*, N1+6
>> N(19 N1+2, N1+6
>> N(2 N1+6
>> N(20 N1+2, N1+6
>> N(21 N1+2, N1+6
>> N(22 N1+2*, N1+6
>> N(3 N1+6
>> N(4 N1+6
>> N(5 N1+6
>> N(6 N1+6
>> N(7 N1+6
>> N(8 N1+6
>> N(9 N1+6
>> PG Q1+3*, HDR*
>> POP EN1+5
S Q1+4!
S( Q1+4*, Q1+6*, N1+3*
S(1 Q1+7
S(10 Q1+7
S(11 Q1+7
S(12 Q1+7
S(13 Q1+7
S(14 Q1+7
S(15 Q1+7
S(16 Q1+7
S(17 Q1+7
S(18 Q1+7
S(19 Q1+7
S(2 Q1+7
S(20 Q1+7
S(21 Q1+7
S(22 Q1+7
S(3 Q1+7
S(4 Q1+7
S(5 Q1+7
S(6 Q1+7
S(7 Q1+7
S(8 Q1+7
S(9 Q1+7
>> SDT Q1+1, Q1+2, Q1+5, D1*, D1+1, D2+2
U EN1+2, D1, D2
>> X EN1+3, Q1+2*, Q1+5, D1*, D2*
>> X1 Q1+5*
>> X2 Q1+5*
>> Y Q1+2, D1, D2
>> Y1 N1*, N1+1
>> Z Q1+6*, N1+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All