Ir para conteúdo
  • Cadastre-se

dev botao

Refatoração ACBrNFeDANFEFRDM para aplicar os novos campos


hleorj
  • Este tópico foi criado há 3100 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores

Refatoração para aplicar os novos campos. e ajustar a revisao 10404.

[-] Correção dos FieldDefs , aplicada na revisao 10404 .. 
         FieldDefs.Add('vFrete'    , ftString, 18);
        FieldDefs.Add('vOutro'    , ftString, 18);
        FieldDefs.Add('vSeg'      , ftString, 18);
        FieldDefs.Add('vDesc'     , ftString, 18);

[*] Novos campos em cdsDadosProdutos

        FieldDefs.Add('Valorliquido'    , ftString, 18);
        FieldDefs.Add('ValorAcrescimos' , ftString, 18);

[*] Novo campo em cdsCalculoImposto

       FieldDefs.Add('ValorApagar' , ftFloat);

 

    Os novos campos serão aplicados no arquivo de DAnfe DANFeNFCe_dc.fr3
    O arquivo DANFeNFCe.fr3 ficara obsoleto com esta atualização.

Resultado da Atualização
danfece_dc.png.26853814258f8972c015c8b84

 

=== segue arquivo 

Report.rar

==== ===

Editado por hleorj
Equipe ACBr Henrique Leonardo
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Tecnólogo em processamento de dados

E-mail [email protected] - Skype : hleorj

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Henrique  no svn!

Batata funcionou!

só agora preciso olhar todos os fr3 e remover a lambança que temos na pasta e aplica tudo para todos!

 

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

Boa tarde, aproveitando o tópico, nesta unit esta com erro nesta parte do código 


         

CpDescrProtocolo := frxReport.FindObject('Memo5');
              if Assigned(CpDescrProtocolo) then
                CpDescrProtocolo.Visible := cdsParametros.FieldByName('Contingencia_Valor').AsString <> '';

              CpTotTrib := frxReport.FindObject('ValorTributos');
              if Assigned(CpTotTrib) then
                CpDescrProtocolo.Visible := cdsCalculoImposto.FieldByName('VTotTrib').AsFloat > 0;

 

Como pode ser visto esta usando um objeto que pode não estar instanciado, acredito que foi erro ao copiar a rotina.

Acredito que já seja antigo o problema, só verifiquei o mesmo porque fizemos alterações na danfe e ela estava com o memo do protocolo com outro nome =D.

Abaixo a unit com a correção. 

muito obrigado

ACBrNFeDANFEFRDM.rar

Editado por rafikrafael

Rafael Marcelo dos Santos

Desenvolvedor de Sistemas

Ápice Sistemas - Paranavaí - PR

email: [email protected]

fone: 44 3045 6878

Link para o comentário
Compartilhar em outros sites

  • Moderadores
3 horas atrás, Juliomar Marchetti disse:

Boa tarde

confere no svn se ficou legal!

Promoveu as Dc para Oficiais ?

Duvida, você conhece os problemas nos arquivos DanfeRetrato.fr3 e DanfePaisagem.fr3 ?

Equipe ACBr Henrique Leonardo
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Tecnólogo em processamento de dados

E-mail [email protected] - Skype : hleorj

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3100 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.