hleorj

Faça alguns testes de impressão com o demo na última versão SVN. Post XML com informações necessárias para efetuarmos teste.

Utilize o demo para testar os arquivos fr3.

@RicardoVoigt Segue A Solicitação de ajuste.

@RicardoVoigt Isto , post para ficar documentado a alteração com os devidos testes de outros usuários . Grato @Marcio Lopes ACBr, pelo teste inicial. Post pode ser fechado ?

Nada mal , senhores.

@felipeiw Troque #13 por ; InfAdic.infCpl := Trim(InfAdic.infCpl)+ ';' +'Partilha realizada conf.Emenda Constitucional 87/2015: '+ ';' +texto; InfAdic.infCpl := Trim(InfAdic.infCpl)+ ';' +EnderecoEntrega

Abra o demo do acbrnfe , faça uma compilação do mesmo

Reinstalar o acbr , usando o install.

@levi, já no SVN grato pela sua contribuição.

No SVN na revisão : 13466 -- pcnConversao -- [+] Nova função para retornar a descrição do modelo function DescrModeloNFe(chave: String):String; -- ACBrNFeDANFeRL ACBrNFeDANFEFRDM -- [*] Refatoracao de ManterDocreferenciados , para utilização da função DescrModeloNFe

@RicardoVoigt, Obrigado. @JSantos, a propriedade foi implementada ao componente. Grato a todos.

As unit's ...pois temos fast report / fortes report.

@JSantos, no seu exemplo não vi duplicidade de informações.

@JSantos, post um exemplo da sua utilização e o arquivo XML.

@RicardoVoigt, qual a sua sugestão ?

Sim Por que, não usar o padrão do componente ?

Não

@felipeiw, Está é a regra de campo Memo , ajustar as palavras na linha, conforme o tamanho do componente DANFE. PS : nunca faça uma escrita sem os devidos espaço: número:486,casa 01,rio de janeiro.

@Herik Bom dia 1 - seu problema está relacionado ao cometários do post? 2 - pesquisou no fórum se o problema foi solucionado em algum post. 3 - sempre abra um NOVO post. Grato.

Ps : Ver manual • alterado a quantidade de casas decimais para 4 posições nos seguintes campos: a. campo qCom (página 89) e campo qTrib (página 90) no grupo prod; b. campo qUnid (página 100) - grupo IPI; c. campo qBCProd (páginas 104, e 105) - grupo PIS; d. campo qBCProd (páginas 107 e 108) - grupo COFINS;

Utilize esta regra : ACBrNFe1.DANFE.CasasDecimais.Formato := tdetMascara; // ou ACBrNFe1.DANFE.CasasDecimais.Formato := 1; ACBrNFe1.DANFE.CasasDecimais._Mask_qCom := ###,###,###,##0.0000 ACBrNFe1.DANFE.CasasDecimais._Mask_vUnCom := ###,###,###,##0.00000000 Ao utilizar ACBrNFe1.DANFE.CasasDecimais.Formato := tdetInteger; // ou ACBrNFe1.DANFE.CasasDecimais.Formato := 0; existe as regras para outros projetos : procedure TCasasDecimais.Set_qCom(AValue: Integer); begin if ((AValue >= 0) and (AValue <= 4)) then FqCom := AValue else FqCom := 2; end; procedure TCasasDecimais.Set_vUnCom(AValue: Integer); begin if ((AValue >= 0) and (AValue <= 10)) then FvUnCom := AValue else FvUnCom := 2; end; que não deixa alterar para valores superiores.

@Rafael jorge Tente ACBrNFe1.DANFE.CasasDecimais.Formato := tdetInteger; // ou ACBrNFe1.DANFE.CasasDecimais.Formato := 0; ACBrNFe1.DANFE.CasasDecimais._qCom := 4; ACBrNFe1.DANFE.CasasDecimais._vUnCom := 8; ou ACBrNFe1.DANFE.CasasDecimais.Formato := tdetMascara; // ou ACBrNFe1.DANFE.CasasDecimais.Formato := 1; ACBrNFe1.DANFE.CasasDecimais._Mask_qCom := ###,###,###,##0.0000 ACBrNFe1.DANFE.CasasDecimais._Mask_vUnCom := ###,###,###,##0.00000000

@levi Fiz alguns ajustes para o problema acima. Se não houve erros em testes / novos comentários envio ao svn. Grato ACBrNFeDANFEClass.pas ACBrNFeDANFeRLClass.pas ACBrNFeDANFeRL.pas ACBrNFeDANFEFR.pas ACBrNFeDANFEFRDM.pas

@levi na sua versão procedure TACBrNFeDANFeRL.ImprimirDANFEPDF(NFE : TNFe = nil); ... ... fAlternaCoresProdutos, fCorDestaqueProdutos, 200, 200, 10, 10, False, 10, 0, FImprimirDadosDocReferenciados); end; else begin ... .. fCorDestaqueProdutos, 200, 200, 10, 10, False, 10, 0, FImprimirDadosDocReferenciados); end; finally FreeAndNil(frlDANFeRL); end; end; no SVN .. procedure TACBrNFeDANFeRL.ImprimirDANFEPDF(NFE : TNFe = nil); ... ... fCorDestaqueProdutos ); end; else begin ... fCorDestaqueProdutos ); end; finally FreeAndNil(frlDANFeRL); end; end;

@levi O seu arquivo ACBrNFeDANFeRLClass.pas possui algumas divergências para o arquivo no SVN. Favor proceder os ajustes. Grato