Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

  • Moderadores
Postado

Ajustes na danfe para aceita Nfe denegadas corretamente (  205 , 301 e 302 );

Ajustes no código . : Remoção de variáveis e if's,

Implementação de algumas rotina em case após ajustes no código.

Danfe Testada em xe8 e  xml´s do regine normal e simples nacional.

Favor fazerem os seus teste para devida implantacao no SVN

   

 

 

ACBrNFeDANFeRLRetrato.dfm

ACBrNFeDANFeRLRetrato.pas

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

  • Fundadores
Postado

Testei no Lazarus, e tudo OK... já subi para o SVN,  com algumas outras modificações que tb fiz...

-- ACBrNFeDANFeRLRetrato --
[*]  Ajustes na danfe para aceita Nfe denegadas corretamente (  205 , 301 e 302 )
[*]  Ajustes no código . : Remoção de variáveis e if's,
[*]  Implementação de algumas rotina em case após ajustes no código.
     http://www.projetoacbr.com.br/forum/index.php?showtopic=23439
     (por: hleorj)

[*]  Revisão de Strings com acentos convertendo-as com ACBrStr()
[*]  Remoção de comentários desnecessários, indentação
     (por: DSA)
                 

 

Muito Obrigado pela contribuição

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

  • Moderadores
Postado

Muito  Obrigado.

  Revisão 2  -  

  Em testes :

    - Mais Remoção de Variáveis  :)

    - Mais Remoção de If´s :)

    - Mais Estrutura em case. :)

    - Novos procedimentos e Funções.

    - Código limpo para manutenção e implementação.

    - Novos enumeradores para implantar em pcnConversoNfe.pas para serem aproveitados.

 

  • Curtir 2
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

  • Moderadores
Postado

Implatação de Enumaradores :

function modFreteToDesStr(const t: TpcnModalidadeFrete): string;

function indProcToDescrStr(const t: TpcnIndicadorProcesso): string;

 

 

pcnConversao.pas

Implatação de Enumaradores : 

function VeiculosRestricaoStr( const iRestricao :Integer ): String;
function VeiculosCorDENATRANStr( const sCorDENATRAN : String ): String;
function VeiculosCondicaoStr( const condVeic: TpcnCondicaoVeiculo ): String;
function VeiculosVinStr( const sVin: String ): String;
function VeiculosEspecieStr( const iEspecie : Integer ): String;
function VeiculosTipoStr( const iTipoVeic : Integer ): String;
function VeiculosCombustivelStr( const sTpComb : String ): String;
function VeiculosTipoOperStr( const TtpOP : TpcnTipoOperacao ): String;

function ArmaTipoStr( const TtpArma : TpcnTipoArma ): String;

pcnConversaoNFe.pas

Revisão 2 : Diversos ajustes no código fonte.

Implantação de Encerrante no grupo combustível.

 

 

ACBrNFeDANFeRLRetrato.pas

ACBrNFeDANFeRLRetrato.dfm

  • Curtir 1
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

  • Moderadores
Postado (editado)

Erro Grave :

     Após novos teste

       De        

        cdsItens.FieldByName('ALIQIPII').AsString     := FormatFloat('##0.00', Imposto.IPI.VIPI);

      Para 

        cdsItens.FieldByName('VALORIPI').AsString     := FormatFloat('##0.00', Imposto.IPI.VIPI);

 

ACBrNFeDANFeRLRetrato.pas

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

  • Membros Pro
Postado

Boa tarde,

Quando tento instalar o pacote ACBR_NFeDanfeRL aparece os seguints erros na unit ajustada pelo nosso amigo Henrique:

 

[DCC Error] ACBrNFeDANFeRLRetrato.pas(1291): E2003 Undeclared identifier: 'modFreteToDesStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1444): E2003 Undeclared identifier: 'indProcToDescrStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1804): E2003 Undeclared identifier: 'VeiculosTipoOperStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1813): E2003 Undeclared identifier: 'VeiculosCombustivelStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1820): E2003 Undeclared identifier: 'VeiculosTipoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1821): E2003 Undeclared identifier: 'VeiculosEspecieStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1822): E2003 Undeclared identifier: 'VeiculosVinStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1823): E2003 Undeclared identifier: 'VeiculosCondicaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1825): E2003 Undeclared identifier: 'VeiculosCorDENATRANSTr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1827): E2003 Undeclared identifier: 'VeiculosRestricaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1865): E2003 Undeclared identifier: 'ArmaTipoStr'
 

