Erro E45 Consulta Lote Provedor FISSLEX

[Marcio Lopes ACBr]

Bom dia, estou com problema no provedor FISSLEX na consulta da situação do lote do rps, faço o envio do lote normalmente mas ao realizar a consulta do lote retorna o erro abaixo.

<?xml version="1.0" encoding="utf-8"?><SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">    <SOAP-ENV:Body>        <WS_ConsultaLoteRps.ExecuteResponse xmlns="FISS-LEX">            <Consultarloterpsresposta xmlns="FISS-LEX"><ListaNfse></ListaNfse></Consultarloterpsresposta>            <Listamensagemretorno xmlns="FISS-LEX">                <tcMensagemRetorno xmlns="">                    <Codigo>E45</Codigo>                    <Mensagem>CNPJ não encontrado na base de dados</Mensagem>                    <Correcao>Confira o numero do CNPJ informado. Caso esteja correto, o prestador não está inscrito no município.</Correcao>                </tcMensagemRetorno>            </Listamensagemretorno>        </WS_ConsultaLoteRps.ExecuteResponse>    </SOAP-ENV:Body></SOAP-ENV:Envelope>

Obs: o erro não ocorre na versão do trunk anterior

 

Editado 20 Abril, 2016 por marciotga

[Marcio Lopes ACBr]

Resposta da FISSLEX para possível solução.

 

Citar

 

http://ft.trillian.im/5f0d11d58fdbc983dc714101f9103c61469b041a/6GUCt3v28CVNV4aFQ8QBXxonsbtYL.png

Márcio, no seu componente de conexão https, verifique se vc está utilizando TLSv1.0

desde meados do ano passado, alteramos nosso conector https para funcionar com o TLSv1.0 e TLSv1.2, pois se tornou um padrão obrigatório nos navegadores atuais

pode ser que ao consumir o webservice, o seu componente de conexão está tentando utilizar o TLSv1.2 por default, se estiver, esse está sendo o problema.

 

pode ser que eles tratem a conexão por método e especificamente na consulta lote esteja utilizando de uma forma diferente a conexão pelo SoapUI o seu lote está retornando normalmente

 

 

Editado 20 Abril, 2016 por marciotga

[Italo Giurizzato Junior]

Boa tarde Márcio,

Você configurou as propriedades de configuração do Emitente?

Vide programa exemplo.

[Marcio Lopes ACBr]

Boa tarde Italo,

Sim configurei, tanto que mandei o XML para eles e com os testes deles funcionou conforme imagem em anexo, não seria alguma coisa na conexão SSL ?

[Italo Giurizzato Junior]

Márcio,

Você disse que o envio esta ocorrendo normalmente sendo assim não existe nenhum problema na conexão, concorda?

Ao realizar a consulta é informado o CNPJ e a Inscrição Municipal a principio devemos informar somente os dígitos.

Será que no cadastro do provedor essas informações não estão formatadas com pontos e traços?

[Marcio Lopes ACBr]

Então, estou setando os dados do emitente sem formatação, mas estranho é que eu mandei o arquivo para ele e conforme um teste que fizeram na ferramenta "SoapUI" retornou a NFSe.
 

  with NFSe.Configuracoes.Geral.emitente do
  begin
    CNPJ := SomenteNumeros(FQryCfg.FieldByName('CGC').AsString);
    InscMun := SomenteNumeros(FQryCfg.FieldByName('INSCRICAOMUNICIPAL').AsString);
    RazSocial := FQryCfg.FieldByName('NOME').AsString;
    // WebUser := Trim(fqryCfg.FieldByName('USERNAMENFSE').AsString);
    // WebSenha := Trim(fqryCfg.FieldByName('PASSWORDNFSE').AsString);
    // WebFraseSecr
  end;

 

[Marcio Lopes ACBr]

Italo, soliciteu arquivos de exemplo e me mandaram, e esta em anexo, se puder dar uma olhada pra mim.

Grato.

Exemplos_xml_Integracao.rar

Editado 20 Abril, 2016 por marciotga

[Marcio Lopes ACBr]

