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

Package: Dietetics

Routine: FHPRC12


Information

FHPRC12 ; HISC/NCA - Meal Analysis Summary ;2/15/95 16:11

Source Information

Source file <FHPRC12.m>

Call Graph

Call Graph

Call Graph Total: 3

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

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 FHPRC11  

Entry Points

Name Comments DBIA/ICR reference
T1
T2
T3
T4
LIS ; List nutrient values
L1
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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All