我有以下情况:
- 面具 Person 有一个嵌入视图,其中包含表单 Notes(关于该人的注释)的文档。
- 掩码 Person 有一个 Person_ID 字段。
我需要在嵌入式视图中执行以下操作:
- 创建一个新的 Notes 文档。
- 从嵌入视图的掩码中读取字段 Person_ID。
- 将新创建的文档中的值存储在 Notes_Refto 字段中。
- 在编辑掩码中打开新文档。
最好的问候罗伯特
我有以下情况:
我需要在嵌入式视图中执行以下操作:
最好的问候罗伯特
将此按钮添加到您的表单 Person 中,而不是嵌入视图中。您可以将按钮放置在嵌入视图的正上方或下方。
让新文档从 Person 文档继承字段,例如 Person_ID 字段。
如果您想要嵌入视图中的操作,您可以这样做:
在嵌入视图中创建操作。使用公式运行代理
@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)