Fiz o teste no SoapUI usando o exemplo ele retornou certinho, mas observando o Fisslex.ini tem umas diferenças.

Editado 20 Abril, 2016 por marciotga

[Italo Giurizzato Junior]

Boa tarde Márcio,

Pela imagem não consigo enxergar a diferença, é a idade, .

Por favor anexe o XML gerado pelo componente para que eu possa comparar com o exemplo.

[Marcio Lopes ACBr]

Bom dia Italo,

Segue em anexo arquivos gerados pelo ACBr para serem comparados com os exemplos.

Grato,

MjAxNjA0MTlfMDAwMDI2NjQ3OA==-con-lot.xml

MjAxNjA0MTlfMDAwMDI2NjQ3OA==-con-lot-soap.xml

[Marcio Lopes ACBr]

Italo outro detalhe que observei é que usam o SOAP 1.1

[Italo Giurizzato Junior]

Bom dia Márcio,

Favor atualizar todos os fontes de todas as pastas.

Note que fiz uma alteração no arquivo INI do provedor.

Faça novos testes.

[Marcio Lopes ACBr]

Italo estou com um erro na hora de compilar os pacotes.

C:\ProjetoACBrTrunk2\Fontes\ACBrDFe\ACBrDFeCapicomDelphiSoap.pas(98) Error: E2003 Undeclared identifier: 'UseCertificate'
C:\ProjetoACBrTrunk2\Fontes\ACBrDFe\ACBrDFeCapicomDelphiSoap.pas(106) Error: E2003 Undeclared identifier: 'UseCertificate'
ACBr_DFeComum.dpk(46) Fatal: F2063 Could not compile used unit '..\..\..\Fontes\ACBrDFe\ACBrDFeSSL.pas'
Compilation failure
Erro ao compilar o pacote "ACBr_DFeComum.dpk".

 

[Italo Giurizzato Junior]

Boa tarde Márcio,

Verifica se não tem nenhum fonte com uma bolinha vermelha no ícone, se sim, exclua e baixe novamente.

Se não resolver, você terá de refazer a instalação dos componentes do zero.

[Marcio Lopes ACBr]

Italo, esta retornando o mesmo erro, acho que deve ser alguma coisa na formatação do XML porque se eu abro o arquivo gerado pelo ACBr pelo explorer e colo no SoapUI ele retorna certinho a NFSe. Será que não tem haver com os < > ?

XML gerado pelo ACBr

<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><SOAP-ENV:Body><WS_ConsultaLoteRps.Execute xmlns="FISS-LEX"><Consultarloterpsenvio xmlns="FISS-LEX">&lt;Prestador&gt;&lt;Cnpj&gt;05906220000100&lt;/Cnpj&gt;&lt;InscricaoMunicipal&gt;11357&lt;/InscricaoMunicipal&gt;&lt;/Prestador&gt;&lt;Protocolo&gt;MjAxNjA0MTlfMDAwMDI2NjQ3OA==&lt;/Protocolo&gt;</Consultarloterpsenvio></WS_ConsultaLoteRps.Execute></SOAP-ENV:Body></SOAP-ENV:Envelope>

Copiado do internet explorere e colado no SoapUI

<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:fiss="FISS-LEX" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
<soapenv:Header/>
<soapenv:Body>
<fiss:WS_ConsultaLoteRps.Execute>
<fiss:Consultarloterpsenvio><Prestador><Cnpj>05906220000100</Cnpj><InscricaoMunicipal>11357</InscricaoMunicipal></Prestador><Protocolo>MjAxNjA0MTlfMDAwMDI2NjQ3OA==</Protocolo></fiss:Consultarloterpsenvio>
</fiss:WS_ConsultaLoteRps.Execute>
</soapenv:Body>
</soapenv:Envelope>

Editado 25 Abril, 2016 por marciotga

[Marcio Lopes ACBr]

Não sei se ajuda mas tem essas informações do SoapUI

