Routine: FHADR61

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

FHADR61 ; HISC/NCA - Nutritive Analysis Average ;12/29/93 13:54

Source Information

Source file <FHADR61.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Dietetics	4	DTP^FH YR^FHADR1 HDR2^FHADR3A HDR^FHADRPT
VA FileMan	2	^%DT ^DIE
Kernel	1	KILL^XUSCLEAN

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Dietetics	2	FHADR9 FHADRPT

Entry Points

Name	Comments	DBIA/ICR reference
EN1	; Enter/Edit Nutritive Analysis Average of one wk reg menu
D1
SET	; Set all three quarters with the Nutritive Analysis Data
KIL
EN2	; Print the Nutritive Analysis Average of one wk reg menu
HDR	; Print Heading for Nutritive Analysis

External References

Name	Field # of Occurrence
^%DT	D1
^DIE	D1+6
DTP^FH	EN2+5
YR^FHADR1	EN1+1
HDR2^FHADR3A	HDR+1
HDR^FHADRPT	HDR+1
KILL^XUSCLEAN	KIL

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: D1+0
Function Call: WRITE	Prompt: *7,!?29," [Must Start before Today!] " Line Location: D1+1
Function Call: WRITE	Prompt: *7,!?29," [Date Is Not Within the Fiscal Year!] " Line Location: D1+3
Function Call: WRITE	Prompt: $P(TIT,"^",L2)_":",$J($P(X1,"^",L2+1),5)," " Line Location: EN2+8
Function Call: WRITE	Prompt: !!!,"Nutritive Analysis 7 Days Average Regular Menu",! Line Location: HDR+2
Routine Call	DIE Line Location: D1+6

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN1+2
^FH(117.3 - [#117.3]	EN1+2, D1+4, SET+1, EN2+3

Label References

Name	Line Occurrences
D1	D1, D1+1, D1+3
HDR	EN2+1
KIL	EN1+1, D1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	D1*
>> %DT("A"	D1*
>> %DT("B"	D1*
DA	D1+5*, D1+6!
DIC	D1+5!, D1+6!
DIE	D1+5!*, D1+6!
DR	D1+5*, D1+6!
DT	D1+1
>> DTOUT	D1
>> DTP	EN2+5*, EN2+6
>> FHYR	EN2+2
>> L1	EN2+3*
>> L2	EN2+8*
>> LIN	HDR+1
>> OLD	EN1+2, D1, D1+6, SET+1
>> PRE	EN1+1, EN1+2, D1+3, D1+4, D1+5, D1+6, SET+1, EN2+2, EN2+3
>> QTR	D1+2, SET+1
>> S1	D1+2*
>> SDT	D1*, D1+1, D1+2, D1+4
>> TIT	EN2+7*, EN2+8
U	D1
>> X	D1, EN2+3
>> X1	EN2+2, EN2+3, EN2+4, EN2+5, EN2+8
>> Y	EN1+2*, D1
>> YR	D1+2*, D1+3