ОБЩИЕ

Главная

МОЙ КАБИНЕТ

Корзина
Заказы
Профиль

СКАЧАТЬ

Дистрибутивы

ЦЕНЫ

Прайс-лист

СВЯЗЬ

Форум
Техподдержка
Контакты

СОТРУДНИЧЕСТВО

Стать дилером
Вакансии


Команда RegionSoft:
"Мы создаем решения, которые
делают Ваш бизнес эффективнее!"
 

Логин:

Пароль:






Я забыл пароль


НАВИГАТОР


+ RegionSoft CRM. Использование конфигуратора
- Конфигуратор для чайника
- Работа в конфимгураторе
- Изменения в отчете "конверт"
- Редактирование формы счёта на оплату
- ShellExecute в конфигураторе.
- Фактический индекс клиента в письме
- Изменения в БД через конфигуратор.
- Использование компонентов других модулей в кофигураторе для формы.
- Нужен скрипт для выгрузки базы данных в excel
- Регион и район в конфигураторе
- Как восстановить удаленных клиентов или контакты
- Что можно сделать с помощью конфигуратора?
- Пример кастомизированного отчета
- Как поставить на автомат вывод Отчета
- Как узнать название объектов в карточке клиента?
- Как добавить фирменную шапку в печатную форму счета
- Как попасть в конфигуратор
- Пример интеграции с 1С
- Как убрать неиспользуемые вкладки в карточке клиента?
+ RegionSoft CRM. Установка, настройка, эксплуатация


ВАШИ ПРАВА

Сейчас Вы не можете даже добавлять сообщения, поскольку Вы не авторизованы. Пожалуйста, авторизуйтесь.


 Форум: 'RegionSoft CRM. Использование конфигуратора'
 ТЕМА: Как поставить на автомат вывод Отчета 
Автор темы: Nickolas
Тема создана: 2010-08-24 07:38:28

Добрый день!
Как сделать автоматический вывод отчета "Дни рождения" при запуске ЦРМ на текущую неделю по всем кураторам\специалистам?

Вот скрипт, который нужно прописать в событии fMain.OnShow. Скрипт выводит отчет по всем дням рождения, независимо от даты. Поэкспериментируйте немного с SQL-запросом, чтобы отобрать только тех, у кого день рождения на этой неделе или в текущем месяце (например с функцией EXTRACT)...

begin
fRepBirthDay.qRep.SQL.Text := Format(
' SELECT '+
' c.name client, '+
' s.name status, '+
' c.curator, '+
' c.specialist, '+
' cp.family || %s || cp.name || %s || cp.name2 as FIO, '+
' cast(cp.birthday as date) as birthday, '+
' extract(month from cp.birthday) || %s || extract(day from cp.birthday) as birthday2, '+
' cast(extract(year from current_date) - extract(year from cp.birthday) as Integer) as age '+
' FROM CONTACTPERSONS cp '+
' left join customer c on c.id=cp.custno '+
' left join status s on s.id=c.status '+
' WHERE cp.birthday is not null '+
' order BY 7', [''' ''', ''' ''', '''.''']);
fRepBirthDay.qRep.Open;

if fRepBirthDay.qRep.RecordCount = 0 then begin // Данных нет
ShowMessage('Дней рождения не зарегистрировано');
Exit;
end else begin // Данные есть
fRepBirthDay.rep.Memo4.Visible := false;
fRepBirthDay.rep.Memo5.Visible := false;
fRepBirthDay.rep.ShowReport();
fRepBirthDay.rep.Memo4.Visible := true;
fRepBirthDay.rep.Memo5.Visible := true;
end;
end.

Примечание:
Чтобы был доступ к форме fRepBirthDay, у вас должен быть дистрибутив с номером сборки не менее 4.3.18.1033
Axel
2010-08-27 17:23:10

Этот сайт защищен международными и российскими законами об авторском праве.
Перепечатка, а также любое другое воспроизведение материалов сайта без письменного разрешения администрации - запрещена.
RegionSoft CRM - Автоматизация бизнеса Copyright (C) 2001-2018 RegionSoft Developer Studio