FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC TRY / CATCH ¿Estan disponibles en Harbour_CE?
Posts: 186
Joined: Sat Oct 08, 2005 07:32 AM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Wed Sep 19, 2007 10:55 AM

Antonio
¿Es posible incorporar el uso de Try/Catch/End en Harbour_CE?

Saludos
Toni Sales

Toni Sales
Posts: 229
Joined: Wed Oct 12, 2005 05:32 PM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Tue Sep 25, 2007 07:10 PM

Antonio,

¿Has actualizado los cambios del cvs al harbour PPC?

¿Tienes alguna idea de fecha?

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Tue Sep 25, 2007 07:54 PM
Toni,

TRY/CATCH se pueden implementar de esta forma (Przemek):
   #xcommand TRY              => bError := errorBlock( {|oErr| break( oErr ) } ) ;;
                                 BEGIN SEQUENCE
   #xcommand CATCH [<!oErr!>] => errorBlock( bError ) ;;
                                 RECOVER [USING <oErr>] <-oErr-> ;;
                                 errorBlock( bError )

Tienes que delarar una variable bError
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Tue Sep 25, 2007 07:57 PM

Jose Luis,

Actualizamos los cambios del SVN (ya no se usa CVS) cada cierto tiempo.

El build actual es de Julio del 2007

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 186
Joined: Sat Oct 08, 2005 07:32 AM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Sat Sep 29, 2007 12:04 PM

Gracias Antonio. Funciona Correctamente.

Solo una pregunta. Es obligatorio finalizar con un END SEQUENCE, o para seguir el mismo criterio ¿Seria correcto esto?

xcommand ENDCATCH => END SEQUENCE

Saludos.
Toni Sales

Toni Sales
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Sat Sep 29, 2007 01:07 PM

Toni,

Nosotros lo hemos usado en la construcción del ADORDD así:

TRY
...
CATCH
...
END

y ha funcionado bien :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 186
Joined: Sat Oct 08, 2005 07:32 AM

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Sat Sep 29, 2007 04:15 PM

Gracias Antonio.
Funciona perfectamente como indicas.

Saludos
Toni Sales

Toni Sales

Continue the discussion