Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

e-Social Evento S-3000 Não preenche o grupo ideTrabalhador


anderson.mendonca
  • Este tópico foi criado há 1073 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

Caros colegas, meu programa está informando o CPF e PIS do trabalhador no evento S-3000, mas quando o componente gera o XML, este grupo não aparece.

Conferi o conteudo dos campos CPF e PIS colocando um BREAK e ambos estão sendo informados.

Alguém pode me ajudar?

Obrigado.

 

eSocial-sit.xml

eSocial-ped-sit.xml

20180821221807-rec.xml

20180821221803-env-lot.xml

1246856450000002018082122174500009-S-3000-0.xml

Algoritmo.txt

Link to comment
Share on other sites

Anderson, bom dia!

Fiz o teste aqui, e enviei a exclusão do S-2190 normalmente, sem problemas.

Eu acho que o seu problema é estar atribuindo valor no IndApuracao e perApur, sendo que não deveria.

Esses campos só devem ser preenchidos no caso de exclusão de periódicos...

 

EvtExclusao.InfoExclusao.ideTrabalhador.CpfTrab := fncSomenteNumeros(cpfTrab);

    if ( tpEvento <> 'S-1210' ) then
      EvtExclusao.InfoExclusao.ideTrabalhador.NisTrab := fncSomenteNumeros(nisTrab);

    if ( tpEvento = 'S-1200' ) or ( tpEvento = 'S-1210' ) then
    begin

      if ( fgCompetencia13 = 'SIM' ) then
      begin
        EvtExclusao.InfoExclusao.IdeFolhaPagto.IndApuracao := ipaAnual;
        EvtExclusao.InfoExclusao.IdeFolhaPagto.perApur     := IntToStr(YearOf(dtPeriodoApuracao));
      end
      else
      begin
        EvtExclusao.InfoExclusao.IdeFolhaPagto.IndApuracao := iapuMensal;
        EvtExclusao.InfoExclusao.IdeFolhaPagto.perApur     := FormatDateTime('YYYY-MM', dtPeriodoApuracao);
      end;

    end;

Agora, Paulo Aguiar Junior disse:

@Anderson Mendonça

Anderson, bom dia!

Fiz o teste aqui, e enviei a exclusão do S-2190 normalmente, sem problemas.

Eu acho que o seu problema é estar atribuindo valor no IndApuracao e perApur, sendo que não deveria.

Esses campos só devem ser preenchidos no caso de exclusão de periódicos...

 

EvtExclusao.InfoExclusao.ideTrabalhador.CpfTrab := fncSomenteNumeros(cpfTrab);

    if ( tpEvento <> 'S-1210' ) then
      EvtExclusao.InfoExclusao.ideTrabalhador.NisTrab := fncSomenteNumeros(nisTrab);

    if ( tpEvento = 'S-1200' ) or ( tpEvento = 'S-1210' ) then
    begin

      if ( fgCompetencia13 = 'SIM' ) then
      begin
        EvtExclusao.InfoExclusao.IdeFolhaPagto.IndApuracao := ipaAnual;
        EvtExclusao.InfoExclusao.IdeFolhaPagto.perApur     := IntToStr(YearOf(dtPeriodoApuracao));
      end
      else
      begin
        EvtExclusao.InfoExclusao.IdeFolhaPagto.IndApuracao := iapuMensal;
        EvtExclusao.InfoExclusao.IdeFolhaPagto.perApur     := FormatDateTime('YYYY-MM', dtPeriodoApuracao);
      end;

    end;

 

  • Like 1
Link to comment
Share on other sites

  • Este tópico foi criado há 1073 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.