Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Ajuste no campo opcFGTS do evento S-2300


Joceandro Perin
Go to solution Solved by Italo Giurizzato Junior,
  • Este tópico foi criado há 1508 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde galera..

Na função GerarFGTS da unit pcesS2300, está passando a tipagem sem fazer a conversão pro gerador, desta forma está gerando inconsistência no eSocial..

 Como estava..

procedure TEvtTSVInicio.GerarFGTS(obj: TFGTS);
begin
  if obj.dtOpcFGTS > 0 then
  begin
    Gerador.wGrupo('fgts');

    Gerador.wCampo(tcStr, '', 'opcFGTS',    1,  1, 1, obj.OpcFGTS);
    Gerador.wCampo(tcDat, '', 'dtOpcFGTS', 10, 10, 0, obj.dtOpcFGTS);

    Gerador.wGrupo('/fgts');
  end;
end;

Ajustado para..

procedure TEvtTSVInicio.GerarFGTS(obj: TFGTS);
begin
  if obj.dtOpcFGTS > 0 then
  begin
    Gerador.wGrupo('fgts');

    Gerador.wCampo(tcStr, '', 'opcFGTS',    1,  1, 1, eSOpcFGTSToStr(obj.OpcFGTS));
    Gerador.wCampo(tcDat, '', 'dtOpcFGTS', 10, 10, 0, obj.dtOpcFGTS);

    Gerador.wGrupo('/fgts');
  end;
end;

@Italo Jurisato Junior @Rafael Dias Segue unit.. Abraço..

pcesS2300.pas

Link to comment
Share on other sites

  • 4 weeks later...

Boa tarde,

Uma nova alteração no registro: s-2300 e s-2306. A alteração é um detalhe: atualmente o campo ... [ natAtividade ] do registro está sendo identificado por [ natAtivididade ], alterei a nomeclatura.

Outra modificação foi na função: LerArqIni(...) para o campo ... [ infoTSVInicio.natAtividade ] esta sendo lido de [ INIRec.ReadString(sSecao, 'cadIni', '1')) ] modifiquei para ler [ INIRec.ReadString(sSecao, 'natAtividade', '1')) ],

 se concordarem com a mudança, favor subir no svn!

pcesS2300.rar

pcesS2306.rar

Edited by Hudson G Leite
Link to comment
Share on other sites

  • Consultores

Bom dia Hudson,

Muito obrigado pela colaboração, ainda hoje estarei avaliando e se tudo OK vou enviar para o repositório.

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

Link to comment
Share on other sites

  • Este tópico foi criado há 1508 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.