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

Package: Dietetics

Routine: FHNU5


Information

FHNU5 ; HISC/REL - Abbreviated Analysis ;5/17/93 08:48

Source Information

Source file <FHNU5.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Dietetics 3 (EN2,TR)^FH  ^FHNU6  ^FHNU7  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHNU5  

Entry Points

Name Comments DBIA/ICR reference
E2
ED
L1
T0
LI
RDA
E3
KIL
E4
D4
D5
E1
D3
D0
D1

External References

Name Field # of Occurrence
^%ZIS D4+1
^%ZISC D4+3
^DIC RDA
EN2^FH D4+2
TR^FH D0, D4, D5, ED, E2, E4
^FHNU6 D4+3
^FHNU7 D1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Title of Analysis: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: TIT
  • Line Location: T0+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: T0+0
Function Call: WRITE
  • Prompt: *7,!,"Answer must be 3-60 characters in length"
  • Line Location: T0+1
Function Call: READ
  • Prompt: "Do you wish to use common units rather than grams? YES// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: D0+0
Function Call: WRITE
  • Prompt: *7,!," Answer YES or NO"
  • Line Location: D0+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RDA+0
Function Call: WRITE
  • Prompt: !!!,"We will now build the food list; you can obtain an analysis"
  • Line Location: RDA+1
Function Call: WRITE
  • Prompt: !,"of a single food item by merely selecting that one item."
  • Line Location: RDA+2
Function Call: READ
  • Prompt: "Do you wish to edit this list? NO// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: D4+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: D4+0
Function Call: WRITE
  • Prompt: !
  • Line Location: D4+1
Function Call: WRITE
  • Prompt: !
  • Line Location: D4+2
Function Call: READ
  • Prompt: "Do you wish to analyze another menu? NO// "
  • Formatting: !
  • Timeout: DTIME
  • Variable: YN
  • Line Location: D5+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: D5+0
Function Call: WRITE
  • Prompt: @IOF,!!,"Here is your final food list:",!
  • Line Location: LI+0
Function Call: WRITE
  • Prompt: !,$J(NM,4,0)," ",$P(^FHNU(NX,0),"^",1)," ",AMT," ",UNIT
  • Line Location: L1+2
Function Call: READ
  • Prompt: "Do you wish to change any amounts? NO// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: ED+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: ED+0
Function Call: READ
  • Prompt: "Change item # : "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: *7," Enter an item #."
  • Line Location: E1+0
Function Call: READ
  • Timeout: DTIME
  • Variable: Y
  • Line Location: E1+2
Function Call: WRITE
  • Prompt: *7," Enter a number from 1 to 99999."
  • Line Location: E1+2
Function Call: WRITE
  • Prompt: " ",UNIT
  • Line Location: E1+3
Function Call: READ
  • Prompt: "Do you wish to delete any items? NO// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E2+0
Function Call: READ
  • Prompt: "Delete item # : "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: E3+0
Function Call: WRITE
  • Prompt: *7," Enter an item #."
  • Line Location: E3+0
Function Call: WRITE
  • Prompt: " ... deleted"
  • Line Location: E3+1
Function Call: READ
  • Prompt: "Do you wish to add more food items? NO// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: E4+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E4+0
Routine Call
  • DIC
  • Line Location:
    • RDA
Routine Call
  • %ZIS
  • Line Location:
    • D4+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FHNU - [#112] L1+2

Label References

Name Line Occurrences
D0 D0+1
D1 D1, E4+1
D3 E4+1
D4 D4
D5 D4+2, D5
E1 E1, E1+2, E1+3
E2 ED+1, E1, E2
E3 E3, E3+1
E4 ED, E2+1, E3, E4
ED D4+1, ED, E1, E3
KIL T0, D0, RDA, D4, D4+1, D5, ED, E1, E1+2, E2
, E3, E4
L1 L1+2
LI D3
T0 T0, T0+1, D5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS D4+1*!, D4+3!
>> AMT L1+1*, L1+2
DIC RDA!*
DIC("A" RDA*
DIC(0 RDA*
DTIME T0, D0, D4, D5, ED, E1, E1+2, E2, E3, E4
>> DTOUT RDA
>> FFN D1
>> FHLST D4+2*
FHM RDA+2!
FHM( L1, L1+1, E1+1, E1+2, E1+3*, E3+1!
>> FHPGM D4+2*
IO D4+3
IO("Q" D4+2
IOF LI
IOP D4+1!, D4+3!
>> NM D4+1, LI*, L1, L1+1*, L1+2, ED, E1, E3
>> NX LI*, L1*, L1+1, L1+2
>> POP D4+1
>> RDA RDA*
>> TIT T0*, T0+1
>> TYP D0+2*, L1+1, E1+1
>> UNIT D0+2*, L1+1*, L1+2, E1+1*, E1+2, E1+3
>> WT L1+1*, E1+1*
>> X D0*, RDA, D4*, D5*, L1+1*, ED*, E1*, E1+1*, E1+2, E1+3
, E2*, E3*, E3+1*, E4*
>> XT LI*, L1+1*, E1+1, E3+1
>> Y RDA, E1+2*, E1+3
>> YN D0*, D0+1, D0+2, D4*, D4+1, D5*, ED*, ED+1, E2*, E2+1
, E4*, E4+1
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 |  Local Variables |  All