E-Social

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

oliveiros
Usuário Nível 1
Usuário Nível 1
Mensagens: 4
Registrado em: 10 Jan 2019 09:36
Localização: brasilia

E-Social

Mensagem por oliveiros »

Bom dia a todos,

Estou com um problema no e-Social. Aproveitando rotina do J. QUINTAS (desculpe se for de outro) neste fórum, estou tentando enviar xml para produção restrita xml de teste e venho recebendo a mensagem: "Argument error".

Peguei a rotina e detalhei... com TRY para tentar identificar se o erro é na rotina de envio( que alterei ):

cURL_Envio := "https://webservices.producaorestrita.es ... ventos.svc"
cCertificado := "XXXX"
cSOAPAction := "http://www.esocial.gov.br/servicos/empr ... oteEventos"

//
*----------------------------------------------------------------------------*
TRY
oServer := CreateObject( 'MSXML2.ServerXMLHTTP.6.0' )
CATCH
oServer := CreateObject( 'MSXML2.XMLHTTP' )
END

//
*----------------------------------------------------------------------------*
cMensagem += "Iniciando conexão com o e-social..."
Exibir_Mensagem()

//
*----------------------------------------------------------------------------*
cMensagem += "Verificando certificado: " + cCertificado
Exibir_Mensagem()

TRY
oServer:SetOption( 3, cCertificado )

TRY

//
*------------------------------------------------------------------------*
cMensagem += "Certificado validado."
Exibir_Mensagem()

//
*------------------------------------------------------------------------*
cMensagem += "Conectando ao webservice(POST): " + cURL_Envio
Exibir_Mensagem()


oServer:Open( "POST", cURL_Envio, .F. )

TRY

//
*----------------------------------------------------------------------*
cMensagem += "Conectado ao webservice (POST)."
Exibir_Mensagem()

oServer:SetRequestHeader( "SOAPAction", cSOAPAction )

oServer:SetRequestHeader( "Content-Type", "text/xml; charset=utf-8" )

TRY

cMensagem += "Enviando XML: " + CRLF + cXML
Exibir_Mensagem()

oServer:Send( cXML )

oServer:WaitForResponse( 500 )

cRetorno := oServer:ResponseBody()

cMensagem += "Resposta: " + cRetorno
Exibir_Mensagem()

cMensagem += "Resposta servidor: " + oServer:status + " - " + oServer:statusText
Exibir_Mensagem()
CATCH oError

cMensagem += "*** Erro no envio do XML - " + oError:Description
Exibir_Mensagem()
END
CATCH oError

cMensagem += "*** Erro na conexão com o webservice(ACTION) - " + oError:Description
Exibir_Mensagem()
END
CATCH oError

cMensagem += "*** Erro na conexão com o webservice(POST) - " + oError:Description
Exibir_Mensagem()
END
CATCH oError

cMensagem += "*** Erro na validação do certificado - " + oError:Description
Exibir_Mensagem()
END

oServer := NIL


o erro aparentemente ocorre na SOAPAction.

Iniciando...

Assinando XML: 201901_06352431000101_1000-esocial-evt.xml

Arquivo 201901_06352431000101_1000-esocial-evt.xml assinado com sucesso.

Iniciando conexão com o e-social...

Verificando certificado: XXXX

Certificado validado.

Conectando ao webservice(POST): https://webservices.producaorestrita.es ... ventos.svc

Conectado ao webservice (POST).

Enviando XML: C:\Sistemas\ESocial\Envio\teste.xml

*** Erro no envio do XML - Argument error

*---------------------------------------------------------------------------------------------------------------------------------------------------------*
Aqui a parte de envelopamento do XML:
cEnvelope_XML := '<?xml version="1.0" encoding="utf-8"?>'
cEnvelope_XML += '<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">'
cEnvelope_XML += '<soap:Body>'
cEnvelope_XML += '<EnviarLoteEventos xmlnm="http://www.esocial.gov.br/schema/lote/e ... vio/v1_1_1">'
cEnvelope_XML += '<eSocial xmlns="http://www.esocial.gov.br/schema/lote/e ... vio/v1_1_1">'


