Marcelo Pontes Melim

Fiz alguns ajustes no módulo pcesConversaoeSocial.pas que segue anexo. Veja se resolverá a quebra de código pela remoção inadvertida que fiz. Um abraço e pedimos desculpas. pcesConversaoeSocial.pas

Anexo a versão revisada e modificada do evento S-5013. pcesS5013.pas

Obrigado pelo seu feedback Jucemar, realmente só foquei na versão simplificada, pois, não faço mais uso da versão 2.5. Vou dar uma revisada aproveitando as suas sinalizações e vou corrigir o meu fonte e depois vou disponibilizar o módulo corrigido. Um abraço.

Fiz os ajustes no fonte do evento S-5013 implementado a versão simplificada. Faça os testes e me avise se não obtiver sucesso. pcesS5013.pas

Bom dia! Com o objetivo de colaborar com a comunidade que utiliza o componente ACBreSocial fiz a adaptação para a geração dos eventos que são específicos para a Administração Pública: 1. Evento S-2400 rescrito; 2. Eventos: S-2231, S-2405, S-2410, S-2416, S-2418 e S-2420 todos novos; 3. O programa exemplo foi adaptado para gerar os eventos acima indicados (ainda falta adaptar para todos os eventos na versão simplificada); 4. Ainda faltando rescrever os eventos S-1202 e S-1207; 5. Diversos módulos foram modificados para o desenvolvimento, portanto, façam os testes instalando o componente por completo; 6. De todos os módulos novos não fizemos a rotina de importação dos arquivos INI. Lembrando: - Compartilhando com o grupo para testes e envio, se possível, no ambiente de produção restrita; - Em todos os módulos desenvolvidos procuramos respeitar as regras estabelecidas pelos grupos de desenvolvimento; - Se o Projeto ACBr quiser depois aproveitar o código por nós escritos para incorporar ao componente, ficaremos muito satisfeitos; - Se o Projeto ACBr quiser modificar o código para adequar ao projetos também poderá ser feito. Peço a quem se interessar que façam os testes de geração, envio e tratamento do retorno nos avisando dos erros encontrados. Abraços a todos e desejamos sucesso nessa empreitada. ACBreSocial.zip eSocial Versão S-01-00-00 - Progresso da adaptação do componente ACBr.xlsx ACBreSocialExamplo.zip

Encontrei dois erros na geração do evento S-2306 na versão simplificada: 1. Tag infoEstagiario: não existe mais o vlrBolsa; 2. Tag supervisorEstagio: não exite mais o nmSuperv. pcesS2306.pas

Esse código vai parar de funcionar a partir da primeira atualização dos eventos do e-Social: if VersaoDF = veS01_00_00 then Begin Gerador.wCampo(tcStr, '', 'codIncCPRP', 2, 2, 1, eSCodIncCPRPToStr(InfoRubrica.dadosRubrica.codIncCPRP)); if InfoRubrica.dadosRubrica.tetoRemun <> snfNada then Gerador.wCampo(tcStr, '', 'tetoRemun', 0, 2, 0, eSSimNaoFacultativoToStr(InfoRubrica.dadosRubrica.tetoRemun)); End; eu alteraria para: if VersaoDF >= veS01_00_00 then Begin Gerador.wCampo(tcStr, '', 'codIncCPRP', 2, 2, 1, eSCodIncCPRPToStr(InfoRubrica.dadosRubrica.codIncCPRP)); if InfoRubrica.dadosRubrica.tetoRemun <> snfNada then Gerador.wCampo(tcStr, '', 'tetoRemun', 0, 2, 0, eSSimNaoFacultativoToStr(InfoRubrica.dadosRubrica.tetoRemun)); End;

Novos ajustes foram feitos nos módulos. pcesConversaoeSocial.pas pcesS1010.pas

Existiam outros códigos que estavam faltando. Fiz os ajustes, segue módulo com as atualizações. pcesConversaoeSocial.pas Preciso fazer os outros ajustes, desconsidere o módulo disponibilizado.

Bom dia! Fiz os ajustes nos módulos anexos para o funcionamento correto nas duas versões do e-Social que estão em vigor (2.5 e simplificada). Fiz os testes no ambiente de produção restrita para as empresas em geral nas duas versões e correu tudo certo. Para a administração pública não tenho como testar, pois, não tenho procuração de nenhum órgão cliente para enviar os eventos. pcesConversaoeSocial.pas pcesS1010.pas

