Hola.
Quisiera saber si existe alguna funci贸n que pregunte al 铆ndice CDX por una clave y devuelva un array de registros que apuntan a esa clave.
Un saludo
Paco Garc铆a
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour funci贸n para saber claves de una entrada CDX
SELECT (laTabla)
SET ORDER TO (elIndice)
aResult := Array()
dBSeek( cClaveABuscar )
WHILE !Eof() .AND. OrdKeyVal() == cClaveABuscar
aAdd( aResult, Recno() )
SKIP
ENDDO
Saludos
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
鈥淚f you think education is expensive, try ignorance"
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
鈥淚f you think education is expensive, try ignorance"
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo
El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo
El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Hola, gracias por las respuestas.
As铆 es como lo hice:
En todo caso, creo que debe de poderse sacar la informaci贸n directamente del 铆ndice de alguna forma.
El 铆ndice debe de guardar un conjunto de valor -> nRecno para poder acceder a la informaci贸n.
Eso ser铆a genial sin tener que hacer b煤squedas.
Un saludo
As铆 es como lo hice:
*****************************************************************************************************************************************
function aGetDetails( cCode, cFieldName )
*****************************************************************************************************************************************
local nPos := FieldPos( cFieldName )
local aRet := {}
local nRecno := Recno()
local nOrder := IndexOrd()
DbSetOrder(1)
if DbSeek( cCode, .t. )
do while fieldGet( nPos ) == cCode
aadd( aRet, Recno() )
DbSkip()
enddo
endif
DbGoto(nRecno)
DbSetOrder( 0 )
return aRetEn todo caso, creo que debe de poderse sacar la informaci贸n directamente del 铆ndice de alguna forma.
El 铆ndice debe de guardar un conjunto de valor -> nRecno para poder acceder a la informaci贸n.
Eso ser铆a genial sin tener que hacer b煤squedas.
Un saludo
Paco Garc铆a