eflaeschen

Olá, espero que estejam todos bem. Vinha utilizando o ACBrMail normalmente e agora parou. Clientes com conta GMAIL não estão mais recebendo as mensagens e recebi o seguinte retorno: Este é o sistema de e-mail no servidor smtpi-sp221-219.uni5.net . Lamento ter de informar-lhe que sua mensagem não pode ser entregue a um ou mais destinatários. A mensagem está anexada abaixo. < [email protected] >: host gmail-smtp-in.l.google.com [ 64.233.186.26 ] disse: 550-5.7.1 [ 191.6.221.219 ] As mensagens sem um cabeçalho de ID de mensagem válido são não 550-5.7.1 aceito. Para obter mais informações, acesse 550-5.7.1 https://support.google.com/mail/?p=RfcMessageNonCompliant Diretrizes para remetentes de e-mail – Ajuda do administrador do Google Workspace Importante: a partir de fevereiro de 2024, o Gmail exigirá o seguinte para remetentes que enviam 5.000 ou mais mensagens por dia para contas do Gmail: autentique e-mails enviados, evite enviar support.google.com indesejados ou indesejados e revise as especificações 550 5.7.1 RFC 5322. x127-20020a6 36385000000 b005dc42946a85si12425315pgb.214 - gsmtp (em resposta ao final do comando DATA) Configuração: UserSession.dmAgendaClientes.ACBrMail1.Clear; UserSession.dmAgendaClientes.ACBrMail1.Host := UserSession.vEmailHost; UserSession.dmAgendaClientes.ACBrMail1.Port := IntToStr(UserSession.vEmailPorta); UserSession.dmAgendaClientes.ACBrMail1.Username := UserSession.vEmailUsuarioAutenticacao; UserSession.dmAgendaClientes.ACBrMail1.Password := UserSession.vEmailSenhaAutenticacao; UserSession.dmAgendaClientes.ACBrMail1.From := UserSession.vEmailOperador; UserSession.dmAgendaClientes.ACBrMail1.FromName := UserSession.vNomeOperador; UserSession.dmAgendaClientes.ACBrMail1.SetSSL := false; UserSession.dmAgendaClientes.ACBrMail1.SetTLS := true; UserSession.dmAgendaClientes.ACBrMail1.ReadingConfirmation := true; UserSession.dmAgendaClientes.ACBrMail1.UseThread := False; UserSession.dmAgendaClientes.ACBrMail1.IsHTML := true; UserSession.dmAgendaClientes.ACBrMail1.Priority := MP_high; UserSession.dmAgendaClientes.ACBrMail1.Subject := 'Notificação de agendamento de reunião'; O corpo do email é um html bem simples, apenas algumas linhas mmMensagem.Lines.Clear; mmMensagem.Lines.add('<br>Prezado(s)'); mmMensagem.Lines.add('<br>'); mmMensagem.Lines.add('<br>Informamos que o cliente '+UserSession.vNomeOperador+' agendou reunião para as '+cbxHorario.text +' do dia '+cbxData.text); mmMensagem.Lines.add('<br>'); ..... UserSession.dmAgendaClientes.ACBrMail1.Body.Assign(mmMensagem.Lines); // Destinatários UserSession.dmAgendaClientes.ACBrMail1.AddAddress(vEmailExecutor); try UserSession.dmAgendaClientes.ACBrMail1.Send(false); WebApplication.CallBackResponse.AddJavaScriptToExecute(swalAlert('Confirmação','Agendamento realizado com sucesso. Verifique sua caixa postal de eMail !')); except AddToInitProc(swalAlert('Atenção','Problemas no envio do eMail com a confirmação do agendamento !')); end; Olhei a documentação indicada pelo link mas não consegui entender. Nosso provedor é a Kinghost e não usa SSL, mas usa TSL=true. O detalhe é que a mensagem cita volume acima de 5.000 envios mas eu estou mandando apenas 1 mesnagem. Alguém poderia me ajudar, por favor ? Obrigado.

@Italo Giurizzato Junior, dando um retorno. Deu tudo certo com a logo do GDF e também os label's, preenchendo a propriedade "prefeitura" separando com ";". Veja: Muitíssimo obrigado !!!

Depois de rodar o "apagarAcbr.bat", sobraram esses. Precisa remover mais algum antes de reinstalar o ACBr ?