Retire essas linhas se for testar: if FileExists('C:\temp\S1210.XML') then DeleteFile('C:\temp\S1210.XML');

Os meus componentes ACBr estão atualizados com o que está no SVN e não sei te dizer qual é a revisão. Quando encontro um problema assim, modifico a função GerarXML no pcesS1210 salvando o arquivo gerado antes de assinar o evento. Veja se é de alguma utilidade para vocês. Depois, quando consigo resolver, apago as modificações que fiz e faço a reinstalação do ACBr. function TEvtPgtos.GerarXML: Boolean; var A: TStringList; begin try Self.VersaoDF := TACBreSocial(FACBreSocial).Configuracoes.Geral.VersaoDF; Self.Id := GerarChaveEsocial(now, self.ideEmpregador.NrInsc, self.Sequencial); GerarCabecalho('evtPgtos'); Gerador.wGrupo('evtPgtos Id="' + Self.Id + '"'); if VersaoDF <= ve02_05_00 then GerarIdeEvento3(Self.ideEvento) else begin Gerador.wGrupo('ideEvento'); GerarIdeEvento2(Self.ideEvento, false); Gerador.wCampo(tcStr, '', 'perApur', 7, 7, 1, Self.ideEvento.perApur); GerarIdeEvento(Self.ideEvento, false); Gerador.wGrupo('/ideEvento'); end; GerarIdeEmpregador(Self.ideEmpregador); GerarIdeBenef(Self.ideBenef); Gerador.wGrupo('/evtPgtos'); GerarRodape; FXML := Gerador.ArquivoFormatoXML; A := TStringList.Create; A.Text := FXML; A.SaveToFile('C:\temp\S1210.XML'); FreeAndNil(A); // XML := Assinar(Gerador.ArquivoFormatoXML, 'evtPgtos'); // Validar(schevtPgtos); except on e:exception do raise Exception.Create('ID: ' + Self.Id + sLineBreak + ' ' + e.Message); end; if FileExists('C:\temp\S1210.XML') then DeleteFile('C:\temp\S1210.XML'); Result := (Gerador.ArquivoFormatoXML <> '') end;

Bom dia, Kelly! Os eventos do sistema são gerados por um programa feito em Delphi, capturando os dados diretamente do banco de dados e alimentando o componente. Não fazemos utilização dos arquivos INI.

Para verificar o que foi reportado, resolvemos testar a: geração, envio, validação e retorno do evento no ambiente simplificado. Tudo funcionou como esperado e o recibo foi arquivado no nosso sistema. <eSocial xmlns="http://www.esocial.gov.br/schema/evt/evtPgtos/v_S_01_00_00"> <evtPgtos Id="ID1000000000000002021051316010700158"> <ideEvento> <indRetif>1</indRetif> <perApur>2021-01</perApur> <tpAmb>2</tpAmb> <procEmi>1</procEmi> <verProc>0.0.0.0</verProc> </ideEvento> <ideEmpregador> <tpInsc>1</tpInsc> <nrInsc>00000000</nrInsc> </ideEmpregador> <ideBenef> <cpfBenef>00000000000</cpfBenef> <infoPgto> <dtPgto>2021-01-29</dtPgto> <tpPgto>1</tpPgto> <perRef>2021-01</perRef> <ideDmDev>001-00000009</ideDmDev> <vrLiq>1872.81</vrLiq> </infoPgto> </ideBenef> </evtPgtos> </eSocial>

Boa tarde, Joceandro. Já atualizei o meu código pelo SVN. As modificações que fiz e foram publicadas hoje, são as seguintes: 1. pcesGerador.pas Linhas 1503 e 1504 alterado para: "if VersaoDF <= ve02_05_00 then" 2. pces1299.pas Linha 225 alterado para: "(Self.InfoFech.indExecApur1250 <> snfNada) and" 3. pces2306.pas Linhas 345 e 346 alterado para: "if (VersaoDF <= ve02_05_00) or (obj.Matricula = '') then" Também enviei atualizado o Schema do evento S1299 que foi incluído campo "indExcApur1250" Obrigado.

Nova versão do componente ACBreSocial para a versão simplificada com ajustes apontados pelos colegas. Obrigado a todos por testar e me retornar os problemas. ACBreSocial.zip eSocial Versão S-01-00-00 - Progresso da adaptação do componente ACBr.pdf Schemas.zip

