Routine: ORCDFHTF

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Order Entry Results Reporting	5	SET^ORCACT2 ($$INPT,$$PTR,GETDLG1,GETORDER)^ORCD ($$CURRENT,$$FUTURE)^ORCDFH $$ACTION^ORCSAVE TEXT^ORQ12
Dietetics	2	$$QUAN^FHWOR5R EN2^FHWOR8
Kernel	2	$$FMTE^XLFDT ($$STRIP,$$UP)^XLFSTR
VA Fileman	1	^DIR

Package

Total

Call Graph

Order Entry Results Reporting

SET^ORCACT2 ($$INPT,$$PTR,GETDLG1,GETORDER)^ORCD ($$CURRENT,$$FUTURE)^ORCDFH $$ACTION^ORCSAVE TEXT^ORQ12

Dietetics

$$QUAN^FHWOR5R EN2^FHWOR8

Kernel

$$FMTE^XLFDT ($$STRIP,$$UP)^XLFSTR

VA Fileman

^DIR

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORWDFH

Package

Total

Caller Graph

Order Entry Results Reporting

ORWDFH

Entry Points

Name	Comments	DBIA/ICR reference
DATES	; -- get existing outpatient meal dates
EN	; -- entry action
QUANHELP	; -- ??-help for Quantity
VALIDQTY(X)	; -- Validates quantity X=amt units/freq X times
CC(INST)	; -- Returns #cc ordered for INSTance
TOTALQTY(ORDER)	; -- Returns total cc's for ORDER
EX	; -- exit action
CANCEL	; -- Cancel active TF with new diet? [Called from FHW1 Exit Action]
QUANTITY	; -- Validation code for TF quantity

External References

