eSocial ACBrLib download de eventos

[jair barreto]

Não tem como disponibilizar na dll também? 

Outra duvida que é referente a baixar os  xml dos eventos ( fazer downloads )  isto funciona na dll  ou não ?

Vi que tem os metodos mas envio e não acontece nada nenhum retorno!

O log estar configurado como 4  

 

Editado 25 Abril por jair barreto

[Renato Rubinho]

Jair, 

Gerei um novo tópico sobre sua dúvida por se tratar de assuntos diferentes. 

13 minutos atrás, jair barreto disse:

Vi que tem os metodos mas envio e não acontece nada nenhum retorno!

Como você está enviando o método? 

Anexe o log para análise. 

[jair barreto]

Estou enviando assim: 

eSocial_DownloadEventos(aIdEmpregador, aCPFTrabalhador, aDataInicial, aDataFinal, sResposta, esTamanho)

Estou passando esta funcao 

 

ACBrLibeSocial-20240426.log

[Renato Rubinho]

O log gravou sem os parâmetros para analisarmos.

26/04/24 09:13:24:206 - eSocial_DownloadEventos
26/04/24 09:13:27:883 - eSocial_ConsultaIdentificadoresEventosEmpregador

Mantenha o LogNivel com 4, teste novamente e traga o novo log. 

 

[jair barreto]

No log  eu observei um detalhe importante que independente dos parâmetros que estou passando sempre a data  chega  errada exemplo a data chega 30/12/1899

eSocial_ConsultaIdentificadoresEventosTrabalhador(04050400000000, 18607903802,30/12/1899,30/12/1899)

sendo que eu pasei foi estes parametros aqui por exemplo :

oEsocial:ConsTrabalhador("04050400000000", "18607903802", "01/06/2023" , "30/06/2023")

 

Todos estes metodos  estar chegando os parâmetros errados onde tem data muda para 30/12/1899

eSocial_ConsultaIdentificadoresEventosTabela",      "04050400000000", "15", "ID1040504000000002023071401271100629.S", "30/06/2023", "30/06/2023"
eSocial_ConsultaIdentificadoresEventosTrabalhador", "04050400000000", "18607903802", "30/06/2023", "30/06/2023"
eSocial_DownloadEventos", "04050400000000", "18607903802", "30/06/2023", "30/06/2023"
 

 

isto acontece com as 4 funcoes de downloads

ACBrLibeSocial-20240426.log

Editado 26 Abril por jair barreto

[jair barreto]

13 horas atrás, jair barreto disse:

No log  eu observei um detalhe importante que independente dos parâmetros que estou passando sempre a data  chega  errada exemplo a data chega 30/12/1899

eSocial_ConsultaIdentificadoresEventosTrabalhador(04050400000000, 18607903802,30/12/1899,30/12/1899)

sendo que eu pasei foi estes parametros aqui por exemplo :

oEsocial:ConsTrabalhador("04050400000000", "18607903802", "01/06/2023" , "30/06/2023")

Todos estes metodos  estar chegando os parâmetros errados onde tem data muda para 30/12/1899

eSocial_ConsultaIdentificadoresEventosTabela",      "04050400000000", "15", "ID1040504000000002023071401271100629.S", "01/06/2023", "30/06/2023"
eSocial_ConsultaIdentificadoresEventosTrabalhador", "04050400000000", "18607903802", "30/06/2023", "01/06/2023"
eSocial_DownloadEventos", "04050400000000", "18607903802", "01/06/2023", "30/06/2023"
 

 

isto acontece com as 4 funcoes de downloads

ACBrLibeSocial-20240426.log 47.69 kB · 1 download

eSocial_ConsultaIdentificadoresEventosTabela",      "04050400000000", "15", "ID1040504000000002023071401271100629.S", "01/06/2023", "30/06/2023"
eSocial_ConsultaIdentificadoresEventosTrabalhador", "04050400000000", "18607903802", "01/06/2023", "30/06/2023"
eSocial_DownloadEventos", "04050400000000", "18607903802", "01/06/2023", "30/06/2023"

