Вход | Регистрация

1С:Предприятие :: 1С:Предприятие 7.7 и ранее

v7: Себестоимость номенклаутры

v7: Себестоимость номенклаутры
Я
   zenon46
 
04.09.18 - 15:52
Доброго дня!
Помогите разобраться с себестоимостью, есть один аналитический отчет, в числе прочего нужно посчитать себестоимость по каждому документу попавшему в обработку.
Я сделал вот так :
        СебестТовара       = 0;
        СебестПоДокументу = 0;
        Доку                 = СоздатьОбъект("Документ");    //найдем текущий документ

        Доку.НайтиДокумент(ПечДокумент);
        РегПартии.ВыбратьДвиженияДокумента(Доку);
        Пока РегПартии.ПолучитьДвижение() =1 Цикл
            СебестТовара       = РегПартии.СуммаРуб;                
            СебестПоДокументу = СебестПоДокументу + СебестТовара; 
        КонецЦикла;

Но похоже что это не верно, т.к. цифры не совпадают со стандартным отчетом "Анализ продаж", там ее получают вот так

    ТекстЗапроса = ТекстЗапроса +
    "
    |Себест      = Регистр.Продажи.Себестоимость;
    |Количество  = Регистр.Продажи.Количество;
    |ПродСт      = Регистр.Продажи.ПродСтоимость;
    |СебестВ     = Регистр.Продажи.СебестоимостьВ;
    |КоличествоВ = Регистр.Продажи.КоличествоВ;
    |ПродСтВ     = Регистр.Продажи.ПродСтоимостьВ;
    |Функция СуммаСебест      = Сумма(Себест);
    |Функция СуммаКоличество  = Сумма(Количество);
    |Функция СуммаПродСт      = Сумма(ПродСт);
    |Функция СуммаСебестВ     = Сумма(СебестВ);
    |Функция СуммаКоличествоВ = Сумма(КоличествоВ);
    |Функция СуммаПродСтВ     = Сумма(ПродСтВ);";

Но такую конструкцию, я использовать не могу, будет очень долго отчет работать, в чем у меня ошибка ?
 
 
   zenon46
 
1 - 04.09.18 - 16:44
Разобрался
   Злопчинский
 
2 - 04.09.18 - 19:16
РегПартии.ВыбратьДвиженияДокумента(Доку);
плохо. возможности грабель.
  РегПартии.ВыбратьДвиженияДокумента(Доку.ТекущийДокумент());

хотя могу быть не прав.

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует