Lotus Script, bei Querydocumentdelete Form des Dokuments ändern

Hallo,

versuche mich gerade wieder seit langem an Lotus Script, ein wenig habe ich mich eingefunden. Stehe jetzt aber vor einem größeren Problem.
Ich möchte per Softdeletion, Dokumente auf eine andere Form Switchen. Die Softdeletion ist in der DB aktiviert. Sobald ich auf das Papierkorb Symbol klicke kommt auch prompt meine MessageBox, jedoch wird nicht die Form geswitched.

Alte Form Alias = Person
Neue Form Alias = RMV_Person

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim c As NotesDocumentCollection  
Dim doc As NotesDocument  
 Dim f,strForm As String 
 
 Set db = session.CurrentDatabase
 Set c = source.documents
 Set doc = c.GetFirstDocument
 
 Do 
  f = doc.Form(0)
  If f = "Person" Or f="Kontakt"  Then
   Messagebox "Do / If Schleife gesprungen ", 48, "INFO" 
   strForm="RMV_Person"
   Call doc.ReplaceItemValue("Form", strForm)    
   Continue=True
  End If
  Set doc = c.getnextdocument(doc)
 Loop Until doc Is Nothing
 Exit Sub
 
SkipToEnd:
 Exit Sub 
End Sub

Kann sich jemand erklären, was ich hier vergessen haben sollte oder vom Ansatz her falsch herangehe.

Danke schön.
Grüße
Deny

Hab gerade gesehen, dass es wohl daran liegt, das ich das Dokument nach der Änderung nicht gespeichert hatte. Das habe ich noch reingemacht.

Call doc.save[True,False,False]