Routine: FHPRC13

Package	Total	Call Graph
VA Fileman	4	^%DT ^DIC ^DIE ^DIK
Dietetics	2	TR^FH (L1,LIS,OLD,PD,SRCH)^FHPRC14
Kernel	1	KILL^XUSCLEAN

Package	Total	Caller Graph
Dietetics	1	FHPRC14

Entry Points

External References

Name	Field # of Occurrence
^%DT	GET+2
^DIC	GET, S1+3, S2+3, S3+4, S4+5, R1+4
^DIE	GET+1
^DIK	E8
TR^FH	STOR
L1^FHPRC14	STOR
LIS^FHPRC14	R1+3
OLD^FHPRC14	S2+4
PD^FHPRC14	GET+1
SRCH^FHPRC14	S4+9
KILL^XUSCLEAN	KIL

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GET+0
Function Call: READ	Prompt: "Select Day #: " Formatting: ! Timeout: DTIME Variable: X Line Location: S1+1
Function Call: WRITE	Prompt: ! Line Location: S1+2
Function Call: READ	Prompt: "Select Meal #: " Formatting: ! Timeout: DTIME Variable: X Line Location: S2+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: S3+1
Function Call: WRITE	Prompt: ! Line Location: S3+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: S4+1
Function Call: WRITE	Prompt: !,"Select Production Diet: " Line Location: S4+1
Function Call: WRITE	Prompt: $S($G(^FH(116.2,+PD,0))'="":$P(^FH(116.2,+PD,0),"^",1)_" // ",1:"") R X:DTIME G:'$T!(X["^") Condition for execution: PD Line Location: S4+1
Function Call: WRITE	Prompt: *7,?27,"No Production Diet to Delete!" Line Location: S4+3
Function Call: READ	Prompt: "Select Recipe: " Formatting: !! Timeout: DTIME Variable: X Line Location: R1+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: R2+0
Function Call: WRITE	Prompt: *7,!,"Enter amount of serving portion. Enter 0 to omit recipe;",!,"otherwise enter a number greater than 0 but less than 9999." Line Location: R2+1
Function Call: READ	Prompt: "Okay to Save the Menu? YES// " Formatting: !! Timeout: DTIME Variable: YN Line Location: STOR+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: STOR+0
Function Call: WRITE	Prompt: ! Line Location: STOR+1
Function Call: WRITE	Prompt: !,"...Storing Recipes and Food Nutrient" Line Location: E5+0
Function Call: WRITE	Prompt: !,"...Done" Line Location: E5+2
Function Call: WRITE	Prompt: *7,?17,"No Meal to Delete!" Line Location: DEL+1
Function Call: WRITE	Prompt: !,"No Meal-Meal Deleted" Line Location: E6+0
Function Call: WRITE	Prompt: !,"No Meals Remains-Day Deleted" Line Location: E7+1
Function Call: WRITE	Prompt: ! Line Location: E7+3
Function Call: WRITE	Prompt: !,"...Menu Deleted" Line Location: E8+0
Function Call: WRITE	Prompt: ! Line Location: E8+1
Routine Call	DIE Line Location: GET+1
Routine Call	DIC Line Location: GET S1+3 S2+3 S3+4 S4+5 R1+4

FileNo	Call Tags
^FHUM - [#112.6]	Classic Fileman Calls
^FH(114 - [#114]	Classic Fileman Calls
^FH(116.1 - [#116.1]	Classic Fileman Calls
^FH(116.2 - [#116.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^FH(114 - [#114]	R1+4
^FH(116.1 - [#116.1]	S3+1, S3+3
^FH(116.2 - [#116.2]	S4+1, S4+4
^FHUM - [#112.6]	GET+1, GET+2, SEL, S1+4, A1, A1+1!, A1+2, A1+3, A2+1, A2+2 , A2+3, A2+4, E6!, E7, E7+1!, E7+2, E7+3
^TMP($J	FHPRC13+2!, S4+7, R1+4, R2, R2+2, E5+1, DEL+1, DEL+2!, A1, A2 , KIL!

Name	Field # of Occurrence
^(	A2
^(0	A1+2, A1+3

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	GET+2*
>> CODE	S2+4, S4+6, S4+8
DA	GET+1, S1+3, E8!*
DA(1	S1*
>> DAY	SEL, S1+3, S1+4, S2+2, S2+4, S4+7, S4+8, R1+4, R2, R2+2 , E5+1*, DEL+1, DEL+2, A1, A1+1, A1+2, A1+3, A2, A2+1, A2+2 , A2+3, A2+4, E6, E7, E7+1, E7+2
DIC	GET!, GET+1!, SEL!, S1, S1+3!, S2, S2+3!, S3!, S3+4!, S4!* , S4+5!, R1+1!*, R1+4!, E8!
DIC("DR"	GET, S1
DIC("S"	GET*
DIC(0	GET, S1, S2, S3, S4, R1+1
DIDEL	GET+1*!
DIE	GET+1*, E8!
DIK	E8!*
DLAYGO	GET!, S1, S1+3!, S2*, S2+3!
DR	GET+1*, S1+4!
DTIME	S1+1, S2+1, S3+1, S4+1, R1+2, R2, STOR
>> DTOUT	GET
DUZ	GET+2
>> K	A1+4, A2
>> L1	A2*, A2+1, A2+2
>> M(	S2+2, S2+4, S4+8, E6, E7+2!
>> M(0	S1+2
>> M1	S2+4, S3+1, S3+3, S3+4, S4+6, S4+8
>> MEAL	SEL, S2+3, S2+4, S4+7, S4+8, R1+4, R2, R2+2, E5+1*, DEL+1 , DEL+2, A1, A1+1, A1+2, A1+3, A2, A2+1, A2+2, A2+3, A2+4 , E6
>> MENU	GET*, GET+1, GET+2, SEL, S1, S1+4, A1, A1+1, A1+2, A1+3 , A2+1, A2+2, A2+3, A2+4, E6, E7, E7+1, E7+2, E7+3, E8
>> NEW	GET*, GET+1, S2+4, A1+1
>> NP	A2*, A2+3, A2+4
>> OLD	S2+4*, S4+7
>> P	S2+4*
>> PD	S2+4, S4+1, S4+2, S4+3, S4+4, S4+6*, S4+8
>> QTY	A2*, A2+2, A2+4
>> REC	R1+4*, R2, R2+2
>> S1	S4+8*
U	GET, GET+2, A2+1, A2+3, E6, E7+2
>> X	GET, GET+2, S1+1, S1+2, S2+1, S2+2, S3+1, S3+2, S3+3, S4+1 , S4+2, S4+3, S4+4, R1+2, R1+3, R2, R2+1, R2+2, STOR
>> Y	GET, GET+1, GET+2, S1+3, S2+3, S3+4, S4+5, S4+6, R1+4, A2*
>> Y(0	S4+6
>> YN	STOR*, STOR+1
>> ZZ	S4+6, S4+7, A1

Customize PDF page

Package: Dietetics

Routine: FHPRC13

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
E6
R1	; Edit Recipe and Portion
R2
GET
S3
S2
S1
STOR
S4
A1
A2
DEL	; Delete Meal
E8
KIL
E5
E7
SEL

Name	Line Occurrences
A1	E5+1
A2	A2, A2+5
DEL	S3+2
E5	STOR+1
E6	S3+3, DEL+3
E7	S2+2
E8	S1+2
GET	GET
KIL	GET, GET+1, S1+1, S2+1, S3+1, S4+1, R1+2, R2, STOR, E5+3
R1	S4+7, R1+3, R1+4, R2, R2+3
R2	R2+1
S1	S1+3, S2+2
S2	S2+3, R1+2, DEL+1, E7
S3	S3+4
S4	S4+2, S4+3, S4+5
SEL	GET+1, STOR+2, E7+3
STOR	S1+2, STOR