Olá pessoal,

Neste artigo vou mostrar quais são os parâmetros para configurar o envio de e-mails nos relatórios do ERP Protheus.

Vamos fazer um exemplo configurando com um e-mail do Gmail.

Acesse o Configurador e o menu Ambiente -> E-mail/Proxy -> Configurar

1. Informe os dados do e-mail

2. Informe os dados referente a TLS, SSL e Autenticação

3. Caso tenha Proxy, informe

Quais os parâmetros que serão alterados?

MV_RELAUTH – Servidor de e-mail necessita de Autenticação?

MV_EMCONTA – Indica qual conta utilizada para envio de e-mails automáticos pelo sistema.

MV_RELSERV – Nome do servidor de envio de e-mail utilizado nos relatórios

MV_RELPSW – Senha da conta de e-mail para envio de relatórios

MV_RELACNT – Conta a ser utilizada no envio de e-mail para os relatórios

Como configurar envio de e-mails no Protheus com Office365

Se for utilizar o Office365 como SMTP, utilize as informações abaixo, substituindo nos respectivos campos do exemplo das imagens acima:

Servidor SMTP: smtp.office365.com:587

Conta: seu_email@seudominio.com.br

Senha: Sua senha

Servidor necessita de autenticação? SIM

Time-out em segundos: 120

E-mail utilizado no campo FROM: * Obrigatoriamente o mesmo e-mail da Conta

Protocolo de recebimento: SMTP

Utiliza SMTP Extended? Sim

Habilita autenticação SMTP ‘LOGIN’? Sim

Utiliza segurança TLS? Sim

Utiliza segurança SSL? Sim

Habilita protocolo NTLM? Sim

O post Parâmetros para Envio de E-mail Protheus apareceu primeiro em PHFSistemas.

Exemplo da Rotina:

Begin Transaction

    //Tratativas de inclusão, alteração, disarm

End Transaction

Exemplo 1- Exemplo de criação de registro no cadastro de Produtos, perguntando se deseja cancelar:

//Bibliotecas

#Include "Protheus.ch"

/*/{Protheus.doc} zTeste

Função de Teste

@type function

@author Terminal de Informação

@since 13/11/2016

@version 1.0

    @example

    u_zTeste()

/*/

User Function zTeste()

    Local aArea    := GetArea()

    Local aAreaB1  := SB1->(GetArea())

    //Iniciando controle de transações

    Begin Transaction

        RecLock('SB1', .T.)

            B1_COD  := dToS(dDataBase)+StrTran(Time(), ':', '')

            B1_DESC := "Teste"

        SB1->(MsUnlock())

        //Se a pergunta foi confirmada, cancela os lançamentos na transação

        If MsgYesNo("Deseja cancelar e disarmar a transação?", "Atenção")

            DisarmTransaction()

        EndIf

    //Finalizando controle de transações

    End Transaction

    RestArea(aAreaB1)

    RestArea(aArea)

Return

O post Begin Transaction … End Transaction apareceu primeiro em PHFSistemas.

Passo a passo para habilitar a permissão: 

1. Acesse o ambiente do Protheus.
2. No menu, vá em Ambiente > Parâmetros > Parâmetros.
3. Localize o parâmetro MV_VALCNPJ.
4. Altere o valor deste parâmetro para “1”.
5. Repita os passos 3 e 4 para o parâmetro MV_VALCPF, se necessário.
6. Clique em “Atualizar” ou “<F4>” para salvar a configuração.
7. Saia e entre novamente no sistema para que a mudança seja aplicada.

Observações: 

• Com o parâmetro configurado para “1”, o sistema irá notificar o usuário de que o CNPJ já existe em outro cadastro, mas permitirá que a inclusão seja realizada.
• Se o valor for “2”, a inclusão do mesmo CNPJ será impedida.
• Este ajuste é feito para o cadastro de clientes na rotina SIGAFAT.

O post Permitir clientes com o mesmo CNPJ no Protheus apareceu primeiro em PHFSistemas.

Pessoal, como sabem via ADVPL existem inúmeras funções para mostrar mensagens, como Alert, Aviso, MsgInfo, etC. Mas existem algumas funções “novas”, e no artigo de hoje irei citar exatamente essas.

Elas não são bem novas, porém são bem mais recentes que as antigas funções (MsgInfo, MsgStop, MsgAlert, etc). Pois bem, abaixo uma pequena descrição de cada uma:

• FWAlertError: Mostra uma mensagem com um círculo vermelho e um x no meio
• FWAlertExitPage: Mostra uma pergunta com 3 opções (Continuar editando, Salvar, Sair da Página)
• FWAlertHelp: Mostra uma mensagem de help e solução
• FWAlertInfo: Mensagem informativa com um círculo azul e um i no meio
• FWAlertNoYes: Mensagem que tem 2 opções (Não e Sim)
• FWAlertSuccess: Mostra uma mensagem com um círculo verde e um ícone de check
• FWAlertWarning: Mostra uma mensagem com um triângulo amarelo e uma exclamação no meio
• FWAlertYesNo: Mensagem que tem 2 opções (Sim e Não)

//Bibliotecas

#Include "TOTVS.ch"

User Function zAlert()

    FWAlertError("Mensagem de erro", "Título FWAlertError")

    FWAlertExitPage("Mensagem de navegação de página", "Título FWAlertExitPage")

    FWAlertHelp("Mensagem do problema", "Mensagem da solução - FWAlertHelp")

    FWAlertInfo("Mensagem informativa", "Título FWAlertInfo")

    FWAlertNoYes("Mensagem de pergunta Não / Sim", "Título FWAlertNoYes")

    FWAlertSuccess("Mensagem de sucesso", "Título FWAlertSuccess")

    FWAlertWarning("Mensagem de aviso", "Título FWAlertWarning")

    FWAlertYesNo("Mensagem de pergunta Sim / Não", "Título FWAlertYesNo")

Return

O post Executa FWAlert Totvs Protheus apareceu primeiro em PHFSistemas.