Boa tarde pessoal, estou tendo problemas ao enviar lote RPS.
Para enviar, primeiramente eu Gero o lote:
ACBrNFSe1.NotasFiscais.Clear;
NotasFiscais.NumeroLote := '1';
NotasFiscais.Add.NFSe.....
E adiciono todas as informações da NFSe.
Após isso, salvo o XML, no trunk 1 eu usava o seguinte código:
ACBrNFSe1.NotasFiscais.Items[0].SaveToFile;
Agora no Trunk 2 eu precisei usar esse código:
ACBrNFSe1.NotasFiscais.Items[0].GravarXML(Nome + '0-nfse.xml', Caminho);
Mas ok, ele está gravando o XML na pasta normalmente.
O problema vem logo depois disso, para enviar eu faço o seguinte:
Retorno := ACBrNFSe1.Enviar('1', False);
if Retorno then
ShowMessage('Enviada com Sucesso')
Else
ShowMessage('Falha no Envio');
Ele mostra a mensagem "Enviado com Sucesso", Ok, mas logo em seguida eu verifico a nota na prefeitura e ele não encontra a nota. Eu consulto da seguinte maneira no Trunk 2:
ACBrNFSe1.ConsultarNFSeporRps(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero,
ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie,
TipoRPSToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo));
No trunk 1 eu usava a mesma função, mas ela recebia mais parâmetros:
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);
Voltei para o trunk 1 e no trunk 1 está funcionando perfeitamente o envio, e após enviar eu consulto e encontro a nota normalmente.
Gostaria de saber se alguém já passou por esse problema e se tem alguma solução pra isso??
Observações adicionais:
1 - Na trunk 1, eu usava a SSLIB (Configuracoes > Geral > SSLIB) como libCapicomDelphiSoap, já na trunk 2 ele da um erro de CONTEXT então eu troquei para libCapicom e ele realizou consulta nas notas antigas (enviadas pela trunk 1) normalmente.
2 – Na trunk 2 eu consigo consultar as notas antigas que já estão no repositório da prefeitura (enviadas pelo trunk 1) normalmente, mas ao enviar, ele retorna True na função e na consulta ele não encontra a nota, o que me leva a acreditar que algo está errado, pois no trunk 1 ele funciona perfeitamente.
3 – Eu já preenchi os dados do emitente (Configurações > Geral > Emitente).
4 – A Prefeitura é a prefeitura de Catanduva – SP (se encontra no arquivo cidades.ini) e usa o provedor Pronim. Acho que não se trata de erro com a prefeitura, pois na Trunk 1 tudo funciona perfeitamente.