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

В запросе, из результата которого заполняется ДниБолезниУходаЗаДетьми, в запросах пакета все ОК, но в последнем запросе, который уже идет в результат, насоединяли временные таблицы так, что НаименованиеПериода во всех строках Null.

Кто работает с ЗУП, у всех такая ситуация?
1 ZanderZ
 
27.06.13
10:13
уже 69,2 выпустили там поправили
2 fmrlex
 
27.06.13
10:13
69.2 вышел. Там исправили.
3 Professor83
 
27.06.13
10:16
Всем спасибо! Что-то я не посмотрел.
Программист всегда исправляет последнюю ошибку.