Ponto-de-Entrada: TM360MAIL - Modifica Texto do E-mail
Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Espanhol , Inglês |
Descrição:
A finalidade deste ponto de entrada é permitir modificar o texto do e-mail que será enviado através do apontamento de ocorrências (Vide boletim técnico 'Envio de e-mail na realização do apontamento de Ocorrências).
Eventos
Programa Fonte
TMSA360.PRW
Sintaxe
TM360MAIL - Modifica Texto do E-mail ( < aDestE> , < aDestI> , < aDocs> ) --> aRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
aDestE | Array of Record | X | |||||||||||||||
aDestI | Array of Record | X | |||||||||||||||
aDocs | Array of Record | X |
Retorno
-
aRet(vetor)
- Deve-se retornar um array com a seguinte estrutura:
aRet[1] -> Assunto da mensagem
aRet[2] -> Corpo da mensagem (podendo ser HTML)
aRet[3] -> Destinatarios Externos da mensagem (array simples: {"[email protected]", "[email protected]} ))
aRet[4] -> Destinatarios Internos da mensagem (array simples contendo o código do usuário no Protheus + o Nome do Usuário: {"000045-Carlos", "000085-Jose"} )
Observações
Lembrando que quando este ponto de entrada estiver compilado, não será permitida a modificação do corpo da mensagem através da tela de edição de e-mail.
Exemplos
#Include 'PROTHEUS.CH'User Function TM360MAIL()Local aParam := PARAMIXBLocal nAux := 0Local cSubject := ''Local aDestE := {}Local aDestI := {}Local cBody := ''Local aRet := {}cSubject := 'NOTIFICACAO DE OCORRENCIA'aDestE := AClone( aParam[1] )aDestI := AClone( aParam[2] )AAdd( aDestE, '[email protected]' )AAdd( aDestI, '000055-Novo Usuario')cBody := ''cBody += ''cBody += '
'cBody += ' 'cBody += ''cBody += ' E-MAIL REFERENTE A NOVAS OCORRENCIAS, CONFORME DOCUMENTOS ABAIXO:
'For nAux := 1 To Len(aParam[3]) cBody +='' cBody += '' cBody +='
' cBody +=' ' cBody +='CTRC: ' + aParam[3][nAux][4] + '/' + aParam[3][nAux][5] cBody +=' ' cBody +='
'NextAAdd( aRet, cSubject )AAdd( aRet, cBody )AAdd( aRet, aDestE )AAdd( aRet, aDestI )Return( aRet )
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas