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

Package: Dietetics

Routine: FHNU7


Information

FHNU7 ; HISC/REL - Food Item Search ;5/17/93 08:50

Source Information

Source file <FHNU7.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Dietetics 1 TR^FH  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Dietetics 3 FHNU11  FHNU4  FHNU5  

Entry Points

Name Comments DBIA/ICR reference
F0
E1
OK
ED
S1
S0
NX
TOO
END
D2
SD

External References

Name Field # of Occurrence
TR^FH FHNU7+3

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select Food Item: "
  • Formatting: !!?2
  • Timeout: DTIME
  • Variable: Y
  • Line Location: FHNU7+3
Function Call: WRITE
  • Prompt: !,"Enter first few characters of food name, e.g., MILK"
  • Line Location: FHNU7+4
Function Call: WRITE
  • Prompt: !!?2,"Food item not found "
  • Line Location: SD+0
Function Call: WRITE
  • Prompt: !
  • Line Location: TOO+0
Function Call: WRITE
  • Prompt: !,$J(LL,3,0),?6,$P(X,"^",1)
  • Line Location: TOO+0
Function Call: WRITE
  • Prompt: !!?2,"Select Food Item #, '",$S(YN:"^",1:"RETURN"),"' to Quit"
  • Line Location: TOO+1
Function Call: WRITE
  • Prompt: ",",!?2,"or 'RETURN' to continue list"
  • Condition for execution: YN
  • Line Location: TOO+1
Function Call: READ
  • Prompt: " => "
  • Timeout: DTIME
  • Variable: YN
  • Line Location: TOO+2
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: TOO+5
Function Call: READ
  • Timeout: DTIME
  • Variable: Y
  • Line Location: D2+0
Function Call: WRITE
  • Prompt: *7,!," Enter amount of item. Enter 0 to delete;",!," otherwise enter a number greater than 0 but less than 99999."
  • Line Location: D2+2
Function Call: WRITE
  • Prompt: " ... ",Y*WT," grams"
  • Line Location: D2+3
Function Call: WRITE
  • Prompt: !!?2,"You have already selected ",NAM
  • Line Location: ED+0
Function Call: READ
  • Timeout: DTIME
  • Variable: Y
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: *7,!," Enter an amount greater than 0 but less than 99999"
  • Line Location: E1+1
Function Call: WRITE
  • Prompt: " ",UNIT
  • Line Location: E1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FHNU - [#112] F0+1, S0, S1, TOO, OK

Label References

Name Line Occurrences
D2 D2+2
E1 E1+1
ED OK+1
END FHNU7+3, TOO+2, D2, E1, E1+2
F0 NX
FHNU7 FHNU7+4, SD, TOO+4, D2+1
NX SD, TOO+4
OK TOO+6
S0 S0, S1
S1 F0+1, S1, TOO+3
SD S0
TOO S1, TOO+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMT FHNU7+2*, D2+5*, NX*, E1+2*
DTIME FHNU7+3, TOO+2, D2, E1
F F0*, F0+1, S0, END!
>> FFN FHNU7+2*, F0+1*, S0+1*, S1*, TOO+2*, TOO+6*, OK, OK+1, D2*, D2+5
, NX*, ED+1, E1*, E1+2
>> FHM( OK+1, D2+5*, ED+1, E1, E1+2*
J F0+1*, END!
K F0+1*, S0, END!
L F0*, F0+1, S0, D2+4*, END!
LL TOO*, END!
>> NAM FHNU7+2*, OK*, D2, NX*, ED
NM F0*, S1*, SD, TOO, TOO+1, TOO+3*, TOO+5, END!
NOD FHNU7+2*, F0+1, S0, S1, SD, TOO+1, TOO+4, END!, NX*
NX F0+1*, S0*, S1, END!
>> TYP OK+2, D2, D2+3, D2+4, D2+5, ED+1
>> UNIT OK+2*, D2, D2+4*, D2+5, ED+1*, ED+2*, E1, E1+2
>> UNT OK*, OK+2
>> WT OK*, D2, D2+3, D2+5, ED+1*
X FHNU7+3*, TOO*, OK*, END!
XT F0*, S1*, TOO, TOO+3*, TOO+6, END!
Y FHNU7+3*, FHNU7+4, F0, D2*, D2+1, D2+2, D2+3, D2+4, D2+5, END!
, E1*, E1+1, E1+2*
YN TOO+1*, TOO+2*, TOO+3, TOO+4, TOO+5, TOO+6, END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All