ТекстЗапроса ="
|SELECT
| Рег.ВидДокумента ВидДокумента
|, Рег.НомерДок НомерДок
|, CAST(LEFT(Рег.ДатаДок, 8) as DateTime) as ДатаДок
|, Рег.Основание Основание
|, Рег.Сумма Сумма
|, Рег.Касса Касса
|, Рег.Контрагент Контрагент
|, Рег.КонтрагентП КонтрагентП
|, (CASE WHEN Рег.ВидКонтрагента = $Перечисление.ВидыКонтрагентов.Организация THEN ""ЮрЛицо"" ELSE ""ФизЛицо"" END) ВидКонтрагента
|, Рег.ЮридическийАдрес ЮридическийАдрес
|, Рег.ПочтовыйАдрес ПочтовыйАдрес
|, Рег.ИНН ИНН
|, Рег.ДокументСерия Серия
|, Рег.ДокументНомер Номер
|, Рег.ДокументДатаВыдачи ДатаВыдачи
|, Рег.ДокументКемВыдан КемВыдан
|, Рег.Телефоны Телефоны
|, Рег.РасчетыС РасчетыС
|FROM (
|SELECT
|        0 as ВидДокумента
|      , Журнал.DOCNO НомерДок
|      , Журнал.DATE_TIME_IDDOC ДатаДок
|      , ПриходныйОрдерТБ.$ОбщийРеквизит.Основание Основание
|      , $ПриходныйОрдерТБ.Сумма Сумма
|      , Кассы.DESCR Касса
|      , Контрагенты.DESCR Контрагент
|      , $Контрагенты.ПолнНаименование КонтрагентП
|      , $Контрагенты.ВидКонтрагента ВидКонтрагента
|      , $Контрагенты.ЮридическийАдрес ЮридическийАдрес
|      , $Контрагенты.ПочтовыйАдрес ПочтовыйАдрес
|      , $Контрагенты.ИНН ИНН
|      , $Контрагенты.ДокументСерия ДокументСерия
|      , $Контрагенты.ДокументНомер ДокументНомер
|      , $Контрагенты.ДокументДатаВыдачи ДокументДатаВыдачи
|      , $Контрагенты.ДокументКемВыдан ДокументКемВыдан
|      , $Контрагенты.Телефоны Телефоны
|      , $ПриходныйОрдерТБ.ПринятоОт РасчетыС
|      FROM $Документ.ПриходныйОрдерТБ AS ПриходныйОрдерТБ
|      INNER JOIN _1SJOURN AS Журнал ON ПриходныйОрдерТБ.IDDOC = Журнал.IDDOC
|INNER JOIN $Справочник.Контрагенты AS Контрагенты ON $ПриходныйОрдерТБ.Клиент = Контрагенты.ID
|  LEFT OUTER JOIN $Справочник.Кассы AS Кассы ON $ПриходныйОрдерТБ.Касса = Кассы.ID
|   INNER JOIN $Справочник.Фирмы AS Фирмы ON Журнал.$ОбщийРеквизит.Фирма = Фирмы.ID
|      WHERE (Журнал.DATE_TIME_IDDOC BETWEEN :НачДата AND :КонДата~)
|       AND ((Журнал.CLOSED & 1) = 1)
|            AND (Фирмы.CODE = :КодФирмы)
|UNION ALL

Привел верхнюю часть запроса, ниже аналогично для другого докумета, все работает, если не ставить CASE, подскажите, как правильно перевести Перечисление в строку?

AndreyM писал(а) 05. Августа 2008 :: 08:55:

Попробовал и твой вариант, выдает все равно:
D:\BASE77NEW\ПРОБАПОД8.ERT(87)}: Meta name parser error: неизвестное метаимя или алиас "$Перечисление"

mov68 писал(а) 05. Августа 2008 :: 09:30:

а какую версию 1СРР ты используешь? судя по всему у тебя какая-то версия, у которой парсер не понимает метаимя $Перечисление
или всё-таки мы рассматриваем не тот запрос?

чтобы получить строку, выполни инструкцию

select $Перечисление.ВидыКонтрагентов.Организация  

AndreyM писал(а) 05. Августа 2008 :: 10:27:


версия 2.0.3.7

на твой запрос выдает Meta name parser error: неизвестное метаимя или алиас "$Перечисление"

$Перечисление.ВидыКонтрагентов понимает, $Перечисление.ВидыКонтрагентов.Организация - нет
Какая версия 1С++ нужна?

mov68 писал(а) 05. Августа 2008 :: 10:39:

ты сам ответил на свой вопрос: так понимает, а так нет.
Видимо, в 2.0.3.7 не реализована поддержка конкретного значения перечисления.
я работаю с 2.5 и 3-й версией - всё работает ок!

Снимаю вопрос, при
|, (CASE WHEN Рег.ВидКонтрагента = $Перечисление.ВидыКонтрагентов.Организация THEN 'ЮрЛицо' ELSE 'ФизЛицо' END) ВидКонтрагента
все отрабатывает

Огромное спасибо за помощь

AndreyM писал(а) 05. Августа 2008 :: 11:41:

Возьму на заметку, но на удивление фраза 2 постами выше сработала, спасибо

Цитата:


Я из 1С8.1 через OLE вызываю базу семерки, запускаю 1С++ запрос и из полученной таблицы формирую документы в восьмерке (такой вымороченный перенос). При этом чем меньше OLE объектов при формировании запроса, тем лучше, а чисто в 1С7.7 твой вариант вполне приемлем, спасибо