Obrigado @TiagoTecchio, vou usar o app que sugere. Mas acreditava que baixar o ACBr do zero, rodar o "apagarAcbr.bat' e ao executar a instalação, marcar a opção "Remover arquivos antigos do disco (pode demorar bastante) seria o suficiente, não seria ??

Existe alguma atualização recente ??? Na terça-feira, 22/08, eu refiz tudo. Apaguei a pasta ACBr da minha máquina, baixei tudo novamente, rodei o "apagarAcbr.bat' e ao executar a instalação, marquei a opção "Remover arquivos antigos do disco (pode demorar bastante) !!!

Complementando... Esses arquivos foram baixados do site do DGF após a geração e envio da NFSe. Após a geração e confirmação do envio, entrei no site do GDF e baixei o XML e a DANFE. Ou seja, me parece que o envio foi com os valores corretos !!! Não sei de se eles calculam o valor líquido ou acatam o que é enviado por nós pelo XML !!!

Olá @Italo Giurizzato Junior, tudo bem ? Fiz os ajustes e gerei nova NFSe em produção já que no ambiente de homologação não estava funcionando, acho que algum problema no ambiente da NotaControl. Vou anexar aqui os arquivos gerados para que possa avaliar melhor, mas destaco alguns aspectos: 1 - O Valor Líquido da nota gerado com o ACBr não está deduzindo os impostos, o do GDF está ! e pelo que vi, não há divergências no XML de ambos. Não consegui identificar o motivo. Fiz o debugger e a propriedade "ValorLiquidoNfse" fica preenchida como o valor bruto da nota e ai no relatório sai o valor total: procedure TfrlXDANFSeRLISSnet.rlbISSQNBeforePrint(Sender: TObject; var PrintIt: Boolean); ...... rllValorLiquido.Caption := FormatCurr('R$ ,0.00', ValorLiquidoNfse); No código estou sando o mesmo do que está no exemplo e debugando, todas as variáveis estão com os valores corretamente preenchidos Servico.Valores.ValorLiquidoNfse := Servico.Valores.ValorServicos - Servico.Valores.ValorPis - Servico.Valores.ValorCofins - Servico.Valores.ValorInss - Servico.Valores.ValorIr - Servico.Valores.ValorCsll - Servico.Valores.OutrasRetencoes - Servico.Valores.ValorIssRetido - Servico.Valores.DescontoIncondicionado - Servico.Valores.DescontoCondicionado; Esses arquivos foram baixados do site do DGF após a geração e envio da NFSe. Após a geração e confirmação do envio, entrei no site do GDF e baixei o XML e a DANFE 2 - Consegui gerar a DANFE com a logo do GDF mas acabei esquecendo de preencher a propriedade "prefeitura" com os textos separados por ";". Vou fazer mais tarde e te dou um retorno. Mas como essa situação do valor líquido da nota é urgente e preocupante, resolvi postar logo. Obrigado XML_GDF.xml DANFE_GDF.pdf XML_ACBr.xml DANFE_ACBr.pdf

Obrigado @BigWings. Apaguei tudo ! Criei uma pasta nova, baixei o projeto todo do zero e ai deu certo a instalação. Valeu

Não sei se é problema no ambiente de homologação, mas agora está dando esse erro : Global Office Web.pdf

Ok, vou fazer

Na verdade só coloquei uma linha "Governo do Distrito Federal", mas gostaria de acrescentar as outras 2 linhas e ainda colocar essa primeira em negrito, ou seja, deixar o mais próximo possível do visual que é na DANFE gerada pelo sistema da SEFAZ-DF. Colocando o ";" as linhas serão separadas ?

log_Delphi_10.2_Tokyo_Win32.txt

Complementando : Rad Studio Delphi 10.2.3

Prezados, após a atualização do ACBr, procedi a remoção da versão anterior e segui com a instalação. Ao final, aparece a mensagem de concluído com sucesso mas ao abrir o Delphi, não são encontrados vários componentes:

Obrigado @Italo Giurizzato Junior. Resolvi a questão das logos. Mas quanto aos textos, nessa propriedade "prefeitura" eu conseguiria colocar essas 3 linhas do modelo da Danfe do GDF , inclusive com o tratamento do font ?