Подскажите пожалуйста! MySQL -> ODBC -> CA -> Forma -> Grid -- в 2 раза медленнее заполняется форма, чем просто через SQLEXEC(...,kursor)
При выполнении в среде VFP9 и при 'set tallk on' видно что сканирование(кол записей) происходит дважды прежде чем отоброзятся данные . Просмотрел всю цепочку загрузки - команд типа cout, summ, а тем более CA.CursorRefresh() не использую.
Грешил даже на ипользование CAl.alias='rrr' и CA.tables='ttt' - сделал их одинаковыми.

this.n_journal.UpdateType = 1
this.n_journal.whereType = 3
this.n_journal.FetchSize = -1
this.n_journal.FetchAsNeeded = .F.
select в обоих случаях одинаковый

время на 80тыс записях в 1вар -3сек а на 2вар- 6сек

Еще!
param_zapT='from journal_param where LEFT(ksp,5)="'+LEFT(_ksp,5)+'"' && делаю подобие параметризованного курсора

this.CA.SelectCmd = 'select *' + param_zapT

Благодарю DIMA T! Ваш вариант с
param_zapT = textmerge([from journal_param where ksp LIKE '<<LEFT(_ksp,5)>>%']) опробовал и индекс создал -
результат тот же.
Проблема осталась - двойной прогон курсора перед заполнением(отоброжением данных) в гриде - как бы после CA.cursorfill() выполняется CA.CursorRefresh() или какая то другая сомманда( count, index ...) - но ничего подобного не нахожу.

Для построения всех СА использую созданный класс на базе стандартно построенного Builderom СА(моих дополнений нет).
CA в DE->BeforeOpenTables создаю и там же отрабатывает Cursorfill() (первый прогон) затем AfterCursorFill из класса (ничего криминального) затем возврат в BeforeOpenTables и при выходе из него -второй прогон и затем отоброжается грид.

public KSP - определяется при входе в программу из другой таблицы.

Может мы открыли Америку!?
Для чистоты эксперимента:
Отказался от своего сласса СА, напрямую создал this.NEWOBJECT('ca1', 'CursorAdapter') в Load Формы СА, ЗАРЕМАРКИРОВАЛ
все методы и свойства Формы и Грида - загружается в 2 раза быстрее.

Ремаркирую Load Формы - переношу его содержимое в DE - Двойной прогон остался т.е. и как следствие в 2 раза медленнее.

Спасибо всем!
1 Dima T: только сейчас проверил с CA.NoData = .T. -> Грид пустой открывается.

2 Людмила : на форму с гридом изТулБоха мышкой перетащила DataEnvironment, затем в него из того же ТулБокса - CursorAdapter
Я не совсем понял эту технологию. Как организован ТулБох? Если можно подробнее!

3 Sea_Cat: да, вначале в моем слассе билдер создал в init
do case
case not pemstatus(This, '__VFPSetup', 5)
This.AddProperty('__VFPSetup', 0)
case This.__VFPSetup = 2
This.__VFPSetup = 0
return
endcase
я отказался и от этого - результат не изменился.
Поделитесь назначением этих строк

Спасибо, Sea_Cat

Спасибо, Людмила - только не понятно что с этими значками на форме делать? Получается два DE на форме!?(я взял для эксперимента старую форму где в DE что-то было) и чем отличается Ваш вариант от если в DE по правой кнопке мышки add CursorAdapter

Уточняю: зачем "Тупо на форму с гридом изТулБоха мышкой перетащила DataEnvironment" если DE уже существует даже
на вновь созданной форме?

Уважаемые, коллеги! Хочу вернуться к первоначальной теме.
Пытаюсь организовать асинхронный режим.
1 При -
** СА.MaxRecords = 100
СА.FetchSize = -1
СА .FetchAsNeeded = .F. естественно загружает все в Грид

2 При -
СА.MaxRecords = 100
СА.FetchSize = 100
СА .FetchAsNeeded = .Т. - Грид пустой

3 и только при -
СА.MaxRecords = 100
СА.FetchSize = -1 - !!!!
СА.FetchAsNeeded = .T. загружается первые 100 записей

????? почему СА.FetchSize = -1 и как в Гриде загрузить следующую порцию ???

