ADS Server + Clipper

[jrestojeda]

Buen día.
Tengo una vieja aplicación en Clipper de 16 bits con DBF/CDX.
Quería saber si existe la posibilidad de adaptarla para usar ADS Server. Obviamente lo ideal sería ya migrarla a FiveWin, pero por cuestiones de tiempo quisiera ir primero por ese camino para luego ir migrando de a poco.
Si alguien tiene algún ejemplo mínimo de como se debería implementar o algo estaré agradecido.
Desde ya muchas gracias.

[Antonio Linares]

Esteban,

Prueba a construirla con Harbour. Deberias ser capaz de construirla facilmente.

Una vez la tengas funcionando con Harbour, el resto es muy simple

[jrestojeda]

Si Antonio, conozco los pasos una vez que la tengo en 32 bits.
En este caso particular, he notado que está desarrollado de una manera bastante desprolija y pasarlo implican muchas cosas para corregir.
Variables no declaradas, variables con nombres largos que al ser de 16 bits funcionan porque se trucan etc...

Ej:
Local MiVariableLarga := 0

y al usarla ponen
MiVariableLar := 1
MiVariableL := 2

En 16 bits anda porque se trunca, pero al pasar a 32 vuela en 1000 pedazos todo.
Por eso consultaba si había algun ejemplo de ADS en 16 bits, porque antes debería corregir todas esas inonsistencias que no fueron pensadas por las personas que escribieron ese fuente. (Son fuentes muy viejos)

De todos modos, muchas gracias por tu respuesta.
Saludos,

[Antonio Linares]

Entonces entiendo que lo único que necesitas son las librerias de ADS para Clipper

[jrestojeda]

Así es...
Si es que existen.

[Antonio Linares]

Si que existe. La cuestión ahora es encontrarla

[Antonio Linares]

Aqui la tienes, gracias a Cristobal

http://devzone.advantagedatabase.com/dz/content.aspx?key=20&Release=19&Product=19&Platform=6

[jrestojeda]

Muchas gracias a ambos!

[jrestojeda]

Antonio,
¿Cómo estás?
Si quisiera pasar un PRG de clipper 5.3 a Harbour para 32bits.
Qué pasos debería hacer?
Podrías darme una mano para poder compilar?
Desde ya muchas gracias.

Saludos,

[Antonio Linares]

Te refieres a construir toda la aplicación ó solo a compilar un PRG ?

Para el primer caso, solo tienes que crear un archivo HBP y usar hbmk2.exe

Para compilar un sólo PRG:
harbour /n fichero.prg

[jrestojeda]

Contruir una aplicación completa.
La tengo en clipper, tengo todos los PRGs.

Ej: Tengo
INICIO.PRG -> Aquí está la función Main()
FUNCIONES.PRG
VARIOS.PRG
OTRO.PRG

Con esos 4 PRGs quisiera armar Sistema.exe
Desde ya muchas gracias.
Saludos

[Antonio Linares]

miapp.hbp

Code: Select all | Expand

INICIO.PRG
FUNCIONES.PRG
VARIOS.PRG
OTRO.PRG

hbmk2.exe miapp.hbp

Asi de simple

[jrestojeda]

Antonio,
Muchas gracias por la respuesta.

Intenté compilar de la manera indicada lo siguiente un solo PGR con el siguiente código :

Code: Select all | Expand

// INICIO DEL PROGRAMA //
Function Main()

SetMode(25,80)
CLS
@ 10,10 say 'Hello World'

Return nil
 

Al compilar me da el siguient error:

Code: Select all | Expand

Fatal: Unable to open file 'HBEXTERN.LIB'
 

Que me estaría faltando?
Desde ya muchas gracias.
Saludos,

[jrestojeda]

Ya pude generar el .exe
Agregué la lib y quedó.
Muchas gracias.