ORCD ; SLC/MKB - Order Dialog utilities ;12/15/2006
Source file <ORCD.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| INPT() | ; -- Return 1 or 0, if patient/order sheet = inpatient
 | 
|
| EXT(P,I,F) | ; -- Returns external value of ORDIALOG(Prompt,Instance)
 | 
|
| FTDATE(X,F) | ; -- Returns free text form of date (i.e. TODAY)
 | 
|
| FTD1 | ||
| FTDHELP | ; -- Displays ??-help for R-type prompts
 | 
|
| FTDCOMP(X1,X2,OPER) | ; -- Compares free text dates from prompts X1 & X2
 ; Returns 1 or 0, IF $$VAL(X1)<OPER>$$VAL(X2) is true  | 
|
| TIME(X) | ; -- Returns 00:00 PM formatted time
 | 
|
| VAL(TEXT,INST) | ; -- Returns internal form of TEXT's current value
 | 
|
| ORDMSG(OI) | ; -- Display order message for orderable OI
 | 
|
| PTR(NAME) | ; -- Returns pointer to Dialog file for prompt NAME
 | 
|
| NMSP(PKG) | ; -- Returns package namespace from pointer
 | 
|
| GETQDLG(QIFN) | ; -- define ORDIALOG(PROMPT) for quick order QIFN
 | 
|
| DEFDLG(QDLG) | ; -- Returns default dialog for QDLG
 | 
|
| GETDLG(IFN) | ; -- define ORDIALOG(PROMPT) for dialog IFN
 | 
|
| GETDLG1(IFN) | ; -- basic ORDIALOG(PROMPT) for dialog IFN
 | 
|
| GETORDER(ROOT,ARRAY) | ; -- retrieve order values from RESPONSES in ARRAY()
 | 
|
| RESTXT | ; -- resolve objects in text [from GETORDER+8]
 | 
|
| DUP(PROMPT,CURRENT) | ; -- Compare CURRENT instance of PROMPT for duplicates
 | 
|
| LIST | ; -- Show contents of ORDIALOG(PROMPT,"LIST")
 | 
|
| LIST1 | ||
| SETLIST | ; -- Show allowable set of codes
 | 
|
| SETLST1 | ||
| MORE() | ; -- show more?
 | 
|
| FIRST(P,I) | ; -- Returns 1 or 0, if current instance I is first of multiple
 | 
|
| RECALL(P,I) | ; -- Returns first value for prompt P, instance I
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(9.4 - [#9.4] | GET1^DIQ |