Histórico da Página
...
| Produto: | TOTVS Saúde Planos
| ||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Linha de Produto: | Linha Protheus | ||||||||||||||||
| Segmento: | Saúde | ||||||||||||||||
| Módulo: | GESTÃO DE CONTRATOS / FAMÍLIAS | ||||||||||||||||
| Função: | GERENCIADOR DE EMAIL | ||||||||||||||||
| Issue : | DSAUBE-26611 |
02. SITUAÇÃO/REQUISITO
Foi necessário criar uma rotina automatizada para o envio de e-mails, com o objetivo de tornar a comunicação mais eficiente e padronizar as mensagens geradas pelo sistema.
...
- Assun. E-mail - Assunto que irá aparecer no E-mail que será enviado.
- Corpo E-mail - Dados do HTML e CSS para personalizar o E-mail que será enviado conforme tópico Exemplo de Código HTML Para o Corpo do E-mail.
Exemplo de Código HTML Para o Corpo do E-mail
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
<!DOCTYPE html>
<html lang="pt-BR">
<head>
<meta charset="UTF-8" />
<meta name="viewport" content="width=device-width, initial-scale=1.0" />
<style>
body {
font-family: Arial, sans-serif;
margin: 0;
padding: 0;
background-color: #f4f4f4;
}
.container {
max-width: 600px;
margin: 40px auto;
padding: 20px;
border-radius: 8px;
background-color: #ffffff;
box-shadow: 0 4px 8px rgba(0, 0, 0, 0.05);
}
.header,
.footer {
background-color: #6c9ebd;
color: #ffffff;
text-align: center;
padding: 10px;
border-radius: 8px 8px 0 0;
}
.footer {
border-radius: 0 0 8px 8px;
margin-top: 20px;
font-size: 14px;
}
h2 {
text-align: center;
color: #333;
}
.info {
padding: 10px 0;
font-size: 16px;
color: #555;
}
.info strong {
color: #222;
}
table {
width: 100%;
border-collapse: collapse;
margin-top: 20px;
}
th,
td {
border: 1px solid #ddd;
padding: 12px;
text-align: left;
}
th {
background-color: #6c9ebd;
color: #ffffff;
}
tr:nth-child(even) {
background-color: #f9f9f9;
}
.company-name {
font-size: 20px;
color: #333;
text-align: center;
margin-bottom: 20px;
font-weight: bold;
}
</style>
</head>
<body>
<div class="container">
<div class="header">
<h2>Usuario Bloqueado</h2>
</div>
<p class="info">
<strong>Prezado(a):</strong> ##1, portador da matrícula
<strong>##2</strong>
</p>
<p class="info">Esperamos que esta mensagem o(a) encontre bem.</p>
<p class="info">
Verificamos em nosso sistema que seu plano de saúde foi bloqueado devido
à inadimplência. Conforme a Resolução Normativa nº 593 da ANS (Agência
Nacional de Saúde Suplementar), o contrato pode ser suspenso ou
rescindido caso haja atraso superior a 60 dias, consecutivos ou não.
</p>
<p class="info">
Para restabelecer seus serviços de assistência à saúde, é necessário
regularizar os débitos pendentes. Caso já tenha efetuado o pagamento,
pedimos a gentileza de desconsiderar esta mensagem.
</p>
<p class="info">
Estamos à disposição para auxiliá-lo(a) no que for necessário.
</p>
<table>
<thead>
<tr>
<th>Nome</th>
<th>Data de Inclusão</th>
<th>Data de Bloqueio</th>
</tr>
</thead>
<tbody>
##5
</tbody>
</table>
<div class="footer">
<p>
Entre em contato conosco para mais informações.<br />Email: ##3 |
Telefone: ##4
</p>
</div>
</div>
</body>
</html> |
- Func. Dados Dados - Função que retorna os dados que por sua vez irão substituir as marcações no HTML com o ##Número.
- Para função de usuário, deve-se inserir a chamada completa U_FuncaoUsuario sem parênteses.
- A função de dados deve retornar um objeto JSON onde os atributos devem ser um sequencial de numeral conforme o exemplo no tópico Exemplo de Função de Dados.
Exemplo de Função de Dados:
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#INCLUDE "Totvs.ch" function dados() Local cCompHtml :=as ""character Local oJEmailData := JsonObject():New() cCompHtml += "<tr>" cCompHtml += " <td>" + AllTrim(BA1->BA1_NOMUSR) + "</td>" cCompHtml += " <td>" + DTOC(BA1->BA1_DATINC) + "</td>" cCompHtml += " <td>" + DTOC(BA1->BA1_DATBLO) + "</td>" cCompHtml += "</tr>" oJEmailData["1"] := BA1->BA1_NOMUSR oJEmailData["2"] := BA1->(BA1_CODINT+BA1_CODEMP+BA1_MATRIC+BA1_TIPREG+BA1_DIGITO) oJEmailData["3"] := BA1->BA1_EMAIL oJEmailData["4"] := BA1->BA1_TELEFO oJEmailData["5"] := cCompHtml Return oJEmailData |
...
| Nota |
|---|
O parâmetro cConfigCode deve ser utilizado apenas quando for necessário informar diretamente o código de uma configuração de e-mail, dispensando o preenchimento do campo "Função Conf." na configuração. Nesse caso, não é preciso vincular a função ou método de origem ao envio do e-mail. No entanto, vale destacar que, ao utilizar esse parâmetro, qualquer alteração de layout exigirá a modificação direta no código-fonte, o que reduz a flexibilidade da manutenção. Por esse motivo, recomenda-se evitar o uso do parâmetro cConfigCode e, sempre que possível, preencher o campo "Função Conf." com o nome da função responsável pelo envio do e-mail. |
Primeiro identifique a função (não pode ser static) ou método que irá realizar o processo de envio do e-mail.
No exemplo abaixo a função de usuário MailTste irá utilizar uma das configurações do gerenciador de contas de e-mail para enviar o e-mail.
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
User Function MailTste() Local oemail as object Local ojson as object // instanciando a classe Gerenciadora de E-mail oemail := totvs.protheus.health.plan.manager.EmailManager():New() // Chamada do método responsável por fazer todo o processamento de envio de e-mail // param1 = ID do gerenciador // param2 = e-mail destinatário // param3 = Diretório de anexos que deseja enviar no e-mail (Pode receber um array de diretórios) // param4 = e-mail que você deseja enviar como cópia ojson := oemail:SendEmailUsingManager(NIL,"[email protected]") If ojson["sendMail"] //.T. = enviado com sucesso FWAlertSuccess(ojson["message"]) Else FWAlertError(ojson["message"]) EndIf Return |
Após a implementação da classe de envio de e-mail, acesse o Gerenciador de Contas de E-mail, localize a configuração que será utilizada e insira o nome da função no campo "Função Conf." do grid. É possível adicionar quantas linhas forem necessárias para registrar diferentes funções ou métodos que utilizarão essa configuração.
Log De Erros
A maioria dos erros relacionados ao envio de e-mails utilizando o Gerenciador de Contas de E-mail pode ser analisada em maior detalhe no arquivo LogConfigEmail.log, localizado no diretório LOGPLS, dentro da pasta PROTHEUS_DATA.
...
