Lotus notes 在嵌入式视图中编写新文档，并在Lotus Notes中设置字段值

我有以下情况：

mask Person有一个内嵌的视图，其中包含表单注释（关于此人的注释）的文档

面具人物有一个人物ID字段

我需要在嵌入式视图中执行以下操作：

创建新的Notes文档

从嵌入视图的遮罩中读取字段Person_ID

将新创建的文档中的值存储在“注释”字段中

在编辑掩码中打开新文档

致意

---

Robert

将此按钮添加到表单Person中，而不是嵌入视图中。可以将按钮定位在嵌入视图的正上方或正下方

---

让新文档继承Person文档中的字段，如Person_ID字段

如果要在嵌入式视图中执行操作，可以执行以下操作：

在嵌入式视图中创建操作。使用公式运行代理

@命令（[RunAgent]；“（CreateNotes）”）

代理应如下所示：

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)

---

好极了！我遇到的下一个问题是无法保存新打开的文档。不会显示任何消息，不会发生任何事情，文档也不会保存。我使用命令@command（[FileSave]）。文档可能已保存，但您可能尚未在嵌入式视图中看到它。保存并关闭新文档后，当您亲自按F9时，是否可以看到它？好的，您有权。文档已保存，但我无法显示它们。这是另一个问题。非常感谢。它也能起作用，也许是一种更干净的方法。更好的方法是在视图操作中直接使用代码，而不用代理也能正常工作！@Knut_Herrmann的解决方案的优点是，每个表单都可以有专门的操作。我使用通用注释，因此我可以根据需要处理不同的注释。我将在其他许多行动中使用你的例子。非常感谢。