Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ORCDFHTF

Package: Order Entry Results Reporting

Routine: ORCDFHTF


Information

ORCDFHTF ; SLC/MKB - Utility functions for FH Tubefeeding dialog ; 08 May 2002 2:12 PM

Source Information

Source file <ORCDFHTF.m>

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  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Order Entry Results Reporting 1 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

Global Variables Directly Accessed

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*

Label References

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All