SetObjectNew method (WinStudio scripts)
Applies To
IWSIDOCollection interface
Definition
Marks an object in a specified IDO collection as "new", based on specified criteria.
Syntax
object.SetObjectNew( integer, Boolean )
| Part | Description | 
| object | Required. A reference to a valid IDO collection object. | 
| integer | Required. An integer indicating the index number of an object in the entries for the current collection. | 
| Boolean | Required.
                                       					 Determines whether the object is marked as "new". 
 | 
Example
Sub Main()
   Dim i As Integer
   Dim SubColCache As IWSIDOCollection
   Dim strCompare As String
   SubColCache = ThisForm.Components(GetParameter(0)).IDOCollection
   For i = 0 To SubColCache.GetNumEntries - 1
      If (SubColCache.IsObjectNew(i)) Then
         strCompare = SubColCache.GetObjectProperty(GetParameter(1), i)
         If (strCompare = GetParameter(2)) Then
            SubColCache.SetObjectForceUpdate(i, True)
            SubColCache.SetObjectNew(i, False)
            SubColCache.SetObjectPropertyModified(GetParameter(1), i, False)
         End If
      End If
   Next i
End Sub