Ir para conteúdo
  • Cadastre-se

dev botao

Dificuldade Com Acbribptax


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

Recommended Posts

Senhores

 

Atualizei hoje pelo svn

 

e tive de modificar a "popularitens" no componente

 

onde era

          with Itens.New do
          begin
            NCM           := Item.Strings[0];
            Excecao       := Item.Strings[1];
            Tabela        := TACBrIBPTaxTabela(StrToInt(Trim(Item.Strings[2]))) ;
            Descricao     := Item.Strings[3];
            AliqNacional  := StringToFloatDef(Item.Strings[4], 0.00);
            AliqImportado := StringToFloatDef(Item.Strings[5], 0.00);
            
          end;

ficou assim

          with Itens.New do
          begin
            NCM           := Item.Strings[0];
            Excecao       := Item.Strings[1];
            Tabela        := TACBrIBPTaxTabela(StrToInt(Trim(Item.Strings[2]))) ;
            AliqNacional  := StringToFloatDef(Item.Strings[3], 0.00);
            AliqImportado := StringToFloatDef(Item.Strings[4], 0.00);
            Descricao     := Item.Strings[5];
          end;

Para ficar compativel com o arquivo exportado em CSV

 

Abraços

 

Jair Carlos Müller

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Não entendi a modificação, porque todos estão utilizando e testei aqui e está correto não tem erros, você fala compatibilizar com qual arquivo CSV, o gerado pela IBPT ou pelo próprio componente, veja são situações diferentes.

 

O componente vai ler do IBPT e esse ele está fazendo correto.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link para o comentário
Compartilhar em outros sites

Não entendi a modificação, porque todos estão utilizando e testei aqui e está correto não tem erros, você fala compatibilizar com qual arquivo CSV, o gerado pela IBPT ou pelo próprio componente, veja são situações diferentes.

 

O componente vai ler do IBPT e esse ele está fazendo correto.

 

Regys

 

O que estou tentando explicar, eh que a rotina de exportacao, pra CSV e outros, esta com o campo "DESCRICAO" na ultima coluna (coluna 6), conforme rotina de "exportacao" abaixo:

  for I := 0 to Itens.Count - 1 do
  begin
    Texto := Texto +
      AddQuoted(Itens[I].NCM) + ADelimitador +
      AddQuoted(Itens[I].Excecao) + ADelimitador +
      AddQuoted(IntToStr(Integer(Itens[I].Tabela))) + ADelimitador +
      AddQuoted(FloatToString(Itens[I].AliqNacional)) + ADelimitador +
      AddQuoted(FloatToString(Itens[I].AliqImportado)) + ADelimitador +
=>    AddQuoted(Itens[I].Descricao) + ADelimitador +
      sLineBreak;
  end;

Ate ai esta tudo correto!

 

E quando voce carrega o CSV gerado pelo componente, ele esta lendo a coluna 4 como sendo "DESCRICAO", que na verdade eh o campo "ALIQNACIONAL"  conforme rotina "popularitens" abaixo:

with Itens.New do
begin
   NCM           := Item.Strings[0];
   Excecao       := Item.Strings[1];
   Tabela        := TACBrIBPTaxTabela(StrToInt(Trim(Item.Strings[2]))) ;
=> Descricao     := Item.Strings[3];
   AliqNacional  := StringToFloatDef(Item.Strings[4], 0.00);
   AliqImportado := StringToFloatDef(Item.Strings[5], 0.00);
end;

Por isso tive de fazer a modificação, carregando o campo "DESCRICAO" no final conforme rotina abaixo:

with Itens.New do
begin
   NCM           := Item.Strings[0];
   Excecao       := Item.Strings[1];
   Tabela        := TACBrIBPTaxTabela(StrToInt(Trim(Item.Strings[2]))) ;
   AliqNacional  := StringToFloatDef(Item.Strings[3], 0.00);
   AliqImportado := StringToFloatDef(Item.Strings[4], 0.00);
=> Descricao     := Item.Strings[5];
end;

Mas se para voces esta funcionando, OK

 

Devo estar com outro problema aqui!

 

Abraços

Editado por j2c9m7

Jair Carlos Müller

Link para o comentário
Compartilhar em outros sites

  • Moderadores

A rotina de exportação como disse nada tem a ver com a rotina de leitura, foi feita intencionalmente diferente, você não vai ler um arquivo gerado pelas rotinas de geração, deve ler diretamente pelo arquivo disponibilizado pelo IBPT.

 

Leitura = usar arquivo IBPT

Exportação = usar se precisar enviar para outro aplicativo que não conheça o padrão IBPT, por isso existem vários tipos: XML, CSV, TXT, etc, etc.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link para o comentário
Compartilhar em outros sites

A rotina de exportação como disse nada tem a ver com a rotina de leitura, foi feita intencionalmente diferente, você não vai ler um arquivo gerado pelas rotinas de geração, deve ler diretamente pelo arquivo disponibilizado pelo IBPT.

 

Leitura = usar arquivo IBPT

Exportação = usar se precisar enviar para outro aplicativo que não conheça o padrão IBPT, por isso existem vários tipos: XML, CSV, TXT, etc, etc.

 

 

Regys

 

Entendi, obrigado pela explicaçao!

 

Abraços

Jair Carlos Müller

Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
  • Moderadores

nao daria pra exportar no formato da ibpt?????

Não tem porque exportar no formato IBPT se você já tem ele, o componente lê do arquivo IBPT que está no formato IBPT, para que vou ler para dentro do componente e gerar novamente?

Bastaria usar o arquivo original então.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link para o comentário
Compartilhar em outros sites

  • 1 ano depois...

Pessoal, 

 

Estou tentando importar o arquivo TabelaIBPTaxSP14.2.a.csv porém ele contem um número maior de colunas devido aos campos de imposto estadual e municipal. Baixei hoje do SVN a última versão do projeto. 

 

Existe alguma outra rotina para importar os arquivos por estado?

 

Vlw !

Link para o comentário
Compartilhar em outros sites

  • Consultores

Pessoal,

Estou tentando importar o arquivo TabelaIBPTaxSP14.2.a.csv porém ele contem um número maior de colunas devido aos campos de imposto estadual e municipal. Baixei hoje do SVN a última versão do projeto.

Existe alguma outra rotina para importar os arquivos por estado?

Vlw !

O componente ainda não foi atualizado para trabalhar com as novas tabelas. Veja esse tópico:

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

  • Moderadores

O componente foi atualizado, bem como o demo demonstrando os novos campos, basta atualizar e testar, aproveitei e adicionei as tabelas de todos os estados ao repositorio SVN também, as tabelas se encontram no diretório: "<ACBr>\Exemplos\ACBrIBPTax\tabela\"

  • Curtir 1

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3440 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.

The popup will be closed in 10 segundos...