Uso de Variáveis no texto do email do ACBrNFeMonitor

[jcdatrindade]

Pessoal

Estou usando o ACBrNFeMonitor com sucesso.

Como tenho poucos clientes e somente comércio nao tenho encontrado nenhum problema.

Fui questinado sobre a possibilidade de usar campos variáveis no texto do email do Monitor.

Procurei pelo forum e não encontrei nada a respeito

Alguem de voces saberá me informar se é possivel o uso de variaveis, tipo

Nome do Destinatário, Numero da Nota, chave de acesso!

ou algum campo?

Desde ja agradeco!

Julio Trindade - Araxá

[Régys Silveira]

Hoje não existe a possibilidade de utilização de variáveis, o texto configurado é fixo e o monitor apenas adiciona ele ao enviar um e-mail.

[helderlr]

ola

tem como ,uso o acbrnfemonitor e monto o corpo do email com dados variaveis

olha o trecho do envio de email com 2 funcoes

abraco

cMsg := 'Envio de XML E PDF da NF-e de Numero: '+dm.qryrelato2.fieldbyname('notfis').asstring+#10+#13;

cMsg :=cmsg+#10+#13;

cMsg := cmsg+'Razao Social...: '+dm.qryrelato2.fieldbyname('nomfan').asstring+#10+#13;

cMsg := cmsg+'CNPJ...........: '+dm.qryrelato2.fieldbyname('cgccli').asstring+#10+#13;

cMsg :=cmsg+#10+#13;

// cMsg := cmsg+'Favor verifique autorizacao de Uso na SEFAZ da NFe acima, endereco https://www.nfe.fazenda.gov.br/PORTAL/F ... chave_nfe').asstring+#10+#13;

cMsg := cmsg+'Favor verifique autorizacao de Uso na SEFAZ da NFe acima, endereco http://www.nfe.fazenda.gov.br/portal/co ... chave_nfe').asstring+#10+#13;

cMsg := cmsg+'Chave de acesso: '+dm.qryrelato2.fieldbyname('chave_nfe').asstring+#10+#13;

cMsg := cmsg+'Protocolo..... : '+dm.qryrelato2.fieldbyname('prot_aut').asstring+#10+#13;

cMsg := cmsg+'================================================='+#10+#13;

cMsg :=cmsg+#10+#13;

cMsg :=cmsg+'Email gerado automaticamente pelo Sistema Richards';

cAux:= Str2Hexa(cMsg);

conf := tinifile.create(frmmenu.path_nfe+'ACBrNFeMonitor.ini');

conf.Writestring('Email','Mensagem',caux);

conf.Free;

m_arq := frmmenu.path_nfe+'NFE.TXT';

AssignFile(arq,m_arq);

Rewrite(arq);

Write(arq,'NFe.LerIni');

System.Close(arq);

RenameFile(m_arq,frmmenu.path_nfe+'ENTNFE.TXT');

sleep(1000);

cMsg := 'XML e PDF da NF-e de Numero: '+dm.qryrelato2.fieldbyname('notfis').asstring;//+#10+#13;

m_arq := frmmenu.path_nfe+'SAINFE.TXT';

if fileexists(m_arq) then deletefile(m_arq);

m_arq := frmmenu.path_nfe+'NFE.TXT';

AssignFile(arq,m_arq);

Rewrite(arq);

Write(arq,'NFe.EnviarEmail("'+email+'","'+a+'","1"'+',"'+cmsg+'","[email protected]")');

System.Close(arq);

RenameFile(m_arq,frmmenu.path_nfe+'ENTNFE.TXT');

sleep(1000);

--------------------

function Str2Hexa(_cTexto:string):string;

var cAux :string;

x,resto: integer;

y:longint;

begin

cAux := '';

for x := 1 to length(_cTexto) do

begin

y:= ord(_cTexto[x]);

resto := y mod 16;

cAux := caux + floattostr(int(y/16))+TransfHexa(resto);

end;

result := cAux;

end;

function TransfHexa(_nArg:integer):string;

var cAux : string;

begin

case _nArg of

10 : cAux :='A';

11 : cAux:='B';

12 : cAux:='C';

13 : cAux:='D';

14 : cAux:='E';

