FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC duda sobre la localizacion de registros mediante indices...
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 09:47 AM

Hola a todos..

Tengo una duda sobre la busqueda por indices y es que al declararme la tabla y especificarle el indice intento realizar un seek sobre el indice y me da error...

La tabla la declaro de la siguiente forma:

USE ( CurDir() + "\articulos" ) VIA "DBFCDX" new
articulos->( OrdSetFocus( "cod_art" ) )
cAliasArticulos := Alias()

Luego intento hacer un seek("codigodelarticulo") y me da error. Puede ser simplemente que la declaracion del seek no sea asi. La verdad es que no he encontrado nada que me diga como es. Por eso recurro de nuevo aqui....

驴Alguien sabe algo?

Saludos y gracias.

El铆as Torres.

Posts: 1283
Joined: Fri Feb 10, 2006 02:34 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 10:30 AM

Hola,

(cAliasArticulos)->( DbSeek( tucodigodelarticulo ) )

Adios

Salutacions, saludos, regards

"...programar es f谩cil, hacer programas es dif铆cil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
HIX -> https://github.com/carles9000/hix
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 11:06 AM

Hola Carles,

Gracias por la informaci贸n pero no me funciona. Se supone que el dbseek() lo que hace es posicionar el puntero en el registro de la tabla que se indique en base a la relaci贸n que se ponga y a partir de ahi se podr铆a mostrar cualquier campo del registro, correcto?, pues no me va.....

No me da error pero no me muestra nada...

Seguir茅 averiguando el por que.....

Saludos y gracias.

El铆as Torres.

Posts: 1283
Joined: Fri Feb 10, 2006 02:34 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 12:33 PM
Elias,

- Tienes correctos los indices ?
- Hay registros q cumplen la condicion ?

Prueba de abrir la tabla y crear el indice de nuevo.

USE ...
INDEX ON .. TO ...
...

(cAlias)->( DbSeek( codigodearticulo, .t. ) )

WHILE (cAlias)->codigo == codigodearticulo .AND. (cAlias)->( !Eof() )
 
   MsgInfo( (cAlias)->(FieldGet(1) ) )

   (cAlias)->( DbSkip() )

END


Siau.
Salutacions, saludos, regards

"...programar es f谩cil, hacer programas es dif铆cil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
HIX -> https://github.com/carles9000/hix
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 04:19 PM

Hola Carles,

Al final he solucionado el tema de los indices, gracias. Lo que me pasa es que me surgi贸 otro problema... Cuando me posiciono con el indice en la tabla me muestra de ahi para abajo. Te pongo un ejemplo, supongamos que de la tabla solo quiero mostrar los dos primeros registros que son los que cumple las condicion de los indices, pero me muestra esos dos mas el resto....

Estoy utilizando un LISTBOX para mostrar la informacion, pero no se como decirle que si cambia el codigo del cliente no me siga mostrando ningun registro.

En definitiva, lo que pretendo es hacer lo mismo que hace set filter pero con indices, no se si me he explicado.....

(cAliasArticulos)->( DbSeek( (cAliasCliente)->codcli, .t. ) )

DEFINE dialog odlg resource "Cliente_articulos"

redefine LISTBOX oBrw ;
FIELDS articulos->cod_art,articulos->nom_art,STR(articulos->cant),STR(articulos->precio) ;
HEADERS "C贸digo", "Descripci贸n", "Cant", "Precio" ID 100 OF oDlg

ACTIVATE dialog odlg

Saludos y gracias....

El铆as Torres.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
duda sobre la localizacion de registros mediante indices...
Posted: Fri Oct 06, 2006 04:54 PM

El铆as,

A帽ade esto:

redefine LISTBOX oBrw ;
FIELDS articulos->cod_art,articulos->nom_art,STR(articulos->cant),STR(articulos->precio) ;
HEADERS "C贸digo", "Descripci贸n", "Cant", "Precio" ID 100 OF oDlg ;
SELECT articulos->cod_cli FOR (cAliasCliente)->codcli

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion