Имя: Пароль:
1C
1С v8
запрос по регистрам бухгалтерии
Ø (GROOVY 12.08.2012 23:25)
0 Black Dragon
 
12.08.12
23:15
Доброго вечера!

вот блин в запросе какая-то ошибока сидит

   СписокКонтрагентов  = Новый Массив;
   
   Для Каждого Стр Из ТабКонтрагенты Цикл
       СписокКонтрагентов.Добавить(Стр.Контрагент);
   КонецЦикла;
   
   // создание списка счетов для запроса
   
   ФильтрСписокСчетов = Новый Массив;
   
   Для Каждого Стр Из СписокСчетов Цикл
       Если Стр.СчетВыбран Тогда
           ФильтрСписокСчетов.Добавить(Стр.Счет);
       КонецЕсли;    
   КонецЦикла;
   
   // выполнить запрос по данным сверки
   
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ДатаНачала",    ?(НЕ ЗначениеЗаполнено(НачПериода),Неопределено, Новый граница (НачалоДня(НачПериода),ВидГраницы.Включая)));
   Запрос.УстановитьПараметр("ДатаОкончания", ?(НЕ ЗначениеЗаполнено(КонПериода),Неопределено, Новый граница (КонецДня(КонПериода), ВидГраницы.Включая)));
   Запрос.УстановитьПараметр("Организация",   выбОрганизация);
   Запрос.УстановитьПараметр("Контрагенты",    СписокКонтрагентов);
   Запрос.УстановитьПараметр("Валюта",        ?(НЕ ЗначениеЗаполнено(выбВалюта), Неопределено, выбВалюта));
   Запрос.УстановитьПараметр("ФильтрСписокСчетов", ФильтрСписокСчетов);
   
   АналитикаРасчетов = новый Массив();
   АналитикаРасчетов.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты);
   АналитикаРасчетов.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры);
   Запрос.УстановитьПараметр("АналитикаРасчетов",    АналитикаРасчетов);
   
   Запрос.Текст =
   
   "ВЫБРАТЬ
   |    ХозрасчетныйОбороты.Регистратор.Дата КАК Дата,
   |    ХозрасчетныйОбороты.Регистратор.Номер КАК Номер,
   |    ХозрасчетныйОбороты.Регистратор КАК Документ,
   |    ХозрасчетныйОбороты.Субконто1 КАК Контрагент,
   |    ХозрасчетныйОбороты.Субконто2 КАК Договор,
   |    ВЫБОР
   |        КОГДА &Валюта = НЕОПРЕДЕЛЕНО
   |            ТОГДА ХозрасчетныйОбороты.СуммаОборотДт
   |        ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотДт
   |    КОНЕЦ КАК Дебет,
   |    ВЫБОР
   |        КОГДА &Валюта = НЕОПРЕДЕЛЕНО
   |            ТОГДА ХозрасчетныйОбороты.СуммаОборотКт
   |        ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотКт
   |    КОНЕЦ КАК Кредит,
   |    ЕСТЬNULL(ХозрасчетныйОбороты.Регистратор.НомерВходящегоДокумента, НЕОПРЕДЕЛЕНО) КАК НомерВходящегоДокумента,
   |    ЕСТЬNULL(ХозрасчетныйОбороты.Регистратор.ДатаВходящегоДокумента, НЕОПРЕДЕЛЕНО) КАК ДатаВходящегоДокумента,
   |    ХозрасчетныйОбороты.Валюта,
   |    ХозрасчетныйОбороты.ВалютнаяСуммаОборот,
   |ИЗ
   |    РегистрБухгалтерии.Хозрасчетный.Обороты(
   |        &ДатаНачала,
   |        &ДатаОкончания,
   |        Регистратор,
   |        Счет В ИЕРАРХИИ (&ФильтрСписокСчетов),
   |        &АналитикаРасчетов,
   |        Организация = &Организация
   |            И ВЫБОР
   |                КОГДА &Валюта = НЕОПРЕДЕЛЕНО
   |                    ТОГДА ИСТИНА
   |                ИНАЧЕ Валюта = &Валюта
   |            КОНЕЦ
   |            ) КАК ХозрасчетныйОбороты,
   |ГДЕ
   |    ХозрасчетныйОбороты.Субконто1 В (&Контрагенты),
   |    
   |УПОРЯДОЧИТЬ ПО
   |    Дата,
   |    Документ,
   |   Контрагент,
   |    Договор";
   
   ДанныеСверки = Запрос.Выполнить().Выгрузить();
   ЭлементыФормы.ДанныеСверки.СоздатьКолонки();
1 Black Dragon
 
12.08.12
23:15
пишет синтаксическая ошибка ИЗ
2 sanja26
 
12.08.12
23:16
запятую убери
3 mih_io
 
12.08.12
23:17
он пишет обычно в какой строке запроса. а так перед ИЗ и перед ГДЕ запятые не надо и перед УПОРЯДОЧИТЬ ПО тоже убрать
4 Black Dragon
 
12.08.12
23:18
уффф! видимо перестарался!
5 Black Dragon
 
12.08.12
23:21
да воскресенье вечер! бывает и хуже!
СПАСИБО!!!