topic-14208

Posts: 94

Joined: Thu May 11, 2006 10:00 PM

ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 03:12 PM

Antonio, hasta ahora nuestras aplicaciones usaban el RDD de ADS para trabajar las DBF, creabamos una ADSCONNECT al server poniamos SET REMOTE SERVER abriamos las bases , ademas usabamos SET SERVER LOCAL para abrir las bases que la terminal usa localmente y funcionanba bien usando siempre el driver de ADS, pues ahora es como que el SET SERVER LOCAL ya no funciona si antes abrimos una conexion al server, nos arroja el siguiente error ADSCDX/5024 AE_INVALID_CONNECTION_HANDLE - Advantage does not have a connection open with the specified handle, por ende la unica solucion posible es abrir las locales haciendo VIA "DBFCDX", porque ?? , de la forma anterior siempre usabamos el mismo driver para abrir bases local como remotas al mismo tiempo que cambio en esta version ??,

Compilacion anterior driver:
Linked RDDs
===========
DBF
DBFDBT
DBFNTX
DBFCDX
ADS

Compilacion nueva:
Linked RDDs
===========
ADS
ADT
ADSCDX
ADSNTX
DBF
DBFFPT
DBFBLOB
DBFNTX
DBFCDX

Código Usado al inicio:

Code: Select all Collapse

RDDREGISTER  ( "ADS", 1 )
RDDSETDEFAULT( "ADS" )
SET FILETYPE TO CDX
cr_modo:=AdsConnect(ud)
IF cr_modo
   SET SERVER REMOTE
	 cr_conx:="Cs"
   ELSE
 	 SET SERVER LOCAL
	 cr_conx:="Di"
ENDIF

Codigo para abrir las bases locales y remotas:

Code: Select all Collapse

//----------------------------------------------------------------------
// FUNCIONES DE RED //
//----------------------------------------------------------------------
FUNCTION abrir_dbf(base)

LOCAL ali:="GR"+c_taba(), cind:=""

IF cr_modo .AND. LEFT(UPPER(base),3)!="GRP"
	 SET SERVER REMOTE
   ELSE
	 SET SERVER LOCAL
ENDIF

USE (base) ALIAS (ali) NEW SHARED
IF NETERR()
   MSGALERT("ERROR BASE: "+base+" OCUPADA POR OTRO USUARIO!!","ATENCION!!")
   DO WHILE .T.
      USE (base) ALIAS (ali) NEW SHARED
      IF NETERR()
         MSGALERT("ERROR BASE: "+base+" OCUPADA POR OTRO USUARIO!!","ATENCION!!")
         ELSE
         EXIT
      ENDIF
   ENDDO
ENDIF

IF FILE(cind+base+".CDX")
   SET INDEX TO (cind+base+".CDX")
ENDIF

DBSELECTAR (ali)
GO TOP

RETURN(ali)

ALGUNA AYUDA POR FAVOR !!
GRACIAS,
SALUDOS,

GUSTAVO PREDIGER

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:17 PM

Gustavo,

Me alegro que por lo menos ya sepamos de donde viene el problema :-)

Debe haberse modificado algo en el RDD de ADS o en el propio ADS. FWH no interviene en esos procesos para nada.

Has buscado en google por ese codigo de error por si alguien mas comenta algo acerca de el ?

regards, saludos

Antonio Linares
www.fivetechsoft.com

GUSPRE

Posts: 94

Joined: Thu May 11, 2006 10:00 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:27 PM

Antonio, me canse realmente, 5 días ya, el problema esta en el RDDADS.LIB de xharbour que algo a cambiado de eso estoy seguro, para no seguir perdiendo tiempo PREGUNTA, PUEDO USAR EL RDDADS.LIB de un xharbur viejoi que se que anda ?? como lo compilo para que sea compatible a la version que vino con fwh 8_12 y no tire PCODE error ???

Garcias

GUSTAVO PREDIGER

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:38 PM

Gustavo,

Mi consejo es que revises esta pagina:

http://xharbour.cvs.sourceforge.net/vie ... b/rdd_ads/

y que le comentes el problema a cualquiera de los que estan modificando el RDD de ADS, por ejemplo, a Miguel Angel Marchuet o a Luis Krause. En esa pagina estan sus emails.

Seguro que pueden darte una solucion rapida y de paso quedara solucionado para futuras versiones :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

GUSPRE

Posts: 94

Joined: Thu May 11, 2006 10:00 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:46 PM

GRACIAS ANTONIO ESO HARE, POR AHORA VULVO TODO PARA ATRAS

SALUDOS,

GUSTAVO PREDIGER

GUSPRE

Posts: 94

Joined: Thu May 11, 2006 10:00 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:49 PM

Antonio el link que me diste, no funciona,

An Exception Has Occurred
The root "harbour" is unknown. If you believe the value is correct, then please double-check your configuration.

HTTP Response Status

404 Repository not found

saludos,

GUSTAVO PREDIGER

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 07:55 PM

Gustavo,

Prueba con este enlace:

http://xharbour.cvs.sourceforge.net/xharbour/

Miguel Angel ha modificado el RDD de ADS hace dos meses:
2008-10-22 10:30 UTC+0100 Miguel Angel Marchuet <miguelangel@marchuet.net>

Luis Krause lo hizo hace seis meses:
2008-06-09 16:07 UTC-0800 Luis Krause Mantilla <lkrausem /at/ shaw /dot/ ca>...

http://xharbour.cvs.sourceforge.net/vie ... b/rdd_ads/

Mi consejo: Antes de modificar nada, o volver atras, enviales un email y comentales el problema. Ambos hablan espanol

Quedarte en una version antigua solo te traera mas problemas con el paso del tiempo...

regards, saludos

Antonio Linares
www.fivetechsoft.com

GUSPRE

Posts: 94

Joined: Thu May 11, 2006 10:00 PM

Re: ADS - FWH_812 Y xHAR ( LOCAL REMOTO)
Posted: Thu Jan 08, 2009 08:03 PM

Gracias Anotnio ya pude entrar, pero no veo nada, ahora les escribiré,

Saludos,

GUSTAVO PREDIGER

FiveTech Support Forums

Continue the discussion