Автоматическая установка цен РТУ

что бы более менее понимать как программировать в 1с, по совету МИСТЯН начал разбираться в коде который уже был написан, собственно сам код который в документе реализация товаров и услуг автоматом ставит цену

Процедура КоманднаяПанельТоварыУстановитьЦену(Кнопка)
    СтруктураПолей = Новый Структура();
    СтруктураПолей.Вставить("Номенклатура",        "Номенклатура");
    СтруктураПолей.Вставить("Услуга"      ,        "Номенклатура.Услуга");
    СтруктураПолей.Вставить("Количество"  ,        "Количество");
    СтруктураПолей.Вставить("Сумма"       ,        "Сумма");
    СтруктураПолей.Вставить("СтавкаНДС"   ,        "СтавкаНДС");
    СтруктураПолей.Вставить("НДС"         ,        "СуммаНДС");
    СтруктураПолей.Вставить("НомерГТД",            "НомерГТД");
    СтруктураПолей.Вставить("СтранаПроисхождения", "СтранаПроисхождения");

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

    // Подготовим таблицу товаров для проведения.
    СтруктураШапкиДокумента = ОбщегоНазначения.СформироватьСтруктуруШапкиДокумента(ЭтотОбъект);
    ТаблицаПоТоварам = ПодготовитьТаблицуТоваров(РезультатЗапросаПоТоварам, СтруктураШапкиДокумента);
    //Для каждого ТекущаяСтрока из Товары Цикл
    СтИнд = ЭтотОбъект.Товары.Количество()-1;
    //ДляСч = 0 по СтИнд Цикл
    Сч = 0;
    Отказ = Ложь;
    СодержаниеПроводки = "Реализация товаров";

    УправлениеЗапасамиПартионныйУчет.ДвижениеПартийТоваров(Заголовок, ТаблицаПоТоварам, Истина, СтруктураШапкиДокумента.ОтражатьВНалоговомУчетеУСН, Отказ, , СодержаниеПроводки);
    Если ЭтотОбъект.ЭтоНовый() Тогда
        Сообщить("Новый документ необходимо записать!");
    Иначе
        Для каждого ТекущаяСтрока из Товары Цикл
            ТекущаяСтрока.Сумма = ТаблицаПоТоварам[Сч].СписанныеПартии[0].СуммаСписания;
            Если ТекущаяСтрока.Количество<>0 Тогда
                ОбработкаТабличныхЧастей.РассчитатьЦенуТабЧасти(ТекущаяСтрока, ЭтотОбъект);
                ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(ТекущаяСтрока, ЭтотОбъект);
            КонецЕсли;
            Сч = Сч + 1;
        КонецЦикла;
        Комментарий = "";
    КонецЕсли;

как я понимаю
1.вначале создается массив
2.с помощью общих модулей собирается информация с самого документа РТУ
(зачем не пойму)
3.с помощью модуля УправлениеЗапасамиПартионныйУчет получаем стоимость
прихода партии?
4. используются модуль документа для того что бы заполнить табл часть.
если я не прав поправте меня