Routine: FHOMRP1

Information

FHOMRP1 ;Hines OIFO/RTK RECURRING MEALS PRINT EXPIRING LIST ;4/17/03 09:45

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
Dietetics	2	DIETPAT^FHOMRR1 PATNAME^FHOMUTL
VA Fileman	2	(C,NOW)^%DTC ^DIR

Package	Total	Caller Graph
Dietetics	1	FHOMRP

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: FHOMRP1+2
Function Call: WRITE	Prompt: ! Line Location: FHOMRP1+11
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !!?2,"OUTPATIENT LOCATION: ",FHLOCNM Line Location: DISP+2
Function Call: WRITE	Prompt: ?6,FHDOW," - ",$E(FHDTP,1,12) Line Location: DISP+15
Function Call: WRITE	Prompt: ?56,$E(FHDIETP,1,24) Line Location: DISP+21
Function Call: WRITE	Prompt: ?56,$E($P($G(^FH(111,FHDPTR,0)),U,1),1,24) Line Location: DISP+22
Routine Call	DIR Line Location: FHOMRP1+3 FHOMRP1+12
Routine Call	%ZIS Line Location: DEV+1

Name	Line Occurrences (* Changed, ! Killed)
^FH(111 - [#111]	DISP+22
^FH(119.6 - [#119.6]	FHOMRP1+5, DISP+1, DISP+21, DISP+22
^FH(119.72 - [#119.72]	DISP+19
^FHPT - [#115]	DISP+5, DISP+7
^FHPT("C"	DISP+3, DISP+4

Name	Line Occurrences
DISP	DEV+2
END	DEV+2, DEV+8

Name	Field # of Occurrence
%ZIS	DEV+1!*, DEV+7!
DIC	FHOMRP1+2!, FHOMRP1+11!
DIR	FHOMRP1+2!, FHOMRP1+11!
DIR("A"	FHOMRP1+2, FHOMRP1+11
DIR("B"	FHOMRP1+12*
DIR(0	FHOMRP1+3, FHOMRP1+12
>> DIRUT	FHOMRP1+3, FHOMRP1+12
DT	FHOMRP1+12
>> FHD	FHOMRP1+10*, FHOMRP1+12
>> FHDATE	DISP+9*, DISP+10, DISP+20
>> FHDFN	DISP+3*, DISP+4, DISP+5, DISP+7
>> FHDIETP	DISP+21
>> FHDPTR	DISP+22*
>> FHDSDT	FHOMRP1+9*, FHOMRP1+10
>> FHDSPDT	DISP+24*, DISP+26
>> FHDT	DISP+5*, DISP+6, DISP+9
>> FHLNM	DISP+16*, DISP+20
FHLOC	FHOMRP1+4*, FHOMRP1+5, DISP+1, DISP+3, DISP+4, DISP+21, DISP+22, END+1!
>> FHLOCNM	DISP+1*, DISP+2, DISP+25
>> FHLZN	DISP+1*, DISP+16, DISP+17
>> FHNDAYS	FHOMRP1+13*, DISP+6, DISP+24
>> FHNODE	DISP+7*, DISP+20, DISP+22
>> FHNOEP	FHOMRP1+5, DISP+8, DISP+23
FHPARAM	FHOMRP1+5*, FHOMRP1+6, FHOMRP1+9, END+1!
>> FHPTNM	DISP+10
>> FHRNUM	DISP+4*, DISP+5, DISP+7
>> FHSERV	DISP+16*, DISP+17
>> FHSRV	DISP+17*, DISP+18, DISP+19
>> FHSRVPT	DISP+18, DISP+19, DISP+20
>> FHTODAY	FHOMRP1+9*, DISP+6
IO	DEV+2
IO("Q"	DEV+2
IOP	DEV+1!, DEV+7!
>> POP	DEV+1
U	FHOMRP1+5, DISP+1, DISP+5, DISP+16, DISP+17, DISP+19, DISP+20, DISP+21, DISP+22
>> X	FHOMRP1+9
>> X1	FHOMRP1+9*
>> X2	FHOMRP1+9*
>> Y	FHOMRP1+4, FHOMRP1+13
>> ZTDESC	DEV+6*
>> ZTRTN	DEV+3*
>> ZTSAVE("FHLOC"	DEV+4*
>> ZTSAVE("FHNDAYS"	DEV+4*
>> ZTSAVE("FHNOEP"	DEV+5*
>> ZTSAVE("FHPARAM"	DEV+4*
>> ZTSAVE("FHTODAY"	DEV+5*