Перенос товаров из документа

Перенос товаров из документа в другую ТЧ



  ПолученныйДокумент = СсылкаНаПолученныйДокумент.ПолучитьОбъект(); 
   //Получаем список товаров из документа
   Если  ПолученныйДокумент.Товары.Количество() <> 0 Тогда
    Для Каждого СтрокаТабЧасти Из ПолученныйДокумент.Товары Цикл
      ТЧТовары      = Объект.Товары.Добавить();
      ТЧТовары.Номенклатура  = СтрокаТабЧасти.Номенклатура;
      ТЧТовары.Штрихкод   = ПолучитьНомерШтрихКода(СтрокаТабЧасти.Номенклатура);
      ТЧТовары.Цена    = ПолучитьЦену(СтрокаТабЧасти.Номенклатура);
      ТЧТовары.ОстатокНаСкладе = ПолучитьКоличествоОстатокНаСкладе(СтрокаТабЧасти.Номенклатура);
      ТЧТовары.КоличествоЦенников = 1;
    КонецЦикла;
   КонецЕсли;