Função: MostraErro - Visualização de erros
Abrangências: Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10
Versões: Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Idiomas: Espanhol , Inglês
Descrição:
Esta função mostra os erros gerados na execução dos processos automáticos.
Programa Fonte:
MATXFUNB.PRX
Sintaxe:

MostraErro - Visualização de erros ( [ cPath ] [ cNome ] )

Retorno:
    ()
Observações

Caso o parâmetro cPath não seja informado, o sistema apresentará uma tela com os erros gerados durante a execução, apresentando também as opções de Imprimir e Salvar o log.

Exemplos
#include "rwmake.ch"#include "tbiconn.ch"User Function MostraErro()Local aCabec := {}Local aItens := {}Local aLinha := {}Local nX     := 0Local nY     := 0Local cDoc   := ""Local lOk    := .T.                                     PRIVATE lMsErroAuto := .F.Private lMsHelpAuto	:= .T.    Prepare Environment Empresa "01" Filial "01" Modulo "FAT"aVetor:= {		 {"B1_COD"     ,"005",Nil},; 				 {"B1_DESC"    ,"Teste"        ,Nil},;				 {"B1_UM"      ,"UN"           ,Nil},; 				 {"B1_LOCPAD"  ,"01"           ,Nil}}   				 MATA010(aVetor,3)  If !lMsErroAuto	ConOut("Incluido com su cesso! "+cDoc) Else	// será apresentada a janela de erro, pois não foram passados todos os campos obrigatórios da tabela SB1.	ConOut("Erro na inclusao !")	MostraErro()EndIfReturn
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cPath Caracter Caminho onde será gravado o arquivo de log.
cNome Array of Record Nome do arquivo de log a ser gravado.

  • Sem rótulos