VPF::Помощь в написании запроса? - Форум программистов

DeniNikitin

Дата 2.7.2008, 16:44 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 2.7.2008

Репутация: нет
Всего: нет

Здравствуйте!

Идея запроса в следующем:
Запрос должен формировать стоимость товаров по остатку на начало дня по всем товарам с группировкой по датам.

1с 7.7 Тороговля и склад!

Пример:
Дата Остаток на начало дня (руб.)
01.01.2008 67,4
02.01.2008 150,67
03.01.2008 678,23
и.т.д.
Пробую через остатки ТМЦ не получаеться сгруппировать по датам.
Помогите написать запрос?

Заранее благодарен!

AkelaSQL

Дата 2.7.2008, 16:52 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 392
Регистрация: 14.9.2007
Где: Москва

Репутация: 6
Всего: 7

Текст процедуры в студию!!!

--------------------

Itsys

Дата 2.7.2008, 20:05 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 7
Всего: 34

За минуту с помошью мастера (не проверял работоспособность):

Код


//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |СуммаБезНДС = Регистр.ПартииНаличие.СуммаБезНДС;
    |Функция СуммаБезНДСНачОст = НачОст(СуммаБезНДС);
    |Группировка День;
    |"//}}ЗАПРОС
    ;
    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;

    // Подготовка к заполнению выходных форм данными запроса
    Таб = СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("Сформировать");
    // Заполнение полей "Заголовок"
    Таб.ВывестиСекцию("Заголовок");
    Состояние("Заполнение выходной таблицы...");
    Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
    Пока Запрос.Группировка(1) = 1 Цикл
        // Заполнение полей День
        Таб.ВывестиСекцию("День");
    КонецЦикла;
    // Заполнение полей "Итого"
    Таб.ВывестиСекцию("Итого");
    // Вывод заполненной формы
    Таб.ТолькоПросмотр(1);
    Таб.Показать("Сформировать", "");
КонецПроцедуры

ЗЫ в регистре ОстаткиТМЦ стоимости товаров нет, они находятся в регистре ПратииНаличие

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| 1C: Предприятие, SAP, ERP и учётные системы \| Следующая тема »