Olá, Murilo! Não, que eu saiba. O meu objetivo era compartilhar com vocês as mudanças que fiz no componente ACBreSocial para atender as modificações necessárias no programa da folha de pagamento. Aproveitei a abertura de um tópico no fórum do projeto para enviar as modificações que fiz. Um abraço.

Olá! Acabei de gerar, enviar e receber o retorno do evento de alteração cadastral (S-2205) e não foi encontrado o problema relatado. Veja o código abaixo: <evtAltCadastral Id="ID1020770810000002021042910283700001"> <ideEvento> <indRetif>1</indRetif> <tpAmb>2</tpAmb> <procEmi>1</procEmi> <verProc>XXXXXXXX</verProc> </ideEvento> <ideEmpregador> <tpInsc>0</tpInsc> <nrInsc>XXXXXXXX</nrInsc> </ideEmpregador> <ideTrabalhador> <cpfTrab>XXXXXXXXXXX</cpfTrab> </ideTrabalhador> <alteracao> <dtAlteracao>2021-04-29</dtAlteracao> <dadosTrabalhador> <nmTrab>XXXXXXXXXXXXXXXXXXXXXXXXXXXX</nmTrab> <sexo>M</sexo> <racaCor>0</racaCor> <estCiv>0</estCiv> <grauInstr>00</grauInstr> <paisNac>105</paisNac> <endereco> <brasil> <tpLograd>R</tpLograd> <dscLograd>XXXXXXXX</dscLograd> <nrLograd>S/N</nrLograd> <complemento>XXXXXX</complemento> <bairro>XXXXXX</bairro> <cep>00000000</cep> <codMunic>0000000</codMunic> <uf>RJ</uf> </brasil> </endereco> <contato> <fonePrinc>00000000000</fonePrinc> </contato> </dadosTrabalhador> </alteracao> </evtAltCadastral>

Obrigado pela sua intenção em colaborar, esse também é o meu objetivo. Já fiz uma revisão completa na estrutura e geração dos eventos, e, no momento, precisamos mesmo é que enviem lotes para testar, me retornando quando problemas forem encontrados.

Obrigado pela informação. Vou corrigir o componente na minha base e na próxima publicação sairá alterado.

Bom dia! Nova versão do componente ACBreSocial para a versão simplificada. Revisão e ajustes nos eventos: S-5001, S-5002, S-5003, S-5011 e S-5013. ACBreSocial.zip eSocial Versão S-01-00-00 - Progresso da adaptação do componente ACBr.pdf

Respondendo ao Jucemar Duarte sobre o módulo "pcesConversaoeSocial" as divergências apontadas: Bom dia, Jucemar! As definições estão corretas. Tenho gerado e enviado ao ambiente do eSocial de Produção (Versão 2.5) e Produção Restrita (Simplificado) vários eventos com sucesso. Essa diferença foi introduzida a partir a versão simplificada bastando observar o manual do desenvolvedor do eSocial. Também poderá ser confirmada visualizando o conteúdo do cabeçalho de qualquer evento como abaixo: <eSocial xmlns="http://www.esocial.gov.br/schema/evt/evtInfoEmpregador/v_S_01_00_00"> Obrigado por nos ajudar. Um abraço.

Bom dia! Nova versão do componente ACBreSocial para a versão simplificada. Eventos S-2210, S-2220 e S-2240 foram revisados e adaptados, quando necessário. Atenção! Uma modificação que irá impactar a utilização do componente foi feita no módulo pcesConversaoeSocial.pas: para a versão simplificada tínhamos definido o tipo tpJornada2; após revisão, os códigos que foram incorporados ao tpJornada. ACBreSocial.zip eSocial Versão S-01-00-00 - Progresso da adaptação do componente ACBr.pdf

Nova versão do componente ACBreSocial com correções e implementações. ACBreSocial.zip eSocial Versão S-01-00-00 - Progresso da adaptação do componente ACBr.pdf

Dois erros foram encontrados nos ajustes do componente para o eSocial simplificado: 1) No módulo pcesGerador.pas a procedure GerarInfoContrato na linha GerarFiliacaoSindical(pInfoContrato.FiliacaoSindical) deverá ficar assim: if VersaoDF <= ve02_05_00 then GerarFiliacaoSindical(pInfoContrato.FiliacaoSindical); 2) No evento S-1200 na nova modalidade de informação do contrato intermitente está ainda na forma antiga.