База ДБФ

Нужно выполнить, собственно, вот такой прямой запрос:

SELECT
   Док1.IDDoc As ID,
   "Авансовый отчет" As Descr,
   "АвансовыйОтчет" As Name
FROM
   DH13053 As Док1
UNION ALL
SELECT
   Док2.IDDoc As ID,
   "Бухгалтерская справка" As Descr,
   "БухгалтерскаяСправка" As Name
FROM
   DH40597 As Док2
UNION ALL

<...>

SELECT
   Док86.IDDoc As ID,
   "Передача заявлений ДСВ-1 в ПФР" As Descr,
   "ПередачаЗаявленийДСВ1" As Name
FROM
   DH56050 As Док86

Ругается
Результат = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
{C:\ОБЩАЯ\ОТЧЕТЫ\ЖУРНАЛДОК.ERT(170)}: FAILED! ICommandText::Execute(): Compiled code for this line is too long.

Что делать?

Замени " на '

(1) Не помогает :(
Если что, еще раз повторю: база ДБФ :)

Да какая разница...

У тебя 86 юнионов что ли?

('Авансовый отчет') As Descr,
   ('АвансовыйОтчет') As Name

(3) так точно

(5) Compiled code for this line is too long

(4) тоже не катит

(6) Я знаю, но мне надо выполнить именно такой запрос

(8) А в Австралию на поезде съездить не надо?

(8) я сам сталкивался с таким. Так и не смог обойти ограничение. Проще разбить на несколько запросов

(9) Не надо. Альтернатива?

(11) Альтернатива - утки

(5)Ну тогда тебе сюда

http://support.microsoft.com/kb/111991

Вкратце: скомпилированная строка кода в VFP не может превышать 1024 символа... Твои 86 юнионов драйвер просто не переваривает...

(0)
А нафига столько юнионов ?
Не проще 1 табличку 1sjourn посмотреть ? И вытащить с неё IDDOC и IDDOCDEF ?

Нафига все шапки доков цеплять?

(10) Если что, результаты этого запроса потом планируется соединить с другой таблицей, т.е. он планируется как вложенный

(14) С этой таблицей и планируется соединить результаты вложенного запроса. По IDDoc. Чтобы в окончательном запросе из вложенного подцепить представление и вид документа

(15)Ну тем более не взлетит...

(16) Для этой цели достаточно посмотреть 1 табличку 1sjourn - в ней и так всё это есть.

(18) Там есть вид документа в 36-ричном виде. А мне нужно получить в результат запроса представление вида данного документа. Может, ты скажешь, где оно там?

Его там нет... Сделай временную таблицу и сохрани в нее представления, потом используй в запросах...

(20) Итак мы снова возвращаемся к тому, что было поднято пару дней назад :)
Я уже думал над этим, вот только тогда мне никто не смог внятно описать, как создать в базе ДБФ временную таблицу и потом подключиться к ней в другом запросе.

(19)
Ну так сделай

Select
 ICASE(Жур.IDDOCDEF = $ВидДокумента.Реализация,'Реализация',
       Жур.IDDOCDEF = $ВидДокумента.ПоступлениеТМЦ,'ПоступлениеТМЦ','хз что за документ')
From 1sjourn Жур

(21) да запросто..

+23
http://www.1cpp.ru/forum/YaBB.pl?num=1188673318

(21)Злобный Йожег? Я не узнаю вас в гриме...

Может что-то типа этого попробовать...
Для й = 1 По  Метаданные.Документ() Цикл
  Идентификатор = Метаданные.Документ(й).Идентификатор;  
  Запрос.Выполнить("
  |DELETE FROM $Документ."+Идентификатор+"
  |WHERE  IDDOC NOT IN (SELECT IDDOC FROM _1SJOURN )
  |");

(26) ну и чем это поможет автору ?

Х.З. Я бы делал через SQLite, а там легко выполняется create table

(28) Можно образец кода, как бы это выглядело на 1sqlite? Только со всеми подробностями, пож-ста...

(24) По примеру в ссылке: создать временную таблицу удалось. А вот подключиться к ней после создания - пока нет. Но, в любом случае, прогресс налицо :) Хотелось бы все-таки суметь подключиться к ней.

(30) а что там именно  не получилось то ?
Могу пример кинуть, если надо.

(30) Короче, переменная ТекстЗапроса содержит текст запроса, помещаемого во врем. таб.:

ТекстЗапроса = "SELECT
   |    Док1.IDDoc As ID,
   |    ""Авансовый отчет"" As Descr,
   |    ""АвансовыйОтчет"" As Name
   |INTO CURSOR TmpTable READWRITE
   |FROM
   |    DH13053 As Док1";
Результат = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
//до этого места все без проблем
//а вот на эту строчку ругается:
Результат = Запрос.ВыполнитьИнструкцию("SELECT * FROM TmpTable");

Результат = Запрос.ВыполнитьИнструкцию("SELECT * FROM TmpTable");
{C:\ОБЩАЯ\ОТЧЕТЫ\ЖУРНАЛДОК.ERT(177)}: FAILED! ICommandText::Execute(): File 'tmptable.dbf' does not exist.

ап

(32) да блин .. читай (1)

(34) НУ НЕ РАБОТАЕТ!!!

