IScriptingEventsOnCurrentSaleSaved Method |
Namespace: SuperOffice.COM.ScriptEvents
Description
This text may be copied to the notepad, and saved as a *.vbs file.
sub OnCurrentSaleSaved ' add a follow up set soApnt = database.createappointment soApnt.SetDefaults soApnt.contact = currentcontact soApnt.task = database.GetListItemByName(67, "Sale followup") soApnt.DoBy = DateAdd("d", 1, Now()) soApnt.Description = "A sale was saved yesterday, do you need to follow it up today?" soApnt.Save end sub