hleorj
-
Total de ítens
1.303 -
Registro em
-
Última visita
-
Days Won
9
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que hleorj postou
-
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
