在嵌入视图中撰写新文档并在Lotus Notes中设置字段值

Question

我有以下情况：

1. 面具人员有一个嵌入式视图，其中包含表单Notes的文档（关于此人的注释）。
2. 掩码Person有一个Person_ID字段。

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

1. 创建新的Notes文档。
2. 从嵌入视图的蒙版中读取字段Person_ID。
3. 在Notes_Refto。
字段中存储新创建文档中的值
4. 在编辑掩码中打开新文档。

祝你好运 罗伯特

Answer 1

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

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

Answer 2

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

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

@Command（[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)