Hi,
so ganz grob gesprochen brauchst du einen Agent der sich die markierten Hauptdokumente in eine Collection packt (UnprocessedDocuments).
Dann wird die gesamte Collection durchlaufen und für jedes Dokumente die Antworten in eine weitere Collection gepackt. Dann kannst du mit StampAll in allen Antworten einem Feld einen Wert zuweisen, siehe Code unten. Den Wert liest du aus dem entsprechenden Feld des Hauptdokumentes aus.
...
Dim collection As NotesDocumentCollection
Set collection = doc.Responses
Call collection.StampAll("Feldname", "Feldwert")
...
So könnte es gehen.
Axel