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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ORCDFH1

Package: Order Entry Results Reporting

Routine: ORCDFH1


Information

ORCDFH1 ;SLC/MKB,DKM - Utility functions for FH dialogs cont ;8/24/01 10:22

Source Information

Source file <ORCDFH1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 $$NOW^XLFDT  $$UP^XLFSTR  
Order Entry Results Reporting 2 $$DUP^ORCD  ($$FIND,$$SPACE,DIC)^ORCDLG2  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Order Entry Results Reporting 1 ORWDXM2  

Entry Points

Name Comments DBIA/ICR reference
CNV ; -- Convert meal abbreviation to time in X [Input Xform]
; Expects X,PROMPT [also called from Entry Action, DO^ORWDXM2]
OK() ; -- Verify multiple diet mod selection
PTR(X) ; -- Return ptr to Order Dialog file #101.41 for prompt X
INACTIVE() ;Check for inactive/duplicate diets in single or multiple modifications ;**95
MORE(XX,YY) ; -- Returns 1 or 0, if more matches exist
LKQ
VALID() ; -- Returns 1 or 0, if selected diet modification is valid
EXP ; -- Expand old order into instances
PREV ; -- Ck if previous diet being reordered
LKUP ; -- special lookup routine for diet modifications
RECENT ; -- get 5 most recent diet orders

External References

Name Field # of Occurrence
^DIR OK+3
$$DUP^ORCD INACTIVE+5
$$FIND^ORCDLG2 LKUP+3
$$SPACE^ORCDLG2 LKUP+2
DIC^ORCDLG2 LKQ
$$NOW^XLFDT RECENT+1, RECENT+7, MORE+2, INACTIVE+4
$$UP^XLFSTR CNV+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,OI_" may not be ordered with other diets!"
  • Line Location: VALID+12
Function Call: WRITE
  • Prompt: $C(7),"This diet has already been selected!"
  • Line Location: VALID+13
Function Call: WRITE
  • Prompt: $C(7),!,"This diet is not orderable with those already selected!",!
  • Line Location: VALID+17
Function Call: WRITE
  • Prompt: !,"The ",$P(^ORD(101.43,ORDIALOG(PROMPT,I),0),U)," diet is INACTIVE."
  • Line Location: INACTIVE+4
Function Call: WRITE
  • Prompt: !,"The ",$P(^ORD(101.43,ORDIALOG(PROMPT,(I+ORI)),0),U)," diet has already been selected."
  • Line Location: INACTIVE+5
Routine Call
  • DIR
  • Line Location:
    • OK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] RECENT+2, RECENT+3, RECENT+5, RECENT+6
^ORD(101.41 - [#101.41] PTR+1
^ORD(101.43 - [#101.43] RECENT+7, VALID+8, VALID+14, VALID+16, MORE+3, MORE+4, MORE+5, INACTIVE+4, INACTIVE+5

Label References

Name Line Occurrences
$$INACTIVE VALID+4, VALID+6
$$MORE LKUP+4
$$OK LKUP+4
EXP VALID+3
LKQ LKUP+1

Naked Globals

Name Field # of Occurrence
^( RECENT+5, RECENT+6, MORE+5, INACTIVE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1 CNV+2~*, CNV+3, CNV+6*, CNV+7
CNT RECENT+1~*, RECENT+2, RECENT+3, RECENT+11*, RECENT+13, MORE+2~*, MORE+3, MORE+6*, MORE+7
D EXP+1~, EXP+3*
>> DATATYPE CNV+4*
DIR OK+1~
DIR("?" OK+2*
DIR("A" OK+1*
DIR("B" OK+1*
DIR(0 OK+1*
>> DOMAIN LKUP+2
>> DTOUT OK+3
>> DUOUT OK+3
I RECENT+1~, RECENT+6*, EXP+1~, EXP+2*, EXP+3*, VALID+1~, VALID+4*, VALID+15*, VALID+16, PREV+1~*
, PREV+2*, INACTIVE+1~, INACTIVE+3*, INACTIVE+4, INACTIVE+5*
IFN PREV+1~, PREV+3*, PREV+4, MORE+4~*, MORE+5
INDT RECENT+1~, RECENT+7*
>> MAX VALID+5*, VALID+10*, VALID+11*
NOW MORE+2~*, MORE+5
NUM VALID+1~, VALID+14*, VALID+16
OI VALID+1~, VALID+2*, VALID+4, VALID+8*, VALID+9, VALID+12, PREV+1~*, PREV+2*, PREV+3, INACTIVE+5
ORCURR RECENT+1~, RECENT+4!, RECENT+5*, RECENT+10
>> ORDG RECENT+2, RECENT+3
>> ORDIALOG( RECENT+9*, RECENT+10, RECENT+11*, RECENT+12*, RECENT+13*, EXP+1, EXP+2*, EXP+3*, VALID+2, VALID+4*!
, VALID+5*, VALID+10*, VALID+11*, VALID+14, VALID+15, VALID+16, PREV+2, PREV+3, LKUP+1, LKUP+2
, INACTIVE+3, INACTIVE+4, INACTIVE+5
>> ORDIALOG("PREV" PREV+4*!
ORDT RECENT+1~*, RECENT+2*, RECENT+3
>> ORESET VALID+10, VALID+11
>> ORI EXP+1, EXP+2, VALID+2, VALID+4, VALID+14, VALID+16, INACTIVE+5
ORIFN RECENT+1~, RECENT+2*, RECENT+3*, RECENT+5, RECENT+6, RECENT+9
ORIT RECENT+1~, RECENT+4*, RECENT+7*, RECENT+8, RECENT+9, RECENT+11, RECENT+12
OROOT LKUP+1~, LKUP+2*, LKUP+3
>> ORPARAM(2 CNV+5
ORTXT RECENT+1~, RECENT+4*, RECENT+7*, RECENT+8, RECENT+10, RECENT+11, RECENT+12
>> ORTYPE CNV+4
>> ORVP RECENT+2, RECENT+3
P EXP+1~, EXP+3*
>> PROMPT RECENT+9, RECENT+10, RECENT+11, RECENT+12, RECENT+13, EXP+1, EXP+2, EXP+3, VALID+2, VALID+4
, VALID+5, VALID+10, VALID+11, VALID+14, VALID+15, VALID+16, PREV+2, PREV+3, LKUP+1, LKUP+2
, INACTIVE+3, INACTIVE+4, INACTIVE+5
TIMES CNV+5~*, CNV+6
TOTAL VALID+1~, VALID+5*, VALID+10, VALID+11
U RECENT+5, RECENT+7, RECENT+11, VALID+8, VALID+14, VALID+16, CNV+5, CNV+6, MORE+1, INACTIVE+4
, INACTIVE+5
X RECENT+1~, RECENT+6*, RECENT+7, PTR~, PTR+1, EXP+1~*, EXP+2, EXP+3, CNV+2*, CNV+4
, CNV+7*, LKUP+2*, LKUP+3, LKUP+4, OK+1~
XP MORE+2~*, MORE+3*, MORE+4
XX MORE~, MORE+2, MORE+3
Y VALID+1~, VALID+2, VALID+3*, VALID+4*, VALID+5*, VALID+9, VALID+12*, VALID+15, VALID+17*, VALID+18
, CNV+4*, LKUP+3*, LKUP+4*, OK+1~, OK+3*, OK+4, INACTIVE+1~, INACTIVE+2*, INACTIVE+4*, INACTIVE+5*
, INACTIVE+6
YY MORE~, MORE+1, MORE+4
Z LKUP+1~, LKUP+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All