Description
The ID of the bounded , user datatype object (, if any). This ID is used by ER/Studio. A user can bind a user datatype object to the attribute by assigning a particular user datatype ID to this property. DATATYPE: Integer.
Property Type
...
| Code Block |
|---|
|
Sub Main
Dim diag As Diagram
Dim dict As Dictionary
Dim mdl As Model
Dim ent As Entity
Dim attr As AttributeObj
Dim udt As UserDatatype
Set diag = DiagramManager.NewDiagram
Set dict = diag.Dictionary
Set mdl = diag.ActiveModel
Set udt = dict.UserDatatypes.Add(“MyUDT”)
udt.Datatype = “INTEGER”
Set ent = mdl.Entities.Add(100,100)
ent.EntityName = “MyEntity”
Set attr = ent.Attributes.Add(“NewAttr”, False)
attr.UserDatatypeId = udt.ID
End Sub |