Routine: FHOMRT1

Call Graph Total: 15

Package	Total	Call Graph
Dietetics	9	SETAET^FHOMRO2 DISP^FHOMRR1 (EXMSG,GETOPT,MSHOM,OKMSG)^FHOMUTL ERR^FHOMWOR ^FHORT10 CALC^FHORX3 (EVSEND,GETOR,SEND)^FHWOR TF1^FHWOR5 ^FHWOR51
VA Fileman	4	(C,NOW)^%DTC FILE^DICN ^DIE ^DIR
Kernel	2	($$FMTE,$$FMTHL7)^XLFDT $$PATCH^XPDUTL

Package	Total	Caller Graph
Dietetics	2	FHOMRT FHOMWOR

Package

Total

Caller Graph

Dietetics

FHOMRT FHOMWOR

Name	Comments	DBIA/ICR reference
CHK	;
SET	;
END	;
UPD100	;Backdoor message to update file #100 with a new TF order
HL7SET	; ; Entry point for TF's placed from CPRS/OERR
FHTUB
TF1

External References

Name	Field # of Occurrence
C^%DTC	HL7SET+14
NOW^%DTC	UPD100+3
FILE^DICN	SET+9
^DIE	SET+4, SET+14
^DIR	TF1, FHTUB+14, FHTUB+18
SETAET^FHOMRO2	SET+18
DISP^FHOMRR1	FHOMRT1+4
EXMSG^FHOMUTL	FHTUB+1, FHTUB+15, FHTUB+18
GETOPT^FHOMUTL	FHOMRT1+3
MSHOM^FHOMUTL	UPD100+2
OKMSG^FHOMUTL	FHTUB+21
ERR^FHOMWOR	HL7SET+4, HL7SET+12, HL7SET+13
^FHORT10	FHTUB
CALC^FHORX3	SET+15
EVSEND^FHWOR	UPD100+7
GETOR^FHWOR	HL7SET+12
SEND^FHWOR	HL7SET+18
TF1^FHWOR5	UPD100+6
^FHWOR51	HL7SET+3
$$FMTE^XLFDT	CHK+1
$$FMTHL7^XLFDT	UPD100+4
$$PATCH^XPDUTL	UPD100+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: TF1+0
Function Call: WRITE	Prompt: !!?3,"The selected order(s) have been cancelled!",! Line Location: TF1+3
Function Call: WRITE	Prompt: ! Line Location: FHTUB+2
Function Call: WRITE	Prompt: !!,"Total Kcal: ",FHTK,?36,"Total Quantity: ",FHTC Line Location: FHTUB+11
Function Call: WRITE	Prompt: !!,"WARNING: Total amount exceeds 5000ml: ",FHTC," ml",!,"Please Edit the Tubefeeding and Modify." Line Location: FHTUB+12
Function Call: WRITE	Prompt: ! Line Location: FHTUB+14
Function Call: WRITE	Prompt: ! Line Location: FHTUB+17
Function Call: WRITE	Prompt: ! Line Location: FHTUB+19
Function Call: WRITE	Prompt: !?3,"The order for ",$E(FHDTX,1,12)," has been cancelled -- not ordered!" Line Location: CHK+1
Routine Call	DIE Line Location: SET+4 SET+14
Routine Call	DIR Line Location: TF1 FHTUB+14 FHTUB+18

