AcbrNfseX nao salva a nota...

[centuryinf]

Boa tarde, estou migrando para o AcbrNfseX  , quando envio a nota,gera a RPS normalmente, me retorna numero, protocolo , status true, 

e até imprime o pdf.  mas nao grava a nota na pasta. e se faço uma consulta do RPS , retorna tudo em branco....

componente com arquivo.salva:=true;

Ambiente + homologação

Provedor Ginfs

utilizando a versao v100

modo de utilizaçao:

var
  sQtde, vNumRPS, vNumLote: String;
  iQtde, iAux, I: Integer;
  vAux : String;
begin

tabela.edit;
tabela.First;
tabela.edit;

  sQtde := '1';
  vNumRPS := floattostr(tabelafatura.Asfloat);
  vNumLote := vNumRPS;
  iQtde := StrToIntDef(sQtde, 1);
  iAux := StrToIntDef(vNumRPS, 1);

  ACBrNFSex1.NotasFiscais.Clear;

    vNumRPS := IntToStr(iAux);
    AlimentarNFSe(vNumRPS, vNumLote);

  ACBrNFSeX1.Emitir(vNumLote);

  ChecarResposta(tmRecepcionar);

ACBrNFSex1.NotasFiscais.ImprimirPDF;
ACBrNFSex1.NotasFiscais.Imprimir;
ACBrNFSex1.NotasFiscais.Clear;
end;
 

Agradeço qualquer ajuda..

Editado 8 Setembro, 2022 por centuryinf

[Italo Giurizzato Junior]

Boa tarde,

Isso também ocorre com o programa exemplo?

Favor anexar os XMLs gerados tanto de envio quanto de retorno, para que eu possa analisar.

[centuryinf]

Bom dia Italo,

acho que tem haver com os path de arquivos, estou fazendo mais uns testes aqui e 

quando tiver uma certeza volto a reportar aqui..

 

[centuryinf]

Ola Italo,

 

Coloquei esta consultar apos o enviar  e funcionou tudo correto.

    NumPagina := '1';
    ACBrNFSeX1.ConsultarNFSeporNumero(VNumRPS); 
 

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.