Цитата(Vofka @ 30.01.13, 11:35)
А теперь ещё раз, только внятно.
При списании материалов методом ФИФО создаем движение по партиям (расход) где СтоимостьКСписанию-стоимость партии. Мне нужно получить итоговую стоимость списанного метериала и присвоить ее переменной ИтоговаяСтоимость.
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.КоличествоОстаток <=
КоличествоНадоСписать Тогда
//Списываем всю партию
КоличествоКСписанию=
ВыборкаДетальныеЗаписи.КоличествоОстаток;
СтоимостьКСписанию=ВыборкаДетальныеЗаписи.СтоимостьОстаток;
//Уменьшаем количество к списанию
КоличествоНадоСписать =
КоличествоНадоСписать-
КоличествоКСписанию;
Иначе
//Списываем часть партии
КоличествоКСписанию=КоличествоНадоСписать;
Если ВыборкаДетальныеЗаписи.КоличествоОстаток<>0 Тогда
СтоимостьКСписанию=ВыборкаДетальныеЗаписи.СтоимостьОстаток/
ВыборкаДетальныеЗаписи.КоличествоОстаток*КоличествоКСписанию;
Иначе
СтоимостьКСписанию=ВыборкаДетальныеЗаписи.СтоимостьОстаток;
КонецЕсли;
//Обнуляем количество к списанию
КоличествоНадоСписать=0;
..........................
СтоимостьКраска=СтоимостьКСписанию;
ИтоговаяСтоимость=?