Имя: Пароль:
1C
 
1С 8.2 НУФ Неудачная попытка удаления записи из регистра накопления!
0 DenisVich
 
17.10.17
10:28
Пытаюсь из регистра накопления удалить запись. Не удаляется. пишет "Неудачная попытка удаления записи из регистра накопления!". Удаляю своей обработкой. Что интересно в другом регистре накопления с таким же кодом все удалилось. Конфа самопал. В файловой базе все отлично удалилось. Любой регистр накопления, бухгалтерский подставляю все отлично.

"Процедура ОбработатьРегистрНакопления()
Запрос =  Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
               |    Взаиморасчеты.Период,
               |    Взаиморасчеты.Регистратор,
               |    Взаиморасчеты.НомерСтроки,
               |    Взаиморасчеты.Активность,
               |    Взаиморасчеты.Организация,
               |    Взаиморасчеты.Сумма
               |ИЗ
               |    РегистрНакопления.Взаиморасчеты КАК Взаиморасчеты
               |ГДЕ
               |    Взаиморасчеты.Регистратор = &Регистратор
               |    И Взаиморасчеты.Период >= &ДатаНачало
               |    И Взаиморасчеты.Период <= &ДатаКонца";
Запрос.УстановитьПараметр("Регистратор", ЭтотОбъект.Регистратор);
Запрос.УстановитьПараметр("ДатаНачало", НачалоДня(ЭтотОбъект.ДатаНачала));
Запрос.УстановитьПараметр("ДатаКонца", КонецДня(ЭтотОбъект.ДатаОкончания));

НаборЗаписей = РегистрыНакопления.Взаиморасчеты.СоздатьНаборЗаписей();
Выборка = Запрос.Выполнить().Выбрать();
//Выборка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока Выборка.Следующий() Цикл //Перебор в цикле регистраторов
     //Выборка.Регистратор
     НаборЗаписей.Отбор.Регистратор.Значение = Выборка.Регистратор;
     НаборЗаписей.Прочитать();
     ВыборкаНомерСтроки = Выборка.Выбрать();    
//     ВыборкаНомерСтроки = Выборка.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
//   Пока ВыборкаНомерСтроки.Следующий() Цикл//Реребор в цикле номеров строк записей
//
//        НаборЗаписей.Удалить(ВыборкаНомерСтроки.НомерСтроки-1);    
//   КонецЦикла;
БылиОшибки = Ложь;
Попытка
           НаборЗаписей.Удалить(0);
           НаборЗаписей.Записать();
        Исключение
           БылиОшибки=Истина;
        КонецПопытки;
    
    КонецЦикла;
    Если БылиОшибки Тогда
       Предупреждение("Обработка завершена. Регистр очищен не до конца!!!");
    КонецЕсли;
    РегистрыНакопления.Взаиморасчеты.УстановитьИспользованиеИтогов(Истина);       
КонецПроцедуры
"
1 DenisVich
 
17.10.17
10:30
В SQL проблемы.
2 DenisVich
 
17.10.17
10:43
Притом подобное в другом регистре накопления удалось удалить.
3 Галахад
 
гуру
17.10.17
10:45
Может стоит регистратор посмотреть?
4 h-sp
 
17.10.17
10:55
(2) наверно нечего удалять. Там пусто и так.
5 DenisVich
 
17.10.17
11:04
Запись есть. Осталась. В том то и дело.