Проблема следующего плана: создал обработку, которая должна проверять наличие выходного дня в регистре если за этот день для определенного работки есть "приказ на работу в выходной день".
Создал вот такую процедуру, но она отрабатывает только до запроса. Сам запрос не отрабатывает, в чем может быть проблема?
Процедура Проведение()
сообщить("1");
ПР = СоздатьОбъект("Документ.ПриказРабота");
Запрос2=СоздатьОбъект("Запрос");
ТекстЗапроса="
|Период с Дата1 по Дата2;
|РегСотрудник = Регистр.Время.Сотрудник;
|РегВремяПоДням = Регистр.Время.ВремяПоДням;
|РегДатаДок = Регистр.время.датадок;
|Группировка РегДатаДок;
|Группировка РегСотрудник Без Групп;
|Группировка РегВремяПоДням;
|";
Если Запрос2.Выполнить(ТекстЗапроса)=0 тогда Предупреждение("Запит не виконано!"); Возврат; КонецЕсли;
ПР.ВыбратьДокументы(Дата1,Дата2);
Пока ПР.ПолучитьДокумент()=1 Цикл
сообщить("2");
ПР.ВыбратьСтроки();
Пока ПР.ПолучитьСтроку()=1 Цикл
сообщить("3 "+пр.сотрудник+" дата "+пр.датадок);
Пока Запрос2.Группировка("РегДатаДок") = 1 цикл
сообщить("4");
Если ПР.датадок = Запрос2.РегдатаДок тогда
сообщить("5");
Пока Запрос2.Группировка("РегСотрудник")=1 Цикл
сообщить("6");
Если запрос2.регсотрудник = пр.сотрудник тогда
сообщить("7");
Пока Запрос2.Группировка("РегВремяПоДням")=1 Цикл
сообщить("8");
Если запрос2.регвремяподням = Перечисление.ВремяПоДням.Выходные тогда
сообщить("Все документы перепроведены");
иначе
сообщить("Документ"+пр+"не має відповідності з шляховим листом. Перевірте проведення шляхового листа");
КонецЕсли;
КонецЦикла;
иначе
продолжить;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЦикла;
КонецЦикла;
КонецЦикла;
Конецпроцедуры