This sample script disables EDIT mode on the document once the FIELDSTAT field
is set to "Completed" and informs user by messagebox. You can use this script
also for documents that are signed, closed, or rejected, etc.
Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
If Not(source.EditMode) Then
status = source.FieldGetText "FieldStat")
If (currentStatus = "Completed") Then Messagebox("Cannot edit document.
Document has already been Completed!")
Continue = False
By submitting your personal information, you agree that TechTarget and its partners may contact you regarding relevant content, products and special offers.