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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORCMEDT4

Package: Order Entry Results Reporting

Routine: ORCMEDT4


Information

ORCMEDT4 ;SLC/MKB-Prompt Editor ;10/08/19 16:41

Source Information

Source file <ORCMEDT4.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 6 ^DIC  FILE^DID  ^DIE  ^DIK  EN^DIQ  ^DIR  
Clinical Reminders 1 APIONE^PXRMDLR3  
Kernel 1 $$REPEAT^XLFSTR  
Order Entry Results Reporting 1 $$INUSE^ORCMEDT5  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Order Entry Results Reporting 5 ORCM PROMPTS  ORCMEDIT  ORCMEDT1  ORCMEDT3  ORCMEDT9  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- Enter/edit prompts
EDIT(DA) ; -- Edit prompt DA
PROMPT() ; -- Find prompt in #101.41
NAME(IFN) ; -- Edit .01 name of dialog IFN
NM
GETITM(DLG) ;
SURE(DLG) ; -- Are you sure?
DISABLE(DLG) ; Disable item - return true if disabled
DTEXT(X) ; -- Enter/edit display text of prompt
DATATYPE(X) ; -- Returns desired datatype for prompt
DATE ; -- date parameters
DQ
TEXT ; -- free text
NMBR ; -- numeric
PTR ; -- pointer
ROOT ; -- pointer via file root
RT1
RTQ
SET ; -- set of codes
SETEDIT ; -- edit each item in DOMAIN
SE1
OTHER ; -- no parameters needed
FILENAME(FNUM) ; -- Returns name of file FNUM
PTRCHK(DLG,ARRNAME) ; --check for pointers to order dialog
PTRRPT(ARRNAME,ORIFN) ; --show list of pointers to order dialog
OR100(DLG,ARR) ;100
ORD10098(DLG,ARR) ;100.98
HDR ;header
CONT() ; -- gives user a chance to read output from pointer check

External References

Name Field # of Occurrence
^DIC PROMPT+4, RT1+5
FILE^DID FILENAME+1
^DIE EDIT+8, DISABLE+19
^DIK NM+14, NM+15
EN^DIQ EN+3
^DIR NM+1, SURE+5, DISABLE+15, DTEXT+4, DATATYPE+5, DATE+5, DATE+7, DATE+10, DATE+12, TEXT+4
, TEXT+7, NMBR+3, NMBR+5, NMBR+7, PTR+5, RT1, SETEDIT+4, CONT+4
$$INUSE^ORCMEDT5 NM+4
APIONE^PXRMDLR3 PTRCHK+4
$$REPEAT^XLFSTR PTRRPT+7, HDR+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"This prompt is not editable!"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,!,"(This "_$$GETITM(IFN)_" has been disabled)"
  • Line Location: NM+0
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot delete - currently in use!",!
  • Line Location: NM+3
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot delete - currently an Add Orders Menu!",!
  • Line Location: NM+4
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot delete - other file entries point to this order dialog!",!
  • Line Location: NM+6
Function Call: WRITE
  • Prompt: " ...deleted."
  • Line Location: NM+15
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot rename a personal quick order",!
  • Line Location: NM+17
Function Call: WRITE
  • Prompt: !,"Enter disable message:"
  • Line Location: DISABLE+17
Function Call: WRITE
  • Prompt: " "_X
  • Line Location: RT1+2
Function Call: WRITE
  • Prompt: $C(7),!,"Invalid file!"
  • Line Location: RT1+6
Function Call: WRITE
  • Prompt: $C(7),!,"Domain too long - unable to store all codes."
  • Line Location: SET+8
Function Call: WRITE
  • Prompt: " WILL STAND FOR: "
  • Line Location: SETEDIT+6
Function Call: WRITE
  • Prompt: TEXT_"// "
  • Condition for execution: $L(TEXT)
  • Line Location: SETEDIT+6
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: SE1+0
Function Call: WRITE
  • Prompt: $C(7),!," Required value!",!,"'"_CODE_"' WILL STAND FOR: "
  • Line Location: SE1+1
Function Call: WRITE
  • Prompt: TEXT_"// "
  • Condition for execution: $L(TEXT)
  • Line Location: SE1+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"FILE ",?13,"IEN",?23,"NAME"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",27)
  • Line Location: HDR+3
Routine Call
  • DIC
  • Line Location:
    • PROMPT+4
    • RT1+5
Routine Call
  • DIE
  • Line Location:
    • EDIT+8
    • DISABLE+19