Date	Mon, 25 Apr 2016 22:53:23 GMT
Content-Length	2647
#status#	HTTP/1.1 200 OK
Expires	Thu, 01 Jan 1970 00:00:00 GMT
Content-Encoding	gzip
Last-Modified	Thu, 01 Jan 1970 00:00:00 GMT
Set-Cookie	JSESSIONID=F7A5BA96ED18C9CAFFC2FD1985767098.worker3; Path=/fiss-lex/; HttpOnly
Content-Type	text/xml;charset=utf-8
Server	Apache-Coyote/1.1
pragma	no-cache
Cache-Control	max-age=0, no-cache, no-store, must-revalidate

 

[Italo Giurizzato Junior]

Boa noite Márcio,

Altere o valor da propriedade Dados de 1 para 0 no arquivo INI do provedor:

; 0 = False / 1 = True (se True então converte Cabeçalho e Dados para String)

	(...)

	Cabecalho=0

	Dados=0

Faça novos testes.

[Marcio Lopes ACBr]

Ítalo, fiz 2 ajustes para poder funcionar o metodo ConsultarLoteRps, não testei os outros.

1) FISSLEX.INI na sessão [ConsLote] e deixei conforme o exemplo da Fisslex e tambem mudei o valor da propriedade dados de 1 para 0 (cabeçalho e dados).

Antes
[ConsLote]
IncluiEncodingCab=0
IncluiEncodingDados=0
Texto1=<?xml version="1.0" encoding="UTF-8"?>
Texto2=<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
Texto3=<SOAP-ENV:Body>
Texto4=<WS_ConsultaLoteRps.Execute xmlns="FISS-LEX">
Texto5=<Consultarloterpsenvio xmlns="FISS-LEX">%DadosMsg%</Consultarloterpsenvio>
Texto6=</WS_ConsultaLoteRps.Execute>
Texto7=</SOAP-ENV:Body>
Texto8=</SOAP-ENV:Envelope>

Depois

[ConsLote]
IncluiEncodingCab=0
IncluiEncodingDados=0
Texto1=<?xml version="1.0" encoding="UTF-8"?>
Texto2=<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:fiss="FISS-LEX">
Texto3=<soapenv:Header/>
Texto4=<soapenv:Body>
Texto5=<fiss:WS_ConsultaLoteRps.Execute>
Texto6=<fiss:Consultarloterpsenvio>%DadosMsg%</fiss:Consultarloterpsenvio>
Texto7=</fiss:WS_ConsultaLoteRps.Execute>
Texto8=</soapenv:Body>
Texto9=</soapenv:Envelope>

 

2) Outra alteração que fiz foi unit pnfsLerListaNFSe na linha 326, teria que ver se tem como resolver essa questão do case sensitive na função leitor.rExtrai().

Antes

    if not Nivel1 then
      Nivel1 := (leitor.rExtrai(1, 'listaNfse') <> '');

depois

    if not Nivel1 then
      Nivel1 := (leitor.rExtrai(1, 'listaNfse') <> '');
    if not Nivel1 then
      Nivel1 := (leitor.rExtrai(1, 'ListaNfse') <> '');

 

FISSLex.ini

pnfsLerListaNFSe.pas

Editado 26 Abril, 2016 por marciotga

[Italo Giurizzato Junior]

Bom dia Márcio,

Muito obrigado pela colaboração, já esta disponível no repositório.

[Paulo José]

Bom dia,

Italo a cidade Barra do Bugres - MT hoje no ACBr esta configurado com WEBISS porém o provedor é FISSLEX, então é só mudar o arquivo cidades.ini de:

[5101704]
Nome=Barra do Bugres
UF=MT
Provedor=WebISS
NomeURL_H=barradobugresmt
NomeURL_P=barradobugresmt

para:

[5101704]
Nome=Barra do Bugres
UF=MT
Provedor=FISSLEX
NomeURL_H=barradobugres
NomeURL_P=barradobugres

Editado 27 Abril, 2016 por Paulo José
Faltou conteudo

[Paulo José]

Boa tarde,

Ao atualizar o ACBr para pegar essas últimas alterações ocorreu o seguinte erro:

Erro ao compilar o pacote "ACBr_GNRE.dpk"

[Italo Giurizzato Junior]

Boa tarde Paulo,

