Estimadso amigos:
Necesito un ejemplo desde codigo para hacer indice FTS de Ads o
Tambien me sirve algo similar en Indices Cdx nativos de Harbour, con busqueda "tipo" FTS.
Muchas gracias.
Em SQL
AdsCreateSqlStatement("CLIENTES",3)
(CLIENTES)->(AdsPrepareSQL("SELECT DISTINCT CLIENTE FROM CLIENTES WHERE CONTAINS(NOME,'EDUARDO SILVA')")
(CLIENTES)->(AdsExecuteSQL())
CLIENTES->(xBrowse())
Em Rdd Pure Harbour
cAof := "CONTAINS(NOME,'EDUARDO SILVA')"
USE CLIENTES ALIAS CLIENTES NEW
CLIENTES->(AdssetAof(cAof))
CLIENTES->(xBrowse())
Em Tads Rdd
cAof := "CONTAINS(NOME,_NomePesquisa_)"
aVars := {}
aadd(aVars,{"_NomePesquisa_","EDUARDO SILVA"})
oDb_Clientes := tAds():RddNew("CLIENTES")
oDb_Clientes:Filter(cAof,aVars)
(oDs_Clientes:cAlias)->(xBrowse())
Em Tads DataSet
oDs_Clientes := tAds():DsNew(1)
oDs_Clientes:cQrySql := "SELECT DISTINCT CLIENTE FROM CLIENTES WHERE CONTAINS(NOME,_NomePesquisa_)"
oDs_Clientes:DsAddVar("_NomePesquisa_","EDUARDO SILVA")
oDs_Clientes:dsExecute()
(oDs_Clientes:cAlias)->(xBrowse())Excelente, Gracias.
En puro Harbour acepta AdsSetAof() ?
Em Rdd Pure Harbour
cAof := "CONTAINS(NOME,'EDUARDO SILVA')"
USE CLIENTES ALIAS CLIENTES NEW
CLIENTES->(AdssetAof(cAof))
CLIENTES->(xBrowse())
Saludos y gracias.