TRY / CATCH ¿Estan disponibles en Harbour_CE?

tsales · Post by **tsales** » Wed Sep 19, 2007 10:55 am

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

Saludos
Toni Sales

jlcapel · Post by **jlcapel** » Tue Sep 25, 2007 7:10 pm

Antonio,

¿Has actualizado _ del cvs al harbour PPC?

¿Tienes alguna idea de fecha?

Post by **Antonio Linares** » Tue Sep 25, 2007 7:54 pm

Toni,

TRY/CATCH se pueden implementar de esta forma (Przemek):

Code: Select all

   #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

Post by **Antonio Linares** » Tue Sep 25, 2007 7:57 pm

Jose Luis,

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

El build actual es de Julio del 2007

tsales · Post by **tsales** » 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

Post by **Antonio Linares** » Sat Sep 29, 2007 1:07 pm

Toni,

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

TRY
...
CATCH
...
END

y ha funcionado bien

tsales · Post by **tsales** » Sat Sep 29, 2007 4:15 pm

Gracias Antonio.
Funciona perfectamente como indicas.

Saludos
Toni Sales