In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

OT Ayuda - Conexion con ADS - caracter raro

Foro de Xailer profesional en español
Responder
juanc
Mensajes: 105
Registrado: Vie Dic 14, 2007 12:15 am

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por juanc »

Pido ayuda para resolver sl siguiente detalle:
Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009) agrega
un caracter raro al final en los campos leidos, agrego el codigo de prueba
mas simple que pude hacer para compilar con xedit2 y la imagen del
resultado. Este caracter no lo muestra al accesar la tabla en forma directa.
Raro el caso y ya no encuentro que mas hacer :-(
/*
* Proyecto: prueba
* Fichero: Module1.prg
* Descripción:
* Autor:
* Fecha: 29/09/2009
*/
#include "Ads.ch"
Function Main()
request hb_gt_win
Request ADS
RddRegister("ADS",1)
ADSSetServerType(7)
AdsSetFileType(1)
AdsLocking(.F.)
AdsRightsCheck(.F.)
REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
Set Date To BRITISH
Set Century On
Set Epoch To 1950
Set Deleted On
Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
5.2
Use 192.168.16.99:6262SysDbfClientes Index
192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
Clientes->( DbSeek( "JUAN" ) )
Alert( "("+AllTrim( Clientes->Nombre )+")" )
Close Data
Return .T.
--
Juan Castillo Arteaga
Area de sistemas
C.Fernandez y Cia., S.A. de C.V.


Attached files
ssi-estono-
Mensajes: 239
Registrado: Sab Ene 24, 2009 8:23 pm

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por ssi-estono- »

Por si te sirve, con esa versión a mi tambien me paso algo parecido. Me
volvi loco y menos mal que tambien le ha pasado a otros, entre ellos al
"MAESTRO RENE".
Creo que lo solucionaban en la versión que salia hace unos dias.
Espero que alguien te aporte algo mas.
Paco V
"Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
> Pido ayuda para resolver sl siguiente detalle:
>
> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
> agrega un caracter raro al final en los campos leidos, agrego el codigo de
> prueba mas simple que pude hacer para compilar con xedit2 y la imagen del
> resultado. Este caracter no lo muestra al accesar la tabla en forma
> directa. Raro el caso y ya no encuentro que mas hacer :-(
>
>
> /*
> * Proyecto: prueba
> * Fichero: Module1.prg
> * Descripción:
> * Autor:
> * Fecha: 29/09/2009
> */
>
> #include "Ads.ch"
>
> Function Main()
>
> request hb_gt_win
>
> Request ADS
> RddRegister("ADS",1)
> ADSSetServerType(7)
> AdsSetFileType(1)
> AdsLocking(.F.)
> AdsRightsCheck(.F.)
> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>
> Set Date To BRITISH
> Set Century On
> Set Epoch To 1950
> Set Deleted On
> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
> 5.2
>
> Use 192.168.16.99:6262SysDbfClientes Index
> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
> Clientes->( DbSeek( "JUAN" ) )
>
> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>
> Close Data
>
> Return .T.
>
>
> --
> Juan Castillo Arteaga
> Area de sistemas
> C.Fernandez y Cia., S.A. de C.V.
>
>
ssi-estono-
Mensajes: 239
Registrado: Sab Ene 24, 2009 8:23 pm

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por ssi-estono- »

No lo se, el caso es que devuelve un caracter mas de lo que tiene el campo.
Tiene que ser problema de xharbour o de xailer, ya que la ADS no se ha
tocado.
Paco V
"Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
news:4ad380c8$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Muchas gracias Paco por responder, pero el detalle es con xharbour o con
> ADS ?
>
>
> Saludos Cordiales.
>
> "Paco V." <ssi-estono-@ono.com> escribió en el mensaje
> news:4ad37eea$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Por si te sirve, con esa versión a mi tambien me paso algo parecido. Me
>> volvi loco y menos mal que tambien le ha pasado a otros, entre ellos al
>> "MAESTRO RENE".
>>
>> Creo que lo solucionaban en la versión que salia hace unos dias.
>>
>> Espero que alguien te aporte algo mas.
>>
>> Paco V
>> "Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
>> news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
>>> Pido ayuda para resolver sl siguiente detalle:
>>>
>>> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
>>> agrega un caracter raro al final en los campos leidos, agrego el codigo
>>> de prueba mas simple que pude hacer para compilar con xedit2 y la imagen
>>> del resultado. Este caracter no lo muestra al accesar la tabla en forma
>>> directa. Raro el caso y ya no encuentro que mas hacer :-(
>>>
>>>
>>> /*
>>> * Proyecto: prueba
>>> * Fichero: Module1.prg
>>> * Descripción:
>>> * Autor:
>>> * Fecha: 29/09/2009
>>> */
>>>
>>> #include "Ads.ch"
>>>
>>> Function Main()
>>>
>>> request hb_gt_win
>>>
>>> Request ADS
>>> RddRegister("ADS",1)
>>> ADSSetServerType(7)
>>> AdsSetFileType(1)
>>> AdsLocking(.F.)
>>> AdsRightsCheck(.F.)
>>> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>>>
>>> Set Date To BRITISH
>>> Set Century On
>>> Set Epoch To 1950
>>> Set Deleted On
>>> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
>>> 5.2
>>>
>>> Use 192.168.16.99:6262SysDbfClientes Index
>>> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
>>> Clientes->( DbSeek( "JUAN" ) )
>>>
>>> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>>>
>>> Close Data
>>>
>>> Return .T.
>>>
>>>
>>> --
>>> Juan Castillo Arteaga
>>> Area de sistemas
>>> C.Fernandez y Cia., S.A. de C.V.
>>>
>>>
>>
>>
>
>
juanc
Mensajes: 105
Registrado: Vie Dic 14, 2007 12:15 am

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por juanc »

Muchas gracias Paco por responder, pero el detalle es con xharbour o con ADS
?

Saludos Cordiales.
"Paco V." <ssi-estono-@ono.com> escribió en el mensaje
news:4ad37eea$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Por si te sirve, con esa versión a mi tambien me paso algo parecido. Me
> volvi loco y menos mal que tambien le ha pasado a otros, entre ellos al
> "MAESTRO RENE".
>
> Creo que lo solucionaban en la versión que salia hace unos dias.
>
> Espero que alguien te aporte algo mas.
>
> Paco V
> "Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
> news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
>> Pido ayuda para resolver sl siguiente detalle:
>>
>> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
>> agrega un caracter raro al final en los campos leidos, agrego el codigo
>> de prueba mas simple que pude hacer para compilar con xedit2 y la imagen
>> del resultado. Este caracter no lo muestra al accesar la tabla en forma
>> directa. Raro el caso y ya no encuentro que mas hacer :-(
>>
>>
>> /*
>> * Proyecto: prueba
>> * Fichero: Module1.prg
>> * Descripción:
>> * Autor:
>> * Fecha: 29/09/2009
>> */
>>
>> #include "Ads.ch"
>>
>> Function Main()
>>
>> request hb_gt_win
>>
>> Request ADS
>> RddRegister("ADS",1)
>> ADSSetServerType(7)
>> AdsSetFileType(1)
>> AdsLocking(.F.)
>> AdsRightsCheck(.F.)
>> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>>
>> Set Date To BRITISH
>> Set Century On
>> Set Epoch To 1950
>> Set Deleted On
>> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
>> 5.2
>>
>> Use 192.168.16.99:6262SysDbfClientes Index
>> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
>> Clientes->( DbSeek( "JUAN" ) )
>>
>> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>>
>> Close Data
>>
>> Return .T.
>>
>>
>> --
>> Juan Castillo Arteaga
>> Area de sistemas
>> C.Fernandez y Cia., S.A. de C.V.
>>
>>
>
>
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9246
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por ignacio »

Juan,
Sería fantástico poder tener un ejemplo que muestre el problema. Sin él es
difícil ayudarle, lo siento.
Un saludo
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
> Pido ayuda para resolver sl siguiente detalle:
>
> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
> agrega un caracter raro al final en los campos leidos, agrego el codigo de
> prueba mas simple que pude hacer para compilar con xedit2 y la imagen del
> resultado. Este caracter no lo muestra al accesar la tabla en forma
> directa. Raro el caso y ya no encuentro que mas hacer :-(
>
>
> /*
> * Proyecto: prueba
> * Fichero: Module1.prg
> * Descripción:
> * Autor:
> * Fecha: 29/09/2009
> */
>
> #include "Ads.ch"
>
> Function Main()
>
> request hb_gt_win
>
> Request ADS
> RddRegister("ADS",1)
> ADSSetServerType(7)
> AdsSetFileType(1)
> AdsLocking(.F.)
> AdsRightsCheck(.F.)
> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>
> Set Date To BRITISH
> Set Century On
> Set Epoch To 1950
> Set Deleted On
> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
> 5.2
>
> Use 192.168.16.99:6262SysDbfClientes Index
> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
> Clientes->( DbSeek( "JUAN" ) )
>
> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>
> Close Data
>
> Return .T.
>
>
> --
> Juan Castillo Arteaga
> Area de sistemas
> C.Fernandez y Cia., S.A. de C.V.
>
>
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
juanc
Mensajes: 105
Registrado: Vie Dic 14, 2007 12:15 am

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por juanc »

Estimado Ignacio:
Tratando de encontrar si alguien sabia algo al respecto, me respondieron en
las news de Advantage lo siguiente:
I know there was a bug fixed in Harbour and also xHarbour to do with
character
fields in ADS. It was fixed around mid-July by Brian Hays in xHarbour, if
your
version of xHarbour is older that may be your problem.
Get the CVS and have a look at the ChangeLog.
Regards
Alex
Se que estan con mucho trabajo con la version 2 de Xailer pero en una
oportunidad podria considerarse corregir ese bug en la version de xharbour
de Xailer si es que es el caso como lo comenta el Sr. Alex ?. De antemano
muchisimas gracias.

Saludos Cordiales.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
mensaje news:4ad431fc$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Juan,
>
> Sería fantástico poder tener un ejemplo que muestre el problema. Sin él es
> difícil ayudarle, lo siento.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
> news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
>> Pido ayuda para resolver sl siguiente detalle:
>>
>> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
>> agrega un caracter raro al final en los campos leidos, agrego el codigo
>> de prueba mas simple que pude hacer para compilar con xedit2 y la imagen
>> del resultado. Este caracter no lo muestra al accesar la tabla en forma
>> directa. Raro el caso y ya no encuentro que mas hacer :-(
>>
>>
>> /*
>> * Proyecto: prueba
>> * Fichero: Module1.prg
>> * Descripción:
>> * Autor:
>> * Fecha: 29/09/2009
>> */
>>
>> #include "Ads.ch"
>>
>> Function Main()
>>
>> request hb_gt_win
>>
>> Request ADS
>> RddRegister("ADS",1)
>> ADSSetServerType(7)
>> AdsSetFileType(1)
>> AdsLocking(.F.)
>> AdsRightsCheck(.F.)
>> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>>
>> Set Date To BRITISH
>> Set Century On
>> Set Epoch To 1950
>> Set Deleted On
>> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
>> 5.2
>>
>> Use 192.168.16.99:6262SysDbfClientes Index
>> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
>> Clientes->( DbSeek( "JUAN" ) )
>>
>> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>>
>> Close Data
>>
>> Return .T.
>>
>>
>> --
>> Juan Castillo Arteaga
>> Area de sistemas
>> C.Fernandez y Cia., S.A. de C.V.
>>
>>
>
>
juanc
Mensajes: 105
Registrado: Vie Dic 14, 2007 12:15 am

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por juanc »

Maestro Rene, confirmado este problema lo resolvimos compilando con la
version 1.2.1 de xharbour, hicimos el cambio en los puntos de venta y en
todo el dia no me han reportado problema alguno...
PD No nos dejes fuera con el nuevo manual de ADS :-)
"Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
news:[email=4ad5db6c@svctag-j7w3v3j....]4ad5db6c@svctag-j7w3v3j....[/email]
> Estimado Ignacio:
>
> Tratando de encontrar si alguien sabia algo al respecto, me respondieron
> en las news de Advantage lo siguiente:
>
> I know there was a bug fixed in Harbour and also xHarbour to do with
> character
> fields in ADS. It was fixed around mid-July by Brian Hays in xHarbour, if
> your
> version of xHarbour is older that may be your problem.
>
> Get the CVS and have a look at the ChangeLog.
>
> Regards
> Alex
>
> Se que estan con mucho trabajo con la version 2 de Xailer pero en una
> oportunidad podria considerarse corregir ese bug en la version de xharbour
> de Xailer si es que es el caso como lo comenta el Sr. Alex ?. De antemano
> muchisimas gracias.
>
>
> Saludos Cordiales.
>
> "Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
> mensaje news:4ad431fc$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Juan,
>>
>> Sería fantástico poder tener un ejemplo que muestre el problema. Sin él
>> es difícil ayudarle, lo siento.
>>
>> Un saludo
>>
>> --
>> Ignacio Ortiz de Zúñiga
>> Xailer support / Soporte de Xailer
>> http://www.xailer.com
>> http://www.xailer.info
>> "Juan Castillo A." <juanc@lasnovedades.com.mx> escribió en el mensaje
>> news:[email=4ad36cae@svctag-j7w3v3j....]4ad36cae@svctag-j7w3v3j....[/email]
>>> Pido ayuda para resolver sl siguiente detalle:
>>>
>>> Al leer campos de una tabla con ADS y xharbour de Xailer (July 2009)
>>> agrega un caracter raro al final en los campos leidos, agrego el codigo
>>> de prueba mas simple que pude hacer para compilar con xedit2 y la imagen
>>> del resultado. Este caracter no lo muestra al accesar la tabla en forma
>>> directa. Raro el caso y ya no encuentro que mas hacer :-(
>>>
>>>
>>> /*
>>> * Proyecto: prueba
>>> * Fichero: Module1.prg
>>> * Descripción:
>>> * Autor:
>>> * Fecha: 29/09/2009
>>> */
>>>
>>> #include "Ads.ch"
>>>
>>> Function Main()
>>>
>>> request hb_gt_win
>>>
>>> Request ADS
>>> RddRegister("ADS",1)
>>> ADSSetServerType(7)
>>> AdsSetFileType(1)
>>> AdsLocking(.F.)
>>> AdsRightsCheck(.F.)
>>> REQUEST ADSKEYCOUNT, ADSKEYNO, ADSGETRELKEYPOS, ADSSETRELKEYPOS
>>>
>>> Set Date To BRITISH
>>> Set Century On
>>> Set Epoch To 1950
>>> Set Deleted On
>>> Set( 106, 1 ) // sistema de bloqueo de registros compatible con clipper
>>> 5.2
>>>
>>> Use 192.168.16.99:6262SysDbfClientes Index
>>> 192.168.16.99SysDbfCliente2 New Shared ReadOnly Via "ADS"
>>> Clientes->( DbSeek( "JUAN" ) )
>>>
>>> Alert( "("+AllTrim( Clientes->Nombre )+")" )
>>>
>>> Close Data
>>>
>>> Return .T.
>>>
>>>
>>> --
>>> Juan Castillo Arteaga
>>> Area de sistemas
>>> C.Fernandez y Cia., S.A. de C.V.
>>>
>>>
>>
>>
>
>
Rene Flores
Mensajes: 620
Registrado: Jue Mar 23, 2006 2:39 am

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por Rene Flores »

Ignacio, Juan y Paco:
Es un bug de una version antigua del RDDADS de xharbour, solucion:
Descargar el RDDADS y compilarlo correctament.
Estoy un poco desconectado porque ando en Canada, muriendome de frio en
Octubre (-3 en la madrugada, 6 y7 promedio en el dia) ya les contaré que
ando haciendo por aqui.
Saludos
Rene Flores
http://www.ciber-tec.com
Ortiz de Zúñiga escribió:
> Juan,
>
> Serí­a fantástico poder tener un ejemplo que muestre el problema. Sin él es
> difí­cil ayudarle, lo siento.
>
> Un saludo
>
ssi-estono-
Mensajes: 239
Registrado: Sab Ene 24, 2009 8:23 pm

OT Ayuda - Conexion con ADS - caracter raro

Mensaje por ssi-estono- »

Rene:
Muchas gracias por tu Inestimable (COMO SIEMPRE)ayuda.
De donde se puede bajar para que funcione sin problemas?, Je je, para
tontitos.
Paco V
"Rene Flores" <"rflores[nospam]"@ciber-tec.com> escribió en el mensaje
news:[email=4ade8e11@svctag-j7w3v3j....]4ade8e11@svctag-j7w3v3j....[/email]
> Ignacio, Juan y Paco:
>
> Es un bug de una version antigua del RDDADS de xharbour, solucion:
> Descargar el RDDADS y compilarlo correctament.
>
> Estoy un poco desconectado porque ando en Canada, muriendome de frio en
> Octubre (-3 en la madrugada, 6 y7 promedio en el dia) ya les contaré que
> ando haciendo por aqui.
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
>
>
> Ortiz de Zúñiga escribió:
>> Juan,
>>
>> Sería fantástico poder tener un ejemplo que muestre el problema. Sin él
>> es difícil ayudarle, lo siento.
>>
>> Un saludo
>>
>
Responder