NotesTimer problem since 6.5.2

HCL Domino Domino Forum
1

In one of my applications I use a dialog box with a search field. A NotesTimer checks if the value of this field has changed, and if so, refreshes a list of expertises. Since 6.5.2 the Alarm event isn’t fired. I’ve checked this with version 6.5.2, 6.5.3 and 6.5.4. Can someone tell me what I’m doing wrong?

Here’s the code




[The command that launches the dialog box]

@DialogBox ( "(DialogExpertiseSoftware)" ; [AutoHorzFit] : [AutoVertFit] : [NoNewFields] : [SizeToTable] ; "Expertises Software..." );

@Command ( [ViewRefreshFields] )



[Globals \ Declarations]

Dim refreshTimer As NotesTimer

Dim uidoc As NotesUIDocument

Dim oldQuery As String



[Globals \ refreshTimerHandler]

Sub refreshTimerHandler ( Source As NotesTimer )

Dim newQuery As String

	Source.enabled = False

	newQuery = uidoc.FieldGetText ( "Search" )

	If Not oldQuery = newQuery Then

		'Perform search and refresh UIDocument...

	End If

	Source.Enabled = True	

End Sub



[(DialogExpertiseSoftware) \ PostOpen]

Sub Postopen(Source As Notesuidocument)

	

	oldQuery = ""

	Set uidoc = Source

	

	Set refreshTimer = New NotesTimer ( 1 , "Refresh search results..." )

	On Event Alarm From refreshTimer Call refreshTimerHandler

	

End Sub