Не запускаются регламентные задачи (Файловый вариант)

@wardamask · Регистрация: 10.02.2016

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста... Есть самописная база на (1С 8.3 (8.3.6.2299), УФ, Файловая)
Я создал регламентное задание которое должно каждое утро запускать процедуру проверки давности изменения документа и если он менялся 30,60,90 дней назад отправлять сообщение по эл.почте.

Так вот проблема в том что регламентное задание отрабатывает только один раз после его создания,
и если изменить время то больше запускается. Одинаково не работает и в файловом и в клиент-серверном варианте (в скуле Блокировку регламентных заданий отключил)
В журнале регистрации пишет что фоновое задание начало и завершение((

Галочки предопределенное и использование стоят, интервал задан правильно.
Так как регламентное задание одно ключ не ставил.
Создан отдельный пользователь с обработкой ожидания.
Код работает если запускать его с кнопки.

Подскажите в чем может быть дело?

@SHIFT_969 · 10.02.2016, 17:31

wardamask, а у тебя там код исполняемый не на клиенте случайно? Попробуй через Попытка - Исключение писать ОписаниеОшибки() в текстовый файл.

@Dethmontt · 11.02.2016, 00:35

Сообщение от SHIFT_969

Попробуй через Попытка - Исключение писать ОписаниеОшибки() в текстовый файл.

wardamask, Лучше так:

1C

Попытка 
   //Тут твой код
Исключение 
   ВызватьИсключение ОписаниеОшибки(); 
КонецПопытки;

и можно не писать в текстовый файл.

Сообщение от wardamask

В журнале регистрации пишет что фоновое задание начало и завершение((

У тебя скорее всего ошибка в коде...

Добавлено через 3 минуты

Сообщение от wardamask

Создан отдельный пользователь с обработкой ожидания.

Этого делать не обязательно для платформы версии выше 8.3.3.ххх

http://v8.1c.ru/o7/201305fi/index.htm

Добавлено через 52 секунды
wardamask, пости сюда сам код метода регл. задания

@wardamask · 11.02.2016, 10:08 **[ТС]**

// общий модуль задания
// В свойствах модуля установил галочки: Сервер и вызов сервера

1C

1
2
3

Процедура Ежедневно() Экспорт
    ОтборДокументовДляУведомления();
КонецПроцедуры

// Общий модуль МодульУведомлений
// В свойствах модуля установил галочки: Глобальный, Клиент (Управляемое Приложение), Сервер и вызов сервера

1C

&НаСервере
Процедура ОтборДокументовДляУведомления() Экспорт    
      
        //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
    
    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |   РегИзмИспЛистовСрезПоследних.Период,
        |   РегИзмИспЛистовСрезПоследних.ИсполнительныйЛист,
        |   РегИзмИспЛистовСрезПоследних.ДатаПолученияВЮУ,
        |   РегИзмИспЛистовСрезПоследних.Контрагент,
        |   РегИзмИспЛистовСрезПоследних.Взыскатель,
        |   РегИзмИспЛистовСрезПоследних.Куратор,
        |   РегИзмИспЛистовСрезПоследних.Статус
        |ИЗ
        |   РегистрСведений.РегИзмИспЛистов.СрезПоследних КАК РегИзмИспЛистовСрезПоследних";
    
    РезультатЗапроса = Запрос.Выполнить();
    
    ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
    
    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        
    Период = ВыборкаДетальныеЗаписи.Период;
     ИспЛист = ВыборкаДетальныеЗаписи.ИсполнительныйЛист;
     ДатаПВЮУ = ВыборкаДетальныеЗаписи.ДатаПолученияВЮУ;
     Контрагент = ВыборкаДетальныеЗаписи.Контрагент;
     Взыскатель = ВыборкаДетальныеЗаписи.Взыскатель;
     Куратор = ВыборкаДетальныеЗаписи.Куратор;
     Статус = ВыборкаДетальныеЗаписи.Статус;
     
    Если 
        ДеньГода(ТекущаяДата()) = ДеньГода(Период + 2529000)   Тогда
        
        //Сообщить("Дата последнего изменения: "+ Период +" Номер исполнительного листа: "+ ИспЛист + " Дата получения в ЮУ " + ДатаПВЮУ 
        //+ " Контрагент " + Контрагент + " Взыскатель " + Взыскатель + " Куратор " + Куратор + " Статус " + Статус );
        
        Напоминание = "30 дней";
        
        УстановитьСоединениеСПочтой(Период, ИспЛист, ДатаПВЮУ, Контрагент, Взыскатель,  Куратор, Статус, Напоминание);
        
    КонецЕсли;
        
    Если 
        ДеньГода(ТекущаяДата()) = ДеньГода(Период + 5184000)   Тогда
        
        //Сообщить("Дата последнего изменения: "+ Период +" Номер исполнительного листа: "+ ИспЛист + " Дата получения в ЮУ " + ДатаПВЮУ 
        //+ " Контрагент " + Контрагент + " Взыскатель " + Взыскатель + " Куратор " + Куратор + " Статус " + Статус );
        
        Напоминание = "60 дней";
        
        УстановитьСоединениеСПочтой(Период, ИспЛист, ДатаПВЮУ, Контрагент, Взыскатель,  Куратор, Статус, Напоминание);
        
    КонецЕсли;
        
    Если 
         ДеньГода(ТекущаяДата()) = ДеньГода(Период + 7776000)  Тогда
        
        //Сообщить("Дата последнего изменения: "+ Период +" Номер исполнительного листа: "+ ИспЛист + " Дата получения в ЮУ " + ДатаПВЮУ 
        //+ " Контрагент " + Контрагент + " Взыскатель " + Взыскатель + " Куратор " + Куратор + " Статус " + Статус );
        
        Напоминание = "90 дней";
        
        УстановитьСоединениеСПочтой(Период, ИспЛист, ДатаПВЮУ, Контрагент, Взыскатель,  Куратор, Статус, Напоминание);
        
    КонецЕсли;
    КонецЦикла;
КонецПроцедуры

// общий модуль уведомлений
// В свойствах модуля установил галочки: Глобальный, Клиент (Управляемое Приложение), Сервер и вызов

1C

Процедура УстановитьСоединениеСПочтой(Период, ИспЛист, ДатаПВЮУ, Контрагент, Взыскатель,  Куратор, Статус, Напоминание)  Экспорт  
        
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "smtp.yandex.ru";
Профиль.ПортSMTP = 465;
Профиль.Пароль = "*******";
Профиль.ПарольSMTP = "********";
Профиль.Пользователь = "******@yandex.ru";
Профиль.ПользовательSMTP = "******@yandex.ru";
Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
Профиль.ВремяОжидания = 50;
Профиль.ИспользоватьSSLSMTP = Истина;
 
 ТекСообщение = Новый ИнтернетПочтовоеСообщение;
        ТекСообщение.Тема = ("Исполнительный лист без изменений " + Напоминание);    
        ТекСообщение.Получатели.Добавить("*****@yandex.ru");
        ТекСообщение.Отправитель = "*******@yandex.ru";  
    ТекСообщение.Тексты.Добавить ("Дата последнего изменения: " + Период);
    ТекСообщение.Тексты.Добавить ("Номер исполнительного листа: "+ ИспЛист);
    ТекСообщение.Тексты.Добавить ("Дата получения в ЮУ: " + ДатаПВЮУ);    
    ТекСообщение.Тексты.Добавить ("Контрагент: " + Контрагент );
    ТекСообщение.Тексты.Добавить ("Взыскатель: " + Взыскатель);
    ТекСообщение.Тексты.Добавить ("Куратор: " + Куратор);
    ТекСообщение.Тексты.Добавить ("Статус: " + Статус);
    ТекСообщение.Тексты.Добавить ("Данное письмо сформировано автоматически и не требует ответа.");
    
    ТекПочта = Новый ИнтернетПочта();
    ТекПочта.Подключиться(Профиль);    
    ТекПочта.Послать(ТекСообщение);
 
КонецПроцедуры

Добавлено через 4 минуты
Этот же код я запускал с кнопки и он нормально отрабатывал.
И что самое странное что после создания регламентного задания от один раз тоже отрабатывает, а вот последующие разы или после изменения времени, уже не работает...

@SHIFT_969 · 11.02.2016, 10:45

Dethmontt, куда пойдет ВызватьИсключение, если код рег задания исполняется только на сервере и ничего не возвращает на клиент, как код с кнопки, например? Или я не прав?

@wardamask · 11.02.2016, 11:26 **[ТС]**

Код выполняется только на сервере. Для проверки с кнопки я создавал копию процедуры отбордокументовдляуведомления() в модуле формы. Собственно с кнопки она отлично работает.

@Dethmontt · 11.02.2016, 11:51

Сообщение от SHIFT_969

ВызватьИсключение

При чем здесь клиент не клиент!?

В СП написано как работает ВызватьИсключение

Добавлено через 2 минуты
wardamask, поставь эту конструкцию в попытку

1C

Попытка
ТекПочта = Новый ИнтернетПочта();
    ТекПочта.Подключиться(Профиль);    
    ТекПочта.Послать(ТекСообщение);
Исключение
    ВызватьИсключение ОписаниеОшибки();
КонецПопытки;

Добавлено через 3 минуты

Сообщение от Dethmontt

В СП написано как работает ВызватьИсключение

Скудновато там написано....

короче.

ВызватьИсключение - регистрирует ошибку в журнале регистрации!

Добавлено через 1 минуту

Сообщение от wardamask

Этот же код я запускал с кнопки и он нормально отрабатывал.

что бы проверить как ты говоришь "НА КНОПКУ"
Это нужно делать на сервере и под пользователем под которым работает служба агента сервера!

@wardamask · 11.02.2016, 13:56 **[ТС]**

Вот я заново создал регламентное задание, оно запустилось. Запуск регламентного задания отразился в журнале регистрации. (скрин приложил), код нормально отработал и сформированное сообщение отправилось.
Это ведь значит сто дело не к коде? А в самом механизме рег заданий потому что повторно или после изменения времени он задание не отрабатывает(Код в модуле я не меняю, просто создаю новое регл задание) И никаких ошибок в журнале не регистрируется. Вот и вопрос в чем может быть дело?

@Dethmontt · 11.02.2016, 13:59

wardamask, консоль заданий то что говорит?

Добавлено через 24 секунды
wardamask, ты его хоть через консоль то включил?

@wardamask · 11.02.2016, 14:22 **[ТС]**

Честно говоря я не нашел консоль заданий для 1с8.3 управляемых форм. То что у меня на диске ИТС за январь 2016 там только для обычного приложения и для версии 8.2, на УФ не запускается. В интернете находил исключительно версию под обычное приложение.
А без консоли заданий, регламентные задания разве работать не должны?

Добавлено через 14 минут
Нашел, консоль запросов для уф, видимо плохо искал... ща поиграюсь... по итогам отпишусь.

@SHIFT_969 · 11.02.2016, 14:50

wardamask, кстати, тоже хотел тебе про консоль написать, но не нашел под УФ. Можешь поделиться?

@wardamask · 11.02.2016, 15:47 **[ТС]**

Вот нашел на Инфостарте

@wardamask · 11.02.2016, 16:06 **[ТС]**

Вопрос с не запускающимся регламентным заданием решился следующим образом. Я в настройках расписания, поле завершать через - установил 0. Теперь код выполняется всегда в установленное время...

Но появилась следующая странность. Несмотря на то что в расписании поля повторять через и повторять с паузой = 0, код отрабатывается циклично примерно раз в 1-2 минуты. То есть он отрабатывает код не один раз в день как задано в расписании, каждые 1-2 минуты пока запущен пользователь.
Почему так происходит? Как можно ли прописать завершение регламентного задания после выполнения удачного процедуры?

@Dethmontt · 11.02.2016, 16:52

wardamask, в файловой базе очередь Рег. заданий обрабатывается раз в 1 минуту

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

@wardamask · 11.02.2016, 17:08 **[ТС]**

А почему нужно сначала в консоли настраивать? Ведь на стройки в конфигураторе и в консоли идентичны.
Тут есть какие то подводные камни?

@Dethmontt · 11.02.2016, 17:24

Сообщение от wardamask

А почему нужно сначала в консоли настраивать?

потому что так проще

@wardamask · 11.02.2016, 20:35 **[ТС]**

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

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
		1
	1C 8.x Не запускаются регламентные задачи (Файловый вариант) 10.02.2016, 13:22. Показов 12369. Ответов 16 Метки нет (Все метки) Помогите пожалуйста... Есть самописная база на (1С 8.3 (8.3.6.2299), УФ, Файловая) Я создал регламентное задание которое должно каждое утро запускать процедуру проверки давности изменения документа и если он менялся 30,60,90 дней назад отправлять сообщение по эл.почте. Так вот проблема в том что регламентное задание отрабатывает только один раз после его создания, и если изменить время то больше запускается. Одинаково не работает и в файловом и в клиент-серверном варианте (в скуле Блокировку регламентных заданий отключил) В журнале регистрации пишет что фоновое задание начало и завершение(( Галочки предопределенное и использование стоят, интервал задан правильно. Так как регламентное задание одно ключ не ставил. Создан отдельный пользователь с обработкой ожидания. Код работает если запускать его с кнопки. Подскажите в чем может быть дело? Миниатюры 0

@SHIFT_969 Злой самаритянин 182 / 182 / 94 Регистрация: 24.04.2014 Сообщений: 686
	10.02.2016, 17:31	2
	wardamask, а у тебя там код исполняемый не на клиенте случайно? Попробуй через Попытка - Исключение писать ОписаниеОшибки() в текстовый файл. 0

@SHIFT_969 Злой самаритянин 182 / 182 / 94 Регистрация: 24.04.2014 Сообщений: 686
	11.02.2016, 10:45	5
	Dethmontt, куда пойдет ВызватьИсключение, если код рег задания исполняется только на сервере и ничего не возвращает на клиент, как код с кнопки, например? Или я не прав? 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 11:26 [ТС]	6
	Код выполняется только на сервере. Для проверки с кнопки я создавал копию процедуры отбордокументовдляуведомления() в модуле формы. Собственно с кнопки она отлично работает. 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 13:56 [ТС]	8
	Вот я заново создал регламентное задание, оно запустилось. Запуск регламентного задания отразился в журнале регистрации. (скрин приложил), код нормально отработал и сформированное сообщение отправилось. Это ведь значит сто дело не к коде? А в самом механизме рег заданий потому что повторно или после изменения времени он задание не отрабатывает(Код в модуле я не меняю, просто создаю новое регл задание) И никаких ошибок в журнале не регистрируется. Вот и вопрос в чем может быть дело? Миниатюры 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	11.02.2016, 13:59	9
	wardamask, консоль заданий то что говорит? Добавлено через 24 секунды wardamask, ты его хоть через консоль то включил? 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 14:22 [ТС]	10
	Честно говоря я не нашел консоль заданий для 1с8.3 управляемых форм. То что у меня на диске ИТС за январь 2016 там только для обычного приложения и для версии 8.2, на УФ не запускается. В интернете находил исключительно версию под обычное приложение. А без консоли заданий, регламентные задания разве работать не должны? Добавлено через 14 минут Нашел, консоль запросов для уф, видимо плохо искал... ща поиграюсь... по итогам отпишусь. 0

@SHIFT_969 Злой самаритянин 182 / 182 / 94 Регистрация: 24.04.2014 Сообщений: 686
	11.02.2016, 14:50	11
	wardamask, кстати, тоже хотел тебе про консоль написать, но не нашел под УФ. Можешь поделиться? 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 16:06 [ТС]	13
	Вопрос с не запускающимся регламентным заданием решился следующим образом. Я в настройках расписания, поле завершать через - установил 0. Теперь код выполняется всегда в установленное время... Но появилась следующая странность. Несмотря на то что в расписании поля повторять через и повторять с паузой = 0, код отрабатывается циклично примерно раз в 1-2 минуты. То есть он отрабатывает код не один раз в день как задано в расписании, каждые 1-2 минуты пока запущен пользователь. Почему так происходит? Как можно ли прописать завершение регламентного задания после выполнения удачного процедуры? Миниатюры 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	11.02.2016, 16:52	14
	wardamask, в файловой базе очередь Рег. заданий обрабатывается раз в 1 минуту Добавлено через 3 минуты wardamask, настрой расписание сначала в консоли, потом в конфигуратор переноси 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 17:08 [ТС]	15
	А почему нужно сначала в консоли настраивать? Ведь на стройки в конфигураторе и в консоли идентичны. Тут есть какие то подводные камни? 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	11.02.2016, 17:24	16
	Сообщение от wardamask А почему нужно сначала в консоли настраивать? потому что так проще 0

@wardamask 0 / 0 / 0 Регистрация: 10.02.2016 Сообщений: 13
	11.02.2016, 20:35 [ТС]	17
	Все получилось оставил только время начала... ошибка была из-за того консоле заданий на это же задание стояло время повторения 180 секунд, потому она и отрабатывала без остановки... Спасибо за помощь) 0