STANDARD DATA DICTIONARY #863.3 -- OCX MDD LINK FILE 6/27/25 PAGE 1
STORED IN ^OCXS(863.3, (182 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
IDENTIFIED BY: PARENT SUBJECT (#.02), PARENT MENU GROUP (#.04), LIST ORDER (#.06)
CROSS
REFERENCED BY: DESCENDANT SUBJECT(AC), ATTRIBUTE(AD), PARENT MENU GROUP(AE), LIST ORDER(ALO), PARAMETER NAME(APAR), NAME(B),
LONG MENU TEXT(F), SYNONYMS(SYN), UNIQUE OBJECT IDENTIFIER(UID)
863.3,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: OCT 03, 1995
HELP-PROMPT: Answer must be 3-30 characters in length.
CROSS-REFERENCE: 863.3^B
1)= S ^OCXS(863.3,"B",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^863.3^4
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OCXS(863.3,D0,"UID")):^("UID"),1:"") S X=$E(Y(1),1,
245),X=X S DIU=X K Y X ^DD(863.3,.01,1,2,1.1) X ^DD(863.3,.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(863.3,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=863.
3,DIG=4 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.
863.3,.02 PARENT SUBJECT 0;2 POINTER TO OCX MDD SUBJECT FILE (#863.2)
LAST EDITED: MAR 18, 1995
863.3,.03 DESCENDANT SUBJECT 0;3 POINTER TO OCX MDD SUBJECT FILE (#863.2)
LAST EDITED: AUG 30, 1995
CROSS-REFERENCE: 863.3^AC
1)= S ^OCXS(863.3,"AC",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"AC",$E(X,1,30),DA)
Rapidly identify links associated with a descendant subject
863.3,.04 PARENT MENU GROUP 0;4 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>100!($L(X)<1) X
LAST EDITED: AUG 30, 1995
HELP-PROMPT: Answer must be 1-100 characters in length.
CROSS-REFERENCE: 863.3^AE
1)= S ^OCXS(863.3,"AE",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"AE",$E(X,1,30),DA)
Rapidly identify links associated with a parent menu group
863.3,.05 ATTRIBUTE 0;5 POINTER TO OCX MDD ATTRIBUTE FILE (#863.4)
LAST EDITED: JUN 04, 1996
CROSS-REFERENCE: 863.3^AD
1)= S ^OCXS(863.3,"AD",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"AD",$E(X,1,30),DA)
Rapidly find links associated with an attribute
863.3,.06 LIST ORDER 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUN 27, 1997
HELP-PROMPT: Type a Number between 1 and 9999, 0 Decimal Digits
CROSS-REFERENCE: 863.3^ALO
1)= N MDX S MDX=$P(^OCXS(863.3,DA,0),U,2) S:MDX ^OCXS(863.3,"ALO",MDX,$E(X,1,30),DA)=""
2)= N MDX S MDX=$P(^OCXS(863.3,DA,0),U,2) K:MDX ^OCXS(863.3,"ALO",MDX,$E(X,1,30),DA)
863.3,.1 LONG MENU TEXT TEXT;1 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>100!($L(X)<1) X
LAST EDITED: SEP 28, 1994
HELP-PROMPT: Answer must be 1-100 characters in length.
CROSS-REFERENCE: 863.3^F
1)= S ^OCXS(863.3,"F",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"F",$E(X,1,30),DA)
863.3,.11 SHORT MENU TEXT TEXT;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>100!($L(X)<1) X
LAST EDITED: SEP 20, 1994
HELP-PROMPT: Answer must be 1-100 characters in length.
863.3,1 SYNONYMS 1;0 Multiple #863.31
863.31,.01 SYNONYMS 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>100!($L(X)<1) X
LAST EDITED: AUG 30, 1995
HELP-PROMPT: Answer must be 1-100 characters in length.
CROSS-REFERENCE: 863.31^B
1)= S ^OCXS(863.3,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 863.3^SYN
1)= S ^OCXS(863.3,"SYN",$E(X,1,30),DA(1),DA)=""
2)= K ^OCXS(863.3,"SYN",$E(X,1,30),DA(1),DA)
This index supports synonym lookup
863.3,2 PARAMETER PAR;0 POINTER Multiple #863.32
LAST EDITED: MAY 12, 1995
863.32,.01 PARAMETER NAME 0;1 POINTER TO OCX MDD PARAMETER FILE (#863.8) (Multiply asked)
LAST EDITED: AUG 30, 1995
CROSS-REFERENCE: 863.32^B
1)= S ^OCXS(863.3,DA(1),"PAR","B",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,DA(1),"PAR","B",$E(X,1,30),DA)
CROSS-REFERENCE: 863.3^APAR
1)= S ^OCXS(863.3,"APAR",$E(X,1,30),DA(1),DA)=""
2)= K ^OCXS(863.3,"APAR",$E(X,1,30),DA(1),DA)
Index enables you to rapidly locate parameters associated with this class
863.32,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.
863.3,3.1 LONG MENU TEXT MENU;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>99!($L(X)<1) X
LAST EDITED: MAR 18, 1995
HELP-PROMPT: Answer must be 1-99 characters in length.
863.3,3.2 BRIEF MENU TEXT MENU;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>99!($L(X)<1) X
LAST EDITED: MAR 18, 1995
HELP-PROMPT: Answer must be 1-99 characters in length.
863.3,3.3 MENU ORDER MENU;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."5N.N) X
LAST EDITED: MAR 18, 1995
HELP-PROMPT: Type a Number between 1 and 999999, 4 Decimal Digits
863.3,4 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 LINK File
CROSS-REFERENCE: 863.3^UID
1)= S ^OCXS(863.3,"UID",$E(X,1,30),DA)=""
2)= K ^OCXS(863.3,"UID",$E(X,1,30),DA)
Enables rapid lookup of an object by its UID.
FILES POINTED TO FIELDS
OCX MDD ATTRIBUTE (#863.4) ATTRIBUTE (#.05)
OCX MDD PARAMETER (#863.8) PARAMETER:PARAMETER NAME (#.01)
OCX MDD SUBJECT (#863.2) PARENT SUBJECT (#.02)
DESCENDANT SUBJECT (#.03)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):