Pesquisa incrementa no PostgresSql?

andrelucass · Mensagem por **andrelucass** » 18 Nov 2015 00:02

Ola a todos

Estou migrando o banco de dados .DBF para postgresql sem usar a rddsql, gostaria de saber se alguem tem uma rotina de pesquisa incremental no tbrowse. Ex. o tbrowse de produtos onde o usuário digita o nome do produto e tbrowse faz a pesquisa.

Atenciosamente
André Lucas Souza

Mensagem por **JoséQuintas** » 18 Nov 2015 17:45

O que tenho usado pra simplificar é converter o resultado do SELECT pra DBF.
Conversão local e arquivo temporário local.
E SELECT apenas dos campos indispensáveis ao browse.

andrelucass · Mensagem por **andrelucass** » 18 Nov 2015 22:07

Poderia exemplificar?

Mensagem por **JoséQuintas** » 19 Nov 2015 03:24

Uso pra MySQL, não pra postgress.
Basicamente é processar o recordset.
Pra simplificar, supondo que os campos do DBF e recordset estejam de acordo, algo assim:

Código: Selecionar todos

oRs := cnMysql:Execute( "SELECT * FROM ARQUIVO" )
DO WHILE .NOT. oRs:Eof()
   APPEND BLANK
   FOR nCont = 1 TO oRs:FieldCount()
      FieldPut( nCont, oRs:Fields( nCont - 1 ):Value )
   NEXT
   oRs:MoveNext()
ENDDO
oRs:Close()