Esses estão declarados na unit pcnconversao.pas porém não compila. Alguma dica do que pode ser?

 

Grato,

Rodrigo Cardilo

Card System Info

[email protected]

  • Moderadores
Postado

Atualize o acbr; 

   Atentar para o meu erro grave.

 

Boa tarde,

Quando tento instalar o pacote ACBR_NFeDanfeRL aparece os seguints erros na unit ajustada pelo nosso amigo Henrique:

 

[DCC Error] ACBrNFeDANFeRLRetrato.pas(1291): E2003 Undeclared identifier: 'modFreteToDesStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1444): E2003 Undeclared identifier: 'indProcToDescrStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1804): E2003 Undeclared identifier: 'VeiculosTipoOperStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1813): E2003 Undeclared identifier: 'VeiculosCombustivelStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1820): E2003 Undeclared identifier: 'VeiculosTipoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1821): E2003 Undeclared identifier: 'VeiculosEspecieStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1822): E2003 Undeclared identifier: 'VeiculosVinStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1823): E2003 Undeclared identifier: 'VeiculosCondicaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1825): E2003 Undeclared identifier: 'VeiculosCorDENATRANSTr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1827): E2003 Undeclared identifier: 'VeiculosRestricaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1865): E2003 Undeclared identifier: 'ArmaTipoStr'
 

Esses estão declarados na unit pcnconversao.pas porém não compila. Alguma dica do que pode ser?

 

Grato,

Os enumerados estão declarados em pcnConversaoNfe.pas

 

Atualize o Acbr.

   Atentar para o erro Grave. postado acima.

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

  • Membros Pro
Postado

Atualize o acbr; 

   Atentar para o meu erro grave.

 

Boa tarde,

Quando tento instalar o pacote ACBR_NFeDanfeRL aparece os seguints erros na unit ajustada pelo nosso amigo Henrique:

 

[DCC Error] ACBrNFeDANFeRLRetrato.pas(1291): E2003 Undeclared identifier: 'modFreteToDesStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1444): E2003 Undeclared identifier: 'indProcToDescrStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1804): E2003 Undeclared identifier: 'VeiculosTipoOperStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1813): E2003 Undeclared identifier: 'VeiculosCombustivelStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1820): E2003 Undeclared identifier: 'VeiculosTipoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1821): E2003 Undeclared identifier: 'VeiculosEspecieStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1822): E2003 Undeclared identifier: 'VeiculosVinStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1823): E2003 Undeclared identifier: 'VeiculosCondicaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1825): E2003 Undeclared identifier: 'VeiculosCorDENATRANSTr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1827): E2003 Undeclared identifier: 'VeiculosRestricaoStr'
[DCC Error] ACBrNFeDANFeRLRetrato.pas(1865): E2003 Undeclared identifier: 'ArmaTipoStr'
 

Esses estão declarados na unit pcnconversao.pas porém não compila. Alguma dica do que pode ser?

 

Grato,

Os enumerados estão declarados em pcnConversaoNfe.pas

 

Atualize o Acbr.

   Atentar para o erro Grave. postado acima.

Oi Henrique. já atualizei o svn e inclusive baixei o arquivo que você postou no erro grave e não consigo compilar.

Estranho pois está declarado tudo corretamente nas 2 units, pcnConversao e pcnCoversaoNFe.

O que mais pode ser?

Rodrigo Cardilo

Card System Info

[email protected]

  • Moderadores
Postado (editado)

1-  Esta utilizando o Trunk2 ? pois estas atualizações devem ser aplicadas nele;

2- caso ja esteja no trunk2 , Abra o seu projeto 

                                               Selecione Project

                                                  selecione Build All  Project

                                               

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

  • Membros Pro
Postado

1-  Esta utilizando o Trunk2 ? pois estas atualizações devem ser aplicadas nele;

2- caso ja esteja no trunk2 , Abra o seu projeto 

                                               Selecione Project

                                                  selecione Build All  Project

                                               

Oi Henrique, 

É no trunk2 sim.. fiz o que você sugeriu e resolveu..

 

Muito agradecido.

 

Rodrigo Cardilo

Card System Info

[email protected]

  • Moderadores
Postado (editado)

Henrique,

Devo considerar apenas esse post para o Merge ?

Correto , Daniel

Editado por hleorj
  • Curtir 1
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

  • Este tópico foi criado há 3397 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.

The popup will be closed in 10 segundos...