Routine: FHMTK1C

Package	Total	Caller Graph
Dietetics	6	FHDCR1A FHDCR1D FHMTK11 FHMTK1A FHOMTK1 FHOMTK2

Entry Points

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: START+2
Function Call: WRITE	Prompt: ?$S(N1=1:2,N1=2:45,1:88),MEALDT Line Location: START+8
Function Call: WRITE	Prompt: ! Line Location: START+10
Function Call: WRITE	Prompt: ?$S(NBR=1:2,NBR=2:45,1:88),PP(N1,NBR) Line Location: START+10
Function Call: WRITE	Prompt: ! Line Location: START+11
Function Call: WRITE	Prompt: ! Line Location: START+12
Function Call: WRITE	Prompt: !! Line Location: START+13
Function Call: WRITE	Prompt: ?$S(NBR=1:2,NBR=2:45,1:88),MM(N1,NBR) Line Location: START+13
Function Call: WRITE	Prompt: ! Line Location: START+14
Function Call: WRITE	Prompt: @IOF Line Location: START+15
Function Call: WRITE	Prompt: @IOF Line Location: START+17
Function Call: WRITE	Prompt: !! Line Location: NXT+1
Function Call: WRITE	Prompt: ?$S(NM=1:12,NM=2:57,1:100),"(More Items Next Pg)" Line Location: NXT+1
Function Call: WRITE	Prompt: ! Line Location: NXT+2
Function Call: WRITE	Prompt: @IOF Line Location: NXT+3
Function Call: WRITE	Prompt: @IOF Line Location: N1+0
Function Call: WRITE	Prompt: !! Line Location: N1+1
Function Call: WRITE	Prompt: ?$S(XX=1:2,XX=2:45,1:88),MEALDT," (Cont.)" Line Location: N1+7
Function Call: WRITE	Prompt: ! Line Location: CHKH+1
Function Call: WRITE	Prompt: ! Line Location: CHKH+1
Function Call: WRITE	Prompt: ?S1,X Line Location: HEAD+1
Function Call: WRITE	Prompt: ! Line Location: FOOT+0
Function Call: WRITE	Prompt: ?S1,HD Condition for execution: $D(MM(0,NBR)) Line Location: FOOT+0
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)="C-" Line Location: L1+1
Function Call: WRITE	Prompt: !,HD,!!!?(LS(MEAL)-42\2),"T A B U L A T E D R E C I P E L I S T",?(LS(MEAL)-8),"Page ",PG Line Location: L1+1
Function Call: WRITE	Prompt: !!?(LS(MEAL)-$L(MEALDT)\2),MEALDT,!!,$S(ALL:"ALL",FHP:$P($G(^FH(119.73,FHP,0)),"^",1),1:$P($G(^FH(119.6,+W1,0)),"^",1)),! Line Location: L1+2
Function Call: WRITE	Prompt: !!,"R E C I P E S",?29 Line Location: L1+3
Function Call: WRITE	Prompt: $P(DP(MEAL,X,K),"^",1) Line Location: L1+4
Function Call: WRITE	Prompt: " Total",! Line Location: L1+5
Function Call: WRITE	Prompt: !!,$P(X8,"~",3),?31 Line Location: L1+6
Function Call: WRITE	Prompt: !!!,"TOTAL RECIPES",?31 Line Location: L1+7
Function Call: WRITE	Prompt: $J("",8)_" " Line Location: L1+10
Function Call: WRITE	Prompt: $S(TOT#1>0:$J(TOT,9,2),1:$J(TOT,9)) Line Location: L1+15
Function Call: WRITE	Prompt: @IOF Condition for execution: MFLG Line Location: L1+15
Function Call: WRITE	Prompt: $J("",8)_" " Line Location: PRO+3
Function Call: WRITE	Prompt: $S(FTOT#1>0:$J(FTOT,9,2),1:$J(FTOT,9)_" ") Line Location: PRO+8
Function Call: WRITE	Prompt: @IOF Line Location: SUM+2
Function Call: WRITE	Prompt: !!!,"TOTAL RECIPES",?31 Line Location: SUM+4
Function Call: WRITE	Prompt: $J("",8)_" " Line Location: SUM+7
Function Call: WRITE	Prompt: $S(TOT#1>0:$J(TOT,9,2),1:$J(TOT,9)) Line Location: SUM+12
Function Call: WRITE	Prompt: $J("",8)_" " Line Location: PR1+3
Function Call: WRITE	Prompt: $S(FTOT#1>0:$J(FTOT,9,2),1:$J(FTOT,9)_" ") Line Location: PR1+8
Function Call: WRITE	Prompt: !,HD,!!!?(SL-48\2),"C O N S O L I D A T E D R E C I P E L I S T",?(SL-8),"Page ",PG Line Location: HDR+1
Function Call: WRITE	Prompt: !!?(SL-$L(MEALDT)\2),MEALDT,!!,$S(ALL:"ALL",FHP:$P($G(^FH(119.73,FHP,0)),"^",1),1:$P($G(^FH(119.6,+W1,0)),"^",1)),! Line Location: HDR+2
Function Call: WRITE	Prompt: !!,"R E C I P E S",?29 Line Location: HDR+3
Function Call: WRITE	Prompt: $P(TP(X,K),"^",1) Line Location: HDR+4
Function Call: WRITE	Prompt: " Total",! Line Location: HDR+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FH(119.6 - [#119.6]	L1+2, HDR+2
^FH(119.73 - [#119.73]	L1+2, HDR+2
^TMP($J	L1+6, PRO+2, SUM+1, PR1+2

Label References

Name	Line Occurrences
CHKH	START+1, N1
FOOT	START+16, NXT+4, CHKH+1
HDR	SUM, SUM+2
HEAD	START+15, NXT+3, CHKH+2
L1	LIST+1, LIST+2
N1	NXT+3
NXT	START+13
PR1	SUM+3
PRO	L1+6
SUM	LIST+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ALL	L1+2, HDR+2
>> DP(	L1+4, L1+7, L1+8, PRO, PRO+1
>> FHBOT	START+13, START+14, START+15, NXT+2, NXT+3, CHKH+1
>> FHP	L1+2, HDR+2
>> FTOT	PRO, PRO+2, PRO+8, PR1, PR1+2, PR1+8
>> HD	FOOT, L1+1, HDR+1
IOF	START+15, START+17, NXT+3, N1, L1+1, L1+15, SUM+2
IOST	L1+1
>> K	L1+4, L1+8, L1+9, PRO+1, PRO+2, SUM+5, SUM+6, PR1+1, PR1+2, HDR+4
>> L1	START+14, NXT+2
>> LN	START+13, START+14, NXT+2, SUM+2
>> LS(	L1*, L1+1, L1+2
>> MDT	START+3, START+4, START+6, N1+2, N1+3, N1+5, L1, SUM
>> MEAL	START+3, N1+2, LIST+2*, L1, L1+1, L1+2, L1+4, L1+6, L1+7, L1+8 , L1+9, PRO, PRO+1, PRO+2
>> MEALDT	START+3, START+4, START+6, START+7, START+8, N1+2, N1+3, N1+5, N1+6, N1+7 , L1, L1+2, SUM, HDR+2
>> MFLG	START+3, N1+2, LIST+1, L1+15
>> MM(	START+13
>> MM(0	START+5, START+6, START+8, NXT+1, N1+4, N1+5, N1+7, HEAD, FOOT
>> MMMDT	START+6, N1+5
>> N1	START+2, START+4, START+5, START+6, START+8, START+10, START+13*
>> NBR	START+10, START+13, HEAD, HEAD+1, FOOT
>> NM	NXT+1, HEAD, HEAD+1
>> P(	L1+9, PRO+2*
>> PG	LIST+1, L1, L1+1, SUM, HDR+1
>> PP(	START+10
>> S1	HEAD+1, HEAD+2, FOOT
>> SL	SUM*, HDR+1, HDR+2
>> SUM	LIST+3
>> T1(	SUM+6, PR1+2*
>> TABREC	START
>> TL	START+1, START+2, START+10, START+12, START+13, START+14, NXT+1, NXT+2, N1, N1+1 , N1+8, CHKH+1, HEAD, FOOT
>> TOT	L1+7, L1+9, L1+15, SUM+4, SUM+6, SUM+12
>> TP(	SUM+4, SUM+5, PR1, PR1+1, HDR+4
U	START+6, N1+5
>> W1	L1+2, HDR+2
>> X	HEAD, HEAD+1, HEAD+2, L1+4, L1+7, L1+8, L1+9, PRO, PRO+1, PRO+2 , SUM+4, SUM+5, SUM+6, PR1, PR1+1, PR1+2, HDR+4*
>> X8	L1+6, PRO+2, SUM+1, SUM+3, PR1+2
>> XX	N1+1*, N1+3, N1+4, N1+5, N1+7
>> Z	L1+9, L1+10, L1+12, PRO+2, PRO+3, PRO+5, SUM+6, SUM+7, SUM+9, PR1+2 , PR1+3, PR1+5

Customize PDF page

Package: Dietetics

Routine: FHMTK1C

Information

Source Information

Caller Graph

Caller Graph Total: 6

Entry Points

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
NXT	; Print Next Page
HEAD
HDR	; Consolidated Recipe List Heading
START
PRO
LIST	; Print Tabulated Recipe List for Service Points
PR1
PRT	; Print 3 person per page
CHKH	; Check whether name header should be on bottom
L1
FOOT
N1
SUM