Acess Violation No Consultar Nfse Por Rps

[Angelo Gomes]

Olá pessoal. Estou com um problema, tanto no meu software como no Demo. Ao consultar uma NFSe por RPS pelo segunda vez, ocorre um acess violation  nas linhas:

 if Assigned(NFSeRetorno)
  then NFSeRetorno.Free;

 na função TNFSeConsultarNfseRPS.Executar, linha 3274. Trabalho com a prefeitura de Ponta Grossa, provedor FintelISS.

 

Obrigado.

[leomcl]

Boa noite, 

 

Estou com o mesmo problema, mas é em outra prefeitura. O negócio é que estou chamando a função ConsultarNFSeporRPS() em um laço, para consultar um RPS atrás do outro.

Percebi que o erro é na linha:

FIdentificacaoRps.Free;

dentro de pnfsNFSe. Já coloquei um if Assigned() e uma condição para verificar se é igual a nil antes de dar o free, mas ele dá o free mesmo assim, gerando o access violation.

Isso ocorre na segunda interação do laço, ou seja, parece que algo ficou na memória na primeira chamada.

 

No laço faço isso:

 

                ACBrNFSe1.NotasFiscais.Clear;

                ACBrNFSe1.NotasFiscais.LoadFromFile(zArqXML); //aqui é meu arquivo XML

 

                ACBrNFSe1.ConsultarNFSeporRps(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero,

                                             ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie,

                                             TipoRPSToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo),

                                             ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.Cnpj,

                                             ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal);

 

Desde já agradeço,

 

Leandro

[Angelo Gomes]

Qual é a cidade e provedor que vc usa?

[leomcl]

Montes Claros/MG...

mas pelo que entendi do erro, não tem nada a ver, o problema é a destruição do objeto que citei, que está acontecendo incorretamente dentro do componente.

[Angelo Gomes]

Já estamos descutindo esse problema neste tópico:

 

 

com vc, já é a terceira prefeitura diferente que ocorre o problema. Infelizmente não consegui descobrir aonde acontece o erro, pra tentar arrumar.