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

Package: Dietetics

Routine: FHMADM3


Information

FHMADM3 ; HISC/REL/AAC - Additional Meals Report ;10/9/03 16:07

Source Information

Source file <FHMADM3.m>

Call Graph

Call Graph

Call Graph Total: 7

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

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 FHADM3  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Print Meal Report
PRINT
Q1 ; Process Printing the Meal Report
Q2 ;
QUIT ;
Q3
TOTALS ;
FTOTALS ; Final Totals
HDR ;Print page headers
LN
N1 ;Get specific records based on Communications Offices,Start/End Dates, etc
N2 ;Get Communciation Offices
DT ; Get From/To Dates
D1
D2 ;
KIL
EXIT

External References

Name Field # of Occurrence
^%DT D1, D2+1
C^%DTC Q3+1
DOW^%DTC Q1+3
NOW^%DTC Q1+4
^%ZIS PRINT+1
^%ZISC PRINT+3
^DIC N2+2
DTP^FH Q1+2, Q1+4, N1+10
EN2^FH PRINT+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Print report for all Communications Offices Y or N: "
  • Variable: ZCO
  • Timeout: DTIME
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: !!,"The report requires a 132 column printer.",!
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+1
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: TOTALS+4
Function Call: WRITE
  • Prompt: !,"ALL Total",?10,"|",SS(1),SS(2),SS(3),SS(4),SS(5),SS(6),SS(19)," |",SS(7),SS(8),SS(9),SS(10),SS(11),SS(12),SS(20)," |",SS(13),SS(14),SS(15),SS(16),SS(17),SS(18),SS(21)," |",SS(22),!
  • Line Location: FTOTALS+4
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+1
Function Call: WRITE
  • Prompt: !!,?1,NAME
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!?(131-$L(DTE)\2),DTE
  • Line Location: HDR+3
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+4
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+5
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+11
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+12
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+2
Function Call: WRITE
  • Prompt: *7," [End before Start?] "
  • Line Location: D2+3