И это.. Нафига ты упорно пытаешься обратиться к табличке Шапки документа ?????????????

Для вытаскивания вида, достаточно (22)..
Если уж лень делать icase - делается временная табличка, в которую руками заталкивается видДокумента.. её потом и пользуешь в другом запросе.

(35) ПИШИ БЕЗ ОШИБОК!

(36) ты читать умеешь? Я тебе объясняю, что ВТ создается, но потом Я НЕ МОГУ К НЕЙ ПОДКЛЮЧИТЬСЯ. Запрос ее НЕ ВИДИТ. Вот в чем сейчас проблема!

еще раз ап

На вот, пример
http://webfile.ru/4450487

(32)я конечно уже не помню, но, вроде, бы в "INTO CURSOR TmpTable READWRITE" лишнее про курсор. Вроде, достаточно "INTO TmpTable", но такую таблицу временной можно назвать только в кавычках :)

(29)
ЗагрузитьВнешнююКомпоненту("1sqlite.dll");
база = СоздатьОбъект("SQLiteBase");
база.Открыть(":memory:");
запрос = база.НовыйЗапрос();
запрос.ВыполнитьЗапрос("PRAGMA journal_mode = OFF");
запрос.ВыполнитьЗапрос("create table tmpTable(...)");
запрос.ВыполнитьЗапрос("insert ... into tmpTable");
запрос.ВыполнитьЗапрос("create virtual table Остатки using dbeng(Регистр.ОстаткиТоваров)");
запрос.ВыполнитьЗапрос("select ... from Остатки left join tmpTable");
-----------
P.S. ИМХО, ты либо что-то не договариваешь, либо просто не понимаешь, что делаешь.
Например я бы написал при помощи OLEDB вместо (0) так:
select top 10 iddoc as ID, iddocdef as [Вид $ВидДокумента], iddocdef as [РасширенныйВид $ВидДокументаПредставление]from 1sjourn

+42, точнее так:
select top 10 iddoc as ID, iddocdef as [Name $ВидДокумента], iddocdef as [Descr$ВидДокументаПредставление] from 1sjourn
хотя смысла в таком запросе - я все равно не вижу... ведь выбрать все документы, лишь для того, чтобы получить затем мелкую выборку и найти виды документов, по моему это бесполезная трата ресурсов.

(43)судя по названию обработки в (0), человек делает свой журнал доков.

(44) Если так, то ему стоит посмотреть на эту ветку: http://www.1cpp.ru/forum/YaBB.pl?num=1248941896 там, фактически, готовый журнал лежит, да и не только журнал

(0)а покажи самую длиную строку кода, так чиста поржать :)

(42) ВидДокументаПредставление дает в результате две точки в колонке...

(47) х. з. у меня скульная база и запрос выдал такое:
ID          Name          Descr
  2HG      ПереносОстатков    Перенос остатков
  2HH      ПереносОстатков    Перенос остатков

(48) для дбф можно только руками писать.. как в (22)

(46)Тебе комп выдали что ли? :-)

(42) По поводу
запрос.ВыполнитьЗапрос("insert ... into tmpTable");

Можно точнее? У меня ВТ с 2-мя полями, как именно туда установить значения?

(50)ага, ажно 14 числа.

(0)

Если Вы получаете сообщения об ошибках  Недостаточный размер стэка (Error 1308) или SQL: Compiled code for this line is too long(Error 1812), Вы можете увеличить "уровень значимости" для конструкций  FOR и WHERE .

Если Вы используете  SYS(3055)...

Максимум SYS(3055,2040)
или в терминологиии 1С

ОлеКоманда.Выполнить("SYS(3055,2040)");

Также промежуточные результаты можно класть во временные таблицы

также см
http://www.1cpp.ru/forum/YaBB.pl?num=1171984058

(51) ну вот, например, у меня такой код есть:
   склЗапрос.Подготовить("insert into items
   |(id, name, type, dim_kind_id, unit_id, description, dcd)
   | values (@id,@name,@type,@dim_kind_id,@unit_id,@description,@dcd)");
   Пока тзТовары.ПолучитьСтроку() = 1 Цикл  
       
       Товар = тзТовары.Товар;
       //АраИ
       Попытка
           ТипТовара = ?(Товар.ТипТовара = Перечисление.ТипыТоваров.Весовой,0,1); //0 - весовой, 1 - штучный                  
       Исключение
           ТипТовара = 1;
       КонецПопытки;    
       
       склЗапрос.УстановитьПараметр("@id",Товар.Код);    
       склЗапрос.УстановитьПараметр("@name",Товар.Наименование);
       склЗапрос.УстановитьПараметр("@type",ТипТовара);
       склЗапрос.УстановитьПараметр("@dim_kind_id","");
       склЗапрос.УстановитьПараметр("@unit_id",тзТовары.КодБазовойЕдиницы);
       склЗапрос.УстановитьПараметр("@description",Товар);
       склЗапрос.УстановитьПараметр("@dcd",0);
       склЗапрос.Выполнить();
   КонецЦикла;

(55) разобрался уже, спс

Кстати, а какой в 1sqlite аналог ICASE?

CASE (DATE_OF_BIRTH / 100) % 100
       WHEN 1 THEN 'January'
       WHEN 2 THEN 'February'
...
END