:: Visual Foxpro, Foxpro for DOS
• Войти
Thisform.DataEnvironment.TABLE.CursorRefresh() вначале показывает Query
pap
Автор

Сообщений: 69
Откуда: Уральск
Дата регистрации: 14.01.2006
pap
19.05.20 07:09:58
В DE формы курсор адаптер при Thisform.DataEnvironment.rl_arh.CursorRefresh() вначале показывает Query.
Как если бы в select * from table нет INTO cursor
Но DataEnvironment selectCmd и не надо указывать INTO cursor
Причем в этой же форме другие курсор-адаптеры открываются нормально.
Это для NATIVE. Для ODBC всё нормально.
Ratings: 0 negative/0 positive
Re: Thisform.DataEnvironment.TABLE.CursorRefresh() вначале показывает Query
PaulWist

Сообщений: 14621
Дата регистрации: 01.04.2004
PaulWist
19.05.20 13:48:02
Ну давай репо-код, что бы не гадать где ошибка.


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Thisform.DataEnvironment.TABLE.CursorRefresh() вначале показывает Query
pap
Автор

Сообщений: 69
Откуда: Уральск
Дата регистрации: 14.01.2006
pap
20.05.20 07:38:01
Непонятно как воспроизвести ситуацию. 
CLOSE TABLES ALL

lcImFile = "rlarhiv"

datrw = DATE(2020,1,1)

t_n=915

lcCmd = "SELECT Rlarhiv.*,Snu.nk,Snu.nach,Snu.uderj FROM rlarhiv,snu  WHERE Rlarhiv.vo = Snu.vo and Rlarhiv.tn = ?t_n AND Rlarhiv.datar =?datrw"

    lo_CA=CREATEOBJECT("CursorAdapter")

    lo_CA.ALIAS="rl_arh"

    lo_CA.DATASOURCETYPE="NATIVE"

    lo_CA.DATASOURCE=oApp.cDataBase

    lo_CA.SELECTCMD=LOWER(lcCmd)

    *lo_CA.DATASOURCETYPE="ODBC"  && Извиняюсь ошибся для SQL не надо

    *lo_CA.DATASOURCE=oApp.SqlHandle

    lo_CA.SELECTCMD=LOWER(lcCmd)

    lo_CA.TABLES=LOWER(lcImFile)

    lo_CA.FetchSize = -1 

    lo_CA.SendUpdates =.T.

    lo_CA.UpdateNameList = "" 





llCursorFilled=lo_CA.CURSORFILL()

IF llCursorFilled

    SELECT rl_Arh

    BROWSE NORMAL 

ELSE

    =AERROR(laErr)

    SUSPEND 

ENDIF

t_n=102

llCursorFilled=lo_CA.CURSORREFRESH()

    SELECT rl_Arh

    BROWSE NORMAL
Этот пример работает как надо.
А вот в форме в курсор адаптер SelectCmd эта же строка
При запуске сначала открывает browse с query. Esc - закрываю Browse
в форме грид показывает то что запросил.



Исправлено 1 раз(а). Последнее : pap, 20.05.20 08:09
Ratings: 0 negative/0 positive
Re: Thisform.DataEnvironment.TABLE.CursorRefresh() вначале показывает Query
pap
Автор

Сообщений: 69
Откуда: Уральск
Дата регистрации: 14.01.2006
pap
20.05.20 07:45:16
Сейчас отказался от курсор адаптера в DE.
Формирую строку запроса в методе формы
и грид обновляю уже из этого запроса.
Всё работает.
Так что тему можно закрыть.
Хотя и не понятно почему
при Thisform.DataEnvironment.rl_arh.CursorRefresh() вначале появлялся Browse c результатом.
Ratings: 0 negative/0 positive


:: Список Форумов•Список тем•Поиск•Войти
Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 29 PaulWist  (Гостей: 28)
© 2000-2024 Fox Club 
Яндекс.Метрика