Ir para conteúdo
  • Cadastre-se

dev botao

Erro de Invalid Pointer Operation no ACBrNFSe


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

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

Link para o comentário
Compartilhar em outros sites

  • Consultores

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 Giurizzato 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

Araraquara - A era dos Trólebus

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

 

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

Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia Gumercino,

Favor anexar a unit alterada para que possamos analisar.

Consultor SAC ACBr

Italo Giurizzato 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

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Gumercino,

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

Favor atualizar os fontes e faça novos testes.

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato 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

Araraquara - A era dos Trólebus

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

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

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Gumercino,

Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

  • Curtir 2
Consultor SAC ACBr

Italo Giurizzato 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

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

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