FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Usando ADS con archivos ADT
Posts: 44
Joined: Fri Feb 03, 2006 06:42 PM
Usando ADS con archivos ADT
Posted: Wed May 10, 2006 10:44 PM

Siguiendo diversas instrucciones, fundamentalmente del maestro René en este foro y en su blog, logré hacer funcionar Servidor ADS Remoto con tablas ADT.
Con la salvedad que se me presentan errores con el uso de la clase tDbf.
Aclaro que utilizando DBF-CDX no se presenta el error (también con ADS remoto).
Saludos

El error.log me queda así.

Application

Path and name: C:\SIMEDHB\SIMEDHB.exe (32 bits)
Size: 1,905,152 bytes
Time from start: 0 hours 0 mins 19 secs
Error occurred at: 10/05/2006, 19:51:16
Error description: Error BASE/1102 Error de argumento: UPPER
Args:
[ 1] = U

Stack Calls

Called from: => UPPER(0)
Called from: => TFIELD:NEW(55)
Called from: => TDBF:AUTOFIELD(0)
Called from: => TDBF:ACTIVATE(0)
Called from: => TDBF:USE(0)
Called from: => ALTAPROC(0)
Called from: => (b)PROCESOS(0)
Called from: => TBTNBMP:CLICK(0)
Called from: => TWINDOW:LBUTTONUP(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => _FWH(0)
Called from: => DIALOGBOX(0)
Called from: => TDIALOG:ACTIVATE(0)
Called from: => PROCESOS(0)
Called from: => (b)MENUBASE(0)
Called from: => TMENU:COMMAND(0)
Called from: => TWINDOW:COMMAND(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => _FWH(0)
Called from: => WINRUN(0)
Called from: => TWINDOW:ACTIVATE(0)
Called from: => MAIN(0)

Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Usando ADS con archivos ADT
Posted: Wed May 10, 2006 11:18 PM
IVAN

Yo tb tuve problemas, pero lo solucione asi

local oMa
DEFINE DATABASE oMa FILE ( "PATENTE.ADT" ) PATH "" VIA "ADS"
	FIELD NAME "NUM_PAT"    TYPE "C" LEN 007 DEC 00 OF oMa
	FIELD NAME "NUM_STOCK"  TYPE "N" LEN 010 DEC 00 OF oMa
	FIELD NAME "MARCA"      TYPE "C" LEN 020 DEC 00 OF oMa
	FIELD NAME "MODELO"     TYPE "C" LEN 020 DEC 00 OF oMa
	FIELD NAME "VIN"        TYPE "C" LEN 020 DEC 00 OF oMa
	FIELD NAME "COLOR"      TYPE "C" LEN 015 DEC 00 OF oMa
	FIELD NAME "USUARIO"    TYPE "C" LEN 013 DEC 00 OF oMa


ACTIVATE DATABASE oMa NORECYCLE SHARED


Saludos
Patricio
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 44
Joined: Fri Feb 03, 2006 06:42 PM
Usando ADS con archivos ADT
Posted: Thu May 11, 2006 10:35 PM

OK Gracias Patricio, lo probé y aparentemente así funciona.
Pero no hay alguna otra forma que defina automáticamente los Fields?
Cuál es la última versión que hay de TDbf? la que yo tengo tuvo su últ. actualización el 12/03/2003 (según el arch. historia.txt que lo acompaña).
Bueno.... cualquier sugerencia es bienvenida.

Saludos. Iván

Continue the discussion