Click or drag to resize

IScriptingEventsOnCurrentRelationSaved Method

Called when an existing object is saved after having been changed.

Namespace:  SuperOffice.COM.ScriptEvents
Assembly:  Scripting.Interop (in Scripting.Interop.dll) Version: 8.0.0.0
Syntax
void OnCurrentRelationSaved()
Examples

Description

This text may be copied to the notepad, and saved as a *.vbs file.

VB
Sub OnCurrentRelationSaved
  If CurrentRelation.ActiveText = "owns" Then
    CurrentContact.Category = Database.GetListItemByName(64, "Mother company") 'enTableCategory = 64
  ElseIf CurrentRelation.ActiveText = "is owned by" Then
    CurrentContact.Category = Database.GetListItemByName(64, "Subsidiary") 'enTableCategory = 64
  End If    
End Sub

See Also