ERRORLEVEL() 
 Establece el código de retorno de CA-Clipper
------------------------------------------------------------------------------
 Sintaxis

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

 Argumentos

     <nNuevoCódigoRetorno> es la nueva selección de código de retorno.
     Este 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 CA-Clipper 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 CA-Clipper 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 CA-Clipper, 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
     CA-Clipper 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 de
        retorno del proceso secundario utilizando la función 4Dh de la INT
        21. Consulte la documentación del DOS para obtener más información.

 Ejemplos

      Este ejemplo guarda el código de retorno actual de CA-Clipper
        y, 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: Sistema " + ;
                       fichero perdido...saliendo"
           ERRORLEVEL(ERR_FICH_PERDIDO)
           QUIT
        ENDIF

 Ficheros   La biblioteca asociada es CLIPPER.LIB.

 To download this example - click here.

See Also: QUIT