Alguem poderia ajudar?

Desde já agradeço.

Att.,

Oliveiros Junior
paiva_dbdc
Usuário Nível 3
Usuário Nível 3
Mensagens: 342
Registrado em: 12 Nov 2012 09:58
Localização: uberlandia mg

E-Social

Mensagem por paiva_dbdc »

Boa noite


Estou fazendo usando o acbrMonitor

até o 2200 ja fiz


se precisar so contactar



vc ja fez o 1200 e 1300 ? ou o 2300 ?



cpaivasistemas@gmail.com
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

E-Social

Mensagem por JoséQuintas »

Estranhei esta parte, não está errado?

Código: Selecionar todos

EnviarLoteEventos xmlnm="h...
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
oliveiros
Usuário Nível 1
Usuário Nível 1
Mensagens: 4
Registrado em: 10 Jan 2019 09:36
Localização: brasilia

E-Social

Mensagem por oliveiros »

Olá Paiva e Quintas, obrigado pelas respostas.

Quintas abaixo o log do programa quanto ao envio do XML após retirada no trecho que você falou.

Iniciando...

Assinando XML: 201901_06352431000101_1000-esocial-evt.xml

Arquivo 201901_06352431000101_1000-esocial-evt.xml assinado com sucesso.

Iniciando conexão com o e-social...

Verificando certificado: XXXXX

Certificado validado.

Conectando ao webservice(POST): https://webservices.producaorestrita.es ... ventos.svc

Conectado ao webservice (POST).

Enviando XML:
C:\Sistemas\sindicom_outros\SisFolha\ESocial\Envio\xml_1063524310001011000201901_envio.xml

*** Erro no envio do XML - Argument error

Este é o trecho do envelopamento após a retirada do trecho "<EnviarLoteEventos xmlnm" que aparece no meu browser:

<?xml version="1.0" encoding="ISO-8859-1"?>
<soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<soap:Header/>
<soap:Body>
<eSocial xmlns="http://www.esocial.gov.br/schema/lote/e ... vio/v1_1_1">
<envioLoteEventos grupo="1">
<ideEmpregador>
<tpInsc>1</tpInsc>
<nrInsc>06352431</nrInsc>
</ideEmpregador>
<ideTransmissor>
<tpInsc>1</tpInsc>
<nrInsc>06352431000101</nrInsc>
</ideTransmissor>
<eventos>
<evento Id="ID1063524310001011000201901">
<eSocial xmlns="http://www.esocial.gov.br/schema/evt/ev ... /v02_04_02">
<evtInfoEmpregador Id="ID1063524310001011000201901">

Acho que tem alguma coisa haver com o comando do SOAPAction:

cSOAPAction := "http://www.esocial.gov.br/servicos/empr ... oteEventos"

pois se houvesse um erro no XML o webservice não deveria retornar alguma coisa dizendo que o arquivo não atende ao leiaute do e-SOCIAL. O que vocës acham?

Att.,

Oliveiros Junior
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

E-Social

Mensagem por JoséQuintas »

oliveiros escreveu:pois se houvesse um erro no XML o webservice não deveria retornar alguma coisa dizendo que o arquivo não atende ao leiaute do e-SOCIAL. O que vocës acham?
É aí que a coisa pega.

O XML faz parte da comunicação.
Se estiver errado pra tudo.... não comunica....

Se estiver pelo menos no padrão... aí sim, vai comunicar, e vai ter uma resposta.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
oliveiros
Usuário Nível 1
Usuário Nível 1
Mensagens: 4
Registrado em: 10 Jan 2019 09:36
Localização: brasilia

E-Social

Mensagem por oliveiros »

Olá JoséQuintas,

Primeiro peço desculpas pela demora em responder. Estou apagando um incêndio em outro sistema.
Vou revisar ou XML e verificar se uma rotina que encontrei para carregar o certificado funciona direito e depois retorno aqui.

Obrigado.

Oliveiros Junior
Responder