Нужно на скрипте, а не на формулах(+)

Замечание к документу "$REF или @InheritedDocumentUniqueID - что Вам болШе нравится (-)" >>>

Тема: Нужно на скрипте, а не на формулах(+)

Создан:

Ivan Pomidoroff 03/03/2005 04:00 PM

Папка:
06. Разработка Notes-приложений

Тип сообщения:
Мне лень заполнять это поле

Сообщение:
Проверил @InheritedDocumentUniqueID -работает, но мне нужно на скрипте. Сделал для теста следующее.

Sub Click(Source As Button)
Dim s As New NotesSession
Dim parentUnid As String
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim db As NotesDatabase
Dim doc As NotesDocument

Set uidoc = ws.CurrentDocument
Set doc = uidoc.document

parentUnid = doc.ParentDocumentUNID
Messagebox( "The parent's UNID is " + parentUNID ) 'Показывет пустой UNID

eval = Evaluate("@Text(@InheritedDocumentUniqueID)", doc)
Messagebox( "eval UNID is "+Cstr(eval(0))) 'Показывает UNID вновь созданного документа, а не его родителя

End Sub

Как видно doc.ParentDocumentUNID и Evaluate("@Text(@InheritedDocumentUniqueID)", doc) дают не тот результат, который нужен, причем разный %). Может чего-нибудь не так делаю?

Иерархия документов данной дискуссии:
Можно ли при создании дочернего документа до его сохранения узнать UNID родительского? (Ivan Pomidoroff) (03.03.2005 11:16:05)
.... $REF или @InheritedDocumentUniqueID - что Вам болШе нравится (-) (Nick A Norkin; VIT Server B) (03.03.2005 12:11:58)
........ Нужно на скрипте, а не на формулах(+) (Ivan Pomidoroff) (03.03.2005 16:00:07)
............ Во вновь создаваемом документе разместить computed for display поле с формулой @Text(@InheritedDocumentUniqueID) и брать значение из этого поля (-) (Nick A Norkin; VIT Server B) (03.03.2005 18:13:43)
.... Можно. немного "коряво", но работает на 100% (Sergey Kornienko) (26.03.2005 12:15:48)
........ "А нахрена уральский парень занимается Тай-Чи" (c) Шахрин (Vlad Sh) (26.03.2005 14:55:54)
............ Я же, сказал что это всё - "коряво", но работает (Sergey Kornienko) (26.03.2005 15:32:38)
................ Сергей поймите критику правильно.... (Andrew S Golembiovskiy) (26.03.2005 16:00:07)
.................... Могу подтвердить :-) (+) (Dmitry E Nabatchikov) (31.03.2005 13:15:27)
................ Студент, Вы в LN собираетесь работать или его у вас для ознакомления дают? (Vlad Sh) (26.03.2005 17:09:11)
.................... ну вот, испортили парню субботу, сейчас пойдет и напьется, "нежнее, Виктор, еще нежнее" (с). (Dmitry Akulov) (26.03.2005 18:03:57)
........................ Люди!!! (Sergey Kornienko) (28.03.2005 19:45:53)

Разработчикам и администраторам: курсы, книги, сертификация