... static procedure ExecutaComando( cArquivoBAT, cComando ) /* */ if !CriaArquivoBatLocal( cArquivoBAT, cComando ) MsgStop('Não foi possível criar o arquivo !', 'Atenção!') else WaitRun(cArquivoBAT,.f.) endif Ferase(cArquivoBAT) return /******************************************************************************/ ...