Добрый день. Подскажите, пжл, как добавить субконто? Нижеприведенный код ничего не добавляет.

           ЗаписьВРегБухг.СчетДт = Строка.СчетДт;
           ЗаписьВРегБухг.СчетКт = Строка.СчетКт;

                   //Создаю массив, в который записываю значения субконто
           А = Новый массив(3);
           А[0]=Строка.СубконтоДт1;
           А[1]=Строка.СубконтоДт2;
           А[2]=Строка.СубконтоДт3;
           
                       //Записываю субконто по дебету
           i=0;
           Для каждого ВидСубконто Из Строка.СчетДт.ВидыСубконто Цикл
               ЗаписьВРегБухг.СубконтоДт.Вставить(ВидСубконто,А[i]);
               i=i+1;
           КонецЦикла;

БухгалтерскийУчет.УстановитьСубконто() - вот поиск сделай по этой штуке. Или просто УстановитьСубконто

Проводка = Движения.Хозрасчетный.Добавить();
Проводка.Организация = Организация;
Проводка.Период = Дата;
Проводка.СчетДт = ;
Проводка.СчетКт = ;
Проводка.Сумма = ;
+ 3 раза:
ОбщегоНазначения.УстановитьСубконто(