Мне нужно в имеющуюся бух справку создать проводку, пишу код, но он создает а старые удаляет, что не так подскажите:
   ТекД = СсылкаНаОбъект.Ссылка;
   РегХозрасчетный_ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
   РегХозрасчетный_.Отбор.Регистратор.Значение = ТекД;

   РегХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.ВыбратьПоРегистратору(ТекД);
   Пока РегХозрасчетный.Следующий() Цикл
       
       Если (РегХозрасчетный.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыСПоставщиками ) и (РегХозрасчетный.СчетКт=ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ) Тогда
           
           РегЗапись = РегХозрасчетный..Добавить();
           РегЗапись.Период = РегХозрасчетный.Период;
           РегЗапись.Регистратор = ТекД;
           РегЗапись.Организация = РегХозрасчетный.Организация;
           РегЗапись.СчетДт = ПланыСчетов.Хозрасчетный.НДС;
               
           РегЗапись.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
           БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетКт, РегЗапись.СубконтоКт, "Контрагенты", РегХозрасчетный.СубконтоДт.Контрагенты);
           РегЗапись.Сумма = -РегХозрасчетный.Сумма;

           РегХозрасчетный_.Записать();    
       КонецЕсли;        
   КонецЦикла;
   ТекД.ПолучитьОбъект().Записать();

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

.Прочитать()

Прочитать() еще не предлагали?

(0)по коду:
выборку нафик, читай запросом и сразу устанавливай отбор

и если это у тебя в подписке тогда смотри Источник.Движения ...

(4)+ подготавливай таблицу и грузи в набор записей

можно просто
РегХозрасчетный_.Отбор.Регистратор.Установить(ТекД);
РегХозрасчетный_.Прочитать();
Для Каждого Проводка Из РегХозрасчетный_ Цикл
...