Пытаюсь создать и записать 3 субконто, а почему то ни чего не попадает, в чем дело?

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

мдя... в золотую коллекцию г0внокода

вместо
Документ.Записать(РежимЗаписиДокумента.Запись);
надо "кажется"
Проводки.Записать():
а вообще согласен с (1)

(1) Проводки.Записать(): пробовал "метод объекта не обнаружен.