Ir para conteúdo
  • Cadastre-se

dev botao

Interpretador de tipo evento


Ver Solução Respondido por Italo Giurizzato Junior,
  • Este tópico foi criado há 1899 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Ao executa a função mACBreSocial.Eventos.LoadFromString(lxml_esocial) para carregar o evento S-1299, o ACBR valida no xml quanto o evento que esta sendo executado usando a função StringXMLToTipoEvento(Ok, AXMLString)

só que ele encontra outras palavras chaves antes da palavra "evtFechaEvPer" e acaba validado o schema do xml errado. A pesquisa das palavras chaves ele copia da posição 1 até o fima da palavra "</eSocial>" então pesquisa todo o  xml causando o erro segue pedaço do fonte do acbr:

===================================================

function TEventos.LoadFromString(AXMLString: String): Boolean;
var
  AXML: AnsiString;
  P: integer;

  function PoseSocial: integer;
  begin
    Result := pos('</eSocial>', AXMLString);
  end;

begin
  Result := False;
  P := PoseSocial;

  while P > 0 do
  begin
    AXML := copy(AXMLString, 1, P + 9);
    AXMLString := Trim(copy(AXMLString, P + 10, length(AXMLString)));
 

======================================================

Segue o xml importado:
<?xml version="1.0"?>
<eSocial xmlns="http://www.esocial.gov.br/schema/evt/EvtFechaEvPer/v02_04_02">
  <evtFechaEvPer Id="ID1272972900000002019011115273900001">
    <ideEvento>
      <indApuracao>1</indApuracao>
      <perApur>2018-12</perApur>
      <tpAmb>2</tpAmb>
      <procEmi>1</procEmi>
      <verProc>Auditor 2.11.35</verProc>
    </ideEvento>
    <ideEmpregador>
      <tpInsc>1</tpInsc>
      <nrInsc>27297290</nrInsc>
    </ideEmpregador>
    <ideRespInf>
      <nmResp>MONICA OHNESZORGE NEITZEL</nmResp>
      <cpfResp>06848242721</cpfResp>
      <telefone>2732631170</telefone>
      <email>[email protected]</email>
    </ideRespInf>
    <infoFech>
      <evtRemun>N</evtRemun>
      <evtPgtos>N</evtPgtos>
      <evtAqProd>N</evtAqProd>
      <evtComProd>N</evtComProd>
      <evtContratAvNP>N</evtContratAvNP>
      <evtInfoComplPer>N</evtInfoComplPer>
    </infoFech>
  </evtFechaEvPer>
</eSocial>

Editado por Evandro Rocha Almeida
Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia Evandro,

Peço que não poste conteúdo de XML como parte do texto da postagem, procure sempre anexar o XML.

Desculpe, não compreendi onde esta o problema.

Você esta com todos os fontes de todas as pastas atualizados?

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

O Problema ocorre quando eu passo para o ACBR o xml em anexo do Evento S-1299 para o ACBR validar o schema e transmitir para a Sefaz através do comando mACBreSocial.Eventos.LoadFromString(lxml_esocial)

, o ACBR me retorna o erro abaixo:

Divergência Apresentada: <ret></ret>
<retws></retws><versao>1.22.1.6</versao><fault> bloco:0 ROTINA: TObjEsocial.Enviar
BLOCO:10 Falha na validação dos dados do evento: evtRemun-v02_04_02

1845 - Element '{http://www.esocial.gov.br/schema/evt/EvtFechaEvPer/v02_04_02}eSocial': No matching global declaration available for the validation root.</fault>

-----------

Foi descoberto que na unit pcesConversaoeSocial existe uma função StringXMLToTipoEvento que pesquisa a TAG do evento, e tem uma constante chamada TEventoString que retorna a tag do evento,  como a tag evtRemun está na frente da tag evtFechaEvPer, a função pensa que se trava de um evento evtRemun e não de um evento tag evtFechaEvPer que estou preenchendo conforme o arquivo em anexo. 

 

TempEventoGerado.xml

Editado por Evandro Rocha Almeida
Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Evandro,

Agora entendi o problema, vou tentar encontrar uma solução.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores
  • Solution

Evandro,

Favor atualizar os fontes e refaça os testes.

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Administradores

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

  • Curtir 1
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1899 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.