Реализация внешней обработки по учёту объёма продаж

[puh14]

Ни фига себе синтаксис! спасибо. :wacko:

 

[vbs]

|ТекДок = Регистр.Продажи.ТекущийДокумент.РасходнаяНакладная.ТекущийДокумент, |Регистр.Продажи.ТекущийДокумент.ZОтчет.ТекущийДокумент

Ой, сомневаюсь я, не сработает такое

 

[Nev]

Допустим, надо посчитать объём продаж в ед. измерениях. Т.е. продано 3 бутылки по 2л, в итоге получается 6л.
|СНЕмк = Регистр.ПартииТоваров.Товар.СвойствоН.Ёмкость;
В справочник СвойствоНоменклатуры записывается Ёмкость
Как это высчитать в запросе?

|Условие(ПустоеЗначение(СвойствоН)=0);
Как сделать чтобы выводилось в отчёте это свойство, а под ним весь список реализованных товаров с этим свойством, и так для каждого свойства.

 

[puh14]

|Свойство = Справочник.СвойстваН.Емкость;
|Условие (Свойство = Товар.СвойствоН.Ёмкость);
|Условие (Свойство в ВыбСвойство);

можно ещё владельца определить - но по идее и так сработает. Первой группировкой ставишь свойство.

где Товар = Регистр.ПартииТоваров.Товар;

Обращение к реквизитам реквизитов не всегда работает. Поэтому проще сделать отдельно реквизит справочника, какой нужен, проставить условие, что он равен нужному нам (почему-то в условие обращение к реквизитам реквизитов пашет нормально), а потом фильтрануть по выбранному свойству.

 

[Nev]

puh14, к сожалению не очень разобрался с вашим ответом, но модель где перед списком товаров выводится его свойство смастерил.
А вот высчитать объём так и не смог. Что такое ВыбСвойство?

Пробовал писать в таблице выражение: Формат((Запрос.КоличествоРасход*Запрос.СНЕмк)/10, "Ч12.5") ищу декалитры
где
|Количество = Регистр.ПартииТоваров.Количество;
|Функция КоличествоРасход = Расход(Количество);
|СНЕмк = Регистр.ПартииТоваров.Товар.СвойствоН.Ёмкость;
Всё считает, но вот Итог не знаю как высчитать.

 

[puh14]

Выбсвойство - это поле ввод с типом с значения справочник.СвойствоН на форме. Если выбрано - тогда выводятся товары только с этим свойством.

|СНЕмк = Регистр.ПартииТоваров.Товар.СвойствоН.Ёмкость;

надо-же работает.. с таким синтаксисом отбор по свойству выглядит как

|Условие (СНЕмк в ВыбСвойство);


а итог сделай в отдельной переменной, чтобы при выводе строки где у тебя формула добавлялось значение формулы

ИтогоДекалитры = ИтогоДекалитры + (Запрос.КоличествоРасход*Запрос.СНЕмк)/10;

Только это надо поставить в выводе последней группировки - а то неправильно считать будет.

 

[kaa]

|СНЕмк = Регистр.ПартииТоваров.Товар.СвойствоН.Ёмкость;

|Функция ИтогСНЕмк = Сумма(СНЕмк);

//функция высчитывается на всех этапах запроса в каждой группировке

 

[puh14]

А нафига итог по емкости, если емкость нужна только для ИтогоДекалитры = ИтогоДекалитры + (Запрос.КоличествоРасход*Запрос.СНЕмк)/10;

вот если бы можно было

|Функция ИтогоДекалитры = (КоличествоРасход*СНЕмк)/10;

Кстати, офтоп а декалитры чего? :angry: Если это, о чем я думаю-то готов работать за декалитр-другой. :angry:

 

[Nev]

Наверное то, о чём вы думаете

Как можно высчитать сумму продажи товара по стране?
Т.е. в карточке номенклатуры есть реквизит страна, нужно найти сумму продажи товаров не российского производства.
Писал:
СуммаЗарубОбщая = 0;

|Страна = Регистр.ПартииТоваров.Товар.Страна.ТекущийЭлемент;
|Сумма = Регистр.ПартииТоваров.СуммаПродажиРуб;

Пока Запрос.Группировка(1) = 1 Цикл
Если Запрос.Страна <> "РОССИЯ" Тогда
СуммаЗарубОбщая = СуммаЗарубОбщая+ Запрос.Сумма;
КонецЕсли;
КонецЦикла;

Что то не то высчитывает...

 

[puh14]

|Условие (Найти(Страна.Наименование,""РОССИЯ"")>0);

если и так не находит - тогда РОССИЯ написано неправильно - мож англицкая буква затесалась.

 

[kaa]

