Routine: FHORX1

Package	Total	Call Graph
Dietetics	5	(DTP,EN2,TR)^FH ^FHDEV (DIV,PATNAME)^FHOMUTL ^FHORX1A ^FHORX1B
Kernel	3	^%ZIS ^%ZISC KILL^XUSCLEAN
VA Fileman	3	^%DT NOW^%DTC ^DIR

Package	Total	Caller Graph
Dietetics	1	FHORD13

Entry Points

Name	Comments	DBIA/ICR reference
Q1	; Print the Diet Activity Report
OUTP	;get outpatient data
WRD
R0
R1
R3
KIL
Q3
REC	;for recurring meals
Q5	; process discharges
PROSG	;process recurring, special and guest meals.
SPEC	;for special meals
GUEST	;S FHTMPS=$NA(^TMP($J,"OP","G",FHPLNM))

External References

Name	Field # of Occurrence
^%DT	R3
NOW^%DTC	FHORX1+4, Q1+2
^%ZIS	R3+1
^%ZISC	R3+3
^DIR	R1+5
DTP^FH	R1+8, Q1+2, OUTP+25
EN2^FH	R3+2
TR^FH	R1
^FHDEV	Q1+2
DIV^FHOMUTL	R0
PATNAME^FHOMUTL	OUTP+23, Q3+1
^FHORX1A	OUTP+30
^FHORX1B	OUTP+30
KILL^XUSCLEAN	KIL

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "Do you want labels? N// " Formatting: !! Timeout: DTIME Variable: X Line Location: R1+0
Function Call: WRITE	Prompt: *7," Enter YES or NO" Line Location: R1+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: R3+0
Function Call: WRITE	Prompt: !!,"Changes since Date/Time: ",DTP," // " Line Location: R3+0
Function Call: WRITE	Prompt: ! Line Location: R3+1
Routine Call	DIR Line Location: R1+5
Routine Call	%ZIS Line Location: R3+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	Q3+2, Q3+5, Q3+6
^DPT("CN"	Q3+3
^FH(111 - [#111]	GUEST+14, GUEST+15, GUEST+16, GUEST+18, GUEST+19
^FH(119.6 - [#119.6]	Q1+3, OUTP+9, OUTP+11, OUTP+12, OUTP+14, OUTP+16, OUTP+18, WRD, Q3+6, Q3+7 , REC+6, REC+7, SPEC+7, SPEC+8, GUEST+5, GUEST+6
^FH(119.72 - [#119.72]	OUTP+13, OUTP+15
^FH(119.73 - [#119.73]	R1+2, PROSG+2
^FH(119.8 - [#119.8]	Q1+5, OUTP+1, OUTP+3, Q3
^FH(119.9 - [#119.9]	Q1+4, GUEST+9
^FHPT - [#115]	Q3, Q3+4
^TMP($J	Q1+2!, OUTP+26, WRD+1, WRD+2, Q3+4, Q3+9, Q5+1, Q5+2, REC+17, SPEC+12* , GUEST+21*, KIL!

Label References

Name	Line Occurrences
KIL	R0, R1, R3, R3+1, R3+2, R3+3
Q1	R3+3
Q3	Q1+5
Q5	Q3+2
R1	R1
R3	R3
WRD	Q1+3

Naked Globals

Name	Field # of Occurrence
^(0	OUTP+13, OUTP+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	FHORX1+4, Q1+2
%DT	R3*!
%ZIS	R3+1!*, R3+3!
%ZIS("A"	R3+1*
>> ADM	Q3*, Q3+3, Q3+4
>> D2	WRD*, WRD+1
>> DA	Q1+5, OUTP+1, OUTP+3, OUTP+26, Q3, Q3+9, Q5+2
>> DFN	OUTP+24, Q3+1, Q3+2, Q3+3, Q3+5, Q3+6
DIR	R1+5!
DIR("A"	R1+5*
DIR("B"	R1+5*
DIR(0	R1+5*
>> DIRUT	R1+6
DT	R1+3
DTIME	R1, R3
>> DTP	R1+8, R3, Q1+2, OUTP+25*, OUTP+26
>> FHACTI	OUTP+6*, OUTP+26
>> FHBID	OUTP+26
>> FHCLER	OUTP+20*
>> FHCOMO	OUTP+2, OUTP+18, OUTP+19
>> FHDESC	OUTP+7*, OUTP+26
>> FHDFN	OUTP+4, Q3, Q3+4, Q3+9, Q5+2
>> FHDTIM	OUTP+4*, OUTP+25
>> FHGDIET	GUEST+9*, GUEST+16, GUEST+18, GUEST+19
>> FHGDIETN	GUEST+13*, GUEST+14, GUEST+15
>> FHGDTNM	GUEST+15, GUEST+16, GUEST+17
>> FHI	REC+3, REC+6, REC+8, REC+9, REC+16, SPEC+4, SPEC+7, SPEC+9, SPEC+10, SPEC+11 , GUEST+2*, GUEST+5, GUEST+7, GUEST+8, GUEST+20
>> FHIJKDAT	REC+9, REC+10, REC+11, REC+12, REC+13, REC+14, REC+15, REC+16, SPEC+10, SPEC+11 , SPEC+12, GUEST+8, GUEST+10, GUEST+11, GUEST+12, GUEST+13, GUEST+17, GUEST+19, GUEST+20, GUEST+21
>> FHJ	REC+3, REC+8, REC+9, REC+17, SPEC+4, SPEC+9, SPEC+10, SPEC+12, GUEST+2*, GUEST+7 , GUEST+8, GUEST+21
>> FHK	REC+8, REC+9, REC+17, SPEC+9, SPEC+10, SPEC+12, GUEST+7*, GUEST+8, GUEST+21
>> FHLBFLG	R1+4, R1+6
>> FHLIEN	OUTP+9*, OUTP+10, OUTP+11, OUTP+12, OUTP+14, OUTP+16, OUTP+18
>> FHLOC	REC+5, REC+6, REC+7, SPEC+6, SPEC+7, SPEC+8, GUEST+4, GUEST+5, GUEST+6
>> FHLOCN	OUTP+7, OUTP+8, OUTP+9, OUTP+22*, OUTP+24
>> FHLPAT	OUTP+24, OUTP+26, REC+16, REC+17, SPEC+11, SPEC+12, GUEST+20, GUEST+21
>> FHLST	R3+2*
>> FHN	REC+3, REC+4, REC+8, REC+9, SPEC+4, SPEC+5, SPEC+9, SPEC+10, GUEST+2*, GUEST+3 , GUEST+7, GUEST+8
>> FHOUTP	OUTP+4*, OUTP+5
>> FHP	R0+1*, R1+2, WRD+1, WRD+2, PROSG+2
>> FHPGM	R3+2*
>> FHPLNM	PROSG+1, PROSG+2, REC+4, SPEC+5, GUEST+3
>> FHPROR	OUTP+2, OUTP+11, OUTP+24, REC+5, REC+7, REC+16, SPEC+6, SPEC+8, SPEC+11, GUEST+4* , GUEST+6*, GUEST+20
>> FHPTNM	OUTP+21*, OUTP+24
>> FHRDAT	REC+9, REC+10, REC+11, REC+12, REC+13, REC+14, REC+15*, REC+17
>> FHSERV1	OUTP+12*, OUTP+13
>> FHSERV2	OUTP+14*, OUTP+15
>> FHSERV3	OUTP+16*, OUTP+17
>> FHSITE	R0, R0+1, OUTP+19
>> FHTC	OUTP+2, OUTP+13, OUTP+15, OUTP+17, OUTP+26
>> FHTIM	Q1+1*
>> FHTMPS	REC+2, REC+3, REC+8, REC+9, SPEC+3, SPEC+4, SPEC+9, SPEC+10, GUEST+1*, GUEST+2 , GUEST+7, GUEST+8
>> H1	Q1+2*
IO	R3+3
IO("Q"	R3+2
IOP	R3+1!, R3+3!
>> IOS	Q1+4
>> LAB	R1+1, R1+2, R1+4, R3+1, Q1+4, OUTP+30
LABSTART	R1+5!, R1+7*
>> LLL	Q1+5, OUTP+1
>> NOW	FHORX1+4, Q1+2, REC+8, SPEC+9, GUEST+7
>> P0	WRD*, WRD+1, WRD+2
>> POP	R3+1
>> R0	Q3+7, Q3+8, Q3+9
>> R1	Q3+5*, Q3+9
>> RE	Q3+6*, Q3+7
>> RI	Q3+6*
>> TIM	FHORX1+4, R1+2, R1+3, R1+8, R3, Q1+1, Q1+2*, Q1+5, OUTP+1
>> TM1	Q3*
U	OUTP+11, OUTP+12, OUTP+13, OUTP+14, OUTP+15, OUTP+16, OUTP+18, PROSG+2, REC+7, REC+10 , REC+11, REC+12, REC+13, REC+14, REC+15, REC+16, SPEC+8, SPEC+11, GUEST+6, GUEST+9 , GUEST+10, GUEST+11, GUEST+12, GUEST+13, GUEST+15, GUEST+16, GUEST+17, GUEST+19, GUEST+20
>> W1	Q1+3, WRD, WRD+1, WRD+2, Q3+4, Q3+6, Q3+7, Q3+9, Q5+1*, Q5+2
>> WARD	Q3+2*, Q3+3
>> WRDN	WRD*, WRD+1, WRD+2
>> X	R1, R1+1, R3
>> X0	Q3+4*
>> Y	R1+7, R3
>> Z	OUTP+3, OUTP+4, OUTP+6, OUTP+7, OUTP+20, Q3, Q3+9, Q5+1, Q5+2

Customize PDF page

Package: Dietetics

Routine: FHORX1

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: