Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
01 дек 2025, 02:38

Регламентныое задание

Автор Sasha1C, 26 ноя 2025, 10:54

0 Пользователей и 1 гость просматривают эту тему.

Sasha1C

Добрый день, есть такой код привязанный к реглам. заданию. И вот в чем вопрос, если я его вызываю с клиента (создал тестовую кнопка на этой обработке, то выходит нужное сообщение пользователю, а если по регламенту, то фоновая задача завершена успешна, но ничего не происходит. Второй код - это сообщение вместе с процедурой, которая отрабатывает. Есть мысль что  вызывается только с клиента, но как сюда впихнуть клиент в эту цепочку ума не приложу. Всем заранее спасибо.
//общий модуль сервер
Процедура ВыполнитьРегламентныеЗаданияИзРасширенийСервер() Экспорт

Если Метаданные.Обработки.Найти("СчетаДляОплаты") <> Неопределено Тогда
     Обработки.СчетаДляОплаты.ОтправитьНапоминанияОПоставках(); 
    КонецЕсли;

КонецПроцедуры
// Эта процедура вызывается регламентным заданием каждый день в 9:00(Модуль менедж обработки)
Процедура ОтправитьНапоминанияОПоставках() Экспорт

ТЗ = ПолучитьТоварыДляОповещенияСегодня();

//Если ТЗ.Количество() = 0 Тогда
// Возврат;
//КонецЕсли; 

ТекущийПользователь = Справочники.Пользователи.ПустаяСсылка();
//СписокПользователей = ПользователиИнформационнойБазы.ПолучитьПользователей();
ТекущийПользователь = ПараметрыСеанса.ТекущийПользователь;


Если ТЗ.Количество() = 0 Тогда
Текст = ("Нету ближайших поставок");
Иначе
Текст = "Напоминание о поставках:" + Символы.ПС;
Для Каждого Стр Из ТЗ Цикл

Текст = Текст +
"• " + Стр.Номенклатура +
" – " + Стр.Количество + " " + Стр.ЕдиницаИзмерения +
" → поставка: " + Формат(Стр.ДатаПоставки, "ДФ=dd.MM.yyyy")  + " по " + Стр.ДокументСчет + Символы.ПС;
КонецЦикла;
КонецЕсли;


ОтправитьСообщениеПользователям(Текст);
КонецПроцедуры

//ОтправитьСообщениеПользователям(ТекущийПользователь, Текст);

//(Модуль менедж обработки)
Процедура ОтправитьСообщениеПользователям(Текст)

  //ОбщегоНазначения.СообщитьПользователю(Текст);
   СообщениеПользователю = Новый СообщениеПользователю;
   ФормаСписка = ПолучитьФорму("Обработка.СчетаДляОплаты.Форма.Форма");
   СообщениеПользователю.Текст = Текст;
   СообщениеПользователю.Поле = ФормаСписка;
   СообщениеПользователю.Сообщить();

КонецПроцедуры

antoneus

Вот тут написал же как это делается. Не будет регламентное задание ничего никому сообщать.

Sasha1C

antoneus, забыл что тут нужно отвечать, такого регистра нету в моей конфигурации

sali

Sasha1C, создай
Цитата: antoneus от 26 ноя 2025, 11:11Не будет регламентное задание ничего никому сообщать.
если только не пройдет проверки или запрет стоит - вот тогда выйдет предупреждение, сообщение

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск