Выпадающие списки в Lotus

[vurdalak]

Друзья программисты!!! Помогите.
Такая проблема. Занимаюсь созданием канцелярии на LOTUS.
Как в документе БД1 сделать такое поле, с выпадающим списком,
чтобы в списке содержались все значения некоторого поля из документов БД2. Ну и чтобы пользователь мог выбрать из списка это значение. Буду очень благодарен, если подскажете как это сделать. На @формулах или на lotus Script.

 

[Guest]

все же просто
тип поля "Dialog List"
на второй закладке "Control" выбираешь в "Choices":
- use View dialog for choices
- database -- свою базу данных
- view -- свою вьюху из базы
- column -- колонку со значениями

 

[vurdalak]

Спасибо, Виктор. Просто никогда не работал с Lotus,
нет никакой документации и пр. Изучаю методом "научного тыка",
а систему писать надо.
Скажите, пожалуйста, а как сделать то же, но по нажатию на
кнопку в документе. Т.е. пользователь "кликает" по кнопке, вываливается список со значениями из другой БД, он выбирает значение и оно присваивается полю? Заранее спасибо всем, кто откликнется!

 

[Guest]

Можно сделать так.
Это код для кнопки:

REM {1 - это номер возвращаемого столбца};
REM {ПикЛист выводит полностью вид};
list:=@PickList([Custom]:[Single];"имя_сервера":"\\local\\is\\ИмяБазы.NSF";"ИмяВида";"Заголовок";"Приглашение";1);
@If(@IsError(list) | list="";@Return("");@Success);

REM {Используем результаты выбора пользователя};
REM {Для дальнейшей выборки};
list1:=@DbLookup("":"NoCache";"имя_сервера":"\\local\\is\\ИмяБазы.NSF";"ИмяВида";list;2);
@If(@IsError(list1) | list1="";@Return("");@Success);

REM {Результаты присваиваем полям в форме};
FIELD Kod_CFU:=list1;
FIELD Branch_CFU:=list;
@Success

 

[vurdalak]

А как сделать то же на Lotus Script?

 

[Guest]

Так же почти, только нужно будет переменные перед использованием объявить.
Готового примера нет. У меня как-то все на формулах сделано.

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

stringArray = notesUIWorkspace.[B]PickListStrings[/B]( type% [, multipleSelection ], server$, databaseFileName$, viewName$, title$, prompt$, column% [, categoryname$ ] )