15 : cAux:='F';

else

cAux:=inttostr(_nArg);

end;

result := cAux;

end;

[Régys Silveira]

Assim você está alterando o .INI do ACBrNFeMonitor sempre antes de enviar, é uma forma de fazer, mas pelo que entendi o que o colega parece estar querendo e uma forma de configurar isso e não ter que alterar sempre.

[Régys Silveira]

A utilização de tags será implementada no ACBrNFeMonitor, aguarde alguns dias.

[Régys Silveira]

Fiz uma implementação para a leitura de variáveis, peço que baixem, efetuem os testes e reportem por favor.

As variáveis são suportadas no assunto e no corpo do e-mail, segue a lista:

[EmitNome]

[EmitFantasia]

[EmitCNPJCPF]

[EmitIE]

[DestNome]

[DestCNPJCPF]

[DestIE]

[ChaveNFe]

[NumeroNF]

[ValorNF]

[dtEmissao]

[dtSaida]

[hrSaida]

ACBrNFeMonitor.zip

[Kiko Fernandes]

Régys, boa tarde!

Me parece que ficou algum problema em relação as variáveis. Por favor se for possível fazer o teste e me retornar, pode ser que eu esteja procedendo de forma errada.

Configurei o ACBrNFeMonitor na Aba [Email ] Campo [Mensagem do Email ]

No texto coloquei algo como:

Sua NFe: [ChaveNFe]

Emitente: [EmitNome]

obs.: Para teste usei todas as variáveis.

Salvei os dados.

Observei que no arquivo ACBrNFeMonitor.ini o campo mensagem= foi alterado com a informação hexadecimal do campo mensagem do email. Até ai tudo perfeito.

Enviei o email. Foi perfeito com as informações corretas.

Aqui começa os detalhes.

1 - Verifiquei que o campo mensagem= do ACBrNFeMonitor.ini foi alterado com a informação hexadecimal do campo mensagem do email já alterando as variaveis [ChaveNFe] pelo número da chave mesmo, o Emitente: pelo nome do emitente, ou seja todos os campos "variaveis" foram substituidos pelo conteúdo das variáveis.

2 - O Segundo envio como foi alterado as variáveis, então passaram a informar diretamente os dados que estão armazenados no campo mensagem=

Procedimento: Estou apenas enviando o email, não fiz a geração do arquivo e após o envio. Ou seja, selecionei uma NFe já emitida, tenho uma opção enviar email e usei ela NFe.EnviarEmail("email","xml",1,,,)

Obrigado!

[jcdatrindade]

Fiz uma implementação para a leitura de variáveis, peço que baixem, efetuem os testes e reportem por favor.

As variáveis são suportadas no assunto e no corpo do e-mail, segue a lista:

[EmitNome]

[EmitFantasia]

[EmitCNPJCPF]

[EmitIE]

[DestNome]

[DestCNPJCPF]

[DestIE]

[ChaveNFe]

[NumeroNF]

[ValorNF]

[dtEmissao]

[dtSaida]

[hrSaida]

Fiz alguns testes por aqui e realmente ficou bom.

Vou colocar em produção.

Obrigado!!!

[Régys Silveira]

Régys, boa tarde!

Me parece que ficou algum problema em relação as variáveis. Por favor se for possível fazer o teste e me retornar, pode ser que eu esteja procedendo de forma errada.

Configurei o ACBrNFeMonitor na Aba [Email ] Campo [Mensagem do Email ]

No texto coloquei algo como:

Sua NFe: [ChaveNFe]

Emitente: [EmitNome]

obs.: Para teste usei todas as variáveis.

Salvei os dados.

Observei que no arquivo ACBrNFeMonitor.ini o campo mensagem= foi alterado com a informação hexadecimal do campo mensagem do email. Até ai tudo perfeito.

Enviei o email. Foi perfeito com as informações corretas.

Aqui começa os detalhes.

1 - Verifiquei que o campo mensagem= do ACBrNFeMonitor.ini foi alterado com a informação hexadecimal do campo mensagem do email já alterando as variaveis [ChaveNFe] pelo número da chave mesmo, o Emitente: pelo nome do emitente, ou seja todos os campos "variaveis" foram substituidos pelo conteúdo das variáveis.