eSocial_ConsultaIdentificadoresEventosEmpregador ", "04050400000000","15","30/06/2023"  todas  as 4 funções de    que passo como data  chega na dll   assume como se eu tivesse passado a data  quando na verdade eu nao mandei esta data  30/12/1899

 

 

 

 

Editado 27 Abril por jair barreto

[Renato Rubinho]

8 horas atrás, jair barreto disse:

quando na verdade eu nao mandei esta data  30/12/1899

Isso acontece quando a data não é passada, como se fosse zero ou em branco. 

Aparentemente não está passando os parâmetros corretamente. 

Algum outro método funciona na rua aplicação?

Não temos programa de exemplo do eSocial para sua linguagem, mas você pode ser basear em algum outro para verificar como se comunicar com a biblioteca.

../trunk2/Projetos/ACBrLib/Demos/Harbour/

[jair barreto]

Qual o formato que devo passar a data na documentação estar  DD/MM/AAAA e  eu estou passando assim  "01/06/2023", "30/06/2023"  sera  que eu deveria passar em outro formato ? em qual formato ? F

[jair barreto]

21 horas atrás, Renato Rubinho disse:

Isso acontece quando a data não é passada, como se fosse zero ou em branco. 

Aparentemente não está passando os parâmetros corretamente. 

Algum outro método funciona na rua aplicação?

Não temos programa de exemplo do eSocial para sua linguagem, mas você pode ser basear em algum outro para verificar como se comunicar com a biblioteca.

../trunk2/Projetos/ACBrLib/Demos/Harbour/

Consigo fazer  todos os outros procedimentos  existentes na documentação  apenas estas 4 funções que chega os dados errados  eu envio como parâmetro  "01/06/2023", "30/06/2023" desta forma  mas internamente a dll troca para  30/12/1899     o interessante que em todas as outras funcionalidades  os  parâmetros chegam corretos  apesar de logo no inicio ter encontrados alguns erros que você mesmo resolveu  para  mim tipo na hora de receber os parâmetro acho que internamente  na dll fazia um processamento de ajustes  e  aparentemente  é isto que estar acontecendo com estas 4 funções    exemplo esta função aqui  ConsIdentEmpregador( aIdEmpregador, aTipoEvento, aPeriodoApuracao ) o primeiro parametro e o segundo chega certo o terceiro já mandei     varias forma de datas  mas  não chega nada no 3 parâmetro  e assim acontece com as 4 funções ... 

[jair barreto]

Tem como colocar uma menssagem aqui para tester qual o tipo de string estar chegando  nesta funcoa o no logo por que independente do tipo de dados que coloco como parametro nao chaga a dat,  se  coloco NIl, se  coloco 30/06/2023, se  coloco  30-06-2024     se  coloco  2024-06-30   so chega    30/06/1899   ai eu precisava saber  que informa  colocar   aparentime é importado a stringo de dados  e reconhecer os 3 primeiro campos  os 2 ultimo nao reconhece  fica como se nao tivesse passado nada ...   mas os 3 orimeiro estar chegando certinho  

[Renato Rubinho]

Anexe a parte do seu fonte onde faz a chamada dos métodos que não funcionam e a parte de um método que funciona para analisarmos se encontramos alguma diferença.

[jair barreto]

**  A chamada do metodo é assim 
 cXmlResposta   :=    oEsocial:ConsTabela("04050400000000", 15, "ID1040504000000002023071401271100629","01/06/2023" , "30/06/2023") 

//  o metodo estar assim 
METHOD ConsTabela(aIdEmpregador, aTipoEvento, aChave,aDataInicial,aDataFinal) CLASS tEsocial
    local hResult, buffer, bufferLen
    bufferLen := STR_LEN
    buffer := Space(bufferLen) 
    hResult := DllCall(::hHandle, DLL_STDCALL, "eSocial_ConsultaIdentificadoresEventosTabela", hb_StrToUTF8(aIdEmpregador), aTipoEvento, aChave, hb_StrToUTF8(aDataInicial), hb_StrToUTF8(aDataFinal),@buffer, @bufferLen)
    ::CheckResult(hResult)
