|
0
Professor83
27.06.13
✎
10:13
|
Всем привет.
После потерянной половины дня до меня дошло, что процедура обновления ушла на бесконечный цикл.
ВременнаяТаблица = Объект.ДниБолезниУходаЗаДетьми.Выгрузить();
Н = ВременнаяТаблица.Количество() - 1;
Пока Н > 0 Цикл
ТекущаяЗапись = ВременнаяТаблица[Н];
Если Не ЗначениеЗаполнено(ТекущаяЗапись.НаименованиеПериода) Тогда
//НаименованиеПериода в результате запроса получается пустое, поэтому попадаем сюда и цикл становится бесконечным
Продолжить;
КонецЕсли;
ПредшествующаяЗапись = ВременнаяТаблица[Н-1];
Если ТекущаяЗапись.НаименованиеПериода = ПредшествующаяЗапись.НаименованиеПериода
И Год(ТекущаяЗапись.ПериодС) = Год(ПредшествующаяЗапись.ПериодС)
И (ТекущаяЗапись.ПериодС = КонецДня(ПредшествующаяЗапись.ПериодПо) + 1
Или КонецДня(ТекущаяЗапись.ПериодС) = КонецДня(ПредшествующаяЗапись.ПериодПо)) Тогда
// объединим записи в одну
ПредшествующаяЗапись.Дни = ПредшествующаяЗапись.Дни + ТекущаяЗапись.Дни;
ПредшествующаяЗапись.ПериодПо = ТекущаяЗапись.ПериодПо;
ВременнаяТаблица.Удалить(ТекущаяЗапись);
КонецЕсли;
Н = Н - 1;
КонецЦикла;
В запросе, из результата которого заполняется ДниБолезниУходаЗаДетьми, в запросах пакета все ОК, но в последнем запросе, который уже идет в результат, насоединяли временные таблицы так, что НаименованиеПериода во всех строках Null.
Кто работает с ЗУП, у всех такая ситуация?
|
|
