Erro ao enviar TDFeHttpWinHttp.Enviar

[robertocamargo]

Olá pessoal

Estou implementando a NFE 4.0 (homologação) e estou com erro na hora do envio.

 

 

unit ACBrDFeHttpWinApi;

function TDFeHttpWinHttp.Enviar(const ConteudoXML: String; const AURL: String;
  const ASoapAction: String; AMimeType: String): String;
var
  Resp: TMemoryStream;
begin
  Result := '';

  ConfigurarHTTP(AURL, ASoapAction, AMimeType);

  Resp := TMemoryStream.Create;
  try
    try
      // Enviando, dispara exceptions no caso de erro //
      FWinHTTPReqResp.Execute(ConteudoXML, Resp);

      // Verifica se o ResultCode é: 200 OK; 201 Created; 202 Accepted
      // https://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
      if not (FWinHTTPReqResp.HTTPResultCode in [200, 201, 202]) then
        raise EACBrDFeException.Create('');  <----------------------------- aqui ocorre o erro

Anexo está o arquivo soap.

Aqui estão minhas configurações:

SSLCryptLib : cryWinCrypt

SSLHttpLIB : httpWinHttp

SSLLIB : LIBwINCrypt

SSLXmlSignLib : xsMsXml

 

versaoDF : VE400

Obrigado.

 

318-env-lot-soap.xml

Editado 6 Agosto, 2017 por robertocamargo

[BigWings]

15 horas atrás, robertocamargo disse:

Estou implementando a NFE 4.0 (homologação) e estou com erro na hora do envio.

Ainda não é possível testar a NFe 4.00 em SP, veja este post: