ERROR( ) (Función)
Devuelve el número del error que desencadenó una rutina ON ERROR.
ERROR( )
Valores devueltos
Numeric
Observaciones
ERROR( ) devuelve el número del error más reciente. Debe estar activo ON ERROR para que ERROR( ) devuelva un valor distinto de 0.
Cuando se intercepta un error durante la ejecución de un programa, puede identificarse el tipo de error con ERROR( ) en una rutina ON ERROR. El mensaje de error correspondiente puede devolverse con MESSAGE( ).
El valor que devuelve la función ERROR( ) se restaura con RETURN o RETRY.
Ejemplo
El ejemplo siguiente demuestra una rutina sencilla de tratamiento de errores que muestra un mensaje cuando se produce un error.
CLEAR
ON ERROR DO errhand WITH ERROR( ), MESSAGE( )
*** The next line generates an error - there is no BRWSE command
BRWSE
ON ERROR
RETURN
** Error handler **
PROCEDURE errhand
PARAMETER errnum,message
? Message
? 'Error number: '+ ALLTRIM(STR(Errnum))
RETURN
Vea también
AERROR( ) (Función) | ERROR | MESSAGE( ) | ON ERROR | RETRY | RETURN