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.

problemas con el try catch

Xailer professional forum in English
Responder
Marco Scolamieri
Mensajes: 30
Registrado: Vie Mar 26, 2010 10:07 pm

problemas con el try catch

Mensaje por Marco Scolamieri »

Modificando la funcion del Locks del viajo clipper, enla diguiente funcion
cuando el archivo lo tengo en uso no entra al Catch saliendo directamente
por el END, en una funcion que ya estaba hecho y andando.Desde ya mucha
gracias
Marco Argentina
FUNCTION NET_USE(fArchivo,bExclusivo,bBandera)
LOCAL bResultado:=.T.
try
IF bExclusivo
USE &fArchivo EXCLUSIVE
ELSE
USE &fArchivo
ENDIF
Catch
IF NETERR()
bResultado:=.F.
ELSE
bBandera :=.T.
ENDIF
end
RETURN bResultado
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9469
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

problemas con el try catch

Mensaje por ignacio »

Marco,
Me temo que Xailer no hace ninguna modificación al sistema de TRY-CATCH que
proporciona xHarbour. Si entiende que hay un problema con esa instrucción
deberí­a consultarlo con xarbour.org. No obstante, si es capaz de realizar un
pequeño ejemplo autocontenido de pocas lí­nesa que no utlice Xailer
gustosamente haremos la gestión por usted.
En cualquier caso, creo recordar que ni Clipper ni Harbour provocan un RTE
cuando un USE..EXCLUSIVE daba error, por lo tanto, serí­a lógico que nunca
entrase por el codigo CATCH.
Un saludo,
Nota: Por favor utilice el foro español si sus preguntas son es español.
Gracias de antemano.
--
Ignacio Ortiz de Zúñiga
[Equipo de Xailer/Xailer team]
http://www.xailer.com
http://www.xailer.info
"Marco Scolamieri" <alexandrasoft@arnet.com.ar> escribió en el mensaje de
noticias:4bad2215$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Modificando la funcion del Locks del viajo clipper, enla diguiente funcion
> cuando el archivo lo tengo en uso no entra al Catch saliendo directamente
> por el END, en una funcion que ya estaba hecho y andando.Desde ya mucha
> gracias
> Marco Argentina
>
>
>
> FUNCTION NET_USE(fArchivo,bExclusivo,bBandera)
> LOCAL bResultado:=.T.
>
> try
> IF bExclusivo
> USE &fArchivo EXCLUSIVE
> ELSE
> USE &fArchivo
> ENDIF
> Catch
>
>
> IF NETERR()
> bResultado:=.F.
> ELSE
> bBandera :=.T.
> ENDIF
>
>
> end
>
> RETURN bResultado
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9469
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

problemas con el try catch

Mensaje por ignacio »

Marco,
Me temo que Xailer no hace ninguna modificación al sistema de TRY-CATCH que
proporciona xHarbour. Si entiende que hay un problema con esa instrucción
deberí­a consultarlo con xarbour.org. No obstante, si es capaz de realizar un
pequeño ejemplo autocontenido de pocas lí­nesa que no utlice Xailer
gustosamente haremos la gestión por usted.
En cualquier caso, creo recordar que ni Clipper ni Harbour provocan un RTE
cuando un USE..EXCLUSIVE daba error, por lo tanto, serí­a lógico que nunca
entrase por el codigo CATCH.
Un saludo,
Nota: Por favor utilice el foro español si sus preguntas son es español.
Gracias de antemano.
--
Ignacio Ortiz de Zúñiga
[Equipo de Xailer/Xailer team]
http://www.xailer.com
http://www.xailer.info
"Marco Scolamieri" <alexandrasoft@arnet.com.ar> escribió en el mensaje de
noticias:4bad2215$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Modificando la funcion del Locks del viajo clipper, enla diguiente funcion
> cuando el archivo lo tengo en uso no entra al Catch saliendo directamente
> por el END, en una funcion que ya estaba hecho y andando.Desde ya mucha
> gracias
> Marco Argentina
>
>
>
> FUNCTION NET_USE(fArchivo,bExclusivo,bBandera)
> LOCAL bResultado:=.T.
>
> try
> IF bExclusivo
> USE &fArchivo EXCLUSIVE
> ELSE
> USE &fArchivo
> ENDIF
> Catch
>
>
> IF NETERR()
> bResultado:=.F.
> ELSE
> bBandera :=.T.
> ENDIF
>
>
> end
>
> RETURN bResultado
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Responder