отбор док. по номеру

[Irina]

если в колонке вида есть нужный параметр - использовать

Ссылка скрыта от гостей

Это Вы не документы сохранили в списке, а их UniversalID.
Если данных для отправки нет в ColumnValues, то значит их нужно брать из документа, а значит нужно сохранять в списке сами документы:

'...
Dim mylist List As NotesDocument

'начало цикла
    Set mylist(Doc.UniversalID) = Doc
'конец цикла

'...

[/QUOTE]
type mismatch on Doc

 

[Irina]

если в колонке вида есть нужный параметр - использовать

Ссылка скрыта от гостей

пробовала entryA.ColumnValues(1) , но данные из общей колонки подставляет столько раз, сколько в ней подкатегорий

 

[lmike]

пробовала entryA.ColumnValues(1) , но данные из общей колонки подставляет столько раз, сколько в ней подкатегорий

код, настройка вида (что в колонках, как выставлена галочка отображения нескольких значений), выложите, ато непонятно

 

[Irina]

код, настройка вида (что в колонках, как выставлена галочка отображения нескольких значений), выложите, ато непонятно

 

[lmike]

Посмотреть вложение 32695 Посмотреть вложение 32696 Посмотреть вложение 32697

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

 

[VladSh]

type mismatch on Doc
[/QUOTE]
Рядом с Dim mylist... добавьте строку

Dim Doc As NotesDocument

 

[Irina]

type mismatch on Doc

Рядом с Dim mylist... добавьте строку

Dim Doc As NotesDocument

[/QUOTE]
SET may only be used on class instance assignments
убираю set, и хоть и есть Dim Doc As NotesDocument.... Type mismatch on: DOC
сначала наверное лучше разобраться с тем, чтобы он брал первый entry в категории, а потом уже буде разбираться как документ именно сохранять

 

[VladSh]

сначала наверное лучше разобраться с тем, чтобы он брал первый entry в категории

Если Вы хотите получить сумму из entry, то я сильно сомневаюсь, что это получится. Может быть сейчас в Лотусе что-то изменилось, но раньше нельзя было получить из entry "синтетические" (реально не существующие в документе) значения типа "сквозной нумерации", сумм и т.д. В документации где-то есть перечень @-формул и свойств колонок, значения которых не получить из entry.

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

Вот простенькие функции (убрал из них получение вида и его обновление) для получения данных из вида:

Function dbColumn(ndb As NotesDatabase, sViewName As String, iColNumber As Integer)
    Dim sFormula As String
    sFormula = |@DbColumn("":"NoCache"; "| + Join(Evaluate(|@Uppercase(@name([Abbreviate]; "| + ndb.Server + |"))|)) + |":"| + DB.FilePath + |"; "| + sViewName + |"; | + CStr(iColNumber) + |)|
    dbColumn = Evaluate(Replace(sFormula, "\", "\\"))
End Function


Function dbLookup(ndb As NotesDatabase, sViewName As String, sKey As String, iColNumber As Integer)
    Dim sFormula As String
    sFormula = |@DbLookUp("":"NoCache"; "| + ndb.Server + |":"| + ndb.FilePath + |"; "| + sViewName + |"; "| + sKey + |"; | + CStr(iColNumber) + |)|
    dbLookup = Evaluate(Replace(sFormula, "\", "\\"))
End Function

Вам нужна dbLookup.
sKey - значение колонки категории.
iColNumber - номер колонки, начиная с единицы, значение которой нужно вернуть.
Если всё хорошо, то получите массив значений, т.е. проверка IsArray(arrResult) даст True.
Дальше в цикле проходите и складываете.

Не знаю, как функция отработает, если в колонках номера, а не строки. Пробуйте.

 

[alexas1]

сумму из entry, то я сильно сомневаюсь,

сумма работает, сквозная нумерация - нет)

 

[VladSh]

сумма работает, сквозная нумерация - нет)

Тогда нужно действительно ViewNavigator, и забирать сумму у той Entry, у которой IsCategory = True.

 

[lmike]

сквозная нумерация - нет

это "кто" ? если речь про колонку с нумерацией - у энтриса есть pos

 

[alexas1]

это "кто" ? если речь про колонку с нумерацией - у энтриса есть pos

@DocNumber в колонке, не берётся
а у ентриса да)