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 Quinta as 11:26 por jair barreto