Запрос.
Ребят, подскажите как в запросе выбрать цену за один период текущую, а с другого деленную на 10000? 1С 7.7 Бух.
|Износ_ = Документ._АктСписаниеСпецодежды.Износ;
чтобы отображалось до деноминации поделенная, а после не делалось.
Вот это для суммы работает:
|Износ_ = Документ._АктСписаниеСпецодежды.Износ;
чтобы отображалось до деноминации поделенная, а после не делалось.
Вот это для суммы работает:
|Функция СуммаИ=Сумма(Сумма_) Когда (ДатаП >= Д);
|Функция СуммаИ_=Сумма(Сумма_/10000) Когда (ДатаП < Д);
|Функция ИзносИ=Сумма(Износ_) Когда (ДатаП >= Д);
|Функция ИзносИ_=Сумма(Износ_/10000) Когда (ДатаП < Д);Ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
Запрос:
А для 7 это конструкция ВЫБОР КОГДА работает?
Перем Расшифровка;
Процедура Сформировать()
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Счета10.11)
|Период с ВыбНачПериода по ВыбКонПериода;
|ОбрабатыватьДокументы проведенные;
|Док = Документ._АктСписаниеСпецодежды.ТекущийДокумент;
|ДатаДок = Документ._АктСписаниеСпецодежды.ДатаДок;
|НомерДок = Документ._АктСписаниеСпецодежды.НомерДок;
|Склад= Документ._АктСписаниеСпецодежды.ВыбСотрудник;
|Контрагент= Документ._АктСписаниеСпецодежды.Субконто4;
|Сумма_= Документ._АктСписаниеСпецодежды.НепогашеннаяСтоимость;
|СрокИсп= Документ._АктСписаниеСпецодежды.Срок;
|Кол_во = Документ._АктСписаниеСпецодежды.Количество;
|Износ_ = Документ._АктСписаниеСпецодежды.Износ;
|Остат = Документ._АктСписаниеСпецодежды.Остаточная;
|Материал= Документ._АктСписаниеСпецодежды.Материал;
|Ном = Документ._АктСписаниеСпецодежды.НомерСтроки;
|Функция СуммаИ=Сумма(Сумма_);
|Функция ИзносИ=Сумма(Износ_);
|Функция ОстатИ=Сумма(Остат);
|Группировка Склад;
|Группировка ДатаДок;
|Группировка Ном;
|Группировка Материал упорядочить по Материал.наименование без Групп;
|"//}}ЗАПРОС
;
Если ВыбОтветственный.Выбран()=1 Тогда
ТекстЗапроса=ТекстЗапроса+
"Условие (Склад =ВыбОтветственный);"
КонецЕсли;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Сообщить("Ошибка при отборе документов ");
Возврат;
КонецЕсли;
Таб=СоздатьОбъект("Таблица");
Таб.ВывестиСекцию("Шапка");
Таб.ВывестиСекцию("Шапка1");
Пока Запрос.Группировка(1)=1 Цикл
Таб.ВывестиСекцию("Поставщик");
Пока Запрос.Группировка(2)=1 Цикл
Пока Запрос.Группировка(3)=1 Цикл
Пока Запрос.Группировка(4)=1 Цикл
Таб.ВывестиСекцию("Наименование");
КонецЦикла;
КонецЦикла;
КонецЦикла;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Справка по ответственому");
СохранитьЗначение("ЯСоставил",ОтчетСоставил);
КонецПроцедуры
Процедура ПриОткрытии()
ВыбНачПериода=НачМесяца(РабочаяДата());
ВыбКонПериода=КонМесяца(рабочаяДата());
ОтчетСоставил = ВосстановитьЗначение("ЯСоставил");
КонецПроцедуры
ПоказатьА для 7 это конструкция ВЫБОР КОГДА работает?
Используем конструкцию ВЫБОР КОГДА. Здесь ДатаДеноминации.Значение- константа, можно передать как параметр.
ВЫБРАТЬ
Закупки.Количество КАК Количество,
ВЫБОР
КОГДА Закупки.ЗаказПоставщику.Дата <= ДатаДеноминации.Значение
И &ДатаКон >= ДатаДеноминации.Значение
И Закупки.ДоговорКонтрагента.ВалютаВзаиморасчетов = &Валюта
ТОГДА ВЫРАЗИТЬ(ЕСТЬNULL(Закупки.СтоимостьВВалютеВзаиморасчетов, 0) / 10000 КАК ЧИСЛО(15, 2))
ИНАЧЕ ЕСТЬNULL(Закупки.СтоимостьВВалютеВзаиморасчетов, 0)
КОНЕЦ КАК Стоимость, Показать