Carlos,



Los RDD son las librerías que se llaman así.

EN cuanto a usar más de un RDD, debes incluir en el fuente principal, las
instrucciones REQUEST DBFCDX,DBFNTX, etc…

Luego si quieres puedes utilizar la función RddSetDefault( “DBFCDX” ) y así
un comando USE sin VIA abre por defecto los CDX, o por el contrario, no
toques nada y por defecto es NXT.



Creo que se me olvida algo … DBFFPT (el rdd que maneja los memos de los
CDX).



Claudio Torrillo



De: ifclipper@... [mailto:ifclipper@...] En
nombre de carlos teler
Enviado el: jueves, 11 de junio de 2009 09:36 a.m.
Para: ifclipper@...
Asunto: Re: [ifclipper] Re: Files Clipper & Harbour








Te agradezco la pronta respuesta, muy amable.
Si es muy cierta tu afirmación, el problema es que tengo un nuevo desarrollo
en Harbour pero debo mantener funcionando mi viejo sistema en Clipper (es
del 98) y me va a llevar algún tiempo actualizar todos los programas (es un
sistema complejo y grande) y debo hacer la transición sin interrupciones
(cobranza todos los días).
De todos modos, creo que ya funciona, pero con los índices viejos para los
archivos viejos.
Me quedaría por resolver como usar distintos índices (nuevo cdx para
archivos nuevos y viejo ntx para archivos viejos) en el mismo módulo de
harbour.
Gracias nuevamente por haberte ocupado de mi consulta.

--- On Thu, 6/11/09, Juan Carlos <juanca252@...
<mailto:juanca252%40yahoo.com.ar> > wrote:

From: Juan Carlos <juanca252@... <mailto:juanca252%40yahoo.com.ar>
>
Subject: [ifclipper] Re: Files Clipper & Harbour
To: ifclipper@... <mailto:ifclipper%40gruposyahoo.com.ar>
Date: Thursday, June 11, 2009, 9:24 AM

Hola : Mira con Harbour podes compilar y ejecutarlo igual que con clipper ,
la ventaja de los cdx sobre los ntx esta mas que nada en el tema filtro y y
en la velocidad . si la aplicacion es para windows xp o superior debes
incluir en el programa la orden SetHandleCount( nn) donde nn = Numero de
archivos arbiertos.

si queres te puedo mandar un ejemplo

#Include "Ord.ch"

//----- Var Staticas
extern DbfCdx

//----- Var Staticas
Static oWnd
//---------- --------- --------- --------- --------- --------- ---//
Function Main()
Local oCabeza
Local oIco
Local oStock
Local oNota
Local oBar
Local oBrush
Local oFont1
SetBalloon(. T.)
SET DATE FORMAT TO "DD/MM/YYYY"
SET EXCLUSIVE OFF
SetHandleCount( 100)
REQUEST DBFCDX
RddSetDefault( "DBFCDX")
Set3Dlook(.T. )
SET DELETE ON

Return( Nil )
//---------- --------- --------- --------- --------- --------- ---//

Asi como esta funciona correctamente. .. espero que te sirva

--- En ifclipper@gruposyah oo.com.ar, "Claudio G Torrillo" <clipsupp@.. .>
escribió:
>
> Si bien la lista no es la que corresponde, te pregunto cuál es el
problema?
>
> No tienes más que compilar los RDDs correspondientes con tu aplicación y
> especificar la VIA correspondiente.
>
>
>
> Claudio Torrillo
>
> Xcsa.com.ar
>
>
>
> De: ifclipper@gruposyah oo.com.ar [mailto:ifclipper@gruposyah oo.com.ar]
En
> nombre de carlos teler
> Enviado el: miércoles, 10 de junio de 2009 07:04 p.m.
> Para: grupos ifclipper
> Asunto: [ifclipper] Files Clipper & Harbour
>
>
>
>
>
>
>
>
> Tengo archivos dbf con los índices normales de Clipper y nuevos dbf con
> índices cdx. Necesito mantener los anteriores sin alteración pero querria
> poder leerlos con Harbour.
> Alguien me puede tirar una idea ? Gracias.
>
> [Se han eliminado los trozos de este mensaje que no contenían texto]
>
>
>
>
>
> [Se han eliminado los trozos de este mensaje que no contenían texto]
>

[Se han eliminado los trozos de este mensaje que no contenían texto]





[Se han eliminado los trozos de este mensaje que no contenían texto]