Method: ExistsByDefinition for AssignmentList <Data>

Method: ExistsByDefinition for AssignmentList <Data>

Checks in the script interface for internal data whether the assignment with a specified definition value already exists in an assignment channel.

bExistsByDefinition = Object.ExistsByDefinition(Definition)

The following example generates an assignment channel with three assignments and checks whether an assignment to the definition value 2 already exists:

Dim oMyGrp, oMyChn, oMyAssgnList
Set oMyGrp = Data.Root.ChannelGroups(1)
Set oMyChn = oMyGrp.Channels.AddAssignmentChannel("MyAssignmentChn","Default Value")
Set oMyAssgnList = oMyChn.AssignmentList
Call oMyAssgnList.Add("text1",1)
Call oMyAssgnList.Add("text2",2)
Call oMyAssgnList.Add("text3",3)
Call MsgBoxDisp(oMyAssgnList.ExistsByDefinition(2))

oMyGrp = dd.Data.Root.ChannelGroups(1) 
oMyChn = oMyGrp.Channels.AddAssignmentChannel("MyAssignmentChn","Default Value") 
oMyAssgnList = oMyChn.AssignmentList 
oMyAssgnList.Add("text1",1) 
oMyAssgnList.Add("text2",2) 
oMyAssgnList.Add("text3",3) 
dd.MsgBoxDisp(oMyAssgnList.ExistsByDefinition(2))