Routine: FHPRC12

Package	Total	Call Graph
Dietetics	3	SITE^FH RDA^FHNU9 KIL^FHPRC10

Package	Total	Caller Graph
Dietetics	1	FHPRC11

Entry Points

Name	Comments	DBIA/ICR reference
T4
L1
T2
T3
T1
LIS	; List nutrient values
AVG	; Get averages

External References

Name	Field # of Occurrence
SITE^FH	FHPRC12+2
RDA^FHNU9	T2+1, T4+1
KIL^FHPRC10	T4+3

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: "Male",1:"Female"),?124,"Age: Line Location: FHPRC12+3
Function Call: WRITE	Prompt: !?45,"M E A L A N A L Y S I S S U M M A R Y",?124,"Page ",PG,!?57,DTP,!?(132-$L(MNAM)\2),MNAM,!!,"Patient: ",NAM,?63,$S(SEX="M":"Male",1:"Female"),?124,"Age: ",AGE Line Location: FHPRC12+3
Function Call: WRITE	Prompt: !,"Station #: ",SITE(1),?45,"M E A L A N A L Y S I S S U M M A R Y",?124,"Page ",PG Line Location: FHPRC12+4
Function Call: WRITE	Prompt: !,"Station Name: ",SITE,?57,DTP Line Location: FHPRC12+5
Function Call: WRITE	Prompt: ?110,"DRI: ",$P(^FH(112.2,RDA,0),U,1) Condition for execution: RDA Line Location: FHPRC12+5
Function Call: WRITE	Prompt: !?(132-$L(MNAM)\2),MNAM Line Location: FHPRC12+6
Function Call: WRITE	Prompt: !!,"Daily Totals",?20,"Energ Pro CHO Fat Sod Pot Calc Phos Iron Zinc Mag Man Cop Sel DFib K" Line Location: FHPRC12+8
Function Call: WRITE	Prompt: !?21,"KCal Gm Gm Gm Mg Mg Mg Mg Mg Mg Mg Mg Mg Mcg Gm Mcg",! Line Location: FHPRC12+9
Function Call: WRITE	Prompt: !?3,"Day ",DAY,?19 Line Location: T1+5
Function Call: WRITE	Prompt: !!,"Daily Average",?19 Line Location: T2+0
Function Call: WRITE	Prompt: !,"Average % DRI",?18 Line Location: T2+1
Function Call: WRITE	Prompt: $J($P(X1,"^",KK)*$S(KK=2:900,1:400)/Z1,7,0) Line Location: T2+2
Function Call: WRITE	Prompt: !!!!,"Daily Totals",?24,"A C E Rib Thi Nia B6 B12 Fol Pant Chol 18C2 18C3 Mono PuFa SaFa" Line Location: T2+3
Function Call: WRITE	Prompt: !?23,"RE Mg Mg Mg Mg Mg Mg Mcg Mcg Mg Mg Gm Gm Gm Gm Gm",! Line Location: T2+4
Function Call: WRITE	Prompt: !?3,"Day ",DAY,?18 Line Location: T3+1
Function Call: WRITE	Prompt: !!,"Daily Average",?18 Line Location: T4+0
Function Call: WRITE	Prompt: !,"Average % DRI",?17 Line Location: T4+1
Function Call: WRITE	Prompt: !!,"'+' following a daily value indicates that incomplete data exists.",! Line Location: T4+3
Function Call: WRITE	Prompt: Z1 Line Location: L1+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FH(112.2 - [#112.2]	FHPRC12+5
^TMP($J	T1, T3

Label References

Name	Line Occurrences
AVG	T2
L1	L1+2
LIS	T1+5, T2, T3+1, T4
T1	T1+5
T2	T1
T3	T3+1
T4	T3

Naked Globals

Name	Field # of Occurrence
^(	T1, T3
^(2	T1, T3
^(3	T1
^(4	T1, T3
^(5	T1, T3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AGE	FHPRC12+3
>> DAY	FHPRC12+10, T1, T1+5, T2+5, T3, T3+1
>> DEC	L1*, L1+2
>> DTP	FHPRC12+3, FHPRC12+5
IOF	FHPRC12+2
IOST	FHPRC12+2
>> ITM	L1*, L1+1, L1+2
>> K	T1+1, T1+2, T1+3, T1+4, AVG+1, AVG+2, AVG+3*
>> KK	T2+2, LIS+1, L1*
>> MNAM	FHPRC12+3, FHPRC12+6
>> NAM	FHPRC12+3, FHPRC12+4, FHPRC12+5, FHPRC12+6
>> NDAY	FHPRC12+7, T1, AVG+1*, AVG+2, AVG+3
>> NODE	L1*, L1+1
>> NUT	FHPRC12+10, T2+5, L1
>> PG	FHPRC12+2*, FHPRC12+3, FHPRC12+4
>> RDA	FHPRC12+5, T2+1, T4+1
>> SEX	FHPRC12+3
>> SITE	FHPRC12+5
>> SITE(1	FHPRC12+4
>> SIZ	L1*, L1+2
>> T(1	FHPRC12+7, T1+1, T2, T4, AVG+1*
>> T(2	FHPRC12+7, T1+2, T2, T4, AVG+2*
>> T(3	FHPRC12+7*
>> T(4	FHPRC12+7, T1+3, T2, T4, AVG+3*
>> T(5	FHPRC12+7, T1+4, T2, T4
U	FHPRC12+5
>> X1	T1, T1+1, T2, T2+2, T3, T4, T4+2, L1+1
>> X2	T1, T1+2, T2, T3, T4, L1+1
>> X3	T1*, L1+1
>> X4	T1, T1+3, T2, T3, T4, L1+1
>> X5	T1, T1+4, T2, T3, T4, L1+2
>> Z1	T1+1, T1+2, T1+3, T2+2, L1+1, L1+2

Customize PDF page

Package: Dietetics

Routine: FHPRC12

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: