andreiluis

Bom dia, pra encerrar o tópico, pedi ajuda direto ao @Juliomar Marchetti que depois de muita peleia descobriu que o problema eram algumas opções de compilação do projeto que geravam incompatibilidade com as novas atualizações do ACBr, em especial mudanças referente à libxml2.dll (me corrija se eu estiver errado @Juliomar Marchetti). Abaixo como ficaram as opções de compilação do projeto (BDS 2006):

Báh Juliomar, que zica, se eu te falar que até isso eu fiz antes de mandar msg aqui no fórum? kkkkk Olha o desespero aí no print: copiei o visual do demo, as procedures Lerconfiguracao e ConfigurarComponente, até coloquei um componente do ACBr nesse form pra testar e não vai. Mas vou fazer mais uns testes aqui.

Mesmo problema, à saber o erro é um access violation

Sim, já havia pego a dll da pasta do ACBr e colocado junto ao exe do meu projeto (mesmo assim na pasta do demo do ACBr não tem a dll, então ambos não estão usando a dll que está no system32?) De qualquer forma, atualizei novamente o ACBr e copiei a dll versão 2.9.10 para junto do exe, e continua com erro.

Boa tarde, Atualizei o ACBr recentemente e desde então dá erro ao montar o XML de eventos (cancelamento e CCe), emissão de NFe está OK. Ao debugar cheguei até essa função: function TACBrXmlDocument.CreateElement(AName: string; ANamespace: string; APrefix: string): TACBrXmlNode; Result := TACBrXmlNode.Create(Self, xmlNewDocNode(xmlDocInternal, nil, NodeName, nil)); Esse result acima está recebendo nil. Até entrei no xmlNewDocNode mas não entendi como essa function funciona. Este é o código que utilizo, as propriedades do evento estão sendo preenchidas corretamente. dm.ACBrNFe1.EventoNFe.Evento.Clear; with dm.ACBrNFe1.EventoNFe.Evento.New do begin infEvento.chNFe := dm.qrNotasFiscais.FieldByName('chavenfe').AsString; infEvento.CNPJ := qry_tmp.FieldByName('cnpj').AsString; infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := dm.qrNotasFiscaisCCes.FieldByName('Sequencia').AsInteger; infEvento.detEvento.xCorrecao := dbCorrecaoCCe.Text; end; try dm.ACBrNFe1.EnviarEvento(1); if dm.ACBrNFe1.WebServices.EnvEvento.cStat = 135 then MensagemInformacao('Evento registrado e vinculado a NF-e.'); Except on ex:Exception do MensagemError('Ocorreu um erro na emissão'+#13+ex.Message); end; Detalhe, isso ocorre na minha máquina de desenvolvimento, na mesma máquina abri o demo do ACBr e consigo usar os eventos normalmente, testei usando a mesma chave, cnpj, xml que no meu projeto dá erro. Alguém poderia dar uma luz do que está errado?

Segue em anexo, além da alteração ref ao MostraSetup, adicionei diretivas de compilação para FMX e VCL na cláusula uses. ACBrDANFCeFortesFrA4.pas

Então, achei o problema, acho: ACBrDANFCeFortesFrA4.pas RLLayout.PrintDialog := FACBrNFeDANFCeFortesA4.MostraPreview; Aqui não deveria ser MostraSetup? Alterei e funcionou aqui.

Boa tarde, Segue trecho do meu código, mesmo setando MostraSetup como True, não traz o diálogo da impressora. Testei com o ACBrNFeDANFCeFortes "normal" e o diálogo é exibido corretamente. Não encontrei onde está a versão do componente, a data da unit ACBrDANFCeFortesFrA4.pas é de 04/05/2023. Tem mais alguma propriedade para setar para o diálogo ser exibido na DANFE em A4? dm.ACBrNFe1.DANFE := dm.ACBrNFeDANFCeFortesA41; dm.ACBrNFeDANFCeFortesA41.MostraSetup := True; dm.ACBrNFe1.DANFE.MostraSetup := True; dm.ACBrNFe1.NotasFiscais.Imprimir; Grato, Andrei

Bom dia, estou com um problema sério em dois clientes que atualizei recentemente meu sistema com versão mais recente do ACBr. Ambos utilizam certificado A3 com token, e em ambos tiveram os certificados excluídos do token! Um deles aconteceu duas vezes, na quinta passada, geraram outro certificado no mesmo token na segunda-feira, e hoje deu problema novamente! Tinha o Kaspersky instalado nessa máquina, desinstalei após o primeiro problema. Alguém já passou por algo assim? Alguma chance desse problema estar sendo causado pelo ACBr através do meu sistema? Estou utilizando a seguinte configuração: A máquina utiliza Win 10 64 bits, meu sistema foi desenvolvido em Delphi 2006 32 bits.

Segue pequena alteração no dfm e no pas para compatibilidade. ACBrBoletoFCFR.zip

Boa tarde, segue pequena atualização para tornar compatível com Fastreport 4 ACBrGNREGuiaFRDM.pas

Deixar registrado aqui nesse tópico a solução que encontrei:

Então..... depois de quebrar muito a cabeça, pesquisa daqui, pesquisa dali, resolvi abrir os .fr3 (o novo o trunk, e o meu que ainda funciona) no notepad++, e eis que são arquivos xml e no .fr3 do trunk identifiquei de cara as classes datasets, formats e variables que aparecem no print do post anterior (vide prints abaixo). Excluí essas seções, e copiei o PropData do xml que funcionava para o novo e..... voilá! As definições de vírus foram atualizadas. Ahh não, .... layout atualizado! Ufa! Facinho. Fazer mais alguns testes, mas parece que está tudo ok. Muito obrigado @BigWings e @Juliomar Marchetti pelo tempo e paciência.

Fiz em design e execução, mesmo problema, quando abre exibe a msg abaixo e os datasets ficam do jeito que mandei no outro post. Se eu fosse montar um layout do zero, como setaria os datasets dentro do FR3?

Claro, que tipo de "bocaberta" tu acha que sou? ..... Opa, não, tô usando o DANFE NFe. Ahhhhhh meu coraçaummmmm, é vergonha alheia que chama né? Muito obrigado @BigWings Aproveitando, quando abro o layout novo e aparece msg de erro, o layout até abre, mas não seta os datasets, a lista dos datasets está vazia, saberia me dizer onde eu ajusto isso?