Jump to content

2 Dia do ACBr

O Dia da Automação Comercial está chegando!
Inscreva-se

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Gumercino

Erro de Invalid Pointer Operation no ACBrNFSe

Recommended Posts

Boa tarde.

Após a atualização do ACBr, comecei os testes e identifiquei que estou tendo retorno do erro "invalid pointer operation" na linha 962 da unit pnfsNFSe.

O erro sempre ocorre após eu carregar o componente com o arquivo .xml pelo método "LoadFromString" e efetuar qualquer operação com o webservice ou até mesmo após a impressão.

Segue imagem do erro e da unit com a linha especificada.

pnfsNFSe.png

Erro.png

Share this post


Link to post
Share on other sites

Boa tarde Gumercino,

Estranho, estou com os fontes atualizados e não estou tendo esse problema.

Você atualizou todos os fontes de todas as pastas?

Reinstalou os componentes?


Consultor SAC ACBr Italo Jurisato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Share this post


Link to post
Share on other sites

Boa tarde Italo.

Sim, reinstalei todos novamente.

Eu utilizo o seguinte método para adicionar os serviços, "Servico.ItemServico.Insert(Index, AObject)" e antes não tinha esse parâmetro AObject.

Mas eu estou passando ele de acordo com o que esta na função LerRps_EL, "Servico.ItemServico.Insert(Index, Servico.ItemServico.New)".

Não sei se pode estar vinculado.

 

Share this post


Link to post
Share on other sites

pnfsNFSe.thumb.png.4d0e8e35b0bf333a7a9c9ede63b80054.pngBoa noite Italo.

Acredito que eu encontrei aonde esta o erro.

Na unit pnfsNFSe a function TItemServicoCollection.New entrou no lugar da function TItemServicoCollection.Add, o que estava ocorre ndo é que dentro da function TItemServicoCollection.New tem a chamada da function TItemServicoCollection.Add.

Eu comentei a linha 1204, que se refere ao que citei acima e rodei o programa sem erro.

Segue imagem para melhor entendimento.

Share this post


Link to post
Share on other sites

Boa tarde Gumercino,

Essa sua alteração pode gerar efeito colateral em outros provedores.

Favor atualizar os fontes e faça novos testes.

  • Like 1

Consultor SAC ACBr Italo Jurisato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Share this post


Link to post
Share on other sites

Boa tarde Italo.

Desculpe a demora mas estava resolvendo uma demanda com um cliente.

Então, após a atualização dos fontes e realização de novos testes, o erro ainda permanece ocorrendo na seguinte situação:

1° - Faço o envio da NFSe pelo método ACBrNFSe1.Enviar;

2º - Faço a consulta da NFSe pelo método ACBrNFSe1.ConsultarLoteRps logo após o envio para verificar a situação da mesma;

3º - Executo o método ACBrNFSe1.NotasFiscais.Clear.

O erro esta ocorrendo na unit pnfsNFSe na linha 962.

Share this post


Link to post
Share on other sites

Italo.

Acabei de observar no site da prefeitura, o serviço esta indo duplicado.

Eu informo 1 serviço na nota e envia 2, quando eu informo 2 ele envia 4.

Share this post


Link to post
Share on other sites

Boa tarde Italo.

Consegui identificar o que esta ocasionando o erro.

Na unit pnfsNFSeR na linha 4112, esta sendo filtrado os serviços pela tag "Servicos" aonde desse filtrar a tag "Servico".

Fazendo esse único ajuste eu efetuei vários testes e não tive nenhum problema, funcionou tudo normalmente como tem que ser.

pnfsNFSeR.pas

  • Like 1

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...