Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Lucas Raminelli

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Flavio Danilo Ricardo

Gravado em

Chave

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

...

AVCRW -

...

Envio de

...

email

Descrição

EECAC120 

AVCRW -

 Cadastro

Envio de

Produto

email

Observações

Utilizado para a

manutenção do cadastro de Produto dentro do modulo

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

Exemplos

User Function

EECAC120

AVCRW()

Local cParam


Local cOpcao
Local lRet

:=

.T.If ValType(ParamIXB

If(Type("ParamIxb") =

=

"A"


cParam:= ParamIXB

,ParamIxb[1]


Else
cParam:= ParamIXB
EndIf

IF cParam == "VALID_GRAVACAO"
IF ParamIXB[2] == 3
cOpcao := "INCLUIR"
ElseIF ParamIXB[2] == 4
cOpcao := "ALTERAR"
EndIF
EndIF

Do Case
Case cParam == "VALID_GRAVACAO"
MSGINFO("ENTROU NO PONTO 'VALID_GRAVACAO' NA OPCAO : " + cOpcao )
lRetPE := .T.

Case cParam == "ANTES_CONFIRMA_EXCLUSAO"
MSGINFO("ENTROU NO PONTO 'ANTES_CONFIRMA_EXCLUSAO'")
lValExclusao := .F.

,If(Type("ParamIxb") = "C",ParamIxb,""))

If cParam == "EMAIL"

cTitAux := 'Título do email'
cSubjectAux := 'Assunto do email'
cBodyAux := 'Mensagem no corpo deo email'
cToAux := 'email destino'
cCCAux := 'email destino copia'

EndIf

Return .T.

Preview

Veja também

Case cParam == "ENCHOICE"
lRet := .T.
EndCase
Return lRet

Preview

Veja também

 


Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

 


Parâmetros

 VALID_GRAVACAO

NomeTipoDescriçãoDefaultObrigatórioReferência
 

EMAILCarácterParâmetro que valida a
Inclusão ou alteração do cadastro de produto    ANTES_CONFIRMA_EXCLUSAOCarácterParâmetro que valida a Exclusão do cadastro de produto   ENCHOICECarácterParâmetro obrigatório para criação de uma Enchoice, caso não utilize, passe como .T. a chamada dela para abrir a Enchoice padrão da tela.
rotina de envio de email


Retorno

()

Eventos de chamada do Ponto de Entrada

 


Variáveis

 


NomeTipoEscopoPode AlterarDescrição
 lRetPELógico

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
responsável de
para definir o
retorno da validação da "VALID_GRAVACAO"
valor da mensagem  no corpo do email

cToAuxCarácterPrivateSim Variável para definir  para qual email será enviado

cCCAuxCarácter
 lValExclusaoLógico
PrivateSimVariável
responsável de definir o retorno da validação da "ANTES_CONFIRMA_EXCLUSAO"
para definir para qual email será enviado a cópia

Programa Fonte

EECAC120

AVCRW.PRW