Имя: Пароль:
1C
1С v8
v8: Задвоение отпусков
0 picom
 
27.04.12
08:22
Вчера в ЗУП 8.2 последней увидел что все документы "отпуска организаций" приобрели дублирующую строку в табличной части.
....
Т.е. все строки в этом документе стали задвоенные.
Кто-нибудь сталкивался с подобной проблемой?
....
1 RomaH
 
naïve
27.04.12
08:28
ага - есть не типовые реквизиты в ТЧ?
2 ThreeTONE
 
27.04.12
08:29
я сталкивался, появились они после обновления релиза.
все дубли прибил обработкой (строки где не расчитано число дней отпуска)
3 ThreeTONE
 
27.04.12
08:30
но у меня они появились не в ЗУПе, а в УПП
4 picom
 
27.04.12
09:58
(2) дайте плиз обработку...
5 RMpnz
 
27.04.12
10:00
(3) та же фигня)
6 picom
 
27.04.12
10:55
Вызываю Тритона, прием
7 IKSparrow
 
27.04.12
11:00
(4) Стыдись, там обработка из 6 строчек. Сделай сам уже.
8 picom
 
27.04.12
11:00
(7) Лучше пиво тритону
9 IKSparrow
 
27.04.12
11:02
(8)


   ЗапросДокументов = Новый Запрос;
   ЗапросДокументов.Текст =
   "ВЫБРАТЬ
   |    ОтпускаОрганизацийРаботникиОрганизации.Ссылка,
   |    ОтпускаОрганизацийРаботникиОрганизации.НомерСтроки
   |ИЗ
   |    Документ.ОтпускаОрганизаций.РаботникиОрганизации КАК ОтпускаОрганизацийРаботникиОрганизации
   |ГДЕ
   |    ОтпускаОрганизацийРаботникиОрганизации.КоличествоДней = 0";
   
   ТЗЗапроса = ЗапросДокументов.Выполнить().Выгрузить();
   Если ТЗЗапроса.Количество() = 0 Тогда
       Возврат;
   КонецЕсли;
   ФлагОшибки = Ложь;
   НачатьТранзакцию();
   Для каждого СтрокаЗапроса из ТЗЗапроса Цикл
       ОбъектДокумента = СтрокаЗапроса.Ссылка.ПолучитьОбъект();
       ОбъектДокумента.РаботникиОрганизации.Удалить(СтрокаЗапроса.НомерСтроки-1);
       Состояние("Обрабатывается документ: " + СтрокаЗапроса.Ссылка);
       Попытка
           ОбъектДокумента.Записать(РежимЗаписиДокумента.Запись);
       Исключение
           Сообщить(СтрокаЗапроса.Ссылка);
           Сообщить(ОписаниеОшибки());
           ФлагОшибки = Истина;
       КонецПопытки;
   КонецЦикла;
   Если НЕ ФлагОшибки Тогда
       ЗафиксироватьТранзакцию();
   Иначе
       ОтменитьТранзакцию();
   КонецЕсли;
10 Gesperid
 
27.04.12
11:14
С чем свзяан косяк, вроде в 2.5.50.1 нет обновления данных.
11 IKSparrow
 
27.04.12
11:40
(10) Вообще, такая фигня после обновления до 33 релиза появилась. Ещё тогда.
12 picom
 
27.04.12
12:23
(11) есть ссылка на ветку, обсуждалось ?
13 picom
 
27.04.12
13:47
(9) код не работает если в документе более одного сотрудника начислялось.
Портит документы.
14 RomaH
 
