Routine: FHORD

Information

FHORD ; HISC/REL/NCA - Diet Order Entry ;8/9/96 12:29 ;

Package	Total	Caller Graph
Dietetics	2	FHORD6 FHORD7

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN1+2
Function Call: WRITE	Prompt: !!,"The Abbreviated Label for this Diet has been changed to ",$P($G(^FH(111,+IEN,0)),U,7),".",!,"Diet Patterns containing this Diet will now be updated to reflect this change:",! Line Location: EN1+9
Function Call: WRITE	Prompt: !!,"The list requires a 132 column printer.",! Line Location: EN2+1
Function Call: WRITE	Prompt: ! Line Location: EN2+2
Function Call: WRITE	Prompt: !!,$S(FLG=1:"...Diet Patterns have been updated!",1:"...No Diet Patterns needed updating.") Line Location: UPDPAT+10
Routine Call	DIE Line Location: EN1+7 UPDPAT+9
Routine Call	DIC Line Location: EN1+2
Routine Call	%ZIS Line Location: RSET

FileNo	Call Tags
^FH(111 - [#111]	Classic Fileman Calls
^FH(111.1 - [#111.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^FH(111 - [#111]	EN1+3, EN1+4, EN1+5, EN1+8, EN1+9
^FH(111.1 - [#111.1]	UPDPAT+1, UPDPAT+2, UPDPAT+3
^ORD(101.43 - [#101.43]	EN1+7
^TMP($J	EN1+1!, EN1+5*, KIL!
^XUSEC("FHMGR"	EN1+7

Name	Field # of Occurrence
%	KIL!
%ZIS	RSET!
ADM	KIL!
ALL	KIL!
BY	EN2+2*, RSET!
C	KIL!
CHK	EN1+1*, KIL!
COM	KIL!
D	KIL!
DA	EN1+7, KIL!, RSET!, UPDPAT+9
DFN	KIL!, RSET!
DHD	EN2+3*, RSET!
DIC	EN1+2!, EN1+7!, EN2+2, KIL!, RSET!
DIC("DR"	EN1+2*
DIC(0	EN1+2*
DIDEL	EN1+7*!
DIE	EN1+2, EN1+7!, KIL!, RSET!, UPDPAT+9!
DIE("NO^"	EN1+7*
DLAYGO	EN1+2*!
DR	EN1+7, KIL!, RSET!, UPDPAT+9
>> DTOUT	EN1+2
DUZ	EN1+7
EVENT	EN1+1*, KIL!
FHDFN	KIL!, RSET!
>> FHDPDTS	UPDPAT+3*, UPDPAT+4
FHDPIEN	KIL!, UPDPAT+1*, UPDPAT+2, UPDPAT+3, UPDPAT+9
FHDR	KIL!
FHFH	KIL!, UPDPAT+4*
FHFND	KIL!, UPDPAT+2, UPDPAT+4, UPDPAT+5, UPDPAT+6
FHK	KIL!
FHNEWLB	EN1+8*, EN1+9, KIL!, UPDPAT+6
FHNEWNM	KIL!, UPDPAT+6, UPDPAT+7, UPDPAT+8
FHOLDLB	EN1+3*, EN1+9, KIL!
FHOLDNM	KIL!, UPDPAT+2*, UPDPAT+6, UPDPAT+8
FHPV	KIL!
FHWF	KIL!
FHX1	KIL!
FHX2	KIL!
FLDS	EN2+2*, RSET!
FLG	KIL!, UPDPAT+1, UPDPAT+6, UPDPAT+10
FR	EN2+3*, RSET!
I	KIL!
IEN	EN1+4*, EN1+5, EN1+8, EN1+9, KIL!, UPDPAT+4
IEN1	EN1+5*, KIL!
IOP	RSET*!
L	EN2+2*, RSET!
NOD1	EN1+1, EN1+4, KIL!
NOD2	EN1+1, EN1+4, KIL!
NOD3	KIL!
NOW	KIL!
POP	KIL!
REC	EN1+1*, KIL!
STR	KIL!
STR1	KIL!
TO	EN2+3*, RSET!
TYP	EN1+1*, KIL!
U	EN1+2, EN1+3, EN1+8, EN1+9, UPDPAT+2, UPDPAT+3, UPDPAT+4
WARD	KIL!
X	EN1+2, KIL!, RSET!
Y	EN1+2, EN1+3, EN1+4, EN1+7, RSET!