Clipper On Line • Ver Tópico - E-Social

E-Social

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

Moderador: Moderadores

 

E-Social

Mensagempor oliveiros » 10 Jan 2019 09:00

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.esocial.gov.br/servicos/empregador/enviarloteeventos/WsEnviarLoteEventos.svc"
cCertificado := "XXXX"
cSOAPAction := "http://www.esocial.gov.br/servicos/empregador/lote/eventos/envio/v1_1_0/ServicoEnviarLoteEventos/EnviarLoteEventos"

//
*----------------------------------------------------------------------------*
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/eventos/envio/v1_1_1">'
cEnvelope_XML += '<eSocial xmlns="http://www.esocial.gov.br/schema/lote/eventos/envio/v1_1_1">'

Alguem poderia ajudar?

Desde já agradeço.

Att.,

Oliveiros Junior
oliveiros
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 3
Data de registro: 10 Jan 2019 08:36
Cidade/Estado: brasilia
Curtiu: 0 vez
Mens.Curtidas: 0 vez

E-Social

Mensagempor paiva_dbdc » 13 Jan 2019 18:42

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
paiva_dbdc
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 342
Data de registro: 12 Nov 2012 08:58
Cidade/Estado: uberlandia mg
Curtiu: 0 vez
Mens.Curtidas: 6 vezes

E-Social

Mensagempor JoséQuintas » 14 Jan 2019 06:57

Estranhei esta parte, não está errado?

EnviarLoteEventos xmlnm="h...
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

E-Social

Mensagempor oliveiros » 14 Jan 2019 08:22

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/eventos/envio/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/evtInfoEmpregador/v02_04_02">
<evtInfoEmpregador Id="ID1063524310001011000201901">

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

cSOAPAction := "http://www.esocial.gov.br/servicos/empregador/lote/eventos/envio/v1_1_0/ServicoEnviarLoteEventos/EnviarLoteEventos"

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
oliveiros
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 3
Data de registro: 10 Jan 2019 08:36
Cidade/Estado: brasilia
Curtiu: 0 vez
Mens.Curtidas: 0 vez

E-Social

Mensagempor JoséQuintas » 14 Jan 2019 13:30

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, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

E-Social

Mensagempor oliveiros » 29 Jan 2019 16:59

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
oliveiros
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 3
Data de registro: 10 Jan 2019 08:36
Cidade/Estado: brasilia
Curtiu: 0 vez
Mens.Curtidas: 0 vez




Retornar para Harbour

Quem está online

Usuários vendo este fórum: Google Adsense [Bot] e 6 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro