1С 8
Подскажите как программно, зная период и регистратор, найти соответствующие проводки и удалить их?

отменить проведение регстратора

регистратор делает много проводок. надо некоторые оставить а некоторые удалить.

(1) Не всегда помогает, если конечно не г*внокод

получи набор записей, будь мужиком, блеать!

(4) +100500

(2) тогда перепровести. на этот раз с правильной логикой проведения

(4) а можешь код написать ?
(6) что значит с правильной логикой проведения ?

(7) 1500 руб

(7)Это значит что проводки были те, которые нужны.а которые не нужны - не были

(7) Демпенгану... 1000 руб

(10) ты так никогда на айфон и макбук не заработаешь

(7)(10) подниму 2000 и час работы в подарок.

Какая милая беседа получается.

(11) Зачем мне эта гадость?
(7) Не правильно вопрос ставишь... "Можешь написать код" - не правильно... Порыться 10 минут в справке, написать овнокод, выложить и спросить почему не работает - правильно

Я не могу найти в справке информации по методам вот этого:  Движения.Хозрасчетный.

(15) как думаешь что там хранится?

(17) ладно 1000 руб за консультацию как решить твою. Это дешевле чем курсу у Гилева. Ага.

(0) расскажи изначальную задачу

твою задачу*

Регистр бухгалтерии ?

20. Если точнее набор записи регистра бухгалтерии вот это в справке и ищи.

(21) Спасибо. Нашел.

Рег = РегистрыБухгалтерии.Хозрасчетный;
   НаборЗаписей = Рег.СоздатьНаборЗаписей();
   НаборЗаписей.Отбор.Регистратор.Значение = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДокОпер;
   НаборЗаписей.Отбор.Период.Значение = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДатаОпер;
   НаборЗаписей.Прочитать();

ДокОпер это строка. Как сделать отбор в этом случае ?

передать ссылку

(23) по норлмаьному добовлять еще одну колонку с сылкой на документ.И брать ссылку оттуда.

Рег = РегистрыБухгалтерии.Хозрасчетный;
   НаборЗаписей = Рег.СоздатьНаборЗаписей();
   НаборЗаписей.Отбор.Регистратор.Значение = ЭтотОбъект.Ссылка;
   пДата = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДатаОпер;
   НаборЗаписей.Прочитать();
   Для Каждого Зап из НаборЗаписей Цикл
       Если Зап.Период = пДата Тогда
           пИндекс = Движения.Хозрасчетный.Индекс(Зап);
           Движения.Хозрасчетный.Удалить(пИндекс);
       КонецЕсли;
   КонецЦикла;    
Как удалить найденный элемент теперь ?

НаборЗаписей.Удалить

+(27) только у тебя все равно не заработает)

(28) как сделать чтоб заработало ?

Попробуй так

НаборЗаписей = РегистрыБухгалтерии.Хозрасчетный
.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Значение = ЭтотОбъект.Ссылка;
пДата = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДатаОпер;
НаборЗаписей.Прочитать();
КоличествоСтрок = НаборЗаписей.Количество()-1;

   Для сч=-КоличествоСтрок по 0  Цикл
       
       Если НаборЗаписей[-сч].Период = пДата Тогда
        НаборЗаписей.Удалить(-сч);  
       КонецЕсли;
   КонецЦикла;
НаборЗаписей.Записать();

(30) Большое спасибо!

(30) Для сч=-КоличествоСтрок по 0 Цикл
[-сч]

Интересный подход )

Выяснилось что проводки удаляются а движения документа остаются. Можно ли как то аналогично удалить движения документа?

Ты хочешь удалить часть двиежний во время проведения документа?

Перед проведением.

Вообще по нажатию на кнопку удаляется движение связанное с текущей строкой.

ну или попробуй так


НаборЗаписей = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
НаборЗаписей = ЭтотОбъект.Движения.Хозрасчетный;
пДата = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДатаОпер;
НаборЗаписей.Прочитать();
КоличествоСтрок = НаборЗаписей.Количество()-1;

   Для сч=-КоличествоСтрок по 0  Цикл
       
       Если НаборЗаписей[-сч].Период = пДата Тогда
        НаборЗаписей.Удалить(-сч);  
       КонецЕсли;
   КонецЦикла;
НаборЗаписей.Записать();


(35) это как?

Сделал так:
   индекс = -1;
   Для Каждого Движение Из Движения.Хозрасчетный Цикл
       индекс = индекс + 1;
       Если (Движение.Период = пДата и Движение.Регистратор = ЭлементыФормы.ТабличнаяЧастьОсновная.ТекущаяСтрока.ДокОпер) Тогда
           ЭтотОбъект.Движения.Хозрасчетный.Удалить(индекс);                                                      
       КонецЕсли;
   КонецЦикла;