Djalma Grivol

Sim, a do Windows. O relatório sai certo, só o código de barra que diminui com 125%.

Até tentei aumentar a largura, mas ele não aceita.

Boa tarde! Estou usando o ACBrBarCode para gerar o código de barra do DANFE. Uso o código abaixo para gerar uma imagem. QRImage.Width := ACBrBarCode.Width; QRImage.Height := ACBrBarCode.Height; QRImage.Canvas.Brush.Color := clWhite; QRImage.Canvas.Brush.Style := bsSolid; QRImage.Canvas.FillRect(ClientRect); ACBrBarCode.DrawBarcode(QRImage.Canvas); Quando estou na escala de 125% o código fica menor, já na escala de 100% fica normal. Existe alguma configuração para isso? Observação: Consigo ler os 2 códigos. Dephi 10.3 com QuickReport 6. Obrigado!

Bom dia! Descobri o problema. Estava usando TEncoding.UTF8.GetString(BytesOf(Xml)) para converter o Xml e gravar no BD. Tirei a conversão, assim gravo da mesma forma que o arquivo original. O componente estava dando problema pois provavelmente usa o TEncoding.UTF8.GetString.

Boa tarde! Estou enfrentando um problema de uma empresa que manda o XML com acentuação. Quando baixo o XML e carrego no componente ACBrNFe funciona legal. Quando salvo o XML no banco Firebird e depois tento carregar no componente gera o erro acima. Segue os 2 arquivos. Ok.Xml Problema.xml

Boa tarde! Ok, obrigado! Perfeito.

Se pudesse ser automático seria muito bom. As propriedades Ratio e Modul dependem do tipo do código de barras e do tamanho? Existe uma tabela para isso? Por exemplo: Codigo: 123456781234123123456789 Tipo: bcCode128C Ratio: 2 Modul: 1 Essa configuração funciona. Se eu não atribuir as propriedades de Ratio e Modul em tempo de execução o código fica desconfigurado.

O Tamanho do código não se ajusta automaticamente. O componente teria que alterar a propriedade Width para ficar sem o espaço em branco.

Bom dia! Quando mudo a propriedade Text do ABCrBarCode o componente não recalcula a largura do código de barras. Como posso deixar isso automático?

Show! Obrigado mais uma vez pelas informações. Em relação ao DANFE em QuickReport eu sempre mantenho ele de acordo com o MOC.

Se na instalação do ACBr eu selecionar o FortesReport ou FPDF eu tenho que ter eles instalados na minha máquina?

É que todos meu relatórios estão em QuickReport (são muitos). Vocês não tem os fontes antigos? Se puderem me disponibilizar eu agradeço. Ai só faço a atualização.

Bom dia! Estou desenvolvendo a impressão do DANFE em paisagem no QuickReport. Antigamente vocês tinham essa opção, poderia me disponibilizar esses fontes?

Boa tarde! Pode fechar. Acredito que o problema é a impressora redirecionada mesmo. Obrigado!

Boa tarde! O problema era o espaço mesmo. Minha rotina estava dessa forma det nitem = "1" alterei para det nitem="1" O estranho é como o Diego Foliene conseguiu validar mesmo o arquivo estando com espaço. Obrigado!

Aqui nessa variável Arquivo já esta errado. Pelo que entendi o arquivo esta sendo manipulado em leitor.arquivo na pcnLeitor

Boa tarde! Se mando o arquivo Xml Assinado funciona normalmente. Mas se mando o arquivo sem assinar ele muda. Quando passo o Xml para o componente ele gera ele novamente? O arquivo Xml foi mudado em algum momento. Você esta usando a Pcn?

Bom dia! Acho que achei o problema. Veja a linha abaixo. while pos('<det nItem=',ItensTemp) <> 0 do A variavel Itenstemp esta com o conteúdo <det nItem = "1">. Tem um espaço entre nitem e o igual. Por isso que ele não entra no laço. Porque o componente coloca esse espaço sendo que no Xml que gero não tem? Estou com a versão de 03/11/2023

Bom dia! Estou usando o PCN Em relação a alteração de fontes não há. Coloquei o break-point e realmente ele não entra no laço. Em relação a formação do Xml, pelo que vi tenho que colocar a tag <NFe xmlns="http://www.portalfiscal.inf.br/nfe"> no inicio senão ele não carrega a nota, é isso mesmo? Tenta validar esse xml que esta em anexo. Segue o xml 000024.XML

Ok, fico no aguardo. Em relação ao OpenSSL gera o mesmo erro.

Mais um informação. Se carrego o xml já assinado o ACBrNFe valida normalmente (gerei um xml assinando pelo componente da TecnoSpeed). 000015.XML 000015ass.XML

Vejam que interessante. 25.xml = Xml gerado pelo sistema ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(Xml); 25xml.xml = ACBrNFe1.NotasFiscais[0].XML 25orig.xml = ACBrNFe1.NotasFiscais[0].XMLOriginal 25ass.xml = ACBrNFe1.NotasFiscais[0].XMLAssinado (o problema está aqui, depois que assina some o item) 25.XML 25ass.XML 25orig.XML 25xml.XML

Após utilizar o LoadfromFile() no programa exemplo o componente sobrescreve o arquivo com o Xml assinado (excluindo o item). O componente não teria que pegar o Xml que eu gerei e simplesmente assinar? Veja 25.XML

A rotina ACBrNFe.NotasFiscais.LoadFromFile possui dois parâmetros, o primeiro deles é o arquivo e o segundo é um tipo booleano que vai dizer se o componente deve gerar o XML novamente. Veja se não está usando o valor True para o segundo parâmetro na sua rotina. (testei das 2 formas) Existem duas units diferentes que fazem a leitura e a geração do XML, as da pcn e as que utilizam ACBrXmlDocument. No momento que fez a instalação, você marcou no instalador a opção "Usar ACBr_XML_Document"? Se sim, está usando ACBrXMLDocument caso contrário está usando pcn. Veja se o comportamento é o mesmo com ambas. (não me lembro, como faço para testar?) Pelas configurações do seu arquivo INI, está utilizando a configuração do WinCrypt que é recomendada para o certificado A3. Este é o seu caso? Se for certificado A1, consegue realizar um teste com OpenSSL? (uso a1, com OpenSSL dá o seguinte erro) Se você não estiver carregando um XML, mas sim alimentando as classes e gerando o XML, é importante que não haja mais de uma ocorrência de ACBrNFe1.NotasFiscais.Add, pois para cada NotasFiscais.Add, você está na verdade adicionando mais uma nota na lista. (só carrego 1 xml ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(Xml);

Boa tarde! Fiz o teste com o programa exemplo. Mesmo erro.