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: ORCD

Package: Order Entry Results Reporting

Routine: ORCD


Information

ORCD ; SLC/MKB - Order Dialog utilities ;12/15/2006

Source Information

Source file <ORCD.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ORDMSG+2
Function Call: WRITE
  • Prompt: !,$G(^(I,0))
  • Line Location: ORDMSG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ORDMSG+4
Function Call: WRITE
  • Prompt: !,$J(I,6)_" "_$P(ORDIALOG(PROMPT,"LIST",I),U,2)
  • Line Location: LIST1+3
Function Call: WRITE
  • Prompt: !,"Choose from:"
  • Line Location: SETLIST+1
Function Call: WRITE
  • Prompt: !,?5,$P(X,":"),?15,$P(X,":",2)
  • Line Location: SETLST1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call