Routine: FHOMCBRP

Information

FHOMCBRP ;Hines OIFO/RTK COMBINED OUTPATIENT MEALS LIST ;6/30/03 15:45

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
VA FileMan	3	C^%DTC ^DIC ^DIR
Dietetics	2	DIETPAT^FHOMRR1 (ENDATE,OUTLOC,PATNAME,STDATE)^FHOMUTL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Dietetics	1	FHOMCBRP

Entry Points

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

External References

Name	Field # of Occurrence
C^%DTC	EN+17
^%ZIS	DEV+1
^%ZISC	DEV+2, DEV+7
^%ZTLOAD	DEV+6
^DIC	EN+7, EN+12
^DIR	EN+2, PG+1
DIETPAT^FHOMRR1	LIST+70
ENDATE^FHOMUTL	EN+16
OUTLOC^FHOMUTL	EN+4
PATNAME^FHOMUTL	LIST+7, LIST+23, LIST+39
STDATE^FHOMUTL	EN+15
$$FMTE^XLFDT	LIST+56

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!!,"C O M B I N E D O U T P A T I E N T M E A L S L I S T" Line Location: FHOMCBRP+3
Function Call: WRITE	Prompt: !! Line Location: EN+1
Function Call: WRITE	Prompt: ! Line Location: EN+4
Function Call: WRITE	Prompt: ! Line Location: EN+15
Function Call: WRITE	Prompt: ! Line Location: EN+16
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !!,"NO OUTPATIENT MEALS WITHIN SELECTED PARAMETERS" Line Location: LIST+52
Function Call: WRITE	Prompt: ?28,$E($P($G(^FH(111,FHDIET,0)),U,1),1,24) Line Location: LIST+69
Function Call: WRITE	Prompt: ?28,$E(FHDIETP,1,24) Line Location: LIST+70
Function Call: WRITE	Prompt: !,"C O M B I N E D O U T P A T I E N T M E A L S L I S T",!! Line Location: HDR+2
Routine Call	DIC Line Location: EN+7 EN+12
Routine Call	DIR Line Location: EN+2 PG+1
Routine Call	%ZIS Line Location: DEV+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(405.4 - [#405.4]	LIST+73
^FH(111 - [#111]	LIST+69
^FH(119.6 - [#119.6]	LIST+9, LIST+11, LIST+13, LIST+27, LIST+29, LIST+31, LIST+41, LIST+43, LIST+45, LIST+70
^FH(119.73 - [#119.73]	LIST+10, LIST+28, LIST+42
^FHPT - [#115]	LIST+6, LIST+24, LIST+38
^FHPT("GM"	LIST+36, LIST+37
^FHPT("RM"	LIST+3, LIST+4, LIST+5
^FHPT("SM"	LIST+21, LIST+23
^TMP($J	LIST+1!, LIST+15, LIST+33, LIST+48*, LIST+52, LIST+53, LIST+59, LIST+64, LIST+65

Label References

Name	Line Occurrences
DEV	EN+18
EN	EN+18
END	DEV+2, DEV+8
HDR	LIST+54, PG+2
LIST	DEV+2
PG	LIST+75

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEV+1!*, DEV+7!
DIC	EN+6!, EN+11!
DIC("A"	EN+6, EN+11
DIC(0	EN+7, EN+12
DIR	EN+1!, END+1!, PG+1!
DIR("A"	EN+1*
DIR(0	EN+2, PG+1
>> DIRUT	EN+3
>> DUOUT	EN+7, EN+12
ENDT	EN+16, EN+17, LIST+3, LIST+20, LIST+21, LIST+36, END+1!
>> EX	LIST+1, LIST+3, LIST+4, LIST+5, LIST+21, LIST+53, LIST+59, LIST+64, LIST+75, PG+1
FHCH	END+2!
FHCL	END+1!
>> FHCOMM	LIST+9, LIST+10, LIST+27, LIST+28, LIST+41*, LIST+42
>> FHDFN	LIST+4, LIST+5, LIST+6, LIST+15, LIST+23, LIST+24, LIST+33, LIST+37, LIST+38, LIST+48 , LIST+70
FHDIET	LIST+68*, LIST+69, END+2!
FHDIETP	LIST+70, END+3!
>> FHDTML	LIST+53*, LIST+55, LIST+59, LIST+64, LIST+65
FHGMDT	LIST+36*, LIST+37, LIST+38, LIST+47, END+1!
FHGMDTX	LIST+47*, LIST+48, END+1!
>> FHLBY	EN+3*, EN+4, EN+5, EN+10, LIST+8, LIST+9, LIST+10, LIST+26, LIST+27, LIST+28 , LIST+40, LIST+41, LIST+42
FHLOC	EN+4, LIST+8, LIST+9, LIST+11, LIST+13, LIST+15, LIST+26, LIST+27, LIST+29, LIST+31 , LIST+33, LIST+40, LIST+41, LIST+43, LIST+45, LIST+48, LIST+59*, LIST+61, LIST+64, LIST+65 , LIST+70, END+2!
>> FHLOCNM	LIST+13, LIST+15, LIST+31, LIST+33, LIST+45*, LIST+48
FHML	LIST+14, LIST+15, LIST+31, LIST+32, LIST+33, LIST+46, LIST+48, END+1!
FHNODE	LIST+65*, LIST+67, LIST+68, LIST+70, LIST+71, LIST+72, END+2!
FHPCE	LIST+67, LIST+68, LIST+71, LIST+72, END+3!
FHPG	LIST+1, LIST+54, LIST+58, END+3!
FHPRD	LIST+10, LIST+28, LIST+42*, END+2!
>> FHPRORD	LIST+11, LIST+12, LIST+15, LIST+29, LIST+30, LIST+33, LIST+43, LIST+44, LIST+48
FHPTN	LIST+64*, LIST+65, LIST+66, LIST+70, END+2!
>> FHPTNM	LIST+15, LIST+33, LIST+48
FHRM	LIST+5*, LIST+6, LIST+15, END+1!
>> FHRMBD	LIST+72*, LIST+73
>> FHRMBNM	LIST+72, LIST+73, LIST+74
>> FHRNUM	LIST+70*
FHSELOC	EN+4*, LIST+8, LIST+26, LIST+40, END+2!
FHSLCOM	EN+5, EN+7, EN+8, EN+9*, LIST+9, LIST+27, LIST+41, END+2!
FHSLPRO	EN+10, EN+12, EN+13, EN+14*, LIST+10, LIST+28, LIST+42, END+2!
FHSMDT	LIST+21*, LIST+22, LIST+23, LIST+24, END+1!
FHSMDTX	LIST+22*, LIST+33, END+1!
>> FHST	LIST+6, LIST+38
>> FHSTAT	LIST+24*, LIST+25
>> FHWDT	LIST+55, LIST+56, LIST+60
>> FHWML	LIST+55, LIST+57, LIST+60
FHXRDT	LIST+3*, LIST+4, LIST+5, LIST+15, END+1!
FHZN	LIST+6, LIST+8, LIST+14, LIST+15, LIST+24, LIST+26, LIST+31, LIST+33, LIST+38*, LIST+40 , LIST+46, LIST+48, END+2!
IO	DEV+2
IO("Q"	DEV+2
IOF	FHOMCBRP+3, HDR+1
IOP	DEV+1!, DEV+7!
IOSL	LIST+75
IOST	PG+1
>> NUM	LIST+1*
>> POP	DEV+1
STDT	EN+15, EN+17, LIST+21, LIST+36, END+1!
>> STDT1	EN+17*, LIST+3
U	LIST+3, LIST+4, LIST+5, LIST+6, LIST+8, LIST+9, LIST+10, LIST+11, LIST+13, LIST+14 , LIST+21, LIST+24, LIST+26, LIST+27, LIST+28, LIST+29, LIST+31, LIST+38, LIST+40, LIST+41 , LIST+42, LIST+43, LIST+45, LIST+46, LIST+53, LIST+59, LIST+64, LIST+68, LIST+69, LIST+70 , LIST+72, LIST+73, LIST+75, PG+1
>> X	EN+17
>> X1	EN+17*
>> X2	EN+17*
>> Y	EN+3, EN+8, EN+9, EN+13, EN+14, PG+1
>> ZTDESC	DEV+3*
>> ZTRTN	DEV+3*
>> ZTSAVE("ENDT"	DEV+4*
>> ZTSAVE("FHLBY"	DEV+5*
>> ZTSAVE("FHSELOC"	DEV+5*
>> ZTSAVE("FHSLCOM"	DEV+5*
>> ZTSAVE("FHSLPRO"	DEV+6*
>> ZTSAVE("STDT"	DEV+4*
>> ZTSAVE("STDT1"	DEV+4*

Customize PDF page

Package: Dietetics