Http: 400 Bad Request

[Matheus de Oliveira]

Encerrou o MDF-e, depois que atualizei os fontes novamente.

 

Obrigado Italo.

[KriarTecnologia]

boa tarde senhores, estou com o seguintes retorno quanto envio um evento de cancelamento de nfc-e (acbrnfe) para o servidor da sefaz:

 

HTTP/1.1 400 Bad Request

Isso utilizando um servidor vcl .dll no iis

já utilizei todas essas opções:

  TSSLHttpLib = (httpNone, httpWinINet, httpWinHttp, httpOpenSSL, httpIndy);

o mesmo codigo quando executado em modo standalone funciona e cancela a nfc-e normalmente, uso a seguintes configuração:

  ACBrNFe1.Configuracoes.Geral.VersaoDF := ve400;
  ACBrNFe1.SSL.SSLType := LT_TLSv1_2;
  ACBrNFe1.Configuracoes.Geral.SSLLib := libOpenSSL;
  ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryOpenSSL;
  ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpOpenSSL;
  ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib:= xsMsXml;
  ACBrNFe1.Configuracoes.Geral.VersaoQRCode := veqr200;

  ACBrNFe1.Configuracoes.WebServices.UF :=
        qryLojas.FieldByName('sigla_estado').AsString;

//    Seta Versão a ser utilizada em execução
 with acbrnfe1.Configuracoes do
   begin
    Geral.ModeloDF := moNFce;
    //Geral.idCSC    := '000001';
    //Geral.CSC      := frmlogon.qryLojas_csc.AsString; //'39d58c8a-9ce8-43dc-83b7-1ea1fc3123f2';

    Certificados.NumeroSerie := qryLojas.FieldByName('certdigital_nserie').AsString; //NFe_CertDigitalSenha;
    Certificados.Senha       := qryLojas.FieldByName('certdigital_senha').AsString;  //NFe_CertDigitalSerie;
    Certificados.ArquivoPFX  := qryLojas.FieldByName('certdigital_caminho').AsString;

    if length(trim(qryLojas.FieldByName('id_csc').AsString)) > 0 then
      begin
        Geral.idCSC     :=
          copy( '000000' + trim(qryLojas.FieldByName('id_csc').AsString),
            length('000000' + trim(qryLojas.FieldByName('id_csc').AsString)) - 5, 6);
        Geral.CSC       := qryLojas.FieldByName('csc').AsString; //'39d58c8a-9ce8-43dc-83b7-1ea1fc3123f2';
      end;

    Geral.FormaEmissao := teNormal;
    Geral.Salvar       := True;

//    ACBrCTe1.Configuracoes.arquivos.PathSalvar   := edtPathLogs.Text;

    Geral.Salvar        := True;
    arquivos.PathSalvar :=
      copy(trim(qryCupom_capa.FieldByName('arquivo_nfce').AsString),
          1, length(trim(qryCupom_capa.FieldByName('arquivo_nfce').AsString)) - 52);
    WebServices.Visualizar := false;

alguém pode me dar uma dica?

Editado 9 Abril, 2019 por KriarTecnologia

[Italo Giurizzato Junior]

Bom dia,

Por favor preste mais atenção ao postar, pois esse tópico se refere ao componente ACBrMDFe que não tem nada haver com NFC-e.

Poste novamente o seu problema no tópico correto que se refere ao componente ACBrNFe.

O tópico será fechado por ser muito antigo.