Ir para conteúdo
  • Cadastre-se

hleorj

Moderadores
  • Total de ítens

    1.303
  • Registro em

  • Última visita

  • Days Won

    9

Posts postados por hleorj

  1. 2 horas atrás, EdmarFrazao disse:

    o cliente exige, duas grandes redes de supermercados. infelizmente tenho que implementar

    por isto neste clientes com St ainda não podemos usar os modelo acbr Fast e Fortes

    Usar infAdProd  atenderia somente quando não tiver importação ou exportação.

     

     

    No caso de importação ou exportação .. as informações estariam nas devidas tag

    -<ICMS>
    
    
    -<ICMS10>
     <orig>0</orig>
     <CST>10</CST>
     <modBC>3</modBC>
     <vBC>16.30</vBC>
     <pICMS>18.00</pICMS>
     <vICMS>2.93</vICMS>
     <vBCFCP>16.30</vBCFCP>
     <pFCP>2.00</pFCP>
     <vFCP>0.33</vFCP>
     <modBCST>4</modBCST>
     <pMVAST>74.56</pMVAST>
     <vBCST>31.30</vBCST>
     <pICMSST>18.00</pICMSST>
     <vICMSST>2.70</vICMSST>
     <vBCFCPST>31.30</vBCFCPST>
     <pFCPST>2.00</pFCPST>
     <vFCPST>0.30</vFCPST>
    </ICMS10>

     

    Sem alteração no componente, utilizo :

    <infAdProd>DADOS DE FCP :( BASE : 16,30 PERC. : 2,00 VALOR : 0,33) - FCP ST:( BASE. : 31,30 PERC. : 2,00 VALOR : 0,30);</infAdProd>

     

     

    Sem título.png

    • Curtir 1
  2. 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;

     

  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.

     

     

     

     

    • Curtir 1
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.