1С Режим Конфигуратор
Накапливаем сумму операции по каждой
ТабПар.Кол=КолП;
ТабПар.Сум=СумП;
КонецЦикла;
ТабПар.Сортировать("1+");
ТабПар.ВыбратьСтроки();
Пока ТабПар.ПолучитьСтроку()=1 Цикл // По Партии
// Обходим партии
ДокП=ТабПар.Док;
КолП=ТабПар.Кол;
СумП=ТабПар.Сум;
Если Колич>КолП Тогда
ПривязыватьСтроку(НС);
Операция.НоваяПроводка();
Операция.Дебет.Счет = СчетПоКоду("20",ПланыСчетов.Наш);
Операция.Кредит.Счет = СчетПоКоду("10.2",ПланыСчетов.Наш);
Операция.Дебет.ВидЗатрат = Перечисление.ВидыЗатрат.НаКомплектующие;
Операция.Дебет.Изделие = Изделие;
Операция.Дебет.НарядНаКомплектацию = ТекущийДокумент();
Операция.Кредит.МестоХранения = Склад;
Операция.Кредит.Комплектующее = Ком;
Операция.Кредит.ПриходнаяНакладная = ДокП;
Операция.Фирма = ФирмаДокумента;
Операция.Комментарий = "Передача комплектующих на сборку";
Операция.НомерЖурнала = "10";
Операция.Сумма = СумП;
Операция.Количество = КолП;
Колич=Колич-КолП;
СуммаОпер=СуммаОпер+СумП;
// Накапливаем сумму операции по каждой проводке
Иначе
СумО=Окр(Колич*(СумП/КолП),2,1);
// Определяем сумму остатка через цену партии
