Compose ein neues Dokument in einer eingebetteten Ansicht und setzen Feldwert in Lotus Notes

Question

Ich habe folgende Situation:

1. Die Maske Person hat eine eingebettete Ansicht mit Dokumenten von Form Notes (Hinweise zur Person).
2. Die Maske Person hat ein Person_ID-Feld.

Ich brauche eine Aktion in der eingebetteten Ansicht, die die folgenden Aktionen ausführen:

1. Erstellt ein neues Notes-Dokument.
2. Liest das Feld Person_ID aus der Maske, in der die Ansicht eingebettet ist.
3. Speichert den Wert im neu erstellten Dokument im Feld Notes_Refto.
4. Öffnet das neue Dokument in der Bearbeitungsmaske.

Mit freundlichen Grüßen Robert

Answer 1

Fügen Sie diese Schaltfläche, um Ihre Form Person, nicht in die eingebettete Ansicht. Sie können die Schaltfläche direkt über oder unter der eingebetteten Ansicht positionieren.

Das neue Dokument erben Felder aus Personendokument wie das Feld Person_ID.

Answer 2

Wenn Sie die Aktion in der eingebetteten Ansicht möchten, können Sie dies tun:

Erstellen Sie die Aktion in der eingebetteten Ansicht. Verwenden Formel ein Agent

@Command zu laufen ([RunAgent]; "(CreateNotes)")

Der Agent sollte wie folgt aussehen:

Dim personDoc As NotesDocument 
Set personDoc = workspace.Currentdocument.Document 

Dim notesDoc As New NotesDocument(app.CurrentDatabase) 

Call notesDoc.Replaceitemvalue("Form", "Notes") 
Call notesDoc.Replaceitemvalue("Person_ID", personDoc.ID(0)) 

Call workspace.Editdocument(True, notesDoc)