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

Package: Dietetics

Routine: FHADM3


Information

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

Source Information

Source file <FHADM3.m>

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

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
Info |  Source |  Entry Points |  Interaction Calls