Routine: FHNU7

Package	Total	Call Graph
Dietetics	1	TR^FH

Package	Total	Caller Graph
Dietetics	3	FHNU11 FHNU4 FHNU5

Entry Points

Name	Field # of Occurrence
TR^FH	FHNU7+3

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

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

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!