RETURN ::ProcessResult(buffer, bufferLen)

Observe  na parte do fonte como estou enviando e  o retornos  de cnpj retorna 04050400000000, o tipo do evento retrna  15 , a chave retorna  ID1040504000000002023071401271100629   exatamente como foi passada no metodo agora  a data inicial  01/06/2023 e final  30/06/2023   independente do que for passado so cheda na dll  como  30/12/1899

[jair barreto]

olha  a  mensagem do log  acredito que tem algum lugar  ai no fonte da dll  que  não estar carregando o valor enviado!

Passou e retorno erro  -8  depois que comecei a enviar a data coma       DateTime() 

02/05/24 08:17:03:637 - Destravar
02/05/24 08:17:03:637 -    SetRetorno(0, )
02/05/24 08:17:03:637 - TACBrLibeSocial.PrecisaCriptografar(eSocial,Visualizar)
02/05/24 08:17:03:637 - TACBrLibeSocial.PrecisaCriptografar - Feito Result: False
02/05/24 08:17:03:637 - LIB_ConfigGravarValor(eSocial, Visualizar, 1)
02/05/24 08:17:03:637 - TACBrLibeSocial.PrecisaCriptografar(eSocial,Visualizar)
02/05/24 08:17:03:637 - TACBrLibeSocial.PrecisaCriptografar - Feito Result: False
02/05/24 08:17:03:637 - TLibeSocialConfig.AjustarValor(tfGravar,eSocial,Visualizar,1)
02/05/24 08:17:03:637 - TLibeSocialConfig.AjustarValor - Feito
02/05/24 08:17:03:637 - TLibeSocialConfig.AplicarConfiguracoes: .\DLL\ACBrLib.ini
02/05/24 08:17:03:637 - Travar
02/05/24 08:17:03:637 - TLibeSocialConfig.AplicarConfiguracoes - Feito
02/05/24 08:17:03:637 - Destravar
02/05/24 08:17:03:637 -    SetRetorno(0, )
02/05/24 08:17:04:363 -  0000001 -eSocial_ConsultaIdentificadoresEventosTabela (04050400000000, 15, ID1040504000000002023071401271100629, 30/12/1899, 30/12/1899)
02/05/24 08:17:04:363 - Travar
02/05/24 08:17:04:363 - Destravar
02/05/24 08:17:04:363 -    SetRetorno(-8, Erro ao Consultar Evento - Parâmetro não Preenchido)
02/05/24 08:17:04:913 - LIB_Finalizar
02/05/24 08:17:04:913 - Finalizar

ACBrLibeSocial-20240502.log

Editado 2 Maio por jair barreto

[Renato Rubinho]

Em 02/05/2024 at 08:24, jair barreto disse:

eSocial_ConsultaIdentificadoresEventosTabela (04050400000000, 15, ID1040504000000002023071401271100629, 30/12/1899, 30/12/1899)

A data 30/12/1899 é interpretada como data zero, como se não tivesse sido informada. 

Tentei comparar com outros exemplos que temos e só notei a questão da conversão para UTF.

Em 29/04/2024 at 17:29, jair barreto disse:

eSocial_ConsultaIdentificadoresEventosTabela", hb_StrToUTF8(aIdEmpregador), aTipoEvento, aChave, hb_StrToUTF8(aDataInicial), hb_StrToUTF8(aDataFinal),@buffer, @bufferLen)

Tente remover o hb_StrToUTF8 das datas.

[jair barreto]

Seu eu soubesse qual a codificação para colocar  no inicio desta função lá no código fonte da dll ai eu conseguiria acertar e entender rapidamente o que estar acontecendo por que independente de como eu manda a data chega sempre zero conforme você passou na mensagem!

VOCE NAO PODE  PASSAR PARA MIM COMO ESCREVE  UMA ALERTA  NO INICIO DESTA FUNCAO PARA mostra o que chega no inicio desta função lá na dll,  ai eu fazia a compilação da dll e  conferia o que estar chagando ao iniciar a chamada desta função na dll.   

É que nao nao sei programar nada em delphi o lazaro  eu ate consigo compilar a dll aqui com o lazarao! 

estou chamando assim  "eSocial_ConsultaIdentificadoresEventosTabela", hb_StrToUTF8(aIdEmpregador), aTipoEvento, hb_StrToUTF8(aChave), aDataInicial, aDataFinal ,@buffer, @bufferLen

ja passei das seguintes forma :  "01/06/2023"        "2023/06/01"   2023-06-01   01/06/2023 09:41:16,824       nao conhesso nenhum outro formato de data para testar

Acho que se vc passar  a codificacao para mim e  indicar  onde coloco para mim compilar  e ver o que chega na dll ai dar para  mim ter alguma ideia do que pode estar  acontecendo.

 

OBS  a resposta no log  sempre chaga  a mesma coisa  mesmo que eu não passe nenhuma valor  ou manda qualquer formato de data  

  

 

 

 

 

[Renato Rubinho]

Em 06/05/2024 at 09:49, jair barreto disse:

VOCE NAO PODE  PASSAR PARA MIM COMO ESCREVE  UMA ALERTA  NO INICIO DESTA FUNCAO PARA mostra o que chega no inicio desta função lá na dll,  ai eu fazia a compilação da dll e  conferia o que estar chagando ao iniciar a chamada desta função na dll.   

Não prestamos este tipo de consultoria, talvez você consiga na área de classificados. 

Em 06/05/2024 at 09:49, jair barreto disse:

ja passei das seguintes forma :  "01/06/2023" 

Desta forma parece correto, pode ser alguma questão na declaração da função, mas não conheço sua linguagem para identificar o problema. 

Em 27/04/2024 at 17:06, Renato Rubinho disse:

./trunk2/Projetos/ACBrLib/Demos/Harbour/

Tente analisar os programas de exemplo de outras bibliotecas para tentar identificar alguma diferença.

[jair barreto]

Agora  consigo receber um erro diferente  mas  estar chegando os parametros

 

07/05/24 19:10:49:540 - TACBrLibeSocial.PrecisaCriptografar - Feito Result: False
07/05/24 19:10:49:540 - LIB_ConfigGravarValor(eSocial, Visualizar, 1)
07/05/24 19:10:49:540 - TACBrLibeSocial.PrecisaCriptografar(eSocial,Visualizar)
07/05/24 19:10:49:540 - TACBrLibeSocial.PrecisaCriptografar - Feito Result: False
07/05/24 19:10:49:540 - TLibeSocialConfig.AjustarValor(tfGravar,eSocial,Visualizar,1)
07/05/24 19:10:49:540 - TLibeSocialConfig.AjustarValor - Feito
07/05/24 19:10:49:540 - TLibeSocialConfig.AplicarConfiguracoes: .\DLL\ACBrLib.ini
07/05/24 19:10:49:540 - Travar
07/05/24 19:10:49:540 - TLibeSocialConfig.AplicarConfiguracoes - Feito
07/05/24 19:10:49:540 - Destravar
07/05/24 19:10:49:540 -    SetRetorno(0, )
07/05/24 19:10:49:540 - eSocial_DownloadEventos(04050400000162, 18165075802,01/06/2023,30/06/2023)
07/05/24 19:10:49:540 - Travar
07/05/24 19:10:49:577 - Destravar
07/05/24 19:10:49:577 -    SetRetorno(-10,  --> 1824 - Element '{http://www.esocial.gov.br/schema/download/solicitacao/id/v1_0_0}id': '18165075802' is not a valid value of the atomic type 'xs:ID'.
)
07/05/24 19:10:50:164 - LIB_Finalizar
07/05/24 19:10:50:164 - Finalizar

ACBrLibeSocial-20240507.log