naïve
27.04.12
15:27
Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   Запрос = Новый Запрос;
   Запрос.Текст =
   "ВЫБРАТЬ
   |    ОтпускаОрганизацийРаботникиОрганизации.Ссылка КАК Ссылка,
   |    ОтпускаОрганизацийРаботникиОрганизации.Сотрудник,
   |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ОтпускаОрганизацийРаботникиОрганизации.НомерСтроки) КАК НомерСтроки,
   |    ОтпускаОрганизацийРаботникиОрганизации.ОсвобождатьСтавку,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаНачала,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаОкончания,
   |    ОтпускаОрганизацийРаботникиОрганизации.ПричинаОтсутствия,
   |    ОтпускаОрганизацийРаботникиОрганизации.ВидДополнительногоОтпуска,
   |    ОтпускаОрганизацийРаботникиОрганизации.РабочийГодС,
   |    ОтпускаОрганизацийРаботникиОрганизации.РабочийГодПо,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаНачалаДоп,
   |    ПОДСТРОКА(ОтпускаОрганизацийРаботникиОрганизации.Основание, 1, 500) КАК Основание,
   |    ОтпускаОрганизацийРаботникиОрганизации.НапомнитьПоЗавершении,
   |    ОтпускаОрганизацийРаботникиОрганизации.Сторно,
   |    СУММА(ОтпускаОрганизацийРаботникиОрганизации.РабочихДнейДополнительного) КАК РабочихДнейДополнительного,
   |    СУММА(ОтпускаОрганизацийРаботникиОрганизации.КоличествоДней) КАК КоличествоДней,
   |    СУММА(ОтпускаОрганизацийРаботникиОрганизации.КоличествоДнейДоп) КАК КоличествоДнейДоп
   |ИЗ
   |    Документ.ОтпускаОрганизаций.РаботникиОрганизации КАК ОтпускаОрганизацийРаботникиОрганизации
   |
   |СГРУППИРОВАТЬ ПО
   |    ОтпускаОрганизацийРаботникиОрганизации.Сотрудник,
   |    ОтпускаОрганизацийРаботникиОрганизации.ОсвобождатьСтавку,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаНачала,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаОкончания,
   |    ОтпускаОрганизацийРаботникиОрганизации.ПричинаОтсутствия,
   |    ОтпускаОрганизацийРаботникиОрганизации.ВидДополнительногоОтпуска,
   |    ОтпускаОрганизацийРаботникиОрганизации.РабочийГодС,
   |    ОтпускаОрганизацийРаботникиОрганизации.РабочийГодПо,
   |    ОтпускаОрганизацийРаботникиОрганизации.ДатаНачалаДоп,
   |    ПОДСТРОКА(ОтпускаОрганизацийРаботникиОрганизации.Основание, 1, 500),
   |    ОтпускаОрганизацийРаботникиОрганизации.НапомнитьПоЗавершении,
   |    ОтпускаОрганизацийРаботникиОрганизации.Сторно,
   |    ОтпускаОрганизацийРаботникиОрганизации.Ссылка
   |
   |УПОРЯДОЧИТЬ ПО
   |    НомерСтроки
   |ИТОГИ ПО
   |    Ссылка";
   
   Результат = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"Ссылка");
   
   Пока Результат.Следующий() Цикл
       
       //ДокОтпуска = Документы.ОтпускаОрганизаций.СоздатьДокумент();
       
       Состояние(Результат.Ссылка);
       
       ДокОтпуска = Результат.Ссылка.ПолучитьОбъект();
       
       ДокОтпуска.РаботникиОрганизации.Очистить();
       
       ВыборкаПоСтрокам = Результат.Выбрать(ОбходРезультатаЗапроса.Прямой);
       
       Пока ВыборкаПоСтрокам.Следующий() Цикл
           
           СтрокаТЧ = ДокОтпуска.РаботникиОрганизации.Добавить();
           
           ЗаполнитьЗначенияСвойств(СтрокаТЧ,ВыборкаПоСтрокам);
           
       КонецЦикла;
       
       ДокОтпуска.ОбменДанными.Загрузка = Истина;
       
       ДокОтпуска.Записать();
       
   КонецЦикла;
   
КонецПроцедуры



а так? (9) не смотрел
15 RomaH
 
naïve
27.04.12
15:27
соответсвенно надо убрать наши "добавленые" реквизиты и добавить свои
16 RomaH
 
naïve
27.04.12
15:29
(11) вроде начиная с 41
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший