Esocial evento 2500 tag baseCalculo

[ALTAMOGIANA]

Boa tarde, Estou com uma duvida na hora de validar essa tag "baseCalculo", utilizando o xml de exemplo do site do esocial, é informado a tag vrBcCpMensal com valor zerado, so que se eu alimento a tag assim no serviço aqui do esocial ele não cria a tag, ele da um exit:

Como exemplo abaixo de um xml que foi retirado do site o esocial ele cria essa tag com o valor zerado

Poderiam me ajudar em alguma sugestão sobre esse caso? os exemplos que eu teria, eu tenho valor na tag vrBcCp13, então deveria criar a tag de baseCalculo.
Att.

[Renato Rubinho]

O XML de exemplo que você baixou deve ter sido gerado na versão 1.1.

Veja que a condição para sair somente acontece na 1.2.

De acordo com o manual, está tag é obrigatória quando este grupo for gerado.

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[ALTAMOGIANA]

Então o xml foi retirado direto do site do esocial, nele ta v_S_01_02_00.
Mas sempre que informar aqui valor zero ele vai cair nesse exit, nem vai criar a tag.
Essa procedure aqui, é do pcesS2500, ele é comum a todos não é?
A questão ta sendo sempre que informar ele como zero, acredito que se deixar nulo e informar o vrBcCp13 não deve criar a tag também?

como essa validação é feito na pcesS2500 como que faria pra gerar essa tag igual foi comentado?

Bom dia Renato!!

A versão utilizada é a S01_02_00. 

A condição é vrBcCpMensal = 0 e vrBcCp13 > 0, ou seja, é obrigatório informar a tag baseCalculo.

Partindo dessa analise o AcbrEsocial está com erro no pcesS2500.pas "TEvtProcTrab.GerarBaseCalculo(obj: TbaseCalculo);", pois o mesmo impede a geração da tag através da condição:

if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) ) then
    exit;

 

 

 

13 horas atrás, Renato Rubinho disse:

O XML de exemplo que você baixou deve ter sido gerado na versão 1.1.

Veja que a condição para sair somente acontece na 1.2.

De acordo com o manual, está tag é obrigatória quando este grupo for gerado.

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

 

Bom dia Renato!!

A versão utilizada é a S01_02_00. 

A condição é vrBcCpMensal = 0 e vrBcCp13 > 0, ou seja, é obrigatório informar a tag baseCalculo.

Partindo dessa analise o AcbrEsocial está com erro no pcesS2500.pas "TEvtProcTrab.GerarBaseCalculo(obj: TbaseCalculo);", pois o mesmo impede a geração da tag através da condição:

if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) ) then
    exit;

[EMBarbosa]

3 horas atrás, ALTAMOGIANA disse:

Partindo dessa analise o AcbrEsocial está com erro no pcesS2500.pas "TEvtProcTrab.GerarBaseCalculo(obj: TbaseCalculo);", pois o mesmo impede a geração da tag através da condição:

if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) ) then
    exit;

A questão é que o grupo "baseCalculo" não é obrigatório. Então precisamos de uma validação para não gerá-lo.

E se mudarmos para o seguinte código?

  if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) and (obj.vrBcCp13 = 0)) then
    exit;

O que acha dessa alternativa?

[ALTAMOGIANA]

7 minutos atrás, EMBarbosa disse:

A questão é que o grupo "baseCalculo" não é obrigatório. Então precisamos de uma validação para não gerá-lo.

E se mudarmos para o seguinte código?

  if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) and (obj.vrBcCp13 = 0)) then
    exit;

O que acha dessa alternativa?

Bom dia Elton

 Excelente alternativa.

Acredito que irá solucionar o problema o problema na geração do xml.

Muito obrigado!!!

[Renato Rubinho]

Em 11/04/2024 at 11:32, EMBarbosa disse:

se mudarmos para o seguinte código?

  if ( (VersaoDF >= veS01_02_00) and (obj.vrBcCpMensal = 0) and (obj.vrBcCp13 = 0)) then
    exit;

Criada TK-5332 para implementar a solução passada pelo Elton.

[Renato Rubinho]

Boa noite,

Obrigado pela contribuição.
Foram enviadas correções ao SVN que devem resolver o problema relatado, Rev-33248
Por favor atualize os fontes, reinstale os componentes, verifique se o problema foi resolvido e, se possível, nos informe se foi o resultado esperado.

[Renato Rubinho]

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