HCL Domino - Examples: Using the Evaluate statement - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: Using the Evaluate statement
1. This example calls @ProperCase when exiting the Subject field. The result of Evaluate replaces the current value of the Subject item.

Sub Exiting(Source As Field) Dim workspace As New NotesUIWorkspace Dim uidoc As NotesUIDocument Dim doc As NotesDocument Dim eval As Variant Set uidoc = workspace.CurrentDocument Set doc = uidoc.Document eval = Evaluate("@ProperCase(Subject)", doc) Call doc.ReplaceItemValue("Subject", eval) Call doc.Save(True, False) End Sub

2. This button example calls @Sum, then displays the sum of the values in the Amounts field.

Sub Click(Source As Button) Dim workspace As New NotesUIWorkspace Dim uidoc As NotesUIDocument Dim doc As NotesDocument Dim sumAmounts As Variant Set uidoc = workspace.CurrentDocument Set doc = uidoc.Document sumAmounts = Evaluate("@Sum(Amounts)", doc) Messagebox("Sum of Amounts = " & sumAmounts(0)) End Sub

See Also

Using the Evaluate statement

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents