Создайте новый документ во встроенном представлении и установите значение поля в Lotus Notes
У меня следующая ситуация:
- Маска Person имеет встроенный вид с документами формы Notes (заметки о персоне).
- Маска Person имеет поле Person_ID.
Мне нужно действие во встроенном представлении, которое выполняет следующие действия:
- Создает новый документ Notes.
- Считывает поле Person_ID из маски, в которую встроено представление.
- Сохраняет значение в новом созданном документе в поле Notes_Refto.
- Открывает новый документ в маске редактирования.
С наилучшими пожеланиями Роберт
2 ответа
Решение
Добавьте эту кнопку в форму 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)