Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101.41 - [#101.41] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call