Регистратор для регистра Хозрасчетный

код

НастройкиУчета = ю_02_РозничнаяТорговля.ПолучитьНастройкиУчетаВРозничнойТорговле();
    Движения.Хозрасчетный.Записывать = Истина;
    ПроводкиБУ = Движения.Хозрасчетный;

    Для Каждого СтрокаТаблицы Из Товары Цикл
        Проводка = ПроводкиБУ.Добавить();
        Проводка.Период      = Дата;
        Проводка.Организация = Организация;
        Проводка.Содержание  = "Выделен НДС";
        Проводка.СчетДт      = СчетУчетаТоваров;

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



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

    КонецЦикла;