Nenhum RPS adicionado ao componente

[K2 SOFTWARE]

Boa tarde a todos.

Quando executo os comandos abaixo, dá a msg: Nenhum RPS adicionado ao componente.

   ACBrNFSe1.NotasFiscais.Clear;
   ACBrNFSe1.NotasFiscais.LoadFromFile(caminho+'7945NF-rps.xml');
   ACBrNFSe1.ConsultarNFSeporRps(7945,NF,TipoRPSToStr(trRPS));  

Provedor: ISSDSF

Cidade: Campinas - SP.

Trunk2.

É a primeira vez que estou enviando.

Seguem anexos os 3 xmls gerados.

Alguém tem alguma idéia?

 

Obrigado.

Hélio Almeida

K2SOFTWARE

 

7945NF-rps.xml

200839358-rec.xml

007945-env-lot.xml

[K2 SOFTWARE]

A msg é: Nenhum RPS carregado ao componente.

É quando passa na função abaixo. O caminho do XML na loadfromfile está correto. Retorna True.

 

 

function TACBrNFSe.ConsultarNFSeporRps(ANumero, ASerie, ATipo: String): Boolean;
begin
  if Self.NotasFiscais.Count <= 0 then
    GerarException(ACBrStr('ERRO: Nenhum RPS carregado ao componente'));

  Result := WebServices.ConsultaNFSeporRps(ANumero, ASerie, ATipo);
end;
 

[Italo Giurizzato Junior]

Bom dia,

Favor atualizar os fontes e testar novamente.