Establece el código de retorno de DPXBASE

Sintaxis

     ERRORLEVEL([<nNuevoCódigoRetorno>]) –> nCódigoRetornoActual

Argumentos

<nNuevoCódigoRetorno> es la nueva selección de código de retorno. Esta puede tener un valor entre cero y 255. El valor por defecto al inicio es cero. Si no se especifica, ERRORLEVEL() informa sobre la selección actual sin asignar un nuevo valor.

Devuelve

ERRORLEVEL() devuelve el código de salida de DPXBASE actual como un valor numérico, si se ha seleccionado uno utilizando ERRORLEVEL() con un argumento; de lo contrario, devuelve cero.

Descripción

ERRORLEVEL() es una función de entorno que tiene una doble finalidad. Devuelve el código de retorno de DPXBASE actual y establece, opcionalmente, un nuevo código de retorno. El código de retorno es un valor establecido por un proceso hijo de forma que el proceso padre pueda comprobar su estado de finalización. Normalmente, el proceso padre es el DOS y el hijo es un programa de aplicación. Puede comprobar el valor de retorno mediante la variable ERRORLEVEL del DOS o bien mediante la función 4Dh de la INT 21h.

Cuando finaliza un programa de DPXBASE, el código de retorno se establece en 1 si el proceso finaliza con un error grave. Si el proceso finaliza normalmente, el código de retorno se establece en cero o en el último valor de ERRORLEVEL() definido en el programa.

Normalmente, puede fijar un código de retorno con ERRORLEVEL() para indicar un estado de error al programa que ha llamado al programa de DPXBASE actual. En la mayoría de casos, se trata del fichero de proceso por lotes de la aplicación. Aquí puede comprobar el código de retorno utilizando la variable del DOS ERRORLEVEL. Consulte el manual de DOS para obtener más información.

Notas

     ¦  ERRORLEVEL() no se actualiza después de que finalice un mandato RUN. Para obtener el código de retorno del programa llamado, debe crear una rutina en ensamblador o C que consulte el código deretorno del proceso secundario utilizando la función 4Dh de la INT 21. Consulte el manual de Referencia Técnica del DOS para obtener más información.

Ejemplos

     ¦  Este ejemplo guarda el código de retorno actual de DPXBASE, seguidamente, establece un nuevo valor:

        nAntCodigo := ERRORLEVEL()         // Obtiene el nivel

                                                               // de error actual

        ERRORLEVEL(1)                               // Establece el nuevo

                                                            // nivel de error

     ¦  Este ejemplo utiliza ERRORLEVEL() para establecer un código de

        retorno que puede comprobar el proceso padre:

        #define ERR_FICH_PERDIDO      255

        #define ERR_EST_INCOMPLETO    254

        //

        IF !FILE(“Sisfich.dbf”)

           @ 0, 0

           @ 1, 0

           @ 0, 0 SAY “Error fatal: Fichero de sistema perdido…saliendo”

           ERRORLEVEL(ERR_FICH_PERDIDO)

           QUIT

        ENDIF

 Ficheros: La biblioteca asociada es DPXBASE.CH.