Routine Call
  • DIR
  • Line Location:
    • NM+1
    • SURE+5
    • DISABLE+15
    • DTEXT+4
    • DATATYPE+5
    • DATE+5
    • DATE+7
    • DATE+10
    • DATE+12
    • TEXT+4
    • TEXT+7
    • NMBR+3
    • NMBR+5
    • NMBR+7
    • PTR+5
    • RT1
    • SETEDIT+4
    • CONT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101.41 - [#101.41] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] EN+2
^OR(100 - [#100] OR100+3, OR100+4, OR100+5, OR100+6, OR100+7, OR100+9, OR100+10, OR100+11, OR100+12, OR100+13
^ORD(100.98 - [#100.98] ORD10098+2, ORD10098+3, ORD10098+4, ORD10098+5, ORD10098+6
^ORD(101.41 - [#101.41] EN+2, EDIT+2, EDIT+7*, NAME+3, NAME+4, NM, NM+3, GETITM+2, GETITM+3, DISABLE+4
, PTRRPT+5
^ORD(101.44 - [#101.44] NM+11, NM+13
^PXRMD(801.41 - [#801.41] PTRCHK+15
^TMP($J NM+18!, PTRCHK+1!, PTRCHK+5, PTRCHK+8, PTRCHK+9, PTRCHK+10, PTRCHK+11, PTRCHK+16*, PTRCHK+19, PTRRPT+3
, PTRRPT+8, PTRRPT+9, PTRRPT+16!, OR100+7*, OR100+13*, ORD10098+6*

Label References

Name Line Occurrences
$$CONT NM+7, PTRRPT+13, PTRRPT+15
$$DATATYPE EDIT+5
$$DTEXT EDIT+4
$$FILENAME PTR+4, ROOT+4, RT1+2
$$GETITM NM, SURE+2, DISABLE+3
$$NAME EDIT+3
$$PROMPT EN+1
$$PTRCHK NM+5
$$SURE NM+9
@( EDIT+6
DISABLE NM+8
DQ DATE+8
EDIT EN+5
HDR PTRRPT+13
NM NM+2, NM+16
OR100 PTRCHK+17
ORD10098 PTRCHK+18
PTRRPT NM+7
ROOT PTR+1
RT1 RT1+6
RTQ RT1+1, RT1+2, RT1+3
SE1 SE1+1
SETEDIT SET+3, SET+5

Naked Globals

Name Field # of Occurrence
^(1 EDIT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AREPTRS PTRCHK+2~*, PTRCHK+19*, PTRCHK+20
ARR OR100~, OR100+7, OR100+13, ORD10098~, ORD10098+6
ARRNAME PTRCHK~, PTRCHK+1, PTRCHK+4, PTRCHK+5, PTRCHK+8, PTRCHK+9, PTRCHK+10, PTRCHK+11, PTRCHK+16, PTRCHK+17
, PTRCHK+18, PTRCHK+19, PTRRPT~, PTRRPT+3, PTRRPT+8, PTRRPT+9, PTRRPT+16
CODE SETEDIT+1~, SETEDIT+2*, SETEDIT+3, SETEDIT+6*, SE1+1, SE1+2
CONTINUE NM+6~, NM+7*, PTRRPT+1~*, PTRRPT+4*, PTRRPT+8, PTRRPT+13*, PTRRPT+14, PTRRPT+15*
DA EN+3~*, EDIT~, EDIT+2, EDIT+3, EDIT+7, NAME+1~, NM+14*, NM+15!*, SURE+1~, DISABLE+1~
, DISABLE+18*
DA(1 NM+14*
DIC EN+3~*, PROMPT+1~, PROMPT+2*, RT1+5*
DIC("A" PROMPT+3*
DIC("DR" PROMPT+4*
DIC("S" PROMPT+3*
DIC(0 PROMPT+2*, RT1+5*
DIDEL DISABLE+1~
DIE EDIT+1~, EDIT+7*, DISABLE+1~, DISABLE+18*, PTR+2~
DIK NAME+1~, NM+14*, NM+15*
DIR NAME+1~, SURE+1~, DISABLE+1~, DTEXT+1~, DATATYPE+1~, DATE+1~, TEXT+1~, NMBR+1~, PTR+2~, ROOT+1~
, SETEDIT+1~, CONT+1~
DIR("?" NAME+8*, SURE+4*, DISABLE+9*, DISABLE+13*, DTEXT+3*, DATATYPE+4*, ROOT+3*, CONT+3*
DIR("A" NAME+2*, SURE+3*, DISABLE+7*, DISABLE+8*, DISABLE+12*, DTEXT+2*, DATATYPE+1*, DATE+4*, DATE+6*, DATE+9*
, DATE+11*, TEXT+2*, TEXT+5*, NMBR+2*, NMBR+4*, NMBR+6*, PTR+3*, ROOT+2*, SETEDIT+1*, CONT+2*
DIR("B" NAME+7*, DISABLE+10*, DISABLE+14*, DTEXT+2*, DATATYPE+3*, DATE+4*, DATE+6*, DATE+9*, DATE+11*, TEXT+3*
, TEXT+5!, TEXT+6*, NMBR+2*, NMBR+4*, NMBR+6*, PTR+4*, ROOT+4*, RT1+1, SETEDIT+3*
DIR(0 NAME+2*, SURE+3*, DISABLE+5*, DTEXT+2*, DATATYPE+2*, DATATYPE+3, DATE+2*, TEXT+2*, NMBR+2*, NMBR+4*
, NMBR+6*, PTR+3*, ROOT+2*, SETEDIT+1*, CONT+2*
DISABLED DISABLE+1~, DISABLE+4*, DISABLE+6
DISGRP ORD10098+1~*, ORD10098+2*, ORD10098+3, ORD10098+4
DISIEN ORD10098+1~*, ORD10098+3*, ORD10098+4, ORD10098+5, ORD10098+6
DLAYGO PROMPT+1~, PROMPT+2*
DLG GETITM~, GETITM+2, SURE~, SURE+2, DISABLE~, DISABLE+3, DISABLE+18, PTRCHK~, PTRCHK+3, PTRCHK+4
, PTRCHK+8, PTRCHK+9, PTRCHK+10, PTRCHK+11, PTRCHK+17, PTRCHK+18, OR100~, OR100+2, ORD10098~, ORD10098+5
DOMAIN EDIT+1~, EDIT+5*, EDIT+6, EDIT+7, DATE+2, DATE+5*, DATE+7*, DATE+10*, DATE+12*, DQ*
, TEXT+3, TEXT+4*, TEXT+5*, TEXT+6, TEXT+7*, TEXT+8*, NMBR+2, NMBR+3*, NMBR+4, NMBR+5*
, NMBR+6, NMBR+7*, NMBR+8*, PTR+1, PTR+4, PTR+5*, PTR+6, PTR+7*, ROOT+4, RT1*
, RT1+1, RTQ*, SET+2, SET+4*, SET+6*, SET+8*, OTHER+1*
DR EDIT+1~, EDIT+8*, DISABLE+1~, DISABLE+18*, PTR+2~
DTIME SE1
>> DTOUT NM+1, DTEXT+4, DATATYPE+5, DATE+5, DATE+7, DATE+10, DATE+12, TEXT+4, TEXT+7, NMBR+3
, NMBR+5, NMBR+7, PTR+5, RT1, SETEDIT+4
>> DUOUT DATE+5, DATE+7, DATE+10, DATE+12, TEXT+4, TEXT+7, NMBR+3, NMBR+5, NMBR+7, PTR+5
, RT1, SETEDIT+4
DUZ(0 PTR+1
FILE PTR+2~, PTR+6*, PTR+7
FILENUM PTRRPT+1~*, PTRRPT+2*, PTRRPT+3, PTRRPT+8, PTRRPT+9, PTRRPT+10, PTRRPT+11
FNUM FILENAME~, FILENAME+1
I SET+1~, SET+2*, SET+8*
IDX PTRCHK+7~*, PTRCHK+8*, PTRCHK+9, PTRCHK+10, PTRCHK+11
IDX1 NM+10~*, NM+11*, NM+13, NM+14
IDX2 NM+10~, NM+12*, NM+13*, NM+14, PTRCHK+7~*, PTRCHK+9*, PTRCHK+10, PTRCHK+11
IEN PTRRPT+1~*
IFN NAME~, NAME+3, NAME+4, NM, NM+3, NM+4, NM+5, NM+7, NM+8, NM+9
, NM+11, NM+13, NM+15, GETITM+3, DISABLE+4
INC PTRCHK+2~
IOF PTRRPT+4, HDR+1
ISPQO NAME+1~, NAME+3*, NAME+5*, NAME+6, NM+16
ITEM SET+1~, PTRRPT+1~, PTRRPT+9*, PTRRPT+11
ITEM( SET+2*, SET+3, SET+8, SETEDIT+2, SETEDIT+5!, SE1+2*
ITEMIEN PTRRPT+1~*, PTRRPT+4*, PTRRPT+8*, PTRRPT+9, PTRRPT+10
ITM GETITM+1~, GETITM+2*, GETITM+3, GETITM+4*, GETITM+5, SURE+1~, SURE+2*, SURE+3, SURE+4, DISABLE+1~
, DISABLE+3*, DISABLE+7, DISABLE+12, DISABLE+13
LINCNT PTRRPT+1~*, PTRRPT+12*, PTRRPT+13
NAME EDIT+1~, EDIT+3*, EDIT+8
NEWLNG SET+1~, SET+8*
NODELETE NAME+1~, NAME+3*, NAME+6*, NM+5*, NM+8
OLDNAME NAME+1~, NAME+3*, NAME+5, NAME+7, NM+16
OR0 EDIT+1~, EDIT+2*, EDIT+4, EDIT+8
OR1 EDIT+1~, EDIT+2*, EDIT+5
ORI SET+1~, SET+3*, SET+5*, SETEDIT+2, SETEDIT+5, SE1+2
ORIFN PTRRPT~, PTRRPT+5, OR100+1~, OR100+2*, OR100+4*, OR100+5, OR100+6, OR100+7, OR100+8*, OR100+10*
, OR100+11, OR100+12, OR100+13
ORJ SET+1~*, SET+5, SETEDIT+2*
ORP EDIT+1~, EDIT+2*
ORPXIEN PTRCHK+7~, PTRCHK+15*, PTRCHK+16
ORPXNAME PTRCHK+7~, PTRCHK+11*, PTRCHK+12, PTRCHK+13*, PTRCHK+14*, PTRCHK+15, PTRCHK+16
ORQUIT SET+1~, SET+3, SET+4, SET+5, SET+6, SETEDIT+4*, SE1*
ORR DATE+1~, DATE+2*, DATE+8*, DATE+11, DATE+12*, DQ
ORS DATE+1~, DATE+2*, DATE+8*, DATE+9, DATE+10*, DQ
ORT DATE+1~, DATE+2*, DATE+6, DATE+8*, DQ
ORX DATE+1~, DATE+2*, DATE+4, DATE+5*, DQ
ORY FILENAME+1~
ORY("NAME" FILENAME+2
PRMT EN+1~*, EN+2, EN+3, EN+5
SCR PTR+2~
STR NMBR+1~, NMBR+4*, NMBR+6*, NMBR+8, PTR+2~, PTR+6*, PTR+7, ROOT+1~, RTQ*
TAB PTRRPT+1~
TEMP OR100+1~, OR100+2*, OR100+3, OR100+4, OR100+6, OR100+9, OR100+10, OR100+12
TEXT EDIT+1~, EDIT+4*, EDIT+8, SETEDIT+1~, SETEDIT+2*, SETEDIT+6, SE1+1, SE1+2*
TYPE EDIT+1~, EDIT+5*, EDIT+6, EDIT+7, NAME+1~, NAME+4*, NAME+5, NAME+6
U EN+2, EDIT+4, EDIT+5, EDIT+7, EDIT+8, NAME+3, NAME+4, NM, GETITM+2, GETITM+3
, DISABLE+4, RT1+4, PTRRPT+5, OR100+6, OR100+7, OR100+12, OR100+13, ORD10098+5, ORD10098+6
X PROMPT+1~, NAME+1~, NM+1, NM+2, NM+3*, NM+4*, NM+8*, NM+9*, NM+15*, NM+16
, SURE+1~, DISABLE+1~, DTEXT~, DTEXT+2, DATATYPE~, DATATYPE+3, DATE+1~, DATE+2*, TEXT+1~, NMBR+1~
, PTR+2~, ROOT+1~, RT1+1, RT1+2*, RT1+5*, SET+1~, SETEDIT+4, SETEDIT+5, SETEDIT+6, CONT+1~
, CONT+5
Y PROMPT+1~, PROMPT+5, NAME+1~, NM+1*, NM+15*, NM+16, NM+19, SURE+1~, SURE+6, DISABLE+1~
, DISABLE+16, DTEXT+1~, DTEXT+4*, DTEXT+5, DATATYPE+1~, DATATYPE+5*, DATATYPE+6, DATE+1~, DATE+5, DATE+8
, DATE+10, DATE+12, TEXT+1~, TEXT+5, TEXT+8, NMBR+1~, NMBR+4, NMBR+6, NMBR+8, PTR+2~
, PTR+6, ROOT+1~, RT1+1*, RT1+2, RT1+3, RT1+4, RT1+5*!, RTQ, SET+1~, SET+3
, SET+5, SE1*, SE1+1*, SE1+2, FILENAME+1~, FILENAME+2*, FILENAME+3, CONT+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All