v7: Помогите с запросом VFPOLEDB на DBF базе #716877

Есть код :      При выполнении сообщает коннект и 1С падает. Тоже самое при использовании 1СQA. Если в консольке набрать select * from 1sjourn , идет выполнения запроса (секунды 3) и падает 1С с сообщением RunTime Error. Что может быть не так?

Есть код :      При выполнении сообщает коннект и 1С падает. Тоже самое при использовании 1СQA. Если в консольке набрать select * from 1sjourn , идет выполнения запроса (секунды 3) и падает 1С с сообщением RunTime Error. Что может быть не так?

Date_Time_IDDoc   кажись нету такого поля в ДБФ. Есть отдельно Date и Time

Есть там такое поле . Но суть не в том , можна написать селект * и все равно вылет

+ и имя таблицы 1sjourn. Т.е. - без нижнего подчеркивания впереди. У тебя запрос для SQL на самом деле

по ссылке. Это всё применительно к SQL.

В консольке 1sqa выбираю драйвер фокс FAILED! ICommandText::Execute: File '_1sjourn.dbf' does not exist. А если писать 1sjourn.dbf запрос начинает выполнятся и 1С падает

select * from $Справочник.ТМЦ  - вылет

Драйвер отсюда

тебе же пишет, что файла с таким именем нету ))) в папке с базой у тебя нет такого файла! :)  У тебя есть файл 1sjourn.dbf.  Присмотрись ))

Правильно ,я пишу 1sjourn без _ 1с++ версии 3.2.3.19

Пример по удалению документов.  ЗАменить delete на select и будет просто отбор делать

Сейчас попробую....

Ваш запрос работает нормально, почему же в консольке не отрабатыват select * from $Справочник.ТМЦ ?

А вот select * from DH6431 работает нормально...

select * from 1SCONST за 6 сек  340000 строк закрыл открыл 1с , тот же запрос призводит к вылету.... то еть работает через раз...

1. поставить православный vfp 2.убрать провайдер от ужаста, если нужны запросы в монопольке, использовать это: 3. строка подключения должна быть такой :     ОлеДБ = СоздатьОбъект("OLEDBData");     Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ + ";Mode=ReadWrite;Collating Sequence=MACHINE";     Запрос.Выполнить("EXECSCRIPT('SET REPROCESS TO 60 SECONDS')");     Запрос.Выполнить("EXECSCRIPT('SET REFRESH TO 0,-1')");         Запрос.Выполнить("Exec('SET TABLEVALIDATE TO 0')"); 4. чтобы запрос быстро отрабатывал, читаем тут

5. наслаждайся

Попробуем, спасибо.

Проблема осталась, 1 раз работает нормально, потом вылет, реиндексация, опять работает или опять вылет...Ничего не понятно......

переустановка vfp и ребут компа

ну и не видно, как и че ты запущаешь и какие запросы выполняешь, какой зоопарк из вк стоит ит .д

Зоопарк : Запрос select * from 1SCONST работает через раз

ну а так че ?     Попытка

Через 1sqlite не пробовал , хочу уже с этим VFP разобраться....

в классе ПрямойЗапрос есть возможность сделать DELETE записей из табличек?

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

ну.. это можно рассматривать как деградацию + одну из ступеней перехода на снеговика с его "прямыми" запросами.. ;-)

на счет vfp - всё написано в . 1sqlite не способен на delete/insert/update/запрос к чужой базе, тут только запрос на оледб.

Пока перезагрузку не могу сделать (работают юзвери), но есть новая ошибка: Не найден ключ реестра с данным класидомHKCRoledbdataCLSID для объекта: oledbdata Прог-ид oledbdata не найден в реестре и помечен как обработанный для исключения повторной генерации. Ошибка генерации файлов по прог-иду: oledbdata

На демо конфигурации Комплексная отрабатывают любые запросы в консольке ...

Как оптимизировать запрос ? Код :