в запросе страна элемент справочника, а сравниваешь со строкой

 

[Nev]

А как сравнить с элементом справочника?

 

[kaa]

СокрЛП(Запрос.Страна.наименование)<>"РОССИЯ" //если есть наменовние

Спр = создатьобъект("Справочник.СтраныХХХ");//в торговле помоему ОКСМ
Спр.НайтиПоКоду("ХХХХ");//внимательнее код бывает строка и число
Запрос.Страна<> Спр.ТекущийЭлемент()

 

[vbs]

А как сравнить с элементом справочника?

Перед запросом найти элемент справочника "Страны" :
Спр = СоздатьОбъект("Справочник.Страны");
Спр.НайтиПоНаименованию("Россия");
Россия = Спр.ТекущийЭлемент();
и в условии Россия без кавычек

 

[Nev]

Не помогает... всё равно выводит 345 или 274, в зависимости от способа... а должно быть 1200. Это за исследоваемый период.

Процедура Сформировать()

Перем Запрос, ТекстЗапроса, Таб;
СуммаЗарубОбщая = 0;

СпрСтрана=СоздатьОбъект("Справочник.Страны");
СпрСтрана.НайтиПоНаименованию("РОССИЯ");
Россия = СпрСтрана.ТекущийЭлемент();

Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса = 
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Обрабатывать НеПомеченныеНаУдаление;
|Товар = Регистр.ПартииТоваров.Товар;
|Наименование = Регистр.ПартииТоваров.Товар.Наименование;
|СвойствоН = Регистр.ПартииТоваров.Товар.СвойствоН;
|ТекСвойствоН = Регистр.ПартииТоваров.Товар.СвойствоН.ТекущийЭлемент;
|ТекущийДокумент = Регистр.ПартииТоваров.ТекущийДокумент.ZОтчет.ТекущийДокумент;
|Количество = Регистр.ПартииТоваров.Количество;
|ЕдИзм = Регистр.ПартииТоваров.Товар.БазоваяЕдиница.ТекущийЭлемент;
|Страна = Регистр.ПартииТоваров.Товар.Страна.ТекущийЭлемент;
|СНЕмк = Регистр.ПартииТоваров.Товар.СвойствоН.Ёмкость;
|Сумма = Регистр.ПартииТоваров.СуммаПродажиРуб;
|Функция СуммаПродажи = Расход(Сумма);
|Функция КоличествоРасход = Расход(Количество);
|Функция КоличествоКонОст = КонОст(Количество);
|Группировка Наименование;
|Группировка ТекущийДокумент;
|Условие(ПустоеЗначение(СвойствоН)=0);
|"//}}ЗАПРОС
;			
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
СпрСН=СоздатьОбъект("Справочник.СвНом");
СпрСтрана=СоздатьОбъект("Справочник.Страны");
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Общий");
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
Если Запрос.Страна <> Россия Тогда
СуммаЗарубОбщая = СуммаЗарубОбщая + Запрос.Сумма;

КонецЕсли;
КонецЦикла;	
Таб.ВывестиСекцию("Таблица");
Таб.ТолькоПросмотр(1);
Таб.Показать("Учёт (общий)", "");
КонецПроцедуры

 

[vbs]

СуммаЗарубОбщая = СуммаЗарубОбщая + Запрос.Сумма;

СуммаЗарубОбщая = СуммаЗарубОбщая + Запрос.СуммаПродажи;

 

[Nev]

|Строка = Регистр.ПартииТоваров.Товар.СвойствоН.Строка;

Если [b]СокрЛП(Запрос.Строка) = "14"[/b] Тогда
ДекаСтр14 = ДекаСтр14 + (Запрос.КоличествоРасход*Запрос.СНЕмк)/10;
СуммаСтр14 = СуммаСтр14 + Запрос.СуммаПродажи;
Если Запрос.Страна <> Россия Тогда
ДекаСтрЗаруб14 = ДекаСтрЗаруб14 + (Запрос.КоличествоРасход*Запрос.СНЕмк)/10;
СуммаЗарубСтр14 = СуммаЗарубСтр14 + Запрос.СуммаПродажи;
КонецЕсли;				
КонецЕсли;

А как тут сравнить с элементом справочника? Строка, это реквизит справочника, типа строка.

 

[vbs]

А как тут сравнить с элементом справочника?

так же, как и с другим элементом справочника )))

 

[Nev]

Ну делал как и в предыдущем случае, находил элемент справочника...
СпрСН.НайтиПоНаименованию("14");
Стр14 = СпрСН.ТекущийЭлемент();
Как потом не эксперементировал, всё выписывает нули.

Опять какая нить глупая ошибка может затаилась. ;(

 

[vbs]

Попробуй и вторую группировку запроса использовать