BEST logo логотип компании БЭСТ - программы для бизнеса ПРОДАЖИ
+7 (991) 312-04-37
trade@bestnet.ru
ПОДДЕРЖКА
+7 (495) 775-66-76
consult@bestnet.ru
СКАЧАТЬ
Обновления
Дистрибутивы
Авторизация

Логин:
Пароль:
Забыли свой пароль?
Регистрация
ВАШ ВОПРОС

Доступ к Личному кабинету закрыт!
Как получить доступ?


Форум

Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Помогите написать скрипт, Скрипт для отчёта
 
В справочнике партнёров есть закладка контакты. (рис. прилагаю). Для определённого шаблона требуется ФИО директора партнёра.
Задача: Переменной Direc присвоить значение Фамилия И.О. директора из списка контактов.
Если в контактах стоит одна запись, то трудностей нет. Как организовать поиск из списка контактов?

Изменено: Александр Фирсов - 21.05.2013 15:32:27
 
Как Вы сейчас получаете данные для одной записи в контактах? Используете источник bdf.sprav.sprav_partner_contact ?
1. В этот источник можно в параметре передать условие фильтра по которому будут выбираться нужные контакты.
2.По выбранным контактам можно организовать перебор примерно так
(DataContact - объект "Источник данных БЭСТ", у каторого DSName = bdf.sprav.sprav_partner_contact):
DataContact.First;
while not DataContact.eof do begin
if UpperCase([DialogForm.DataContact."ДОЛЖНОСТЬ"]) = 'ДИРЕКТОР' then begin
Direc := [DialogForm.DataContact."ФАМИЛИЯ_ИО"];
break;
end;
DataContact.Next;
end;
 
Сергей, спасибо за помощь. Всё получилось.
Только вначале надо добавить:
DataContact.open;
Изменено: Александр Фирсов - 23.05.2013 11:38:40
Страницы: 1
Читают тему (гостей: 1)