2 - O Segundo envio como foi alterado as variáveis, então passaram a informar diretamente os dados que estão armazenados no campo mensagem=

Procedimento: Estou apenas enviando o email, não fiz a geração do arquivo e após o envio. Ou seja, selecionei uma NFe já emitida, tenho uma opção enviar email e usei ela NFe.EnviarEmail("email","xml",1,,,)

Obrigado!

Kiko vou fazer alguns testes a noite, devo ter deixado algo passar, obrigado pelo feedback.

[jcdatrindade]

Régys, boa tarde!

Me parece que ficou algum problema em relação as variáveis. Por favor se for possível fazer o teste e me retornar, pode ser que eu esteja procedendo de forma errada.

... .. .. .. ..

armazenados no campo mensagem=

Procedimento: Estou apenas enviando o email, não fiz a geração do arquivo e após o envio. Ou seja, selecionei uma NFe já emitida, tenho uma opção enviar email e usei ela NFe.EnviarEmail("email","xml",1,,,)

Obrigado!

Kiko vou fazer alguns testes a noite, devo ter deixado algo passar, obrigado pelo feedback.

Regis,

Observo que o campo Assunto está OK!

Ele é mudado de acordo com a nota fiscal

O campo de texto da mensagem é que apresentou o problema

Valeu.

[Régys Silveira]

Blza, a noite eu vou dar uma olhada, posto a correção amanhã.

[Régys Silveira]

Fiz um acerto para que não aconteça o que foi relatado, peço que baixem e testem por favor.

ACBrNFeMonitor.zip

[Kiko Fernandes]

Fiz um acerto para que não aconteça o que foi relatado, peço que baixem e testem por favor.

Perfeito Régys, funcionou!

Muito obrigado!

[jcdatrindade]

Legal Regis,

Já está na producao

Obrigado!!

[Régys Silveira]

Legal Regis,

Já está na producao

Obrigado!!

Só uma dica, assinando o ACBrSAC você tem compilações semanais do ACBrMonitor e também do ACBrNFeMonitor e suporte a dúvidas e bugs em até 24 horas.

Para mais informações visite: http://www.djsystem.com.br/acbr/sac/index.php?option=com_content&view=article&id=1&Itemid=4

[systux]

Régys, Boa Tarde !

 

Voce sabe me dizer em qual versão do AcbrNFeMonitor estas TAG´s estará disponiveis ?

 

Posso utiliza-las no comando NFE.EnviarEmail() ?

 

Obrigado, 

 

Abraço,

 

Toninho Silva (SysTux)

[Régys Silveira]

Veja pela data dos posts, já tem mais de 1 ano que está disponível, não sei ao certo a versão mas com certeza as versões livres e ACBrSAC estão contemplando esses acertos.

[systux]

Desculpe, Não prestei atenção na data do post.

 

Obrigado !

[systux]

Régys, Obrigado por responder !

 

Não consigo localizar no forum...

 

Como devo enviar o comando NFe.enviaremail() com as [TAG´s] que você implementou !

 

Mais uma vez obrigado!

[Régys Silveira]

as tags são utilizadas no texto normal, basta colocá-las onde quer que seja impresso o valor da tag.

[systux]

Regys, Boa Noite !

 

Perfeito, agora entendi o funcionamento:

 

Bastou informar as [VARIAVEIS] no campo "Mensagem do Email" em Configurações do ACBrNFeMonitor. Tudo OK

 

Sugestão:

Seria interessante, talvez, uma variavel p/ texto livre no corpo do Email, assim sempre que precisar informa algum adicional p/ o destinatario!

 

Forte abraço.

 

Toninho Silva ( SysTux )

[gtinforserv]

Bom dia,

 

Você pode mostrar um exemplo de mensagem utilizando essas variáveis?

 

Obrigado pela atenção.

[systux]

Boa Noite,

 

No AcbrNFeMonitor, Campo email, vc define as variáveis: 

 

[EmitNome]

[EmitCNPJCPF]

[DestNome]

[DestCNPJCPF]

[ChaveNFe]

[NumeroNF] 

[dtEmissao]

[ValorNF]

[EmitNome]