DUVIDA CREATE CERTIFICADO

[Junior Salzano]

Gala galera boa tarde...

Estou com uma duvida:

function enviarLote (xmlArquivo : WideString) : String;
var
  certificado : TCertificados;
  xmlAssinado : WideString;
  server      : TWebservice;
  retorno     : WideString;
begin
  certificado := TCertificados.Create(nil);
  certificado.SelecionarCertificado;

  AssinaXML(xmlArquivo, certificado.GetCertificado, xmlAssinado);

  server             := TWebService.Create(nil);
  Server.VersaoSoap  := '1.1';
  Server.Certificado := certificado;
  Server.URL         := 'https://preprodefdreinf.receita.fazenda.gov.br/RecepcaoLoteReinf.svc?';
  Server.SoapAction  := 'ReceberLoteEventos';
  //Server.URL         := 'https://reinf.receita.fazenda.gov.br/WsREINF/RecepcaoLoteReinf.svc';
  //Server.URL         := 'https://preprodefdreinf.receita.fazenda.gov.br/RecepcaoLoteReinf.svc?singleWSDL';
  server.xml         := xmlAssinado;
  server.executar();

  result := server.XMLRetorno;
end;

 

Essa é minha function para enviar o lote....

Estou com um retorno informado que eu preciso de um certificado para concluir a autenticação.

 

Vi em um outro foram um cara falando que ele não pode estanciar o objeto certificado com nil :

certificado := TCertificados.Create(nil);

 

Alguém sabe dessa informação ?

 

Valeu !

[Juliomar Marchetti]

Boa tarde

se aguardar e notar está sendo trabalhado para subir o componente tanto eSocial quando Reinf.

[Junior Salzano]

Existe alguma data prevista ?

[Juliomar Marchetti]

19 horas atrás, Junior Salzano disse:

Existe alguma data prevista ?

Tu criou um tópico só pra perguntar e veio perguntar em outro tópico também

assim que eu finalizar pois tenho que pensar em todos enão só no que um precisa ou outro, os fontes aqui disponibilizados estava atendendo somente uma versão de delphi e de um jeito

[Junior Salzano]

Boa tarde Juliomar,

Me desculpa, eu havia criado o tópico lá depois vi que vc tinha complementado aqui,

Desculpa a duplicidade de informações no forum.

Então.. estou adaptando a rotina do NFSE, para assinar o xml e  para comunicar com webservice,

Aparentemente vai dar tudo certo, porem estou com erro da autenticação do certificado, porem acredito que seja no meu certificado.

Vou tentar utilizar outro, porem caso existir um componente especifico para essa situação do REINF, seria interessante!

Muito obrigado pelas informações Juliomar!

Valeu 

Abraço!