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