Clipper/FiveWin - Twbrowse + scoped en clipper

 
Vista:

Twbrowse + scoped en clipper

Publicado por Cesar (153 intervenciones) el 23/10/2002 17:08:15
Estoy utilizando el objeto twbrowse en clipper 5.3 y necesito implementar filtros para mostrar cierta informacion lo mas rapido posible (sin utilizar el famoso set filter o la funcion index on ... for....
Alguien me da una ayuda con este tema.
Saludos
Argentina
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Twbrowse + scoped en clipper

Publicado por Daniel (7 intervenciones) el 23/10/2002 17:45:16
Si tu intención no es usar índices o la cláusula set filter, no te quedan muchas opciones mas para filtrar información. Un último recurso sería trabajar con un archivo borrador o temporal, como suelo llamarlos, un par de ejemplos de estos serían:

Ejemplo 1)
use dbforiginal
copy to dbfborrador for ...condición...
use dbfborrador
brow

En esta ultima dbf solo tendrías la información que quieres ver, eso si, si tu dbforiginal es extensa este proceso demorará muchos mas según el tamaño de la misma y el microprocesador de la pc en que esté ejecutandose.

Ejemplo 2)
Para este ejemplo indefectiblemente necesitaras un índice

select 1
use dbforiginal
index on ...condicion... to dbforiginal
copy stru to dbfborrador
select 2
use dbfborrador
seek datos_condicion
do while !eof() .and. dbforiginal->datos=datos_condicion
select dbfborrador
append blank
...replace...
select dbforiginal
skip
enddo
select dbfborrador
brow

Es lo que se me ocurre que puedes utilizar, tal vez no sea la respuesta a tu pregunta, pero es lo que interpreté.
Si necesitas algo no dudes en consultarme. Saludos desde Rosario, Argentina.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Twbrowse + scoped en clipper

Publicado por Víctor Manuel Tomás Díaz (93 intervenciones) el 23/10/2002 18:19:28
Cesar :

La versión 5.3 de clipper incluye el driver dbfcdx que te permite usar Scopes.

Para integrar el driver a tu programa agrega las siguientes lineas en .prg principal.

REQUEST DBFCDX
RDDSETDEFAULT("DBFCDX")

y las librerias dbfcdx.lib y _dbfcdx.lib

Los scopes los haces sobre el indice activo de la tabla :

cAlias->( OrdScope( 0 , "FAC" ) // Inicio del Scope
cAlias->( OrdScope( 1 , "FAC" ) // Fin del Scope

un Scope for Fecha.

cAlias->( OrdScope( 0 , Dtos(Date()-7 ) )
cAlias->( OrdScope( 1 , Dtos(Date() ) )

Saludos
Víctor Manuel Tomás Díaz
México
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

otra forma RE:Twbrowse + scoped en clipper

Publicado por Jose Cordero (33 intervenciones) el 23/10/2002 22:24:09
Si tienes que utilizar el driver CDX, para el manejo de DBF, o si no tambien difine en el Tbrowse los code block de movimientos ....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar