Entering Event Error

Hi,

I created a radio button field with Yes and No options. The default value is “Yes”.

I created a simple lotus script whereby on entering the field to select “No” option, the user is prompted with a message and upon clicking OK, lotus notes displays the message to save with 3 commands: Save, Close and Cancel. That is fine.

Problem here is:

  1. Clicks on “Yes”, the validation rule set for when the field option is set to “Yes” appear.

  2. Clicks on “No” then form abort and this is fine.

  3. Clicks on " Cancel" the form continues but instead the entering event now does not work when clicking on the field again. The entering event should still trigger when “Cancel” option is selected.

  4. This prompt should only happen when user selects the “No” option.

Below is the script:

Sub Entering(Source As Field)

Dim workspace As New NotesUIWorkspace

Dim uidoc As NotesUIDocument

Set uidoc = workspace.CurrentDocument

Messagebox "This item is not buggeted for so application will abort."

Call uidoc.Close(True)

'Exit Sub

End Sub

Your kind help would be much appreciated.

Yoko