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

Package: Dietetics

Routine: FHPRC11


Information

FHPRC11 ; HISC/NCA - Meal Analysis (cont.) ;2/15/95 16:10

Source Information

Source file <FHPRC11.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Dietetics 5 (DTP,SITE)^FH  LIS^FHNU2  RDA^FHNU9  ^FHPRC12  Q1^FHPRC14  
VA FileMan 1 NOW^%DTC  

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 FHPRC10  

Entry Points

Name Comments DBIA/ICR reference
PRT ; Print Meal Analysis
P1
P2
P3
P4
P5
P6
HEAD ; Print Header
HEAD1
HD1
HD2

External References

Name Field # of Occurrence
NOW^%DTC PRT+1
DTP^FH PRT+1
SITE^FH HEAD+1
LIS^FHNU2 P2+3, P2+4, P3, P5+3, P5+4, P6
RDA^FHNU9 P3+1, P6+1
^FHPRC12 PRT+1, P1
Q1^FHPRC14 FHPRC11+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Meal ",MEAL,!
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: Y,!,"Prod Diet: "
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: Y,!,"Prod Diet: "
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: !,$J(SVG,4)," ",RNAM,?24,$J($P(X0,"^",2),5,0)
  • Line Location: P2+3
Function Call: WRITE
  • Prompt: !!?7,"Recipe Total",?29
  • Line Location: P2+4
Function Call: WRITE
  • Prompt: $J($P(X1,"^",KK)*$S(KK=2:900,1:400)/Z1,7,0)
  • Line Location: P2+5
Function Call: WRITE
  • Prompt: !!,"Daily Total",?29
  • Line Location: P3+0
Function Call: WRITE
  • Prompt: !,"% DRI",?29
  • Line Location: P3+1
Function Call: WRITE
  • Prompt: $J($P(X1,"^",KK)*$S(KK=2:900,1:400)/Z1,7,0)
  • Line Location: P3+2
Function Call: WRITE
  • Prompt: !!,"Meal ",MEAL,!
  • Line Location: P5+1
Function Call: WRITE
  • Prompt: Y,!,"PD: "
  • Line Location: P5+1
Function Call: WRITE
  • Prompt: Y,!,"PD: "
  • Line Location: P5+1
Function Call: WRITE
  • Prompt: !,$E(RNAM,1,10),?12
  • Line Location: P5+3
Function Call: WRITE
  • Prompt: !!?3,"Total",?12
  • Line Location: P5+4
Function Call: WRITE
  • Prompt: !!,"Daily Total",?12
  • Line Location: P6+0
Function Call: WRITE
  • Prompt: !,"% DRI",?12
  • Line Location: P6+1
Function Call: WRITE
  • Prompt: !,"Station #: ",SITE(1),?42,"A N A L Y S I S O F M E A L P O R T I O N",?124,"Page ",PG
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"Station Name: ",SITE,?57,DTP
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: ?110,"DRI: ",$P(^FH(112.2,RDA,0),U,1)
  • Condition for execution: RDA
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !?(132-$L(MNAM)\2),MNAM
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !?42,"A N A L Y S I S O F M E A L P O R T I O N",?124,"Page ",PG,!?57,DTP
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: !?(132-$L(MNAM)\2),MNAM
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: !!,"Patient: ",NAM,?63,$S(SEX="M":"Male",1:"Female"),?124,"Age: ",AGE,!
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HD1+0
Function Call: WRITE
  • Prompt: ?27,"Gm KCal Gm Gm Gm Mg Mg Mg Mg Mg Mg Mg Mg Mg Mcg Gm",!
  • Line Location: HD1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HD2+0
Function Call: WRITE
  • Prompt: ?16,"Mcg RE Mg Mg Mg Mg Mg Mg Mcg Mcg Mg Mg Gm Gm Gm Gm Gm",!
  • Line Location: HD2+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(112.2 - [#112.2] HEAD+3
^FH(116.1 - [#116.1] P2+1, P5+1, HD1, HD2
^FH(116.2 - [#116.2] P2+1, P5+1, HD1+1, HD2+1
^TMP($J P1, P2, P2+1, P2+3, P2+4, P3, P5, P5+1, P5+3, P5+4
, P6, HD1, HD2

Label References

Name Line Occurrences
HD1 P2+2, P2+3, P2+4, P3
HD2 P5+2, P5+3, P5+4, P6
HEAD P2+2, P2+3, P2+4, P3, P5+2, P5+3, P5+4, P6
HEAD1 HEAD+1
P1 P6+2
P2 P2+6
P3 P2
P5 P5+4
P6 P5

Naked Globals

Name Field # of Occurrence
^( P2+3, P5+3
^(1 P2+3, P5+3
^(2 P2+3, P2+4, P3, P5+3, P5+4, P6
^(3 P2+3, P2+4, P3, P5+3, P5+4, P6
^(4 P2+3, P2+4, P3, P5+3, P5+4, P6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRT+1
>> AGE HEAD1+2
>> DAY PRT+1*, P1*, P2, P2+1, P2+3, P2+4, P3, P5, P5+1, P5+3
, P5+4, P6, HD1, HD2
DT PRT+1*
>> DTP PRT+1*, HEAD+3, HEAD1
IOF HEAD+1
IOSL P2+3, P2+4, P3, P5+3, P5+4, P6
IOST HEAD+1
>> KK P2+5*, P3+2*
>> MEAL P1*, P2*, P2+1, P2+3, P2+4, P4*, P5*, P5+1, P5+3, P5+4
, HD1, HD1+1, HD1+2, HD2, HD2+1, HD2+2
>> MNAM HEAD+4, HEAD1+1
>> NAM HEAD+1, HEAD1+2
>> NEW P1*, P2+1, P2+2, P4*, P5+1, P5+2, HEAD+4*, HEAD1+1*
>> NUT HD1+4*, HD2+3*
>> PG PRT+1*, HEAD+1*, HEAD+2, HEAD1
>> RDA P3+1, P6+1, HEAD+3
>> RNAM P2+3*, P5+3*
>> SEX HEAD1+2
>> SITE HEAD+3
>> SITE(1 HEAD+2
>> SUM PRT+1
>> SVG P2+3*, P5+3*
U HEAD+3
>> X P2+1*, P5+1*, HD1*, HD1+1, HD2*, HD2+1
>> X0 P2+3*, P5+3*
>> X1 P2+3*, P2+4*, P2+5, P3*, P3+2, P3+3, P5+3*, P5+4*, P6*
>> X2 P2+3*, P2+4*, P3*, P5+3*, P5+4*, P6*
>> X3 P2+3*, P2+4*, P3*, P5+3*, P5+4*, P6*
>> X4 P2+3*, P2+4*, P3*, P5+3*, P5+4*, P6*
>> Y P2+1*, P5+1*, HD1*, HD1+1*, HD1+2, HD2*, HD2+1*, HD2+2
>> Z1 P2+5*, P3+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All