Prompt_okcancellistmult Множественный Выбор

[777DEN777]

Приветствую, подскажите пожалуйста
почему не отрывается диалог с множественным выбором

(с количеством документов 4 открывается, при 3116 не отображается)

Sub Click(Source As Button)

Dim LstNmOrg As Variant
Dim WS As New NotesUIWorkspace
Dim VwSpOrg As NotesView
Dim DcSpOrg As NotesDocument
Dim LstOrg() As String	


Set VwSpOrg = DBSpOrg.GetView("(MyVwLstOrg)")


Redim LstOrg(VwSpOrg.EntryCount - 1)
Nmr = 0
Set DcSpOrg = VwSpOrg.GetFirstDocument
While Not (DcSpOrg Is Nothing)
LstOrg(Nmr) = DcSpOrg.ColumnValues(0)

Set DcSpOrg = VwSpOrg.GetNextDocument(DcSpOrg)
Wend

LstNmOrg = WS.Prompt(PROMPT_OKCANCELLISTMULT,"Справочник","Укажите наименование:","",LstOrg)

End Sub

 

[morpheus]

777DEN777
это одно из ограничений на отображение кол-ва символов в промпте.

показывайте не больше 50-75 значений, в зависимости от длинны каждого отдельного значения

 

[ToxaRat]

показывайте не больше 50-75 значений, в зависимости от длинны каждого отдельного значения

сумма всех значений+символы разделители не должна быть больше 16К

 

[nvyush]

Не ясно, зачем перегонять значения из представления в массив, не проще ли сразу использовать WS.PickListStrings?

 

[777DEN777]

всем, спасибо за помощь

Не ясно, зачем перегонять значения из представления в массив, не проще ли сразу использовать WS.PickListStrings?

не знал про WS.PickListStrings....

да, такой вариант больше подойдет