Bookshelf Home | Contents | Index | Search | PDF |
Siebel Tools Reference > Configuring the Customer Dashboard > Using Siebel VB Script and eScript >
Siebel VB Example
Below is an example script written in Siebel VB that uses the dashboard commands. It gets the contact ID, Field 4, and Field Time for the current record populated in the dashboard and prints those values to a file.
For more information about using Siebel eScript, see Siebel eScript Language Reference.
Sub Script_Open
Dim bs as Service
Dim inpargs as PropertySet
Dim outargs as PropertySet
Dim fvalue as StringOpen "d:\sabari.txt" for Output as #1
Set bs = TheApplication().GetService("Persistent Customer dashboard")
Set inpargs = TheApplication.NewPropertySet
Set outargs = TheApplication.NewPropertySetbs.InvokeMethod "GetCurrentContactId",inpargs,outargs
fvalue = outargs.GetProperty("Contact Id")
Write #1, "The current id in the dashboard = " & fvalueInpargs.SetProperty "Field Name","Field 4"
bs.InvokeMethod "GetDashboardFieldValue",inpargs,outargs
fvalue = outargs.GetProperty("Field Value")
Write #1," The Account Name in the dashboard = "& fvalue
Close #1End Sub
Bookshelf Home | Contents | Index | Search | PDF |
Siebel Tools Reference, Version 7.5, Rev. A Published: 18 April 2003 |