Name	Line Occurrences (* Changed, ! Killed)
^DD(115.016	SET+8
^FH(118.2 - [#118.2]	FHTUB+7, SET+15, HL7SET+8
^FHPT - [#115]	TF1+2, CHK+1, SET+1!, HL7SET+15
^ORD(101 - [#101]	FHTUB

Name	Line Occurrences
CHK	FHTUB+20
END	FHTUB+18, FHTUB+22
FHTUB	FHTUB+12
SET	CHK+2, HL7SET+15
TF1	TF1+3
UPD100	CHK+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	UPD100+3
A	TF1+2, FHTUB+20, END+1!
>> CTR	HL7SET+2, HL7SET+3
>> DA	SET+3, SET+10
>> DA(1	SET+3, SET+6, SET+7, SET+10*, SET+13
>> DA(2	SET+6, SET+7, SET+10, SET+13
>> DATA	HL7SET+3*, HL7SET+6
>> DATA1	HL7SET+3*
>> DFN	UPD100+2
DIC	SET+6!, SET+7*
DIC("P"	SET+8*
DIC(0	SET+8*
DIE	SET+3!, SET+10!, SET+13
>> DINUM	SET+8*
DIR	TF1!, FHTUB+14!, FHTUB+17!
DIR("A"	TF1, FHTUB+14, FHTUB+17*
DIR("B"	FHTUB+17*
DIR(0	TF1, FHTUB+14, FHTUB+17*
>> DIRUT	TF1+1, FHTUB+18
DO	SET+6!
>> DR	SET+4, SET+14
DUZ	UPD100+5
>> ENDT	HL7SET+15
>> FH1	SET+11*
>> FH2	SET+11*
>> FH3	SET+11*
>> FH4	SET+12*
>> FH5	SET+12*
>> FHACT	SET+18*
>> FHAET	SET+18*
FHC	TF1+2, FHTUB+20, END+1!
>> FHCAN1	TF1+2*, TF1+3
FHCLST	TF1+1*, TF1+2, FHTUB+20, END+1!
>> FHCOND	HL7SET+6, HL7SET+7, HL7SET+8, HL7SET+12
>> FHDFN	TF1+2, CHK+1, SET+1, SET+3, SET+6, SET+10, HL7SET+15
>> FHDTX	CHK+1*
>> FHEV	SET+1, SET+16, SET+18
FHFIND	FHOMRT1+3, END+1!
>> FHK	FHTUB+3, FHTUB+4, FHTUB+5, FHTUB+6, FHTUB+9, HL7SET+7, HL7SET+8, HL7SET+9, HL7SET+10
>> FHLIST(	TF1+2, FHTUB+20
>> FHMSG(	HL7SET+3
>> FHMSG1	FHOMRT1+3*
>> FHNOW	UPD100+3*, UPD100+5
>> FHODT	UPD100+4*, UPD100+5
>> FHOPTY	SET+18*
>> FHORN	FHTUB+2, SET+2, HL7SET+17
>> FHPRO	FHTUB+6*, FHTUB+7
>> FHRMDT	HL7SET+15*
FHRNUM	TF1+2, FHTUB+20, CHK+1, SET+1, SET+3, SET+6, SET+10, END+1!, HL7SET+15*, HL7SET+16 , HL7SET+17, UPD100+3, UPD100+4
>> FHSTR	FHTUB+5*, FHTUB+8
>> FHTC	FHTUB+2, FHTUB+4, FHTUB+11, FHTUB+12, HL7SET+6, HL7SET+9, HL7SET+13, HL7SET+17
FHTEXT	FHTUB+16, END+1!, HL7SET+6, HL7SET+17, UPD100+3
>> FHTF	UPD100+6*
>> FHTK	FHTUB+2, FHTUB+5, FHTUB+11, HL7SET+6, HL7SET+10, HL7SET+17
FHTODAY	END+1!
>> FHWF	FHTUB*
>> FILL	HL7SET+17, UPD100+3, UPD100+5
>> K	SET+5*, SET+6, SET+11, SET+12, SET+15
>> MNUM	UPD100+3*, UPD100+5
MSG	UPD100+2!
MSG(	UPD100+5*
>> NO	FHTUB, HL7SET+2
NUM	FHOMRT1+4!, TF1, TF1+2, FHTUB+20, END+1!, HL7SET+3*
>> P2	SET+16
>> S2	HL7SET+2*
>> SDT	UPD100+4*
>> STDT	HL7SET+14
>> STDT1	HL7SET+14*, HL7SET+15
>> TC	HL7SET+2*
>> TFCOM	UPD100+3*
>> TK	HL7SET+2*
>> TP	HL7SET+2*
TUN	FHTUB!, SET+15*, HL7SET+2!
TUN(	FHTUB+3, FHTUB+4, FHTUB+5, FHTUB+6, FHTUB+9, SET+5, SET+11, SET+12, SET+15, HL7SET+7 , HL7SET+9, HL7SET+10, UPD100+6
TUN(0	FHTUB+1, HL7SET+5
>> TW	HL7SET+2*
>> TXT	HL7SET+3, HL7SET+4, HL7SET+12, HL7SET+13
U	TF1+2, CHK+1, SET+8, SET+11, SET+12, SET+15, UPD100+4
>> X	SET+8*, HL7SET+14
>> X1	HL7SET+14*
>> X2	HL7SET+14*
>> X3	SET+15*
>> XX	SET+15, SET+16, UPD100+6
>> Y	TF1+1, FHTUB+15, FHTUB+16, FHTUB+18, SET+6*, SET+8, SET+9, SET+10

Customize PDF page

Package: Dietetics

Routine: FHOMRT1

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: