Jump to content

Delphi Enterprise 
pela METADE DO PREÇO

botao_delphi.png

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

asamos

ANSWERED pcesS3000 não gera IdeTrabalhador para os te S2299 nem S2399

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

Recommended Posts

Olá

Na rotina rotina pcesS3000 o XML do trabalhador só é gerado para os eventos: teS1200,teS1202,teS1210, mas o eSocial

exige a identificação e o período de apuração para os eventos S2299 e S3299 .

Seria possível corrigir essa rotina ?

C:\ACBr\Fontes\ACBrDFe\ACBreSocial\PCNeSocial\pcesS3000.pas 03/08/2018 18:01:12 Page 1 of 1

if ( self.InfoExclusao.tpEvento In [teS1200,teS1202,teS1210] ) then
begin
    GerarIdeTrabalhador2(self.InfoExclusao.IdeTrabalhador, True);
    GerarIdeFolhaPagto(self.InfoExclusao.IdeFolhaPagto);
end
else
begin
   if ( self.InfoExclusao.IdeFolhaPagto.perApur = '' ) then
     GerarIdeTrabalhador2(self.InfoExclusao.IdeTrabalhador, True)
  else
    GerarIdeFolhaPagto(self.InfoExclusao.IdeFolhaPagto);
end;

Obrigado,

Aristarco

 

 

 

  • Like 1

Share this post


Link to post
Share on other sites

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

  • Like 1

Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

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

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

Share this post


Link to post
Share on other sites

Bom dia Aristarco,

Por favor faça a alteração que você julga necessária, realiza os testes, estando tudo Ok anexe a unit alterada para que possamos analisar e depois enviar para o repositório.

Desde já muito obrigado pela colaboração.

  • Like 2

Consultor SAC ACBr Italo Jurisato 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

Share this post


Link to post
Share on other sites

Anexo fonte da rotina pcesS300.pas alterada. Foi acrescentado o código teS2299 que se refere ao cancelamento da demissão.

if ( self.InfoExclusao.tpEvento In [teS1200,teS1202,teS1210, teS2299] ) then
begin

-------------

end

 

Aristarco

pcesS3000.pas

  • Like 1

Share this post


Link to post
Share on other sites

×
×
  • Create New...