Или так, есть процедура очистки базы прямым запросом Код:     рс.Выполнить("EXECSCRIPT('SET REPROCESS TO 60 SECONDS')");     рс.Выполнить("EXECSCRIPT('SET REFRESH TO 0,-1')");         рс.Выполнить("Exec('SET TABLEVALIDATE TO 0')");     Сообщить("Обработка таблиц документов");         Состояние("...удаляются строки документов...");                  Состояние("...удаляются шапки документов...");                  |           |     Сообщить(" ...удаляются периодические реквизиты, заполняемые документами...");          Сообщить(" ...удаляются перекрестные ссылки...");              Исключение     Сообщить(" ...удаляются ссылки из журнала документов...");      Где можно оптимизировать запросы ?Проводки и ссылки удаляются очень долго.

читать это и переписывать запросы под попадание в индекс

Интересует табличка 1SENTRY. Есть еще проблемка, если журнал цеплять через иннер джоин то VFP ругается Function name is missing.Может мое условие можно переписать оптимальней?

":НачДата~~ " Вы такой синтаксис где откопали?

тут и тут

А конкретней? В списке форумов предлагаете искать? На каком языке этот код? Для какого драйвера этот код?

Все описано выше : VFPOLEDB на DBF базе прямой запрос 1С++

Сейчас читаю про попадание в индекс, например: Например мы хотим выбрать документы из 1SJOURN за период . Код: |WHERE    Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ то оптимизатор не найдет индекса, так как «Жур.Date»  не соответствует «DTOS(date)+time+iddoc»     К счастью FoxPro поддерживает упорядочение строк – и можно использовать оператор          BETWEEN . Длина строки «time+iddoc» равна 15. Определим переменные МинСтрока= "               " Собственно условие Код: WHERE   DTOS(date)+time+iddoc BETWEEN (DTOS(:НачДата~~)+'           ') AND (DTOS(:КонДата~~)+'ZZZZZZZZZZZZZZZ') (для простоты переменные МинСтрока и МаксСтрока не используются)

че не устраивает ?

Зайдем с другой стороны. Что еще пишет в сообщении об ошибке кроме Function name is missing? На какую строку ругается?

А тебе.. можно запихать выборку доков во временную табличку и соединять потом везде в делете

dtos(:НачДата~~) в сочетании с УстановитьТекстовыйПараметр("НачДата", '01.01.80') - чушь, приводящая к ругани на несоответствие типов. К тому же, '01.01.80' есть большие грабли в деле правильного понимания драйвером сего безобразия.

Добавчик: а Жур.date у нас какого типа?

ты не в теме

Я очень даже в теме VFPOLEDB на DBF. VFPOLEDB на dtos со строковым параметром будет ругаться на несоответствие типов.

Изучай: Visual FoxPro 9.0 Справка по языку   Возвращает дату в виде символьной строки формата ггггммдд из заданного выражения типа "дата" (Date) или "дата-время" DateTime. Параметры dExpression Указывает выражение типа "дата" для преобразования посредством функции DTOS в строку из восьми цифр. tExpression Указывает выражение типа "дата-время" для преобразования посредством функции DTOS в строку из восьми цифр. Символьное Примечания Эта функция полезна для индексирования таблиц, содержащих поля типа "дата" и "дата-время". Она равнозначна функции DTOC для случая, когда указывается первый необязательный аргумент. Вид и содержимое символьной строки, возвращаемой функцией DTOS, не зависит от установок SET DATE или SET CENTURY.

:)

Продолжай дальше изучение справки по vfp

Запрос >>> OLEDBCommand error: FAILED! ICommandText::Execute: Function name is missing ).

Спасибо, но в таких рекомендациях не нуждаюсь. Эту справку и так почти наизусть знаю.

В чем разница Если Рег.БыстраяОбработкаДвижений =0 Тогда

в табличке движений регистра будут доп поля - не надо будет делать соединение с журналом (аналогично будут поля, ежели стоит галка на одном из измерений регистра)

М-да, очень информативно. Но видно, что стоит закрывающая скобка, которой не найдено соответствие.

