Problema com DistribuicaoDFe - Erro Webservice inoperante

[kelly]

Boa tarde pessoal,

Estou tentando usar o método DistribuicaoDFe mas me retorna a mensagem:

WebService Distribuição de DFe: - Inativo ou Inoperante tente novamente

Método Enviar não implementado em TDFeSSLHttpClass

Sou leiga no assunto então posso estar cometendo algum erro grotesco, me perdoem se for esse o caso mas será que alguém pode me ajudar? Abaixo meu código:

  NFe.DistribuicaoDFe(43,GaranteString(Dm.RetornaCampo('paramet','cnpj','1=1')), '1','','');

  for i := 0 to NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do
  begin
    FrmPrincipal.MemoResp.Lines.Add(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.NSU + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.CNPJCPF + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.xNome + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.IE + ' - ' +
                       DateTimeToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhEmi) + ' - ' +
                       tpNFToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.tpNF) + ' - ' +
                       FloatToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.vNF) + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.digVal + ' - ' +
                       DateTimeToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhRecbto)
                       );
  end;
 

[Felipe E. Resende Mesquita]

3 horas atrás, kelly disse:

Boa tarde pessoal,

Estou tentando usar o método DistribuicaoDFe mas me retorna a mensagem:

WebService Distribuição de DFe: - Inativo ou Inoperante tente novamente

Método Enviar não implementado em TDFeSSLHttpClass

Sou leiga no assunto então posso estar cometendo algum erro grotesco, me perdoem se for esse o caso mas será que alguém pode me ajudar? Abaixo meu código:

  NFe.DistribuicaoDFe(43,GaranteString(Dm.RetornaCampo('paramet','cnpj','1=1')), '1','','');

  for i := 0 to NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do
  begin
    FrmPrincipal.MemoResp.Lines.Add(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.NSU + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.CNPJCPF + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.xNome + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.IE + ' - ' +
                       DateTimeToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhEmi) + ' - ' +
                       tpNFToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.tpNF) + ' - ' +
                       FloatToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.vNF) + ' - ' +
                       NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.digVal + ' - ' +
                       DateTimeToStr(NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhRecbto)
                       );
  end;
 

Boa tarde, kelly.

Para a versão 4.0 da NFe, tem que ativar o protocolo de segurança TLS 1.2.

[BigWings]

Em 16/05/2018 at 12:06, kelly disse:

Método Enviar não implementado em TDFeSSLHttpClass

Sou leiga no assunto então posso estar cometendo algum erro grotesco, me perdoem se for esse o caso mas será que alguém pode me ajudar? Abaixo meu código:

O erro indica que você não configurou a propriedade SSLHttpLib.

Consulte o projeto exemplo do componente na pasta ACBr\Exemplos\ACBrDFe\ACBrNFe.

Leia também o tópico abaixo:

 

[kelly]

Era isso mesmo BigWings, muito obrigada pessoal!