Имя: Пароль:
1C
1С v8
Остатки на конец дня
,
0 servicenn
 
22.07.13
13:02
День добрый столкнулся с такой заморочкой, в отчёте в остатках не учитывается документ  временем 23 59 59 хотя параметр передаю с помощью функции конецДня, если ставлю время 23 59 58 то всё нормально(документ отч розн продаж )

Запрос = Новый Запрос;
   Запрос.Текст =
   "ВЫБРАТЬ
   |    ТоварыВРозницеОстатки.Номенклатура,
   |    ТоварыВРозницеОстатки.КоличествоОстаток КАК Количество,
   |    ВЫБОР
   |        КОГДА &ВидЦены = 1
   |            ТОГДА ЦеныАТТСрезПоследних.Цена
   |        ИНАЧЕ ЦеныНоменклатурыСрезПоследних.Цена
   |    КОНЕЦ КАК Цена,
   |    ВЫБОР
   |        КОГДА &ВидЦены = 1
   |            ТОГДА ТоварыВРозницеОстатки.КоличествоОстаток * ЦеныАТТСрезПоследних.Цена
   |        ИНАЧЕ ЦеныНоменклатурыСрезПоследних.Цена * ТоварыВРозницеОстатки.КоличествоОстаток
   |    КОНЕЦ КАК Сумма
   |ИЗ
   |    РегистрНакопления.ТоварыВРознице.Остатки(&Дата1, Склад = &Склад) КАК ТоварыВРозницеОстатки
   |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата1, ТипЦен = &ТипЦен) КАК ЦеныНоменклатурыСрезПоследних
   |        ПО ТоварыВРозницеОстатки.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
   |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныАТТ.СрезПоследних(&Дата1, Склад = &Склад) КАК ЦеныАТТСрезПоследних
   |        ПО ТоварыВРозницеОстатки.Номенклатура = ЦеныАТТСрезПоследних.Номенклатура
   |
   |УПОРЯДОЧИТЬ ПО
   |    ТоварыВРозницеОстатки.Номенклатура.Наименование
   |ИТОГИ
   |    СУММА(Количество),
   |    СУММА(Сумма)
   |ПО
   |    ОБЩИЕ";
   
   Запрос.Параметры.Вставить("Склад", Склад);
   Запрос.Параметры.Вставить("Дата1", КонецДня(ДатаОтчета));
   Запрос.Параметры.Вставить("ТипЦен", Справочники.ТипыЦенНоменклатуры.НайтиПоКоду("000000001"));
   Запрос.Параметры.Вставить("ВидЦены", ЭлементыФормы.ТипЦен.Значение);
   
   Выборка = Запрос.Выполнить().Выбрать();
   
   ТабличныйДокумент = Новый ТабличныйДокумент;
       
   Макет = ПолучитьМакет("Макет");
   ОбластьШапка = Макет.ПолучитьОбласть("Шапка");
   ОбластьСтрока = Макет.ПолучитьОбласть("Строка");
   ОбластьИтого = Макет.ПолучитьОбласть("Итого");
   
   Если ЭлементыФормы.ТипЦен.Значение = 1 Тогда
       ОбластьШапка.Параметры.Заголовок = "Остатки товаров в " + Склад + " на " + Формат(ДатаОтчета, "ДФ=dd.MM.yyyy") + " в розничных ценах";
   Иначе
       ОбластьШапка.Параметры.Заголовок = "Остатки товаров в " + Склад + " на " + Формат(ДатаОтчета, "ДФ=dd.MM.yyyy") + " в закупочных ценах";
   КонецЕсли;
   
   ТабличныйДокумент.Вывести(ОбластьШапка);
   
   Выборка.Следующий();
   ОбластьИтого.Параметры.Заполнить(Выборка);
   
   НомерП = 0;
   
   Пока Выборка.Следующий() Цикл
       ОбластьСтрока.Параметры.Заполнить(Выборка);
       НомерП = НомерП + 1;
       ОбластьСтрока.Параметры.НомерП = НомерП;
       ТабличныйДокумент.Вывести(ОбластьСтрока);
   КонецЦикла;    
   ТабличныйДокумент.Вывести(ОбластьИтого);
   
   УниверсальныеМеханизмы.НапечататьДокумент(ТабличныйДокумент, , , "Остатки");
1 Wobland
 
22.07.13
13:03
вижу, не знаешь ты про момент времени, касатик
2 cw014
 
22.07.13
13:03
Новый МоментВремени(КонецДня(ДатаОтчета))
3 servicenn
 
22.07.13
13:03
ну разьясни
4 servicenn
 
22.07.13
13:04
что интересно в консоли тоже,
5 Wobland
 
22.07.13
13:04
(4) нудыкёлыпалыблин
6 ale-sarin
 
22.07.13
13:05
Запрос.Параметры.Вставить("Дата1", Новый Граница(КонецДня(ДатаОтчета)), ВидГраницы.Включая);
7 ale-sarin
 
22.07.13
13:06
+6 Скобки - косяк
Запрос.Параметры.Вставить("Дата1", Новый Граница(КонецДня(ДатаОтчета), ВидГраницы.Включая));
8 servicenn
 
22.07.13
13:07
ок)
9 servicenn
 
22.07.13
13:08
проверю
10 Wobland
 
22.07.13
13:08
на здоровье
11 Fragster
 
гуру
22.07.13
13:09
добавляй секунду, будь мужиком!
12 servicenn
 
22.07.13
13:09
С границей прокатывет
13 servicenn
 
22.07.13
13:10
остаётся в консоли учесть
14 H A D G E H O G s
 
22.07.13
13:11
(11) ай-яй-яй...
15 Fragster
 
гуру
22.07.13
13:12
(14) еще скажи, что так не работает...
16 andreymongol82
 
22.07.13
13:13
(15) А как быть с документами на начало следующего дня?
17 servicenn
 
22.07.13
13:13
(15) мужик !уже  всё работает!
18 Fragster
 
гуру
22.07.13
13:14
(16) а они туда не попадут
19 SherifSP
 
22.07.13
13:14
(16) А если нужно получить в скд?)
20 Fragster
 
гуру
22.07.13
13:15
(17) я знаю, что работает. а вот как в консоли СКД сделать то же самое?

(19) с языка снял
21 servicenn
 
22.07.13
13:17
(20) о чём и речь)
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший