STANDARD DATA DICTIONARY #860.3 -- ORDER CHECK ELEMENT FILE 9/29/25 PAGE 1
STORED IN ^OCXS(860.3, (147 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the definitions for the rule elements. A rule element
consists of a set of boolean expressions. This takes the form of
Data Field -> Comparison Operator -> 1 or 2 Comparison fields depending
on the Operator.
POST-SELECTION ACTION : D ^OCXOSCR2
POINTED TO BY: ELEMENT field (#.02) of the ACTIVE ELEMENT sub-field (#860.11) of the ORDER CHECK PATIENT ACTIVE DATA File (#860.1)
ELEMENT NAME field (#1) of the TRUTH ELEMENTS sub-field (#860.21) of the ORDER CHECK RULE File (#860.2)
ELEMENTS field (#.01) of the ELEMENTS sub-field (#860.7122) of the RELATION sub-field (#860.712) of the RULE EVENT
sub-field (#860.71) of the ORDER CHECK PATIENT RULE EVENT File (#860.7)
CROSS
REFERENCED BY: COMPILED ROUTINE(APGM), NAME(B), NAME(C)
860.3,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>100!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JUN 30, 1997
HELP-PROMPT: Answer must be 3-100 characters in length.
CROSS-REFERENCE: 860.3^B
1)= S ^OCXS(860.3,"B",$E(X,1,100),DA)=""
2)= K ^OCXS(860.3,"B",$E(X,1,100),DA)
CROSS-REFERENCE: 860.3^C
1)= S ^OCXS(860.3,"C",$E(X,1,30),DA)=""
2)= K ^OCXS(860.3,"C",$E(X,1,30),DA)
860.3,.02 ELEMENT CONTEXT 0;2 POINTER TO ORDER CHECK DATA CONTEXT FILE (#860.6)
LAST EDITED: AUG 25, 1997
860.3,1 CONDITIONAL EXPRESSION COND;0 Multiple #860.31
DESCRIPTION:
List of expressions that determine if this element
is TRUE. When all of the expressions are TRUE then
the element is TRUE.
Expressions are in the form of:
Data Field -> Conditional Operator -> 1 or 2 comparison
values depending on
the operator.
The conditional values can be either constant values, Reserved
words (NOW or TODAY as in the case of dates), or other fields within
the data.
IDENTIFIED BY: OPERATOR/FUNCTION(#2), DATA FIELD 2(#4)
860.31,.01 EXPRESSION SEQUENCE NUMBER 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 08, 1995
HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits
CROSS-REFERENCE: 860.31^B
1)= S ^OCXS(860.3,DA(1),"COND","B",$E(X,1,30),DA)=""
2)= K ^OCXS(860.3,DA(1),"COND","B",$E(X,1,30),DA)
860.31,1 DATA FIELD 1 DFLD1;1 POINTER TO ORDER CHECK DATA FIELD FILE (#860.4)
INPUT TRANSFORM: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 10, 1996
SCREEN: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))"
EXPLANATION: ALLOW ONLY ONE DATA SOURCE PER ELEMENT
860.31,2 OPERATOR/FUNCTION OPER;E1,240 POINTER TO OCX MDD CONDITION/FUNCTION FILE (#863.9)
INPUT TRANSFORM: S DIC("S")="I $$OPSCR^OCXOCMPS" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAY 30, 1995
SCREEN: S DIC("S")="I $$OPSCR^OCXOCMPS"
EXPLANATION: CHECK FOR 'OCXO OPERATOR CODE TEMPLATE' PARAMETER
860.31,3 CONDITIONAL VALUE 1 VAL1;E1,200 FREE TEXT
INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X
LAST EDITED: FEB 28, 1996
HELP-PROMPT: Answer must be 1-200 characters in length.
860.31,3.1 CONDITIONAL VALUE 2 VAL2;E1,240 FREE TEXT
INPUT TRANSFORM: K:$L(X)>240!($L(X)<1) X
LAST EDITED: AUG 10, 1995
HELP-PROMPT: Answer must be 1-240 characters in length.
860.31,4 DATA FIELD 2 DFLD2;E1,200 POINTER TO ORDER CHECK DATA FIELD FILE (#860.4)
INPUT TRANSFORM: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 10, 1996
HELP-PROMPT: Answer must be 1-200 characters in length.
SCREEN: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))"
EXPLANATION: MATCH WITH PRIMARY DATA FIELD
860.31,5 DATA FIELD 3 DFLD3;1 POINTER TO ORDER CHECK DATA FIELD FILE (#860.4)
INPUT TRANSFORM: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 10, 1996
SCREEN: S DIC("S")="I $$SCFLD^OCXOCMPS(^(0),DA(1))"
EXPLANATION: MATCH WITH PRIMARY DATA FIELD
860.3,3 COMPILED ROUTINE RTN;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>8!($L(X)<1) X
LAST EDITED: DEC 04, 1995
HELP-PROMPT: Answer must be 1-8 characters in length.
CROSS-REFERENCE: 860.3^APGM^MUMPS
1)= S ^OCXS(860.3,"APGM",DA,X)=""
2)= K ^OCXS(860.3,"APGM",DA,X)
FILES POINTED TO FIELDS
OCX MDD CONDITION/FUNCTION
(#863.9) CONDITIONAL EXPRESSION:OPERATOR/FUNCTION (#2)
ORDER CHECK DATA CONTEXT
(#860.6) ELEMENT CONTEXT (#.02)
ORDER CHECK DATA FIELD (#860.4) CONDITIONAL EXPRESSION:DATA FIELD 1 (#1)
DATA FIELD 2 (#4)
DATA FIELD 3 (#5)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):