A principio basta trocar o nome do provedor no arquivo Cidades.INI mas é preciso verificar se o novo provedor possui ou não uma URL de homologação / produção para a respectiva cidade.

Se sim é preciso incluir essas URLs no arquivo INI do respectivo provedor.

[Paulo José]

Ok Italo.

[tailan]

Bom dia,
tive que fazer algumas alterações para funcionar o ACBR na fiss-lex, há um problema no padrão de comunicação deles, para os serviços de envio(enviar lote ou cancelamento) ele usa a configuração FConfigXML.CabecalhoStr = True, porem para as consultas(situação, rps, etc) ele usa como False. Vi que na classe de configuração já havia as configurações CabecalhoStr para cada serviço(recepcionar, consultar, cancelar, etc.) porem não era utilizado então na classe de configuração alterei para preencher as configurações dos serviços trazendo como padrão o FConfigXML.CabecalhoStr assim não necessita essas configurações no INI e segue o padrão anterior:

ANTES:
  FConfigEnvelope.ConsNFSe_CabecalhoStr := FPIniParams.ReadBool('ConsNFSe', 'CabecalhoStr', False);
  FConfigEnvelope.ConsNFSe_DadosStr := FPIniParams.ReadBool('ConsNFSe', 'DadosStr', False);

DEPOIS:
  FConfigEnvelope.ConsNFSe_CabecalhoStr := FPIniParams.ReadBool('ConsNFSe', 'CabecalhoStr', FConfigXML.CabecalhoStr);
  FConfigEnvelope.ConsNFSe_DadosStr := FPIniParams.ReadBool('ConsNFSe', 'DadosStr', FConfigXML.DadosStr);

(para todos os serviços).
 

Na Classe do Webservices criei dois fields para que seja setado na definição dos dados as variáveis:

    FCabecalhoStr: Boolean;
    FDadosStr: Boolean;

Assim no método DefinirEnvelopeSoap ira usar esses fields da classe para parametrização:

ANTES:
  if FPConfiguracoesNFSe.Geral.ConfigXML.CabecalhoStr then
    CabMsg := StringReplace(StringReplace(CabMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]);

  DadosMsg := FPDadosMsg;
  if FPConfiguracoesNFSe.Geral.ConfigXML.DadosStr then
    DadosMsg := StringReplace(StringReplace(DadosMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]);

DEPOIS: 
  if FCabecalhoStr then
    CabMsg := StringReplace(StringReplace(CabMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]);

  DadosMsg := FPDadosMsg;
  if FDadosStr then
    DadosMsg := StringReplace(StringReplace(DadosMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]);

 

No método DefinirDadosMsg de cada serviço (envio, consulta, cancelamento)ira setar esses filds de parametrização, por ex. no TNFSeGerarLoteRPS.DefinirDadosMsg foi adicionado:
  FCabecalhoStr:= FPConfiguracoesNFSe.Geral.ConfigEnvelope.Recepcionar_CabecalhoStr;
  FDadosStr:= FPConfiguracoesNFSe.Geral.ConfigEnvelope.Recepcionar_DadosStr;

 

Na Classe LerListaNFSe inclui a tag de retorno no padrão da fiss-lex:
    //fiss-lex
    if not Nivel1 then
      Nivel1 := (leitor.rExtrai(1, 'WS_ConsultaNfsePorRps.ExecuteResponse') <> '');

Por fim editei o fisslex.ini para parametrizar de acordo com o serviço as configurações, conforme segue em anexo. Testei os serviços de envio, consulta e cancelamento e os mesmos comunicaram corretamente com o servidor demo da fiss-lex.
 

 

 

ACBrNFSeConfiguracoes.pas

ACBrNFSeWebServices.pas

pnfsConversao.pas

pnfsLerListaNFSe.pas

FISSLex.ini

[Italo Giurizzato Junior]

Boa tarde Tailan,

Muito obrigado pela contribuição. Tive que fazer alguns ajustes pois alguns dos seus fontes estavam desatualizados.

Já enviei para o repositório, favor atualizar os fontes e realizar novos testes.

Caso todas as funcionalidades agora estejam funcionando 100%, favor nos dar um retorno.