Подумай, так ли нужны пользователю 80 тыс. записей? Смотреть в гриде устанет.
Dima T естественно с Вами согласен, но случаи бывют разные.
В ранних топиках попадались статьи об успешной организации асинхронного режима на базе СА. Установив (повторяюсь)
СА.FetchSize = 100
СА .FetchAsNeeded = .Т.
хотелось бы повторить подвиг

включи трассировку ODBC и посмотри лог для каждого случая. - Если не затруднит - подробнее как это сделать

Dima T благодарю! Когда что-то получится отпишусь. Текучка отвлекает.

Включил трассировку
Включил SQLSETPROP(handle, 'Asynchronous', .T.)
На форме создал кнопку с такой командой:
lnResult = SQLEXEC(m.gn_Soed,'') т.е. так пытаюсь дернуть следующую порцию

проверяю в степе
lnResult = -1
И вот последние строки лога:
ошибка видна - но хотелось бы поточнее читать и понимать каждую строчку!

vfp9 868-f9c ENTER SQLSetStmtOption
HSTMT 0x00B6AB08
UWORD 9 <SQL_ROWSET_SIZE>
SQLPOINTER 1

vfp9 868-f9c EXIT SQLSetStmtOption with return code 0 (SQL_SUCCESS)
HSTMT 0x00B6AB08
UWORD 9 <SQL_ROWSET_SIZE>
SQLPOINTER 1

vfp9 868-f9c ENTER SQLExecDirect
HSTMT 0x00B6AB08
UCHAR * 0x01E0DEA8 [ -3] "\ 0"
SDWORD -3

vfp9 868-f9c EXIT SQLExecDirect with return code -1 (SQL_ERROR)
HSTMT 0x00B6AB08
UCHAR * 0x01E0DEA8 [ -3] "\ 0"
SDWORD -3

DIAG [S1000] [MySQL][ODBC 3.51 Driver][mysqld-5.1.48-community]Query was empty (1065)

vfp9 868-f9c ENTER SQLErrorW
HENV 0x00B6FF58
HDBC 0x00B6A828
HSTMT 0x00B6AB08
WCHAR * 0x0012DAC0
SDWORD * 0x0012DB08
WCHAR * 0x0012D6C0
SWORD 512
SWORD * 0x0012DB0C

vfp9 868-f9c EXIT SQLErrorW with return code 0 (SQL_SUCCESS)
HENV 0x00B6FF58
HDBC 0x00B6A828
HSTMT 0x00B6AB08
WCHAR * 0x0012DAC0 [ 5] "S1000"
SDWORD * 0x0012DB08 (1065)
WCHAR * 0x0012D6C0 [ 65] "[MySQL][ODBC 3.51 Driver][mysqld-5.1.48-community]Query was empty"
SWORD 512
SWORD * 0x0012DB0C (65)

vfp9 868-f9c ENTER SQLErrorW
HENV 0x00B6FF58
HDBC 0x00B6A828
HSTMT 0x00B6AB08
WCHAR * 0x0012DAC0
SDWORD * 0x0012DB08
WCHAR * 0x0012D6C0
SWORD 512
SWORD * 0x0012DB0C

vfp9 868-f9c EXIT SQLErrorW with return code 100 (SQL_NO_DATA_FOUND)
HENV 0x00B6FF58
HDBC 0x00B6A828
HSTMT 0x00B6AB08
WCHAR * 0x0012DAC0
SDWORD * 0x0012DB08
WCHAR * 0x0012D6C0
SWORD 512
SWORD * 0x0012DB0C

vfp9 868-f9c ENTER SQLCancel
HSTMT 0x00B6AB08

vfp9 868-f9c EXIT SQLCancel with return code 0 (SQL_SUCCESS)
HSTMT 0x00B6AB08

vfp9 868-f9c ENTER SQLCancel
HSTMT 0x00B6AB08

vfp9 868-f9c EXIT SQLCancel with return code 0 (SQL_SUCCESS)
HSTMT 0x00B6AB08

проверил --- AsyncSQL.zip - 2Kb) cкачать

select top 100 * from ttt MySQL не понимает а вот так select * from ttt limit 100 - работает, но дальше не двигается

тогда теряется понятие асинхронности