Routine Call
  • DIC
  • Line Location:
    • N2+2
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(117 - [#117] N1+1, N1+3
^FH(119.73 - [#119.73] EN1+7, Q2+2, Q2+3

Label References

Name Line Occurrences
D1 D1, D1+1, D2+3
D2 D2+1, D2+2
DT EN1+1
FTOTALS QUIT+4
HDR Q2+5, QUIT+3, N1+10
KIL EN1+1, EN1+9, PRINT+1, PRINT+2, PRINT+3
LN QUIT+5, TOTALS+4
N1 Q3+1
N2 EN1+9, N2+4
PRINT N2+3
Q1 PRINT+3
Q2 Q2+2, Q2+3, Q2+7, Q2+8
Q3 Q2+6
QUIT Q2+2, Q2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % Q1+4
>> %DT D1*, D2+1*
>> %DT("A" D1*, D2+1*
%ZIS PRINT+1!*, PRINT+3!
%ZIS("A" PRINT+1*
>> CO EN1+5*, Q2+2, N2+2, N2+4*
>> CON N2+4*
>> CONAM EN1+5*, N2+4*
>> CONAME EN1+5*, Q2+2, N2+4*
>> CONUM EN1+5*, N1+1*, N1+3*
>> CONUMX Q2+2*, Q2+7, N2+4*
>> COUNT EN1+5*, Q2+3*, N1+3
>> COXX EN1+5*, Q2+2*, N1+1
>> D1 Q3+1*, N1+1, N1+3, N1+10
DIC N2+1*, N2+5!
DIC("A" N2+1*
DIC(0 N2+1*
>> DOW Q1+3*, Q2+6*, Q3+1*, N1+11
DT D1+1, D2+2
>> DTE Q1+2*, HDR+3
DTIME EN1+9
>> DTOUT D1, D2+1
>> DTP Q1+2*, Q1+4*, N1+10*, N1+11
>> EDT Q1+2, Q3+1, D2+1*, D2+2, D2+3
>> FHLST PRINT+2*
>> FHPGM PRINT+2*
>> HDT Q1+4*, HDR+1
IO PRINT+3
IO("Q" PRINT+2
IOF HDR+1
IOP PRINT+1!, PRINT+3!
IOSL N1+10
IOST HDR+1
>> K EN1+4*, TOTALS+2*, FTOTALS+2*, N1+5*, N1+8*
>> L1 Q3*, Q3+1*, N1+5*
>> L2 N1+5*
>> N N1+5*
>> N( Q3*, N1+5*, N1+8*
>> N(1 N1+12
>> N(10 N1+12
>> N(11 N1+12
>> N(12 N1+12
>> N(13 N1+12
>> N(14 N1+12
>> N(15 N1+12
>> N(16 N1+12
>> N(17 N1+12
>> N(18 N1+5*, N1+12
>> N(19 N1+6, N1+12
>> N(2 N1+12
>> N(20 N1+6, N1+12
>> N(21 N1+6, N1+12
>> N(22 N1+6*, N1+12
>> N(3 N1+12
>> N(4 N1+12
>> N(5 N1+12
>> N(6 N1+12
>> N(7 N1+12
>> N(8 N1+12
>> N(9 N1+12
>> NAME Q2+2*, Q2+3*, QUIT+2*, HDR+2
>> PG Q1+4*, HDR+1*
>> POP PRINT+1
>> S( EN1+4*, TOTALS+2*, N1+8*
>> S(1 TOTALS+4
>> S(10 TOTALS+4
>> S(11 TOTALS+4
>> S(12 TOTALS+4
>> S(13 TOTALS+4
>> S(14 TOTALS+4
>> S(15 TOTALS+4
>> S(16 TOTALS+4
>> S(17 TOTALS+4
>> S(18 TOTALS+4
>> S(19 TOTALS+4
>> S(2 TOTALS+4
>> S(20 TOTALS+4
>> S(21 TOTALS+4
>> S(22 TOTALS+4
>> S(3 TOTALS+4
>> S(4 TOTALS+4
>> S(5 TOTALS+4
>> S(6 TOTALS+4
>> S(7 TOTALS+4
>> S(8 TOTALS+4
>> S(9 TOTALS+4
>> SDT Q1+2, Q1+3, Q3+1, D1*, D1+1, D2+3
>> SS( EN1+4*, FTOTALS+2*, N1+8*
>> SS(1 FTOTALS+4
>> SS(10 FTOTALS+4
>> SS(11 FTOTALS+4
>> SS(12 FTOTALS+4
>> SS(13 FTOTALS+4
>> SS(14 FTOTALS+4
>> SS(15 FTOTALS+4
>> SS(16 FTOTALS+4
>> SS(17 FTOTALS+4
>> SS(18 FTOTALS+4
>> SS(19 FTOTALS+4
>> SS(2 FTOTALS+4
>> SS(20 FTOTALS+4
>> SS(21 FTOTALS+4
>> SS(22 FTOTALS+4
>> SS(3 FTOTALS+4
>> SS(4 FTOTALS+4
>> SS(5 FTOTALS+4
>> SS(6 FTOTALS+4
>> SS(7 FTOTALS+4
>> SS(8 FTOTALS+4
>> SS(9 FTOTALS+4
U D1, D2+1
>> X EN1+1, Q1+3*, Q3+1, D1*, D2+1*
>> X1 Q3+1*
>> X2 Q3+1*
>> Y Q1+3, Q2+6, N2+2, N2+3, N2+4, N2+5, D1, D2+1
>> Y0 N1+1*, N1+3*
>> Y1 N1+1*, N1+3*, N1+5
>> Y2 N1+1*, N1+3*
>> Z TOTALS+2*, FTOTALS+2*, N1+5*
>> ZCO EN1+5*, EN1+9*, Q2+2, Q2+3, Q2+7, Q2+8, N1+1, N1+3
>> ZOUT EN1+7*, Q2+3, N1+1, N1+3
>> ZZCOUNT EN1+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All