Genau das Dokument mit den Personenangaben.
Habe noch ein wenig mehr geändert. Hier dann noch mal das Script:
Sub Postsave(Source As Notesuidocument)
Dim db As New NotesDatabase("","")
Set db = source.document.parentdatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim dateTime As New NotesDateTime("12/01/04")
Dim nextDateTime As NotesDateTime
searchFormula$ = |Form = "Personen" & Firma = "| & Source.FieldGetText( "versteckFirmenName" ) & |"|
Set collection = db.Search(searchFormula$,dateTime,0)
'documentcollection
Call collection.Stampall("Firma", Source.FieldGetText( "FirmenName" ) )
End Sub
Das funktioniert soweit. Muss nur noch einen Weg finden wie ich das versteckte Feld synchronisiere. Das versteckteFeld verweist auf sich selbst!