Page 1 of 1

TRY / CATCH ¿Estan disponibles en Harbour_CE?

Posted: Wed Sep 19, 2007 10:55 am
by tsales
Antonio
¿Es posible incorporar el uso de Try/Catch/End en Harbour_CE?

Saludos
Toni Sales

Posted: Tue Sep 25, 2007 7:10 pm
by jlcapel
Antonio,

¿Has actualizado _ del cvs al harbour PPC?

¿Tienes alguna idea de fecha?

Posted: Tue Sep 25, 2007 7:54 pm
by Antonio Linares
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

Posted: Tue Sep 25, 2007 7:57 pm
by Antonio Linares
Jose Luis,

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

El build actual es de Julio del 2007

Posted: Sat Sep 29, 2007 12:04 pm
by tsales
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

Posted: Sat Sep 29, 2007 1:07 pm
by Antonio Linares
Toni,

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

TRY
...
CATCH
...
END

y ha funcionado bien :-)

Posted: Sat Sep 29, 2007 4:15 pm
by tsales
Gracias Antonio.
Funciona perfectamente como indicas.

Saludos
Toni Sales