Pesquisar na Comunidade
Showing results for tags 'ibptax'.
Encontrado 7 registros
-
Senhores, o Delphi apresenta erro na compilação se a unit ACBrIBTAX estiver declarada. Na instalação não optei por todos os módulos. Se esta for a causa, qual deles tenho que instalar onde esta opção esteja incluída ? A compilação apresenta o erro no seu aplicativo de atualização de IBPT. interface uses ACBrIBPTax, Windows, Messages, ...... Agradeço ... não optei...
-
Em minha aplicação, uso o componente ACBrIBPTax para fazer download da tabela IBPT atualizada, e atualizar minha base dados. Porém notei que ao atualizar minha base, grande parte das classificações fiscais que em sua descrição possui caracteres especiais, como por exemplo : "Outros búfalos para reprodução". Após serem baixadas através do método DownloadTabela tinham seus caracteres especiais substituídos por pontos de interrogação ("?") ficando com a descrição da seguinte forma: "Outros b?falos para reprodu??o". Ao debugar todo o método de download do componente, percebi que até certo momento as descrições estavam todas corretas, porém ao passar pela seguinte verificação no arquivo ACBrSocket : if ParseText then RespHTTP.Text := ACBrUtil.ParseText( RespHTTP.Text, True, IsUTF8 ) else RespHTTP.Text := ACBrUtil.DecodeToString( RespHTTP.Text, IsUTF8 ); troca os caracteres especiais por pontos de interrogação, independentemente da propriedade ParseText do componente. Observação: Formato de codificação do arquivo é Ansi. Alguém teve esse tipo de problema ?? Como proceder ?? Seria algum problema com o método de Download do Componente ??
-
Segue anexo ACBrIBPTax.pas
-
Olá Verifiquei que não foi adicionado a coluna TIPO na leitura das tabelas IBPtax. Teve algum motivo? Caso acha interesse, posso adicionar e devolver os fontes.
-
Prezados amigos Atualizei o acbr total, fiz a recompilação do projeto, e estou tentando importar a nova tabela do IBPTax - TabelaIBPTaxSP14.2.a.csv simplismente o componente nao importa nenhum registro. o arquivo fica zerado. tem algum detalhe a observar ? alguem ja fez esta importação? segue parte do codigo: if ibpt.AbrirTabela(abrir.FileName) then begin for I := 0 to ibpt.Itens.Count -1 do begin tbl_ncm.Insert; tbl_ncmid_ibpt.AsInteger := contador; tbl_ncmncm_ibpt.AsString := IBPT.Itens.NCM; tbl_ncmdescricao.AsString := RetiraAcentos(uppercase(TrimLeft(ibpt.Itens.Descricao))); tbl_ncmex_ibpt.AsString := IBPT.Itens.Excecao; tbl_ncmtabela_ibpt.AsString := inttostr(integer(ibpt.Itens.Tabela)); tbl_ncmaliqNacional_ibpt.AsFloat := ibpt.Itens.FederalNacional; tbl_ncmaliqInternacional_ibpt.AsFloat := ibpt.Itens.FederalImportado; tbl_ncmaliqEstadual_ibpt.AsFloat := ibpt.Itens.Estadual; tbl_ncmaliqMunicipal_ibpt.AsFloat := ibpt.Itens.Municipal; tbl_ncm.ApplyUpdates(0); tbl_ncm.CommitUpdates(); contador := contador + 1; progresso.Position := progresso.Position + 1; end; end; obrigado Claudinei de Luca
-
Bom dia pessoal, Após vencer a vigência da ultima tabela, qual o endereço que disponibiliza a nova versão do arquivo csv? e para pdv não fiscal, é obrigatório informar o imposto aproximado? obrigado
-
Olá, estou com uma dúvida em relação ao campo exceção da tabela do IBPT. Utilizando o componente AcbrIbptax, percebi que o campo ex não é utilizado como um critério de busca pelo método Procurar. Assim, se eu precisar encontrar a alíquota de um NCM com a exceção 1, por exemplo, o método Procurar acaba encontrado a alíquota referente o NCM sem exceção, pois o mesmo é encontrado primeiro. Exemplo: NCM: 22030000 = Alíquota nacional 36% NCM: 22030000 (ex 1) = Alíquota nacional 49% Logo, tive que implementar a busca manualmente, sendo que existe o método Procurar. Então qual é a prática correta nesta situação? Existe outro método para isso? Obrigado.
