Här är en Lotusscript funktion för att undvika savekonflikter om 2 person öppnar samma dokument samtidigt på samma server och försöker utföra åtgärder på dokumentet.
Normalt kommer Lotus Notes säga ifrån om 2 personer försöker editera samma dokument på samma server men detta fungerar även om dokumentet är i läsläge. dvs om det tex finns en knapp i dokumentet som sparar dokumentet i backend.
Function HasDocChanged(doc As notesdocument) As Boolean
Dim session As New notessession, db As notesdatabase
Dim newdoc As notesdocument,view As notesview
Set db = session.currentdatabase
Set view = db.GetView("unids")
Set newdoc = view.getdocumentbykey(doc.UniversalID,True)
If newdoc.LastModified <> doc.LastModified Then
HasDocChanged = True
Else
HasDocChanged = False
End If
End Function
Relevanta Poster på Notessidan: