solicitarDownloadEventos

[ROBERTO COUTO DOS SANTOS]

Valeu Ítalo. Obrigado.

 

[adelionep]

Pessoal a function ConsultaIdentificadoresEventosEmpregador ainda não funciona pra mim, alguém conseguiu utilizar?

O Mesmo para ConsultaIdentificadoresEventosTabela e ConsultaIdentificadoresEventosTrabalhador, notei que quando chega na linha 667 de ACBReSocialWebServices em procedure TConsultaIdentEventos.DefinirDadosMsg, o campo FCnpj, está vazio, nenhuma propriedade do objeto foi preenchida, ocasionando erro na validação do XML;

Aproveitando na Classe ACBReSocialWebServices, linhas 743 e 744, falta ".xsd" no caminho dos Schemas, ocasionando erro de que o arquivo de Schemas não foi localizado.

[Italo Giurizzato Junior]

Bom dia Adelio,

Primeiramente muito obrigado por apontar um erro no código, já fiz a correção e ainda hoje estarei enviando para o repositório.

Segundo, quanto ao CNPJ, no programa exemplo - aba Geral você informou o CNPJ do Empregador no respectivo campo que se encontra no quadro Dados Empresa?

[adelionep]

Sim, tudo informado, tanto que na linha 923 até 926(ACBReSocialWebServices), os campos estão preenchidos, mas quando ele entra na function Executar, está tudo vazio.

[Alessandro Feelipe]

Bom dia, @Italo Jurisato Junior

o problema que o Adelio se refere é que ao chamar o executar da consulta, existe um método inicializar InicializarServico na classe pai TDFeWebService que chama o método Clear. Por isso as informações estão vazias.

[Italo Giurizzato Junior]

Bom dia Alessandro,

Mas o Clear é executado antes de passar os parâmetros para o método.

[adelionep]

4 minutos atrás, Italo Jurisato Junior disse:

Bom dia Alessandro,

Mas o Clear é executado antes de passar os parâmetros para o método.

Mas se eu comentar o Clear de procedure TDFeWebService.InicializarServico; os dados chegam lá no procedure TConsultaIdentEventos.DefinirDadosMsg; e consequentemente os campos do XML, ficam preenchidos.

Editado 8 Março, 2019 por adelionep

[Alessandro Feelipe]

Anexei uns print, acho q ficará melhor entendível a situação.

 

Editado 8 Março, 2019 por Alessandro Feelipe

[adelionep]

Isso mesmo.

[adelionep]

Outra correção, Classe ABreSocial, linha 65:

Trocar:
  ACBRESOCIAL_NAMESPACE_RETEVT =  'http://www.esocial.gov.br/schema/consulta/identificadores-eventos/empregador/v1_0_0';

por:
  ACBRESOCIAL_NAMESPACE_CONS_EMP =  'http://www.esocial.gov.br/schema/consulta/identificadores-eventos/empregador/v1_0_0';

Adicionar:
  ACBRESOCIAL_NAMESPACE_CONS_TAB = 'http://www.esocial.gov.br/schema/consulta/identificadores-eventos/tabela/v1_0_0';
  ACBRESOCIAL_NAMESPACE_CONS_TRA = 'http://www.esocial.gov.br/schema/consulta/identificadores-eventos/trabalhador/v1_0_0';

Essa nomeação é só uma sugestão.

 

Na Classe ACBReSocialWebServices, linha 685, adicionar:

case tipoConsulta of
        tcEmpregador:
          begin
            Consulta.SoapEnvelope := ACBRESOCIAL_NAMESPACE_CONS_EMP;
          end;
          tcTabela:
          begin
            Consulta.SoapEnvelope := ACBRESOCIAL_NAMESPACE_CONS_TAB;
          end;
          tcTrabalhador:
          begin
            Consulta.SoapEnvelope := ACBRESOCIAL_NAMESPACE_CONS_TRA;
          end;
    end;

 

 

[Juliana Tamizou]

Boa tarde.

Por favor anexe a unit com as alterações sugeridas.

att.

[adelionep]

Em Anexo as Units, conforme solicitado.

ACBreSocial.pas ACBreSocialWebServices.pas ACBrDFeWebService.pas

[Italo Giurizzato Junior]

Bom dia Adélio,

Muito obrigado pela colaboração, já enviei para o repositório, mas fiz uma pequena alteração, favor testar.

[Demostenes Damasio B Jr]

Boa tarde ,

  Prezados ,   

 Estou tentando usar este método e estou recendo  erro de schemas errado , segue a linha

 
    EhValido := SSL.Validar(String(FPDadosMsg),
                   Configuracoes.Arquivos.PathSchemas + ArqXSD, Erro);      

