Claudio Stein Junior

Resolvido, troquei o schema e deu certo. Obrigado.

Deu certo, estava fechando a conexão antes, mas deu um erro no schema do CEP, ele não é permitido passar? Obrigado.

Olá meu endereço de entrega não sai no XML da NF-e, faço algo errado, segue código abaixo. Agradeço quem puder me ajudar. Entrega.CNPJCPF := '11111111111'; Entrega.CEP := DmTabelas.CdsVendasCEP.AsInteger; Entrega.xLgr := DmClientes.CdsClientesENDERECOENTREGA.AsString; Entrega.nro := DmClientes.CdsClientesNUMEROENTREGA.AsString; Entrega.xCpl := DmClientes.CdsClientesCOMPLEMENTOENTREGA.AsString; Entrega.xBairro := DmClientes.CdsClientesBAIRROENTREGA.AsString; Entrega.cMun := DmClientes.CdsClientesCODIGO_1.AsInteger; Entrega.xMun := DmClientes.CdsClientesCIDADE_1.AsString; Entrega.UF := DmClientes.CdsClientesUF_1.AsString; Entrega.cPais := 1058; //Brasil Entrega.xPais := 'BRASIL';

Sim por algum motivo precisou registrar a capicom novamente, obrigado resolvido. Em breve vou mudar a dll.

Estou checando novamente, está dando problemas ao enviar a nf-e também. Parece ser classe não registrada. Vou fazer outros testes e registrar as DLLs. Obrigado pelo retorno.

Olá, tenho uma dúvida que não ficou clara em minhas pesquisas realizadas na net. Após a manifestação do destinatário como aceito e confirmando a operação de uma nf-e eu posso gerar uma carta de correção. Eu tentei pelo ACBR e não consegui, não obtive retorno, nem mensagem de erro. Em minhas pesquisas encontrei que o evento de cancelamento não é possível. E com relação a carta de correção? Alguém sabe algo a respeito? Obrigado.

Atualizei o componente e deu certo. Desculpe o incomodo.

Veio 1. O erro continua.

Realmente não estou entendendo o que aconteceu e com todos os documentos fiscais de uma vez só. Alguma outra dica ou solução?

Mas meu código já está fazendo isso. Estou anexando antes de enviar.

Como assim? Não entendi, dentro do componente como?

Reparei agora que está acontecendo com todos, MDF-e, CT-e e NF-e. Muito estranho pois funcionava antes.

Pelo que percebi parece que ele tenta enviar um evento por e-mail e não um CTE, é onde dispara o erro.

Ele gera só com a primeira linha, vou anexar o arquivo que ele gerou. O código para enviar o e-mail é esse: procedure TfrmDemo_ACBrCTe.btnEnviarEmailClick(Sender: TObject); var Para : String; CC : Tstrings; begin if not(InputQuery('Enviar Email', 'Email de destino', Para)) then exit; OpenDialog1.Title := 'Selecione o CTe'; OpenDialog1.DefaultExt := '*-cte.xml'; OpenDialog1.Filter := 'Arquivos CTe (*-cte.xml)|*-cte.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrCTe1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin ACBrCTe1.Conhecimentos.Clear; ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName); CC:=TstringList.Create; if Length(DmEmpresa.CdsEmpresaEMAILCONTADOR.AsString) > 0 then CC.Add(DmEmpresa.CdsEmpresaEMAILCONTADOR.AsString); //outros e-mails try ACBrMail1.Host := edtSmtpHost.Text; ACBrMail1.Port := edtSmtpPort.Text; ACBrMail1.Username := edtSmtpUser.Text; ACBrMail1.Password := edtSmtpPass.Text; ACBrMail1.From := edtSmtpUser.Text; ACBrMail1.SetSSL := cbEmailSSL.Checked; // SSL - ConexÃo Segura ACBrMail1.SetTLS := cbEmailSSL.Checked; // Auto TLS ACBrMail1.ReadingConfirmation := False; //Pede confirmação de leitura do email ACBrMail1.UseThread := False; //Aguarda Envio do Email(não usa thread) ACBrMail1.FromName := edtEmitFantasia.Text; ACBrMail1.AddAttachment(OpenDialog1.FileName); ACBrCTe1.Conhecimentos.Items[0].EnviarEmail(Para, edtEmailAssunto.Text, mmEmailMsg.Lines, true, CC, nil); finally CC.Free; end; end; end; O erro dispara no momento que tenta enviar o e-mail. O PDF chega perfeito, mas o XML não. Não chega a ser erro de envio, mas de formação do XML. 35200713380804000105570010000407761000407769-cte.xml