0
Vladislava-smile
16.07.18
✎
04:13
|
Ошибка возникает при выполнении регламента на сервере. Если выполнять функцию через клиента (обработка) все работает.
Процедура СФормироватьУведомленияОбЭтапахПоставки() Экспорт
Запрос = Новый Запрос();
Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ
| ЗаказПоставщикуЭтапыПоставкиТовара.Ссылка,
| ЗаказПоставщикуЭтапыПоставкиТовара.Этап,
| ЗаказПоставщикуЭтапыПоставкиТовара.Дата
|ИЗ
| Документ.ЗаказПоставщику.ЭтапыПоставкиТовара КАК ЗаказПоставщикуЭтапыПоставкиТовара
|ГДЕ
| ЗаказПоставщикуЭтапыПоставкиТовара.Ссылка.Проведен
| И НЕ ЗаказПоставщикуЭтапыПоставкиТовара.Исполнено
| И НАЧАЛОПЕРИОДА(ЗаказПоставщикуЭтапыПоставкиТовара.Дата, ДЕНЬ) = &ТекущаяДата";
Запрос.УстановитьПараметр("ТекущаяДата", НачалоДня(ТекущаяДата()));
Выборка = Запрос.Выполнить().Выбрать();
П_Администратор = Справочники.Пользователи.НайтиПоНаименованию("Администратор");
Пока Выборка.Следующий() Цикл
ЗаказПоставщику = Выборка.Ссылка;
Если ЗначениеЗаполнено(ЗаказПоставщику.Ответственный) тогда
СписокПолучателей = Новый СписокЗначений;
ДобавитьПользователяВСписокПолучателей(СписокПолучателей, ЗаказПоставщику.Ответственный);
Если ЗаказПоставщику.Ответственный <> ЗаказПоставщику.Ответственный.Руководитель тогда
ДобавитьПользователяВСписокПолучателей(СписокПолучателей, ЗаказПоставщику.Ответственный.Руководитель);
КонецЕсли;
ОписаниеУведомления = Строка(КонецДня(Выборка.Дата)) + " истекает срок исполнения этапа поставки: " + Выборка.Этап;
СоздатьУведомление(ЗаказПоставщику, ОписаниеУведомления, СписокПолучателей, П_Администратор);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
В свойствах галки: Сервер, Клиент (обычное), вызов сервера.
В чем может быть проблема подскажите пжлст?
|
|