Ошибка при копировании Notesitem в документ

LuMee

Well-Known Member
02.05.2006
477
0
#1
Доброго всем времени суток.
Имеется база в Lotus 7. В ней есть агент (на новые и измененные документы), одной из задач которого является копирование в обрабатываемые документы полей Authors и Readers из их родителей. Выглядит код примерно так:
Код:
Set doc = ...'вытаскиваю очередной обрабатываемый документ
Set parent = database.GetDocumentByUNID(doc.ParentDocumentUNID)
If Not parent Is Nothing Then
SetAccess doc, parent
doc.Save True, False
End If
При вызове процедуры SetAccess в вышеприведенном куске выскакивает ошибка Function requires a valid ADT argument. Код процедуры такой:
Код:
Sub SetAccess(document As NotesDocument, parent As NotesDocument)
document.RemoveItem "Authors"
document.RemoveItem "Readers"

document.CopyItem parent.GetFirstItem("Authors"), "Authors"
document.CopyItem parent.GetFirstItem("Readers"), "Readers"
End Sub
Ну а чтобы было совсем весело, ошибка эта появляется только у заказчика, на моей машине в "лабораторных" условиях агент отрабатывает нормально. Подписан он учеткой менеджера базы, имеющего полный доступ ко всем документам (проверено).
Читал в инете про вышеуказанную ошибку, однако все равно не понимаю, откуда она может возникать у меня в коде. Нуждаюсь в помощи, заранее спасибо.
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
2
#2
Код:
document.CopyItem parent.GetFirstItem("Authors"), "Authors"
document.CopyItem parent.GetFirstItem("Readers"), "Readers"
Ну а если у parent нет поля Authors/Readers? Как раз ошибка будет.