Collection: ModelEntities

Download PDF

Updated2024-09-12
2 minute(s) read

Collection of the entities of the data model.

The following example displays for each entity of the data model associated with the ASAM Browse Settings Example data store the name, the super type, and the subtype:

VBScript

Python

Copy script

Dim oMyDataStore, oMyModel, Entity
Set oMyDataStore = NAVIGATOR.ConnectDataStore("ASAM Browse Settings Example")
Set oMyModel = oMyDataStore.Model
For Each Entity in oMyModel.Entities
  Call MsgBoxDisp("Entity: " & Entity.Name)
  If Not Entity.SubTypes Is Nothing Then
    Call MsgBoxDisp("Entity Subtype: " & Entity.SubTypes(1).Name)
  End If
  If Not Entity.SuperType Is Nothing Then
    Call MsgBoxDisp("Entity Supertype: " & Entity.SuperType.Name)
  End If 
Next

oMyDataStore = dd.NAVIGATOR.ConnectDataStore("ASAM Browse Settings Example") 
oMyModel = oMyDataStore.Model 
for Entity in oMyModel.Entities: 
    dd.MsgBoxDisp("Entity: " + Entity.Name) 
    if not Entity.SubTypes is None : 
        MsgBoxDisp("Entity Subtype: " + Entity.SubTypes(1).Name) 
    if not Entity.SuperType is None : 
        dd.MsgBoxDisp("Entity Supertype: " + Entity.SuperType.Name)