Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Ponto entrada JENVMAIL 

01. DADOS GERAIS

JURA091Envio de e-mails,

Descrição

O ponto de entrada permite controlar gerenciar e alterar  o envio de e-mail assim como os e-mails enviadosvisualizar os principais dados do e-mail após o envio. 

Localização:Atualizações / Assuntos Jurídicos > PesquisaNão se aplica

Eventos

O ponto de entrada é executado após da verificação do parâmetro MV_JINTVAL para integração de valores.o envio de e-mail e antes da marcação da flag de enviado

Programa Fonte:

JURXFUN

Retorno

O retorno booleano verdadeiro ( .T. ) do ponto de entrada J98XINTVAL indicará que a integração financeira deve prosseguir normalmente, se falso (.F.) irá inibir a integração.

Parâmetro disponível
ParâmetroValorDescrição
PARAMIXB[1]oModelModelo Ativo de garantias

02. Exemplo

#Include 'Protheus.ch'

User Function JENVMAIL()
Local nI := 0
Local cValores := ''
Local aVar := {}

aAdd(aVar,ParamIxb[1])

For nI:= 1 to Len(aVar)
cValores+= AllToChar(aVar[nI]) + CRLF
cValores+= "---------------------------------------------------------------" + CRLF
Next

Conout(cValores)

Return()

é nulo

Parâmetro disponível
ParâmetroTipoValor Origem
ParamIxbArray
PosiçãoVariável
Descrição
1cMsgCaracterResultado do envio do e-mail (mensagem da rotina de envio).
2lResulConnLógicoValor lógico informando se foi efetuada a conexão.
3lResulSendLógicoValor lógico informando se o envio obteve sucesso.
4cDeCaracterRemetentes do e-mail.
5cParaCaracterDestinatários do e-mail.
6cCcCaracterDestinatários em cópia do e-mail (não utilizado).
7cCCOCaracterDestinatários em cópia oculta do e-mail (não utilizado).
8cAssuntoCaracterAssunto do e-mail.
9cAnexoCaracterAnexo do e-mail (não utilizado pela rotina).
10cMsgCaracterCorpo da mensagem, contendo HTML formado pela rotina.
11cServerCaracterServidor SMTP utilizado.
12cEmailCaracterConta de e-mail utilizada.
13cPassCaracterSenha utilizada.
14lAuthLógicoValor lógico informando se utilizou autenticação por senha.
15cContAuthCarácterConta utilizando autenticação usada no envio de e-mail.
16cPswAuthCarácterSenha utilizando sutenticação usada no envio do e-mail.
17lSSLLógicoValor lógico utilizado para informar que utiliza protocolo SSL
18lTLSLógicoValor lógico utilizado para informar que utiliza protocolo TLS.



02. Exemplo

Bloco de código
titleJENVMAIL
linenumberstrue
#Include 'Protheus.ch'

User Function JENVMAIL()
Local nI := 0

For nI:= 1 to Len(ParamIxb)
    Conout(AllToChar(ParamIxb[nI]))
Next

Return

//Chamada do ponto de entrada:

//Ponto de Entrada para inibir ou complementar a integração automática.
If Existblock("J98XINTVAL")
     lJxintval := Execblock("J98XINTVAL", .F., .F., {oModel})
EndIf