STANDARD DATA DICTIONARY #860.3 -- ORDER CHECK ELEMENT FILE 6/27/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):