Jump to content

hleorj

Moderadores
  • Content Count

    1,233
  • Joined

  • Last visited

  • Days Won

    9

hleorj last won the day on September 13 2017

hleorj had the most liked content!

Community Reputation

304 Excellent

About hleorj

  • Rank
    Henrique Leonardo
  • Birthday 08/14/1963

Profile Information

  • Sexo
    Masculino
  • Localização
    Rio de Janeiro - Rj

Recent Profile Visitors

2,811 profile views
  1. Sugestão minha : function TACBrNFeDANFEClass.ManterColunaDesconto( Value : Double): Boolean; begin // idaiSempre => Sempre apresentar a coluna desconto // idaiNunca => Nunca apresenta a coluna desconto // idaiComValor => Apresentar a coluna desconto se value > 0 ( desconto ) case fImprimeDescAcrescItem of idaiSempre : Result := True; idaiNunca : Result := False; idaiComValor : Result := ( value > 0 ); end; end;
  2. Sendo uma nova propriedade ( ImprimeDescAcrescItem ) . os critérios de implantação ficam mas rígidos . E um parecer de outros moderadores. para a nova propriedade no acbr. Grato
  3. Evitar um código duplicado. ver ACBrNFeDANFeRLRetrato e ACBrNFeDANFeRLPaisagem // Controle para exibir coluna de desconto txtValorDesconto.Visible := ( ( fpDANFe.ImprimeDescAcrescItem = idaiSempre ) or ( ( fpDANFe.ImprimeDescAcrescItem = idaiComValor ) and ( fpNFe.Total.ICMSTot.vDesc > 0 ) ) ); Adicionado uma nova função na unit ACBrNFeDANFEClass : function TACBrNFeDANFEClass.ManterColunaDesconto( Value : Double): Boolean; begin // idaiSempre => Sempre apresentar a coluna desconto // idaiNunca => Nunca apresenta a coluna desconto // idaiComValor => Apresentar a coluna desconto se value > 0 ( desconto ) Result := ( ( fImprimeDescAcrescItem = idaiSempre ) or ( ( fImprimeDescAcrescItem = idaiComValor ) and ( Value > 0 ) ) ); end; E refatorando as unit ACBrNFeDANFeRLRetrato e ACBrNFeDANFeRLPaisagem com : // Controle para exibir coluna de desconto txtValorDesconto.Visible := ManterColunaDesconto( fpNFe.Total.ICMSTot.vDesc )
  4. @Renato Rubinho, não esquente a cabeça com evitar problemas; Aqui adoramos problemas solucionados com propriedade e adoramos um padrão que seja , compreendidos todos. Ex ; Nome de componentes RLDraw1.Visible := txtValorDesconto.Visible; poderia ser rlsDivDesconto = txtValorDesconto.Visible; Outro // Valor Unitario RLLabel87.Left := 405; RLLabel87.Width := 50; RLLabel88.Left := 405; RLLabel88.Width := 50; txtValorUnitario.Left := 405; txtValorUnitario.Width := 50; para // Valor Unitario RLLValorUnitario.Left := 405; RLLValorUnitario.Width := 50; RLLValorUnitario.Left := 405; RLLValorUnitario.Width := 50; txtValorUnitario.Left := 405; txtValorUnitario.Width := 50;
  5. Quando comecei , ajudar em open source . Sofri bastante para conhecer as regras. Sou usuário , atualmente da danfe em fast report. E para colocar várias soluções em produção e aprendi usando muito o lado Negro. Com isto, o acbr me deu certa liberdade para ajustar a danfe em fortes report. Outra regra : Sempre atualizar o arquivo de log ( acima tem ele ). ps :. Vou pedir a meu amigo @BigWings para validar TB a sua ideia.
  6. @Renato Rubinho, segue o arquivo de log para justificar a regra. Usando o lado negro .. pode conseguir em Fast , também ACBrNFeDANFeRL-change-log.txt
  7. Regra : Alterações na danfe de nfe, devem aplicadas nos tipos paisagem e retrato ao mesmo tempo. E se possível aplicar também na danfe desenvolvida em fast report.
  8. Vale a pena .. Adquirir o curso do Gilberto .. tirou grandes duvidas em relação ao componente nos detalhes Grato @xyberx
  9. Sugiro, que não coloque em produção os arquivos da pasta obsoletos. Em algum momento terá um problema que não estamos dando suporte.. Utilize o componente em Report Fortes para imprimir suas danfe´s. Terá um resultado comparável a danfe desenvolvida em Fast Report.
  10. Esta fazendo um Crtl + C ..depois Crtl + V ( copy - paste ) no campo ? Aqui foi sem problemas
×
×
  • Create New...