Обновление внедренного представления

[Kizarek86]

День добрый, Всем.

Собственно что есть:
Форма с внедренным представлением, в котором отображаются документы.

При открытии документа следующий код:

Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
Dim s As New NotesSession
Call s.CurrentDatabase.GetAgent("(AG)").Run(Source.CaretNoteID)
Continue = False
exit sub

Агент открывает выбранный документ в диалоговом окне:

	Dim s As New NotesSession
Dim WS_DLG As New NotesUIWorkspace
Dim doc As NotesDocument

Set doc = s.CurrentDatabase.GetDocumentByID(s.CurrentAgent.ParameterDocID)

If WS_DLG.DialogBox("DLG_FORM", True, True, False, False, False, False, "...", doc, True, False, False) Then
Call doc.Save(True,True)
End If

Собственно вопрос, как обновить представление после сохранения документа открытого в диалоге?

 

[Omh]

Попробуй NotesUIWorkspace.ViewRefresh

 

[Kizarek86]

Попробуй NotesUIWorkspace.ViewRefresh

Блин, забыл совсем про неё, спасибо)

 

[nvyush]

Попробуй NotesUIWorkspace.ViewRefresh

КМК, перед этим нужно еще view.Refresh() сделать

 

[Kizarek86]

КМК, перед этим нужно еще view.Refresh() сделать

Ша проверю в 6.5
в 8.0.2 работает без

Ну в общем пашет и в 6.5, так что не нужно делать view.Refresh()

 

[Kizarek86]

Вот в 6.5 зато другой трабл вылез.

В 8 у представления есть замечательное событие OnSelect.

Что делается:
На событии OnSelect в переменную окружения (notes.ini) пишем NoteID документа который выделен, для того чтобы потом из документа куда внедрено представления произвести некоторые действия.

Как это можно сделать для 6.5 без OnSelect?

 

[Omh]

Поместить кнопку обрабатывающую выделенный документ в само view как action.
И всю логику написать там.

Как там вообще открытый док и док из внедрённого view связаны?
Сколько лет программлю под лотус, как-то не приходилось нарываться на такие задачи, что бы передавать noteid выделенного документа через энвайромент.

 

[nvyush]

Как это можно сделать для 6.5 без OnSelect?

link removed

 

[Kizarek86]

Поместить кнопку обрабатывающую выделенный документ в само view как action.
И всю логику написать там.

Как там вообще открытый док и док из внедрённого view связаны?
Сколько лет программлю под лотус, как-то не приходилось нарываться на такие задачи, что бы передавать noteid выделенного документа через энвайромент.

Да они связаны, поэтому определить что именно в нужном представлении был последний клик получится.

Не нравятся мне кнопки встроенные во внедренное представление хоть убей)

 

[Gandliar]

Да они связаны, поэтому определить что именно в нужном представлении был последний клик получится.

Не нравятся мне кнопки встроенные во внедренное представление хоть убей)

В этом случае надо учитывать 2 варианта

1. представление из текущей базы
2. представление из другой базы

если 1 все просто, в скрипте просто ловишь текущий уидок
если 2 - то как в 1 не прокатывает, надо ловить уидок 1 раз на событие открытия вида

 

[Kizarek86]

если 2 - то как в 1 не прокатывает, надо ловить уидок 1 раз на событие открытия вида

Почему не прокатит с представление из другой базы?

 

[TIA]

>На событии OnSelect в переменную окружения (notes.ini) пишем NoteID документа который выделен, для того чтобы потом из документа куда внедрено представления произвести некоторые действия.
А что будет если открыть 2 или более таких документов, с внедрённым представлением! Выбрать в первом из встроенной вьюшки документ, а во втором "произвести некоторые действия"

 

[nvyush]

А что будет если открыть 2 или более таких документов, с внедрённым представлением! Выбрать в первом из встроенной вьюшки документ, а во втором "произвести некоторые действия"

При открытии документа с внедрённым представлением в событии QueryOpen представления можно получить документ через Workspace.CurrentDocument и добавлять к имени переменной его unid/noteid.

Добавлено
Делал аналогичную реализацию, только unid подчинённого документа передавал через очереди.

 

[Kizarek86]

А что будет если открыть 2 или более таких документов, с внедрённым представлением! Выбрать в первом из встроенной вьюшки документ, а во втором "произвести некоторые действия" wink.gif

В моем случае все норм будет, т.к. чтобы производить действия нужно открыть документ на редактирование, с репликами не работают.

 

[TIA]

kizarek
>В моем случае все норм будет, т.к. чтобы производить действия нужно открыть документ на редактирование, с репликами не работают.

Я про то, какой NoteId возмётся из notes.ini. Когда в первом документе производится выбор из встроенного представления, то в notes.ini запишется NoteId. Если во втором документе, при выполнении "некоторых действий" получить документ по этому NoteId, то получится выбранный в первом документе, а надо выбранный во втором.

 

[nvyush]

Я про то, какой NoteId возмётся из notes.ini. Когда в первом документе производится выбор из встроенного представления, то в notes.ini запишется NoteId. Если во втором документе, при выполнении "некоторых действий" получить документ по этому NoteId, то получится выбранный в первом документе, а надо выбранный во втором.

При открытии документа с внедрённым представлением в событии QueryOpen представления можно получить документ через Workspace.CurrentDocument и добавлять к имени переменной его unid/noteid.

Добавлено
Делал аналогичную реализацию, только unid подчинённого документа передавал через очереди.

Я делал так: при открытии документа с внедрённым представлением в QueryOpen представления запоминал NoteID документа и использовал его в имени очереди сообщений, соответственно, сколько документов не открывай, для каждого будет своя очередь, так что путаницы не возникнет. Аналогично можно добавлять NoteID "главного" документа к имени переменной окружения, чистить notes.ini от таких переменных можно по закрытию документа/базы.