Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Title of Analysis: "
  • Variable: TIT
  • Timeout: DTIME
  • 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
  • Formatting: !!
  • Prompt: "Do you wish to use common units rather than grams? YES// "
  • Variable: YN
  • Timeout: DTIME
  • 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
  • Formatting: !!
  • Prompt: "Do you wish to edit this list? NO// "
  • Variable: YN
  • Timeout: DTIME
  • 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
  • Formatting: !
  • Prompt: "Do you wish to analyze another menu? NO// "
  • Variable: YN
  • Timeout: DTIME
  • 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
  • Formatting: !!
  • Prompt: "Do you wish to change any amounts? NO// "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: ED+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: ED+0
Function Call: READ
  • Formatting: !
  • Prompt: "Change item # : "
  • Variable: X
  • Timeout: DTIME
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: *7," Enter an item #."
  • Line Location: E1+0
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • 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
  • Formatting: !!
  • Prompt: "Do you wish to delete any items? NO// "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E2+0
Function Call: READ
  • Formatting: !
  • Prompt: "Delete item # : "
  • Variable: X
  • Timeout: DTIME
  • 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
  • Formatting: !!
  • Prompt: "Do you wish to add more food items? NO// "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: E4+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E4+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(112.2 - [#112.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call