Реализация по средней себестоимости

Здраствуйте, подскажите пожалуйста, как можно решить в 1С, в документе Расходная накладная, реализацию товара по средней себестоимости?
При проведении документ формирует проводки:
Д90.2 - К41 (реализация товара, метод опр-я себестоимости - по среднему)
Д62 - К90.1 - реализация (на всю сумму реализации), возникновение задолжености покупателя перед нами.
У меня в модуле документа Расходная накладная написано:

Процедура ОбработкаПроведения()
Пока ПолучитьСтроку() = 1 Цикл
Операция.Содержание="Реализация товара (по сб-ти)";
Операция.НоваяПроводка();
Операция.Дебет.Счет = СчетПоКоду("90.2");
Операция.Кредит.Счет = СчетПоКоду("41");
Операция.Сумма = Сумма;
Операция.Содержание="Реализация (на всю сумму)";
Операция.НоваяПроводка();
Операция.Дебет.Счет = СчетПоКоду("62");
Операция.Кредит.Счет = СчетПоКоду("90.1");
Операция.Сумма = Сумма;
КонецЦикла;
Операция.Записать();
КонецПроцедуры

P.S. Дали задание написать конфигурацию с нуля. В 1с я недавно, поэтому очень надеюсь на помощь...