Ir para conteúdo
  • Cadastre-se

dev botao

[Error] Acbribptax.pas(211): Undeclared Identifier: 'quebrarlinha'


Ver Solução Respondido por Régys Silveira,
  • Este tópico foi criado há 3858 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde pessoal,

 

Fiz o upload dos arquivos atualizados do svn://svn.code.sf.net/p/acbr/code/trunk .

Fui compilar e de o erro [Error] ACBrIBPTax.pas(211): Undeclared identifier: 'QuebrarLinha'

 

Pelo que entendi na versão anterior ele realizava essa quebra por "Item.DelimitedText " e nessa atualização foi criado essa função.

 

Alguem teve este problema ?

 

Agradeço a atenção,

Alexandre

Link para o comentário
Compartilhar em outros sites

  • Moderadores
  • Solution

Sinceramente, só pode ter algo antigo, porque aqui está tudo normal e tenho o ACBr instalado em 6 máquinas virtuais diferentes em diferentes versões do Delphi.

Você está recompilando todos os pacotes na ordem correto ou esta utilizando o ACBrInstall para isso?

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

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

Régys, consegui resolver fazendo uma limpeza nas bibliotecas e desistalando o acbr antigo. 

 

Agora utilizando o componente ocorreu mais um problema e duvida, não sei se preciso abrir outro topico, caso precisar eu crio sem problemas ..

Quando o componente baixa a tabela ele faz a exportação para o csv com usando o codigo

Texto := Texto +
      AddAspasDuplas(Itens.NCM) + ',' +
      AddAspasDuplas(Itens.Excecao) + ',' +
      AddAspasDuplas(IntToStr(Integer(Itens.Tabela))) + ',' +
      AddAspasDuplas(FloatToString(Itens.AliqNacional)) + ',' +
      AddAspasDuplas(FloatToString(Itens.AliqImportado)) + ',' +
      AddAspasDuplas(Itens.Descricao) +
      sLineBreak;
 
resultando em:    "1012100";"";"0";"26.75";"27.35";"Reprodutores de raça pura";
 
Porem na hora de consumir esses dados (TACBrIBPTax.PopularItens;)

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);

 

Dessa forma da erro quando ele tenta converter o Item.Strings[5]. O correto não seria ser da forma abaixo ?

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];
Link para o comentário
Compartilhar em outros sites

  • Moderadores

Essa dúvida já existe no site, são duas coisas diferentes, a leitura dos dados de um arquivo .csv deve ser no padrão IBPT, ou seja, usar o arquivo disponibilizado pelo IBPT.

O método para gerar o .CSV já é diferente do padrão IBPT justamente para diferenciar, esse método de gerar para um .CSV deve ser usado para exporta a tabela para um outro aplicativo.

  • 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á 3858 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.