Árvore de páginas

Versões comparadas

Chave

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

...

Descrição

AVCRW - Envio de email

Observações

Utilizado para a manipulação da tela de envio de email Easy Export Control

Exemplos

Bloco de código
linenumberstrue
User Function AVCRW()

If valtype(paramixb) == "C" .and. paramixb[1] == "EMAIL"
   cTitAux := 'Título do email'
   cSubjectAux := 'Assunto do email'
   cBodyAux := 'Mensagem no corpo deo email'
   cToAux := 'email destino' 
   cCCAux := 'email destino copia'
   lEmailAux := .F.
elseif valtype(paramixb) == "A" .and. paramixb[1] == "AVEMAIL_RPT"
   cMensagem := "Ponto de entrada com o caminho e nome do RPT" + CHR(10)+CHR(13) +;
   "Arquivo: " + paramixb[3] + CHR(10)+CHR(13) +;
   "Caminho: " + CHR(10)+CHR(13) + paramixb[2]
   cTitulo := "PE RPT"
   MsgInfo(cMensagem,cTitulo)
elseif valtype(paramixb) == "A" .and. paramixb[1] == "AVEMAIL_CFROM"
   cMensagem := "Ponto de entrada com o email de origem: " + cFrom
   cTitulo := "PE EMAIL"
   MsgInfo(cMensagem,cTitulo)
endif

Return

Idioma

Português(Brasil)

Versões

Microsiga_Protheus12

Parâmetros

NomeTipoDescrição
EMAILCarácterParâmetro que valida a rotina de envio de email
AVEMAIL_RPTCarácterParâmetro que permite acesso as variáveis do nome do rpt e ao caminho e do arquivo.
AVEMAIL_CFROMCarácterParâmetro que permite acesso a variável cFrom, origem do e-mail.

Retorno

Nil

Variáveis

NomeTipoEscopoPode AlterarDescrição
cTitAuxCarácterPrivateSimVariável para definir o valor do título do email
cSubjectAuxCarácterPrivateSim

Variável para definir o valor do assunto do email

cBodyAuxCarácterPrivateSimVariável para definir o valor da mensagem no corpo do email
cToAuxCarácterPrivateSim Variável para definir para qual email será enviado
cCCAuxCarácterPrivateSimVariável para definir para qual email será enviado a cópia
cFromCarácterPrivateSimVariável com a origem do e-mail a ser enviado
cArqRptCarácterPrivateSimVariável com o nome do arquivo RPT a ser gerado
cDirRptCarácterPrivateSimVariável com o caminho do arquivo RPT a ser gerado
lEmailAuxLógicoPrivateSim

Variável para indicar se o email será enviado ou não, quando o valor for igual =.T. o email será enviado

e quando estiver .F. não será enviado

Programa Fonte

AVCRW.PRW