Обращение к общему модулю из ПриНачалеРаботыСистемы()

[IgoryanYa]

Всем привет. Уважаемые люди подскажите пожалуйста. Имею 1с Розницу 8.3. Задача простейшая. При входе в программу необходимо вывести сообщение о днях рождения клиентов. Я знаю что у модуля управляемого приложения есть процедура "ПриНачалеРаботыСистемы()" Понятно что если в конце процедуры прописать Сообщить("Например сегодня ДР у чувака") то при открытие программы я получу сообщение. Но что бы получить данные из базы я создал общий модуль "СообщитьОДняхРожденияКлиентов" и прописал там код

Код Выделить Развернуть



&НаКлиенте
Процедура СообщитьОДняхРожденияКлиентов()
Массив = СообщитьОДняхРожденияКлиентовНаСервере();
Для Каждого Строка из Массив Цикл
ПоказатьПредупреждение(,Строка);
КонецЦикла;
КонецПроцедуры

&НаСервере
Функция СообщитьОДняхРожденияКлиентовНаСервере()
Выборка = Справочники.Клиенты.Выбрать();
Массив = Новый Массив;
Пока Выборка.Следующий() Цикл
Если
Лев(Строка(Формат(Выборка.ДатаРождения,"ДЛФ=D")),5) = Лев(Строка(Формат(ТекущаяДата(),"ДЛФ=D")),5)
Тогда
Строка = ("Внимание!!! " + Выборка.Наименование + " праздрунет сегодня День Рождения !!!. Надо клиенту позвонить и поздравить !!!!!");
Массив.Добавить(Строка);
Сообщить(Строка);
КонецЕсли;
КонецЦикла;
Возврат Массив;
КонецФункции



Если например через внешнюю обработку запускать то все норм (ПоказатьПредупреждение использовал так для себя, знаю что можно Сообщить() с сервера), но вот как запустить мой модуль или процедуру из под процедуры ПриНачалеРаботыСистемы()???

Или может есть какой нибудь другой вариант?

[wise]

(0) в процедуре ПриНачалеРаботыСистемы
вызывай СВОЙ модуль:

Код Выделить Развернуть

СообщитьОДняхРожденияКлиентов.СообщитьОДняхРожденияКлиентов()

а в своём модуде ДОБАВЬ слово "Экспорт"

Код Выделить Развернуть

&НаКлиенте
Процедура СообщитьОДняхРожденияКлиентов() Экспорт

[IgoryanYa]

(0) в процедуре ПриНачалеРаботыСистемы
вызывай СВОЙ модуль:

Код Выделить Развернуть

СообщитьОДняхРожденияКлиентов.СообщитьОДняхРожденияКлиентов()

а в своём модуде ДОБАВЬ слово "Экспорт"

Код Выделить Развернуть

&НаКлиенте
Процедура СообщитьОДняхРожденияКлиентов() Экспорт

Теперь ругается на

Код Выделить Развернуть

{ОбщийМодуль.СообщитьОДняхРожденияКлиентов.Модуль(3,10)}: Процедура или функция с указанным именем не определена (СообщитьОДняхРожденияКлиентовНаСервере)
Массив = <<?>>СообщитьОДняхРожденияКлиентовНаСервере(); (Проверка: Тонкий клиент)

[wise]

(2)

Код Выделить Развернуть

Массив = СообщитьОДняхРожденияКлиентов.СообщитьОДняхРожденияКлиентовНаСервере();

...
&НаСервере
Функция СообщитьОДняхРожденияКлиентовНаСервере() Экспорт

[IgoryanYa]

(2)

Код Выделить Развернуть

Массив = СообщитьОДняхРожденияКлиентов.СообщитьОДняхРожденияКлиентовНаСервере();

...
&НаСервере
Функция СообщитьОДняхРожденияКлиентовНаСервере() Экспорт

Добрый человек, спасибо тебе огромное, все заработало