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