Routine: FHOMRL1

Package	Total	Call Graph
Dietetics	3	DTP^FH DIETPAT^FHOMRR1 (ENDATE,OUTLOC,PATNAME,STDATE)^FHOMUTL
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	3	C^%DTC ^DIC ^DIR

Package

Total

Call Graph

Dietetics

DTP^FH DIETPAT^FHOMRR1 (ENDATE,OUTLOC,PATNAME,STDATE)^FHOMUTL

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

VA Fileman

C^%DTC ^DIC ^DIR

Package	Total	Caller Graph
Dietetics	1	FHOMRL

Package

Total

Caller Graph

Dietetics

FHOMRL

Name	Comments	DBIA/ICR reference
DISP	; First build data in ^TMP global
END	;
HDR	;
DEV	;get device and set up queue
START
PG	;

Name	Field # of Occurrence
C^%DTC	START+15
^%ZIS	DEV+1
^%ZISC	DEV+2, DEV+7
^%ZTLOAD	DEV+6
^DIC	START+7, START+11
^DIR	START+2, PG+1
DTP^FH	DISP+28
DIETPAT^FHOMRR1	DISP+35
ENDATE^FHOMUTL	START+14
OUTLOC^FHOMUTL	START+4
PATNAME^FHOMUTL	DISP+6
STDATE^FHOMUTL	START+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!!?20,"R E C U R R I N G M E A L S L I S T" Line Location: FHOMRL1+3
Function Call: WRITE	Prompt: !! Line Location: START+1
Function Call: WRITE	Prompt: ! Line Location: START+4
Function Call: WRITE	Prompt: ! Line Location: START+13
Function Call: WRITE	Prompt: ! Line Location: START+14
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: DTP Line Location: DISP+28
Function Call: WRITE	Prompt: ?64,$E(FHDIETP,1,16) Line Location: DISP+35
Function Call: WRITE	Prompt: ?64,$E($P($G(^FH(111,FHDPTR,0)),U,1),1,16) Line Location: DISP+36
Function Call: WRITE	Prompt: !?25,"R E C U R R I N G M E A L L I S T" Line Location: HDR+2
Function Call: WRITE	Prompt: !!?5,"LOCATION: ",$P(FHLSRT,"~",2) Line Location: HDR+3
Function Call: WRITE	Prompt: !!,"Date",?11,"Patient Name",?31,"Meal",?36,"Service Pnt" Line Location: HDR+4
Function Call: WRITE	Prompt: ?48,"Room-Bed",?64,"Diet Ordered" Line Location: HDR+5
Function Call: WRITE	Prompt: !,"=========",?11,"===================",?31,"====" Line Location: HDR+6
Function Call: WRITE	Prompt: ?36,"===========",?48,"==============",?64,"================" Line Location: HDR+7
Routine Call	DIC Line Location: START+7 START+11
Routine Call	DIR Line Location: START+2 PG+1
Routine Call	%ZIS Line Location: DEV+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(405.4 - [#405.4]	DISP+26
^FH(111 - [#111]	DISP+36
^FH(119.6 - [#119.6]	DISP+8, DISP+10, DISP+12, DISP+24, DISP+35, DISP+36
^FH(119.72 - [#119.72]	DISP+33
^FH(119.73 - [#119.73]	DISP+9
^FHPT - [#115]	DISP+5
^FHPT("RM"	DISP+2, DISP+3, DISP+4
^TMP($J	DISP+1!, DISP+13*, DISP+18, DISP+21, DISP+22, DISP+23

Name	Line Occurrences
DEV	START+16
DISP	DEV+2
END	DEV+2, DEV+8
HDR	DISP+20, PG+2
PG	DISP+19, DISP+37
START	START+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEV+1!*, DEV+7!
DIC	START+6!, START+10!
DIC("A"	START+6, START+10
DIC(0	START+7, START+11
DIR	START+1!, PG+1!
DIR("A"	START+1*
DIR(0	START+2, PG+1
>> DIRUT	START+3
>> DTP	DISP+28*
>> DUOUT	START+7, START+11
ENDT	START+14, DISP+2, END+1!
>> EX	DISP+1, DISP+2, DISP+3, DISP+4, DISP+18, DISP+19, DISP+21, DISP+22, DISP+37, PG+1
>> FHCOMM	DISP+8*, DISP+9
>> FHDFN	DISP+3, DISP+4, DISP+5, DISP+13, DISP+27
>> FHDIETP	DISP+35
>> FHDPTR	DISP+36*
>> FHLBY	START+3*, START+4, START+5, START+9, DISP+7, DISP+8, DISP+9
>> FHLOC	START+4, DISP+7, DISP+8, DISP+10, DISP+12, DISP+23*, DISP+24, DISP+35, DISP+36
>> FHLOCNM	DISP+12*, DISP+13
>> FHLOCZN	DISP+24*, DISP+31, DISP+32
>> FHLSRT	DISP+18*, DISP+21, DISP+22, DISP+23, HDR+3
>> FHPG	DISP+1, DISP+19, DISP+20
>> FHPRD	DISP+9*
>> FHPRORD	DISP+10, DISP+11, DISP+13
>> FHPTN	DISP+22*, DISP+23, DISP+24, DISP+27, DISP+29
>> FHPTNM	DISP+13
FHRM	DISP+4*, DISP+5, DISP+13, END+1!
>> FHRMBD	DISP+25*, DISP+26
>> FHRMBNM	DISP+25, DISP+26, DISP+34
>> FHRNUM	DISP+24*
>> FHSELOC	START, START+4, DISP+7
FHSLCOM	START, START+5, START+7, START+8*, DISP+8, END+1!
FHSLPRO	START, START+9, START+11, START+12*, DISP+9, END+1!
>> FHSPT	DISP+32*, DISP+33
>> FHSRV	DISP+31*, DISP+32
>> FHSRVPT	DISP+33*, DISP+34
FHST	DISP+5*, END+1!
FHXRDT	DISP+2, DISP+3, DISP+4, DISP+13, DISP+21, DISP+22, DISP+23, DISP+28, END+1!
FHZN	DISP+5, DISP+7, DISP+13, DISP+23, DISP+25, DISP+30, DISP+36, END+1!
IO	DEV+2
IO("Q"	DEV+2
IOF	FHOMRL1+3, HDR+1
IOP	DEV+1!, DEV+7!
IOSL	DISP+37
IOST	DISP+19, PG+1
>> POP	DEV+1
STDT	START+13, START+15*, DISP+2, END+1!
U	DISP+2, DISP+3, DISP+4, DISP+5, DISP+7, DISP+8, DISP+9, DISP+10, DISP+12, DISP+18 , DISP+19, DISP+21, DISP+22, DISP+23, DISP+25, DISP+26, DISP+30, DISP+31, DISP+32, DISP+33 , DISP+35, DISP+36, DISP+37, PG+1
>> X	START+15
>> X1	START+15*
>> X2	START+15*
>> Y	START+3, START+7, START+8, START+11, START+12, PG+1
>> ZTDESC	DEV+6*
>> ZTRTN	DEV+3*
>> ZTSAVE("ENDT"	DEV+4*
>> ZTSAVE("FHDFN"	DEV+4*
>> ZTSAVE("FHLBY"	DEV+5*
>> ZTSAVE("FHSELOC"	DEV+5*
>> ZTSAVE("FHSLCOM"	DEV+5*
>> ZTSAVE("FHSLPRO"	DEV+5*
>> ZTSAVE("STDT"	DEV+4*

Customize PDF page

Package: Dietetics

Routine: FHOMRL1

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: