ERRORLEVEL() Configura o código de retorno Clipper ------------------------------------------------------------------------------ Sintaxe ERRORLEVEL([<nCodRetorno>]) --> nCodRetornoCorrente Argumentos <nCodRetorno> é o novo código de retorno. Este pode ser um valor entre zero e 255. O valor padrao no início é zero. Caso nao seja especificado, ERRORLEVEL() informa o retorno corrente sem atribuir um novo valor. Retorna ERRORLEVEL() retorna o código de saída corrente do Clipper como um valor numérico caso tenha sido configurado um através de ERRORLEVEL() com argumento; do contrário, retorna zero. Descriçao ERRORLEVEL() é uma funçao de tratamento de ambiente com dupla finalidade. Ela retorna o código de retorno corrente do Clipper e opcionalmente configura um novo código de retorno. O código de retorno é um valor cofigurado por um processo secundário para que o processo primário possa testar o estado de término do processo secundário. Normalmente, o processo primário é DOS e o processo secundário é um programa de aplicaçao. Um código de retorno pode ser carregado pelo comando ERRORLEVEL do DOS ou INT 21 Function 4Dh. Ao terminar um programa MI>Clipper, o código de retorno é confugurado em 1 se o processo terminar com um erro fatal. Caso o processo termine normalmente o código de retorno é configurado em zero, ou o último ERRORLEVEL() configurado no programa. Normalmente, você configuraria um código de retorno com ERRORLEVEL() para indicar um estado de erro para o programa que invocou o programa Clipper corrente. Na maioria dos casos é o arquivo batch da aplicaçao. Aqui você testaria o código de retorno utilizando o comando do DOS ERRORLEVEL. Consulte seu manual DOS para mais informaçoes. Notas ■ ERRORLEVEL() nao é atualizado após o término de um comando RUN. Para obter o código de retorno do programa invocado, você deve criar uma rotina em C ou assembler que questione o código de retorno do processo secundário usando INT 21 Function 4Dh. Consulte o seu manual de Referência Técnica do DOS para maiores informaçoes. Exemplos ■ O exemplo a seguir grava o código de retorno corrente do Clipper e depois configura um novo valor: nOldCode = ERRORLEVEL() // Obtem nivel corrente ERRORLEVEL(1) // Configura novo ■ Este exemplo demonstra ERRORLEVEL() sendo utilizado para ajustar um código de retorno que pode ser testado pelo processo primário: #define ERR_FILE_MISSING 255 #define ERR_POST_INCOMPLETE 254 // IF !FILE("Sysfile.dbf") @ 0, 0 @ 1, 0 @ 0, 0 SAY "Erro: Arquivo do sistema nao encontrado...abortando!" ERRORLEVEL(ERR_FILE_MISSING) QUIT ENDIF Arquivos: Biblioteca CLIPPER.LIB. To download this example - click here.
See Also: QUIT