catchException
Versión Estable
Это класс VFP, целью которого является перехват исключений, запись их в журнал и, при необходимости, перезапуск их на более высоком уровне.
Никто! Никакой зависимости!
git clone https://github.com/raulvfp/catchException.git catchException
Характеристики:
Методы:
1-й — этот пример не перезапускает исключение на более высоком уровне, а контролирует его в блоке catch.
bRelanzarThrow = .F. &&NO Relanza la excepcion.
TRY
*--- Este es una excepcion generada con THROW
THROW lcExpectedValue
CATCH TO loEx
loTmp = CREATEOBJECT('catchException', bRelanzarThrow)
THIS.MessageOut('Esto me indica si es un error o algo generador por el programador: ' +loEx.Message)
THIS.MessageOut('Valor de userValue: '+loEx.UserValue)
ENDTRY
2-й — в этом примере исключение выбрасывается на более высокий уровень для управления.
bRelanzarThrow = .T. &&Relanza la excepcion al nivel superior.
TRY
*--- Este es una excepcion generada con THROW
THROW lcExpectedValue
CATCH TO loEx
loTmp = CREATEOBJECT('catchException', bRelanzarThrow)
*-- No se ejecuta nada despues del CREATEOBJECT('catchException')
ENDTRY