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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: FHNU8

Package: Dietetics

Routine: FHNU8


Information

FHNU8 ; HISC/REL/NCA - Nutrient Intake Study ;11/16/93 09:52

Source Information

Source file <FHNU8.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Dietetics 5 (DTP,EN2,TR)^FH  ^FHDPA  LIS^FHNU2  (AVG,LIS)^FHNU3  (RDA,TOT)^FHNU9  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 2 ^%DT  ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHNU8  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Printing Nutrient Intake
F1
F2
P1
F4
F5
P2
HEAD
HDR
RAT
KIL
C3
C2
C1
PAT
C4

External References

Name Field # of Occurrence
^%DT FHNU8+2, Q1+1
^%ZIS F2
^%ZISC F2+2
^DIC F4, F5
DTP^FH Q1+1
EN2^FH F2+1
TR^FH P1
^FHDPA F1
LIS^FHNU2 C2+1
AVG^FHNU3 C4
LIS^FHNU3 C3, C4
RDA^FHNU9 C3+1, C4+1
TOT^FHNU9 Q1+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: F4+0
Function Call: WRITE
  • Prompt: !
  • Line Location: F5+0
Function Call: WRITE
  • Prompt: *7,!!?5," [ Patient has expired. ]"
  • Line Location: F1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: F2+0
Function Call: WRITE
  • Prompt: !!,"Day ",DAY
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !," Meal ",MEAL,?7
  • Line Location: C2+1
Function Call: WRITE
  • Prompt: !!," Total",?8
  • Line Location: C3+0
Function Call: WRITE
  • Prompt: !," % DRI",?7
  • Line Location: C3+1
Function Call: WRITE
  • Prompt: $J($P(X1,"^",KK)*$S(KK=2:900,1:400)/Z1,7,0)
  • Line Location: C3+2
Function Call: WRITE
  • Prompt: !!,"Day Avg."
  • Line Location: C4+0
Function Call: WRITE
  • Prompt: !," % DRI",?7
  • Line Location: C4+1
Function Call: WRITE
  • Prompt: $J($P(X1,"^",KK)*$S(KK=2:900,1:400)/Z1,7,0)
  • Line Location: C4+2
Function Call: WRITE
  • Prompt: !!,"'+' following a daily value indicates that incomplete data exists.",!
  • Line Location: C4+3
Function Call: WRITE
  • Prompt: @IOF,!!?19,"N U T R I E N T I N T A K E S T U D Y",!!
  • Line Location: HDR+0
Function Call: READ
  • Prompt: "Enter Patient's Name: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: NAM
  • Line Location: PAT+0
Function Call: WRITE
  • Prompt: *7,!?5,"Enter Patient's Name to be printed on the report."
  • Line Location: PAT+1
Function Call: READ
  • Prompt: "Sex: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: SEX
  • Line Location: P1+0
Function Call: WRITE
  • Prompt: *7," Enter M or F"
  • Line Location: P1+0
Function Call: READ
  • Prompt: "Age: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: AGE
  • Line Location: P2+0
Function Call: WRITE
  • Prompt: !?5,"Enter Age in years between 6 and 124"
  • Line Location: P2+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !?19,"N U T R I E N T I N T A K E S T U D Y",?68,DTP,!
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !,"Patient: ",NAM,?40,$S(SEX="M":"Male",1:"Female"),?70,"Age: ",AGE,!
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !?9,"Energ Pro CHO Fat Sod Pot Calc Phos Chol H2O"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !?10,"KCal Gm Gm Gm Mg Mg Mg Mg Mg Ml",!
  • Line Location: HEAD+3
Routine Call
  • DIC
  • Line Location:
    • F4
    • F5
Routine Call
  • %ZIS
  • Line Location:
    • F2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(112.2 - [#112.2] Classic Fileman Calls
^FHUM - [#112.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] F1+1
^TMP($J C1, C2, C3, KIL!

Label References

Name Line Occurrences
C1 C3+6
C2 C2+1
C3 C2
C4 C1
F2 P2+1
F4 F4
HDR FHNU8+2
HEAD Q1+2
KIL F4, F5, F1, F1+1, F2, F2+1, F2+2, PAT, P1, P2
P1 F1, P1
P2 P2
PAT F1, PAT+1
Q1 F2+2
RAT C3+3, C4+3

Naked Globals

Name Field # of Occurrence
^( C2
^(2 C2, C3
^(3 C2, C3
^(4 C2, C3
^(5 C3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT FHNU8+2*, Q1+1*
%ZIS F2*!, F2+2!
>> AGE F1*, F1+2*, P2*, HEAD+1
>> ALL F1*
>> DAY Q1+2*, C1*, C2, C3
>> DFN F1, F1+1
DIC F4!*, F5!*
DIC("A" F5*
DIC("S" F4*
DIC(0 F4*, F5*
DT FHNU8+2*, F1+2, Q1+1*
DTIME PAT, P1, P2
>> DTOUT F4, F5
>> DTP Q1+1*, HEAD
>> FHDFN F1
>> FHLST F2+1*
>> FHPGM F2+1*
IO F2+2
IO("Q" F2+1
IOF HDR, HEAD
IOP F2!, F2+2!
IOST HEAD
>> K C3+3*, C3+4*, C3+5*
>> KK C3+2*, C4+2*
>> MEAL C1*, C2*, C2+1
>> MENU F4*
>> MNAM F4*
>> NAM F1*, PAT*, PAT+1, HEAD+1
>> NDAY Q1+2*, C3+1*
>> NUT HEAD+4*
>> POP F2
>> RDA F5*, C3+1, C4+1
>> SEX F1*, P1*, P1+1*, HEAD+1
>> T(1 Q1+2*, C3+3*, C4
>> T(2 Q1+2*, C3+4*, C4
>> T(3 Q1+2*
>> T(4 Q1+2*
>> T(5 Q1+2*, C3+5*, C4
>> TYP F4*
U F4, F1
>> X FHNU8+2*, F4, F5, F1, Q1+1*, P1*
>> X1 C2*, C3*, C3+2, C3+3, C4*, C4+2, RAT
>> X2 C2*, C3*, C3+4, C4*
>> X3 C2*, C3*
>> X4 C2*, C3*
>> X5 C3*, C3+5, C4*
>> Y FHNU8+2, F4, F5, Q1+1
>> Y(0 F4, F1
>> Z1 C3+2*, C3+3*, C3+4*, C4+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All