Chamada 

 if  ACBreSocial1.ConsultaIdentificadoresEventosEmpregador(CdsEmpregador.FieldByName('NUMDOCUMENTO').AsString,
                                                                   tes1250, now) then

 Segue parte do XML :

'<eSocial xmlns="http://www.esocial.gov.br/schema/consulta/identificadores-eventos/empregador/v1_0_0"><consultaIdentificadoresEvts><ideEmpregador><tpInsc>2</tpInsc><nrInsc></nrInsc></ideEmpregador><consultaEvtsEmpregador><tpEvt>S-1000</tpEvt><perApur>1899-12</perApur></consultaEvtsEmpregador></consultaIdentificadoresEvts><Signature xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-  ........................................

 

 

 

[Demostenes Damasio B Jr]

Citar

Fico aguardando.

Muito obrigado

 

[Italo Giurizzato Junior]

Bom dia Demostenes,

Você esta com todos os fontes de todas as pastas atualizados?
Reinstalou a suíte ACBr usando o ACBrInstall_Trunk2 deixando marcado a opção para apagar os arquivos antigos?
 

[Demostenes Damasio B Jr]

1 hora atrás, Italo Jurisato Junior disse:

Bom dia Demostenes,

Você esta com todos os fontes de todas as pastas atualizados?
Reinstalou a suíte ACBr usando o ACBrInstall_Trunk2 deixando marcado a opção para apagar os arquivos antigos?
 

 Bom dia amigo  ,  

     Infelizmente tenho algumas particularidades  em algumas units . Sempre tenho que fazer merge .  Ainda sim tentei instalar e houve erro  .  

      Estou dando uma espiada . Tem idéia de que Units poderiam causar este problema ? 

     Aproveito para parabenizar o excelente trabalho que prestam .

at.,

Demóstenes 

 

ACBr_DFeComum.dpk(55) Fatal: File not found: 'ACBrDFeConfiguracoes.dcu'
Compilation failure
Erro ao compilar o pacote "ACBr_DFeComum.dpk".
Abortando... Ocorreram erros na compilação dos pacotes.

  

 

 

 

[Juliomar Marchetti]

anexe o log do instalador mas ao que parece está faltando fontes 

[rafap2008]

Bom dia, procurei no fórum e não encontrei.

Estou utilizando o método "ConsultaIdentificadoresEventosEmpregador", tanto no meu app de testes, quanto no demo do ACBr.

Já utilizei 3 certificados e CNPJs (empregadores) diferentes, e o retorno é sempre:

Código Retorno: 402
Mensagem: Solicitação inválida. Redefina sua consulta

Qtde Total de Eventos na Consulta: 0
dhUltimo Evento Retornado: 30/12/1899

Alguém tem aluma ideia do que pode ser?

Desde já, obrigado.

[Italo Giurizzato Junior]

Bom dia Rafa,

Você esta com todos os fontes atualizados?

Reinstalou a suíte ACBr usando o ACBrInstall_Trunk2 com a opção: apagar arquivos antigos marcada?

Configurou o programa exemplo corretamente?

[rafap2008]

3 horas atrás, Italo Jurisato Junior disse:

Bom dia Rafa,

Você esta com todos os fontes atualizados?

Reinstalou a suíte ACBr usando o ACBrInstall_Trunk2 com a opção: apagar arquivos antigos marcada?

Configurou o programa exemplo corretamente?

Fontes atualizados, reinstalado apagando antes.

A configuração foi feita conforme o demo do ACBr permite, que são...

Versão do documento como 2.5.00
As pastas dos arquivos e schemas
Dados do empregador e transmissor, incluindo certificado.
SSLLib, CryptLib, HttpLib, XMLSignLib = libWinCrypt, cryWinCrypt, httpWinHttp, xsLibXml2
SSLType = LT_all

[Italo Giurizzato Junior]

Boa tarde Rafa,

Pode ser alguma instabilidade do webservice.

[rafap2008]

10 minutos atrás, Italo Jurisato Junior disse:

Boa tarde Rafa,

Pode ser alguma instabilidade do webservice.

Ok, irei para outro projeto para dar um tempo para o webservice.

Obs. Estou testando em produção mesmo.

Obrigado.

[rafap2008]

Em 24/05/2019 at 14:30, rafap2008 disse:

Ok, irei para outro projeto para dar um tempo para o webservice.

Obs. Estou testando em produção mesmo.

Obrigado.

Bom dia,

Desculpe por incomodar, mas continuei com os testes e o problema persiste.

Estou com os fontes atualizados.

A configuração do componente está ok, tanto que a consulta do evento por ID ou número do recibo funcionam.

Alguma dica? Obrigado.

[Italo Giurizzato Junior]

Bom dia Rafa,

Por favor anexe o XML de pedido de consulta e o de retorno para que eu possa analisar.