Marcelo Pontes Melim

Anexo as units atualizadas. pcesGerador.pas pcesCommon.pas

As units pcesCommon.pas e pcesGerador.pas precisaram de modificações para o erro não voltar a aparecer. Segue também XML gerado e assinado pelo programa exemplo. pcesCommon.pas pcesGerador.pas 1123456789012342022012609044312898-S-2200-0.xml

Olá! Verificando a unit pcesGerador.pas vi que faltou implementar a tag "ideEstabVinc" vinculada a "trabTemporario" que é diferente da versão 2.5. Vou corrigir as units necessárias e depois disponibilizá-las os para testes.

A unit pcesS1010.pas estava com um erro que foi consertado. Anexo as duas units pcesS1010.pas e pcesConversaoeSocial.pas pcesS1010.pas pcesConversaoeSocial.pas

Não tenho certeza se o fonte exemplo já está com todas essas modificações, mas, faça o teste.

Quanto a tag "codIncCPRP" fiz os ajustes na unit pcesS1010.pas e pcesConversaoeSocial.pas que precisão ser substituídas.

Oi, Anderson! Os eventos S-2210, S-2220 e S-2240 só funcionarão na versão simplificada (S-1.0), verifique se não é por isso (o seu arquivo XML está na versão 2.5).

Oi, Kelly. Veja se agora você consegue importar e gerar os eventos com as units e arquivo INI modificados anexos. A tag "codIncIRRF" ainda precisar ser compatível com a versão 2.5, portanto, para informar o código 9 deverá passar como parâmetro "09" ou deixar em branco. S1010.ini pcesS1010.pas pcesConversaoeSocial.pas

Bom dia, Kelly! Vou verificar os problemas que você relatou acima e assim que achar a solução te aviso.

Ok! Queria ajudar, mas, está além do meu conhecimento e das possibilidades. Desejo sucesso para você.

O programa está apresentando mensagem de erro na validação da UF e esse campo deixou de ser uma enumeração e passou a ser uma String. Sua instalação deve ser antiga ou o programa exemplo. Criar nova pasta baixando o componente pelo SVN "svn://svn.code.sf.net/p/acbr/code" e instalar através do ACBrInstall_Trunk2.exe. Depois, utilizar o programa exemplo da nova instalação.

Bom dia Gabriel. Desculpe-me pela pergunta que pode ser idiota, mas, após corrigir o pcesGerador.pas você reinstalou o componente através do ACBrInstall_Trunk2.exe?

Me parece que é um erro no programa exemplo em Delphi que não foi totalmente revisado. Estou fazendo algumas modificações nesse programa para mantê-lo atualizado, mas, ainda não foi possível publicar a nova versão.

Oi Edson! Os eventos S-2210, S-2220 e S-2240 só funcionarão na versão simplificada (S-1.0), verifique se não é por isso.

Estranho, tem alguma outra variável que está impedindo a geração. Veja o anexo gerado pelo programa exemplo em Lazarus. 1123456789012342022011509452306285-S-2200-0.xml

Oi Gabriel! Estive verificando os módulos e me parece que basta corrigir o pcesGerador.pas na linha 551, assim: De: if (VersaoDF > ve02_05_00) and (pBeneficiario) then Para: if VersaoDF > ve02_05_00 then Faça os testes e nos avise, por favor, se encontrar problemas. pcesGerador.pas

Gabriel, vou revisar os módulos para corrigir o problema. Assim que tiver as modificações, vou postar aqui os módulo corrigidos.

Olá a todos! O método LoadFromFile está dentro do módulo ACBreSocialEventos e é comum a todos os eventos. Sendo assim, não é necessário ter a implementação dentro dos módulos pcesS2210, pcesS2220 e pcesS2240. Jucemar, a resposta acima esclarece a sua dúvida?

Com o objetivo de colaborar com a comunidade que utiliza o ACBre_Social, fizemos o desenvolvimento da rotina para importar o XML para dentro do componente. Estamos disponilizando os módulos para que a comunidade possa testar, avaliar e ver se é de utilidade. Para importar um arquivo XML do evento S-2210 (um ou mais eventos no mesmo arquivo) para dentro do componente fazer o seguinte: ACBreSocial.Eventos.LoadFromFile('c:\temp\s2210.xml'); if ACBreSocial.Eventos.NaoPeriodicos.S2210.Count = 0 then raise Exception.Create('O evento não foi localizado para importar'); i := ACBreSocial.Eventos.NaoPeriodicos.S2210.Count - 1; with ACBreSocial.Eventos.NaoPeriodicos.S2210.Items[i].EvtCAT do begin sequencial := 0; with ideEvento do begin indRetif := ireOriginal; procEmi := TpProcEmi(0); verProc := '1.0'; end; with ideEmpregador do begin tpInsc := tiCNPJ; nrInsc := edtIdEmpregador.Text; end; end; Obs.: Só funcionará nos eventos da na versão simplificada do eSocial. pcesS2210.pas pcesS2220.pas pcesS2240.pas pcesNaoPeriodicos.pas

Com a correção da TAG "infoContrato.remuneracao" anexo os fontes corrigidos. Obrigado pelo retorno. pcesGerador.pas pcesConversaoeSocial.pas

Gilberto, teste se essas modificações resolverá o problema que você está enfrentando: 1 - Modificar o módulo pcesConversaoeSocial.pas linha 429 para: tpTpContr = (PrazoIndeterminado, PrazoDeterminado, PrazoDeterminadoVincOcDeUmFato, PrazoNaoAplicavel); 2 - Modificar o módulo pcesGerador.pas linha 501 para: if pInfoContrato.Duracao.tpContr <> PrazoNaoAplicavel then GerarDuracao(pInfoContrato.Duracao, pTipo); 3 - No seu programa, quando acontecer esses casos, deverá inicializar o tpContr com PrazoNaoAplicavel. Segue anexo os módulos que foram modificados. pcesGerador.pas pcesConversaoeSocial.pas

Me desculpem, não tinha visto que o Rafael tinha anexado o arquivo módulo já corrigido. Favor desconsiderar a minha resposta acima. Obrigado.

Anexo os módulos dos eventos S-1202 e S-1207 adaptados para a versão simplificada. Por favor, façam os testes e nos retornem se problemas forem encontrados. pcesS1202.pas pcesS1207.pas

Bom dia. Veja se a alteração que fiz no módulo resolve o problema. pcesS2410.pas

Em relação a tag transDCTFWeb, em anexo o módulo com os ajustes necessários, o arquivo XSD e a nota técnica que descreve a inclusão da tag e validade. pcesS1299.pas nota-tecnica-s-1-0-03-2021.pdf evtFechaEvPer-v_S_01_00_00.xsd