Цели

---

    Возможность формирования прямых запросов к БД 1с вечно мучила умы разработчиков. У каждого свои цели и задачи, но все эти попытки были направлены на то  чтобы снять тот уровень абстракции, который предлагает 1С и получить данные без ограничения. Со временем некоторые, талантливые головы открыли нам описания таблиц SQL, и формировать запросы осталось только делом техники. Однако построенные таким образом запросы могли быть более менее пригодны из сторонних  систем. Потому как они они не могли работать с прикладными типами объектов (то есть  запрос не мог вернуть ссылку на элемент справочника,документа .. и т.д.) в чем он и проигрывал своему оригинальному собрату. Таким образом прямые запросы  на 8 так и не прижились в повседневной разработке конфигураций на 1с, из за следующих своих недостатков:

• невозможность работы с прикладными типами объектов;
• длительное возвращение результатов запроса по средством перебора всех записей RecordSet;  (можно обойти используя ВК GameWithFire)
  
• отсутствие вменяемого визуального конструктора запросов;
  

однако для определенных специфических задач, связанных с интеграцией из различных источников данных, прямые запросы в 8 используются. Ситуация у младшего брата 8 -7.7 сложилось более благополучно, как говорится "Не было счастья, да не счастье помогло". Дак вот тем самым не счастьем в 7.7 был ее так называемый (у кого язык повернулся) "язык запросов". Те кто работал на 7.7 и 8 меня поймут. Это  "язык запросов" похож на все что угодно, кроме запроса.
Наигравшись с такими "запросами" вдоволь была создана ВК 1С++ которая позволяет выполнять прямые запросы. Все полюсы этих запросов очевидны из текста запроса, кроме типизирующих псевдонимов это чистый SQL. К тому же все недостатки прямых запросов заявленные выше, в 1с++ обошли, в том числе и конструктор запросов.

 

Период с ДатаПрошлогоПериода по ДатаПрошлогоПериода; ВидРасч = ЖурналРасчетов.Зарплата.ВидРасч; Объект = ЖурналРасчетов.Зарплата.Объект; Результат = ЖурналРасчетов.Зарплата.Результат; ПериодДействия = ЖурналРасчетов.Зарплата.ПериодДействия; ДатаОкончания  = ЖурналРасчетов.Зарплата.ДатаОкончания; Группировка Объект Без Групп; Условие(ВидРасч = ВидРасчета.НДФЛ); Условие(Результат <> 0); Условие(ДатаОкончания <> ДатаПрошлогоПериода)

SELECT Контрагенты.ID [Ссылка $Справочник.Контрагенты] , Контрагенты.ISMARK ПометкаУдаления , Контрагенты.PARENTID [Родитель $Справочник.Контрагенты] , Контрагенты.ISFOLDER ЭтоГруппа , Контрагенты.CODE Код , Контрагенты.DESCR Наименование , $Контрагенты.ВидКонтрагента [ВидКонтрагента $Перечисление.ВидыКонтрагентов] , $Контрагенты.ПолнНаименование ПолнНаименование , $Контрагенты.ОсновнойДоговор [ОсновнойДоговор $Справочник.Договоры] , $Контрагенты.ОсновнойСчет [ОсновнойСчет $Справочник.РасчетныеСчета] , $Контрагенты.ОКПО ОКПО FROM $Справочник.Контрагенты AS Контрагенты INNER JOIN $Справочник.Контрагенты AS Контрагенты1 ON Контрагенты.DESCR = Контрагенты1.DESCR Where (Контрагенты.PARENTID=' K0' or Контрагенты.PARENTID=' jj') and (Контрагенты1.PARENTID=' K0' or Контрагенты1.PARENTID=' jj')

Нашей задачей в этой статье будет получение аналогичного  результат прямых запросов на 1с++, только в контексте 8.1 и старше.

Общий подход

---

    В изложенном подходе не будет использоваться внешних компонент. Пока работа данного подхода проверена на MSSQL 2000  возможность работы в других  СУБД  пока  не изучались . Достоверно известно  что описанный здесь подход, ПОКА не будет работать в  MSSQL 2005.
Основная идея реализации будет крутится вокруг временных таблиц, и возможности 1с создавать и возвращать данные из них (Временных таблиц). Обобщенно подход можно представить в виде следующей последовательности.

Реализация

---

Основными сложностями в реализации будет правильно продекларировать типы  колонок временной таблиц. Сразу предупрежу это занятие довольно необычное, обычно мы привыкли просто выполнять запрос и  на основе возвращаемых  данных происходит автоматическое преобразование типов. Но к сожалению данная процедура необходима для текущей конструкции менеджера временных таблиц. О нем сейчас и поговорим.
   В запросе SQL у нас на выходе 3 поля  однако во временную таблицу необходимо вставить 4. Вот сдесь наблюдается небольшие расхождения в хранении составных типов. Временная таблица по непонятной лично мне причине требует еще одно поле *_Type, в котором фиксируется что текущая запись является ссылкой (не строкой, не датой и т.д) хотя в ТЗ мы не о каких других типов отличных от ссылок и не упоминали.
Поэтому полученный запрос приходится дорабатывать:

   SELECT
        0x08 AS _Q_000_F_000Type,                                                    
        CASE
            WHEN _Reference32_Q_000_T_001._IDRRef IS NOT NULL
            THEN 0x0000000A
            ELSE NULL
        END AS _Q_000_F_000TRef,
        _Reference32_Q_000_T_001._IDRRef AS _Q_000_F_000RRef,
        CAST(_Reference32_Q_000_T_001._Description AS NVARCHAR(100)) AS _Q_000_F_001
    FROM
        _Reference32 _Reference32_Q_000_T_001 WITH(NOLOCK)
UNION ALL
    SELECT
        0x08 AS _Q_000_F_000Type,                                                    
        CASE
            WHEN _Reference78_Q_001_T_001._IDRRef IS NOT NULL
            THEN 0x0000004E
            ELSE NULL
        END AS _Q_000_F_000TRef,
        _Reference78_Q_001_T_001._IDRRef AS _Q_000_F_000RRef,
        _Reference78_Q_001_T_001._Description AS _Q_000_F_001
    FROM
        _Reference78 _Reference78_Q_001_T_001 WITH(NOLOCK)

Выполнив этот запрос через интерфейс временных таблиц мы получим стандартный объект результат запроса, который:

• может содержать ЛЮБЫЕ необходимые данные, в том числе и из других баз;

• использовать группировки при выводе;

• в 1000 раз быстрее перебора коллекции RecordSet (для получения результата);
  

Таким образом все недостатки прямых запросов (заявленные в целях) теперь в прошлом

Полностью (без контроля ошибок) данная конструкция на встроенном языке выглядит примерно так:

Conn= Новый COMОбъектADODB.Connection;
Conn.ConnectionString = "Provider=SQLOLEDB;Password=ooo;Persist Security Info=True;User ID=sa;InitialCatalog=dogovor_81;Data Source=1c";
Conn.Open();
Запрос = Новый Запрос("ВЫБРАТЬ
МВТ = Новый МенеджерВременныхТаблиц;