Italo Giurizzato Junior

Boa tarde @PrimeSoftware, Complementando o que o @Juliomar Marchetti, já te passou, sugiro que o valor de SSLType seja: LT_TLSv1_2. Pelo fato do certificado ser A1, sugiro que o valor de SSL seja: libOpenSSL. Você não precisa configurar Crypt, Http e XmlSign, pois ai configurar o SSLLib (na sua aplicação campo SSL) o componente já configura os demais campos.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia @PrimeSoftware, Acabei de realizar um teste usando o programa exemplo do componente ACBrNFSeX, veja o resultado: ------------------------------ Versão OpenSSL OpenSSL 3.1.3 19 Sep 2023 03.01.00.030 C:\ACBr\trunk2\Exemplos\ACBrDFe\ACBrNFSeX\Delphi\libcrypto-3.dll C:\ACBr\trunk2\Exemplos\ACBrDFe\ACBrNFSeX\Delphi\libssl-3.dll ------------------------------ Requisição Ambiente : 1 Cidade : Primavera do Leste/MT Provedor : AssessorPublico Versão: 1.00 Data/Hora: 22/01/2024 10:51:48 Método Executado: Enviar Lote Assíncrono Parâmetros de Envio Numero do Lote: 1 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : Mensagem: O Usuário Informado no Web Services é Diferente do Usuário Informado no Arquivo XML Correção: Como eu usei um CNPJ cujo prestador de serviço não é da referida cidade é de se esperar esse tipo de retorno. Outra coisa, veja esse fragmento de código que se encontra na unit AssessorPublico.Provider: function TACBrNFSeXWebserviceAssessorPublico.GetDadosUsuario: string; begin with TACBrNFSeX(FPDFeOwner).Configuracoes.Geral do begin Result := '<nfse:Usuario>' + Emitente.WSUser + '</nfse:Usuario>' + '<nfse:Senha>' + LowerCase(AsciiToHex(MD5(AnsiString(Emitente.WSSenha)))) + '</nfse:Senha>'; end; end; Como você pode ver o componente já resolve a questão da criptografia MD5.

Bom dia @PrimeSoftware, O Certificado digital é A1 ou A3? Quais são os valores de: SSLLib, CryptLib, HttpLib, XmlSignLib e SSLType ?

@jacke venson, Você tem o XML de retorno com a guia incluída? Se sim, poderia anexar? Se desejar pode enviar o XML como mensagem privada. Desde já muito obrigado.

Bom dia @jacke venson, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5019

Bom dia @edulamy, Pelo que eu entendi a emissão é feita via site.

Boa tarde @rafmattos, Com o programa exemplo também ocorre o mesmo erro?

Boa tarde Bruno, Já inclui na minha lista de tarefas. TK-5017

Boa tarde @edulamy, O que vem a ser MIC/DTA e CRT?

Olá Pessoal, É com grande alegria que informo a todos que já se encontra no SVN o componente ACBrNFCom. Para quem não sabe o que vem a ser NFCom, segue abaixo o texto copiado do Portal da SEFAZ-Virtual do Rio Grande do Sul. "O Projeto NFCom tem como objetivo a implantação de um modelo nacional de documento fiscal eletrônico (modelo 62) que venha substituir a sistemática atual de emissão da Nota Fiscal de Serviço de Comunicação/Telecomunicações (modelos 21 e 22), com validade jurídica garantida pela assinatura digital do emitente, simplificando as obrigações acessórias dos contribuintes e permitindo, ao mesmo tempo, o acompanhamento da emissão em tempo real pelo Fisco." Foi enviado para o SVN, os fontes do componente, os pacotes de instalação para o Delphi e Lazarus e o programa exemplo para o Delphi. O que falta a ser feito: o programa exemplo para o Lazarus e a instalação do componente via ACBrInstall. Enquanto não for liberado uma nova versão do ACBrInstall a instalação do componente vai ter que ser via pacote. Como eu não tenho um certificado digital de um prestador de serviço de comunicação/telecomunicações os testes ficam prejudicados. Detalhe importante: Na pagina que trata o NFCom no Portal da SEFAZ-Virtual do Rio Grande do Sul não consta ainda o manual com o layout do DANFCom, sendo assim não foi possível implementar o componente de geração do Documento Auxiliar da NFCom. Convido a todos que tenham interesse nesse componente, instalar e fazer os testes. Ficaremos felizes em receber melhorias e correções nos fontes do componente.

Boa tarde Delcio, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5015

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia @Desenv. AT Info Sistemas, Por favor atualize novamente, reinstale o ACBr e repita os testes.

Bom dia Carlos, Já esta no SVN.

Bom dia @rafmattos, Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Bom dia @econdotta, Esse IF que você comentou antes não tinha a condição: StringIsXML(FPRetorno). Mesmo com ela ocorre o erro?

Bom dia Bruno, Realmente da forma que esta hoje esta errado e a sua alteração ao meu ver pode ocorrer em uma outra situação. Vamos supor que o prestador é da cidade A e o tomador da cidade B. Eu entendo que "Local de Prestação do Serviço" é o local onde o serviço foi executado, Sendo assim o a cidade de execução de serviço não seja do tomador e sim do prestador e até uma terceira cidade. Acredito que o correto seria criar uma classe chamada LocalPrestServ onde teríamos os dados do Local de Prestação do Serviço. O que você acha?

Bom dia Joemil, Muito obrigado pela sua colaboração, já inclui na minha lista de tarefas para analisar as suas alterações.TK-2951 Se tudo der certo ainda hoje estarei enviando para o SVN os fontes atualizados, bem como os pacotes de instalação Delphi e Lazarus. O programa exemplo feito em Delphi. O programa exemplo feito em Lazarus vai ficar para semana que vem.

Boa tarde @econdotta, Vou pedir para que você coloque um ponto de parada na procedure EnvioInterno que se encontra na unit ACBrNFSeXWebserviceBase e debugue, quero saber em qual linha ocorre o erro.

Paulo, Ao informar a cidade do tomador, você esta informando o código IBGE da mesma?

@econdotta, Esses são o de envio, necessito o de retorno.

Douglas, Você pode criar um FR3 que satisfaça as suas necessidades. A vantagem do Fast Report é essa, você cria os seus próprios FR3 e distribui aos seus clientes, ou seja, você não fica preso ao layout que foi criado por nós.

@Desenv. AT Info Sistemas, Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Bom dia @econdotta, Primeiramente BHISS é o provedor contratado por Porto Alegre/RS e não tem nada haver com o Ambiente ou Padrão Nacional. Segundo, configura o componente para salvar os arquivo soap: Configuracoes.WebService.Salvar := True Execute o método que esta gerando esse erro e anexe o XML soap de retorno para que possamos analisar.