Name	Field # of Occurrence
^DIR	CANCEL+8
$$QUAN^FHWOR5R	CC+6
EN2^FHWOR8	DATES+1
SET^ORCACT2	CANCEL+11
$$INPT^ORCD	EN+1
$$PTR^ORCD	CC+2, CC+3, CC+4, TOTALQTY+3
GETDLG1^ORCD	TOTALQTY+2
GETORDER^ORCD	TOTALQTY+4
$$CURRENT^ORCDFH	EN+8, CANCEL+2
$$FUTURE^ORCDFH	CANCEL+3
$$ACTION^ORCSAVE	CANCEL+9
TEXT^ORQ12	EN+10, CANCEL+5
$$FMTE^XLFDT	DATES+3
$$STRIP^XLFSTR	VALIDQTY+2
$$UP^XLFSTR	VALIDQTY+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"This patient is not an inpatient!" Line Location: EN+2
Function Call: WRITE	Prompt: !!,"An ACTIVE TUBEFEEDING ORDER exists for this patient:",! Line Location: EN+9
Function Call: WRITE	Prompt: !,ORTX(I) Line Location: EN+10
Function Call: WRITE	Prompt: !,"Total Quantity: "_$$TOTALQTY(ORTF)_" ml",! Line Location: EN+11
Function Call: WRITE	Prompt: " (Amount: "_$$CC(ORI)_"ml)" Line Location: QUANTITY+4
Function Call: WRITE	Prompt: $C(7),!!,"WARNING: Total quantity ordered is "_TOT_"ml which exceeds the limit of 5000ml!",! Line Location: QUANTITY+6
Function Call: WRITE	Prompt: !!,"Units may be K for Kcals, M for ml, C for cc's, O For oz. or U for units (e.g. cans)." Line Location: QUANHELP+1
Function Call: WRITE	Prompt: !,"Frequency may be DAY, HOUR, QD, QH, BID, TID, QID, Q2H, Q3H, Q4H, or Q6H." Line Location: QUANHELP+2
Function Call: WRITE	Prompt: !,"May also input 100ML/HR X 16 for 16 hours. Valid quantity for powder form" Line Location: QUANHELP+3
Function Call: WRITE	Prompt: !,"product can be ""# GRAMS"" as 20 G, GRAMS, or GMS, or as 1 PKG or 1 U, and the" Line Location: QUANHELP+4
Function Call: WRITE	Prompt: !,"frequency (e.g. 20 GRAMS/DAY or 1 PKG/TID)." Line Location: QUANHELP+5
Function Call: WRITE	Prompt: !!,"An active tubefeeding order exists for this patient:" Line Location: CANCEL+4
Function Call: WRITE	Prompt: !,ORTX(I) Line Location: CANCEL+5
Routine Call	DIR Line Location: CANCEL+8

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	TOTALQTY+2
^ORD(100.03 - [#100.03]	CANCEL+10
^ORD(101.43 - [#101.43]	CC+4
^TMP("ORNEW"	CANCEL+9*

Name	Line Occurrences
$$CC	QUANTITY+4, QUANTITY+5, TOTALQTY+5
$$TOTALQTY	EN+11
$$VALIDQTY	QUANTITY+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMT	VALIDQTY+1~, VALIDQTY+3*, VALIDQTY+4, VALIDQTY+8
CNT	DATES+2~, DATES+4, DATES+5, DATES+6
D	VALIDQTY+1~, VALIDQTY+5*, VALIDQTY+7
DIR	CANCEL+1~
DIR("?"	CANCEL+7*
DIR("A"	CANCEL+6*
DIR(0	CANCEL+6*
DONE	QUANTITY+2!
DUR	VALIDQTY+1~, VALIDQTY+7, VALIDQTY+8, CC+1~, CC+4, CC+5*
DUZ	CANCEL+10
F	VALIDQTY+1~, VALIDQTY+5*, VALIDQTY+6
FREQ	VALIDQTY+1~, VALIDQTY+6*, VALIDQTY+7, VALIDQTY+8
I	EN+8~, EN+10, QUANTITY+1~, QUANTITY+5, CANCEL+1~, CANCEL+5, DATES+2~, DATES+3
INST	CC~, CC+2, CC+3, CC+4
N	VALIDQTY+1~, VALIDQTY+4*
ORCAT	EN+1*, EX+1!
ORDA	CANCEL+1~, CANCEL+9*
ORDER	TOTALQTY~, TOTALQTY+2, TOTALQTY+4
ORDIALOG	TOTALQTY+1~, TOTALQTY+2*
ORDIALOG(	QUANTITY+1, QUANTITY+2!, QUANTITY+3, QUANTITY+5, CC+2, CC+3, CC+4, TOTALQTY+5, DATES+1, DATES+4 , DATES+5, DATES+6*
>> ORDT	DATES+1
>> ORDT(	DATES+2, DATES+3
OREASON	CANCEL+1~, CANCEL+10*, CANCEL+11
ORI	QUANTITY+1, QUANTITY+2, QUANTITY+3, QUANTITY+4, TOTALQTY+1~, TOTALQTY+4, TOTALQTY+5
ORIT	TOTALQTY+1~, TOTALQTY+3*, TOTALQTY+5
ORNATR	CANCEL+1~, CANCEL+10*, CANCEL+11
>> ORNP	CANCEL+9, CANCEL+10
ORPARAM	EX+1!
ORQTY	QUANTITY+1~, QUANTITY+2*, QUANTITY+3
ORTF	EN+8~, EN+10, EN+11, CANCEL+1~, CANCEL+2, CANCEL+5, CANCEL+9, CANCEL+11
ORTIME	EX+1!
ORTOTAL	TOTALQTY+1~, TOTALQTY+4, TOTALQTY+5, TOTALQTY+6
ORTX	EN+8~, EN+10, CANCEL+1~, CANCEL+5
ORTX(	EN+10, CANCEL+5
>> ORVP	DATES+1
>> PROMPT	QUANTITY+1, QUANTITY+2, QUANTITY+3, QUANTITY+5, DATES+1, DATES+4, DATES+5, DATES+6
TOT	QUANTITY+1~, QUANTITY+5*, QUANTITY+6
U	VALIDQTY+4, VALIDQTY+6, CC+4, CC+5, TOTALQTY+2, DATES+5
UNITS	VALIDQTY+1~, VALIDQTY+4*, VALIDQTY+5, VALIDQTY+8
X	QUANTITY+1~, QUANTITY+2, VALIDQTY~, VALIDQTY+2, VALIDQTY+3, VALIDQTY+4, VALIDQTY+6, CC+1~, CC+2, CC+4 , CC+6, CC+7, CANCEL+1~, DATES+2~, DATES+3*, DATES+5
X1	VALIDQTY+1~, VALIDQTY+3, VALIDQTY+4, CC+1~, CC+3, CC+4*, CC+6
X2	VALIDQTY+1~, VALIDQTY+3, VALIDQTY+5, CC+1~, CC+4, CC+5*, CC+6
Y	CANCEL+1~, CANCEL+8, DATES+2~, DATES+3*, DATES+4, DATES+5

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCDFHTF

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: