Документ "Расход"

Экранная форма документа выглядит следующим образом:

Модуль проведения:

Процедура ОбработкаПроведения()

Регистр.Расходы.Участник = Участник;

Регистр.Расходы.Статья = Статья;

Регистр.Расходы.Сумма = -Сумма;

Регистр.Расходы.ДвижениеВыполнить();

Регистр.Кошельки.Кошелек = Кошелек;

Регистр.Кошельки.Сумма = Сумма;

Регистр.Кошельки.ДвижениеРасходВыполнить();

КонецПроцедуры