Реклама на этом месте
Форум 1С
Форум 1С
Programmers. Accountants. Administrators
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
11 Jul 2020, 19:56
Login with username, password and session length
МультиВход
Welcome, Guest. Please login or register.
Did you miss your activation email?
 
collapse

Author Topic: срочно нужна помощь. простой расчет себестоимости по средней.  (Read 524 times)

0 Members and 1 Guest are viewing this topic.

Offline Tanya Vasyanovich

  • *
  • Posts: 1
  • РЕПУТАЦИЯ: 0
  • Register: 2016-12-02
  • Website: 
Здравствуйте!Срочно нужна помощь в решении задачи.
При проведении документа «Реализация», делать движения минусом с регистров «Товары на складах» и «Себестоимость товара».
С регистра «Себестоимость» при списании рассчитать сумму списания следюующим образом:
- Взять остатки из регистра по товару на момент времени документа. Стоимость единицы товара = Сумма остатка / Количество остатка.
- Сумма списания с регистра «Себестоимость товара» = Количество реализации * Стоимость единицы товара (расчет называется «Списание по среднему»).

Вот начало кода... не знаю как обработать запрос дальше

Движения.СебестоимостьТовара.Записывать = Истина;
   Для Каждого ТекСтрокаТоварыДляПродажи Из ТоварыДляПродажи Цикл
       Движение = Движения.СебестоимостьТовара.Добавить();
      Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
      Движение.Период = Дата;
      Движение.Номенклатура = ТекСтрокаТоварыДляПродажи.Номенклатура;
      Движение.Количество = ТекСтрокаТоварыДляПродажи.Количество;
             
               
      Запрос = Новый Запрос;
   Запрос.Текст =
      "ВЫБРАТЬ
      |   СебестоимостьТовараОстатки.Номенклатура КАК Номенклатура,
      |   СебестоимостьТовараОстатки.КоличествоОстаток,
      |   СебестоимостьТовараОстатки.СуммаОстаток
      |ИЗ
      |   РегистрНакопления.СебестоимостьТовара.Остатки(&Дата, ) КАК СебестоимостьТовараОстатки
      |ИТОГИ ПО
      |   Номенклатура";
   
   Запрос.УстановитьПараметр("Дата", Дата);
   
   РезультатЗапроса = Запрос.Выполнить();
   
   ВыборкаНоменклатура = РезультатЗапроса.Выбрать();
   
        
       ВыборкаНомСум = ВыборкаНоменклатура.Получить(
      ВыборкаНомКол = ВыборкаНоменклатура.Получить(РегистрыНакопления.СебестоимостьТовара);   
       Средняя = ВыборкаНомСум/ВыборкаНомКол;
   
   Движение.Сумма= Средняя*ТекСтрокаТоварыДляПродажи.Количество;
   
   КонецЦикла;



Tags:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

* Статьи

* Кто онлайн

  • Dot Guests: 25
  • Dot Hidden: 0
  • Dot Users: 0

There aren't any users online.

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Search

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal