STANDARD DATA DICTIONARY #864.1 -- OCX MDD DATATYPE FILE 3/24/25 PAGE 1 STORED IN ^OCXS(864.1, (26 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- POINTED TO BY: DATATYPE field (#101) of the ORDER CHECK DATA FIELD File (#860.4) DATATYPE field (#.02) of the OCX MDD CONDITION/FUNCTION File (#863.9) PARENT DATA TYPE field (#2) of the OCX MDD DATATYPE File (#864.1) CROSS REFERENCED BY: PARENT DATA TYPE(AP), PARAMETER NAME(APAR), NAME(B), BRIEF NAME(C), UNIQUE OBJECT IDENTIFIER(UID) 864.1,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X LAST EDITED: OCT 03, 1995 HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION CROSS-REFERENCE: 864.1^B 1)= S ^OCXS(864.1,"B",$E(X,1,30),DA)="" 2)= K ^OCXS(864.1,"B",$E(X,1,30),DA) CROSS-REFERENCE: ^^TRIGGER^864.1^3 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OCXS(864.1,D0,"UID")):^("UID"),1:"") S X=$E(Y(1),1, 245),X=X S DIU=X K Y X ^DD(864.1,.01,1,2,1.1) X ^DD(864.1,.01,1,2,1.4) 1.1)= S X=DIV S X="" I $T(UID^OCXFMGR)]"",$G(DA) S X=$$UID^OCXFMGR(DIC,DA) 1.4)= S DIH=$S($D(^OCXS(864.1,DIV(0),"UID")):^("UID"),1:""),DIV=X S DE=0-$L(DIH),DIU=$E(DIH,1,245), Y=$E(DIH,246,999),^("UID")=$J("",$S(DE>0:DE,1:0))_DIV_$S(Y?." ":"",1:$J("",245-$L(DIV))_Y),DIH=864. 1,DIG=3 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 2)= Q CREATE VALUE)= S X="" I $T(UID^OCXFMGR)]"",$G(DA) S X=$$UID^OCXFMGR(DIC,DA) DELETE VALUE)= NO EFFECT FIELD)= U Triggers a unique ID. 864.1,.02 BRIEF NAME 0;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>8!($L(X)<1) X LAST EDITED: APR 08, 1995 HELP-PROMPT: Answer must be 1-8 characters in length. DESCRIPTION: The brief name may be used as part of a compund key for lookup in reference files (e.g., the DIALOGUE file) CROSS-REFERENCE: 864.1^C 1)= S ^OCXS(864.1,"C",$E(X,1,30),DA)="" 2)= K ^OCXS(864.1,"C",$E(X,1,30),DA) Enambles quick lookup via brief name 864.1,1 PARAMETER PAR;0 POINTER Multiple #864.11 LAST EDITED: MAY 12, 1995 864.11,.01 PARAMETER NAME 0;1 POINTER TO OCX MDD PARAMETER FILE (#863.8) (Multiply asked) LAST EDITED: AUG 30, 1995 CROSS-REFERENCE: 864.11^B 1)= S ^OCXS(864.1,DA(1),"PAR","B",$E(X,1,30),DA)="" 2)= K ^OCXS(864.1,DA(1),"PAR","B",$E(X,1,30),DA) CROSS-REFERENCE: 864.1^APAR 1)= S ^OCXS(864.1,"APAR",$E(X,1,30),DA(1),DA)="" 2)= K ^OCXS(864.1,"APAR",$E(X,1,30),DA(1),DA) Rapidly identify all parameters associated with a given function 864.11,1 VALUE VAL;E1,200 FREE TEXT INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X LAST EDITED: DEC 06, 1994 HELP-PROMPT: Answer must be 1-200 characters in length. 864.1,2 PARENT DATA TYPE MOM;1 POINTER TO OCX MDD DATATYPE FILE (#864.1) LAST EDITED: APR 18, 1995 DESCRIPTION: Supports object inheritance CROSS-REFERENCE: 864.1^AP 1)= S ^OCXS(864.1,"AP",$E(X,1,30),DA)="" 2)= K ^OCXS(864.1,"AP",$E(X,1,30),DA) Quickly find descendants of a parent object 864.1,3 UNIQUE OBJECT IDENTIFIER UID;E1,245 FREE TEXT INPUT TRANSFORM: K:$L(X)>30!($L(X)<3) X LAST EDITED: OCT 03, 1995 HELP-PROMPT: Answer must be 3-30 characters in length. DESCRIPTION: A unique ID for this object. WRITE AUTHORITY: ^ NOTES: TRIGGERED by the NAME field of the OCX MDD DATATYPE File CROSS-REFERENCE: 864.1^UID 1)= S ^OCXS(864.1,"UID",$E(X,1,30),DA)="" 2)= K ^OCXS(864.1,"UID",$E(X,1,30),DA) Enables rapid lookup of an object by its UID. FILES POINTED TO FIELDS OCX MDD DATATYPE (#864.1) PARENT DATA TYPE (#2) OCX MDD PARAMETER (#863.8) PARAMETER:PARAMETER NAME (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):