для проводок, нужно задействовать этот индекс DTOS(DATE)+TIME+DOCID+STR(NUMBER,5)+STR(CORNO,5)

и как помогает ?

у тя там че хоть ? Ты не у всех документов режешь движуху ?

Движуху надо оставить по банк.випис. и зарплатная часть //*******************************************

Чем можно смотреть какой индекс используется у какай таблички?

Ага, особенно в поисках ошибок в чужом коде.

select Пров.TIME FROM 1SENTRY as Пров INNER JOIN    1SJourn ON 1SJourn.IDDoc = Пров.DocID WHERE 1SJourn.Date BETWEEN :НачДата AND :НачДата~ Запрос >>> OLEDBCommand error: FAILED! ICommandText::Execute: Command contains unrecognized phrase/keyword.

Ничем. В фоксе нет такого средства. Но есть возможность посмотреть уровень оптимизации. SYS(3054). Но для этого запрос надо отлаживать в фоксе, и только потом готовый запрос тащить в другие системы.

Разумеется ругается. Он не знает что такое  :НачДата

select Пров.TIME FROM 1SENTRY as Пров INNER JOIN    1SJourn as Жур ON Жур .IDDoc = Пров.DocID WHERE Жур .Date BETWEEN :НачДата~~ AND :НачДата~~

:)))))))))))))))))))))))))))))))))))))

только вот, соединение с журналом в этом запросе лишнее + нет попадания в индекс

Ну вот и прелестно, хоть кому-то я жизнь скрасил.

месье не знает как посмотреть индексы на табличку ?

Мсье знает как посмотреть индексы на табличку, но вопрос был про использование индексов в запросе, а это сильно разные вещи.

кто то походу троллит тебя :)

Лучше переписать через INNER JOIN с журналом или оставить как есть только попадать в индекс.Что бістрее отработает?

Так работает.Спасибо.

Все он знает. 1sqa если что....

Не всё. Найдите отличия между :НачДата~~ и :НачДата

Что быстрее отработает поможет узнать тестовый прогон запросов.

{d '2001-01-01'}, '20010101' дальше бум тупить, или как ?

что быстрее работает, покажет план выполнения запроса

и о чудо, его тоже можно смотреть в дбф базах.. если че

см. в этом запросе, можно выкинуть соединение с журналом и воткнуть условие на дату из проводки

И что? Первое вообще не пойми что, второе - строка, которая может быть получена от функции dtos при передаче ей значения типа ДАТА, например {^2001-01-1}.

его - это ЧТО?

|      В журнале ведь индекс DTOS(date)+time+iddoc  , почему нету прироста по скорости?

Или под словом "его" имеется в виду план запроса? Если так, то разочарую - в фоксе нет понятия "план запроса", впрочем, как нет и понятия "дбф база" :)

"ведь индекс DTOS(date)+time+iddoc  , почему нету прироста по скорости?" Потому, что, как минимум, наличие какого-то индекса не гарантирует его использования.

что в УсловиеПоВидамДок ?

WHERE (jr.IDDOCDEF = ' E7L')

там всегда 1 вид документа ? или что ?

УсловиеПоВидамДок покажи код функции

та ты шо

Нет, пока пробую на копии базы то 1 . А потом будет порядка 20-и

через OR

Cvjnhb

и зачем это всё ? Зачем в этом запросе ограничение по виду ? Это свёртка же, там нужно у всех доков проводки выкидывать

если у двух документов нужно оставить, то так тогда хотя бы and not in ($ВидДокумента.ПервыйДок,$ВидДокумента.ВторойДок) но никак не or

Ну назовем это неполная свертка, нужно несколько видов доков оставить с проводками, движухой и т.д.Такая вот тупая задача.Незнаю как бухи будут сводить остатки.... Сейчас запускал чистку за 1 день по виду док. приходная.Время выполнения 45 сек причем 33 из них это чистка 1ссентри

Сильный аргумент. :) Лучше ссылочку на доку по планам запросов в фоксе кинул для изучения, может где мимо меня промелькнула?

даже фокс не нужен, только некоторое файло с него