Ir para conteúdo
  • Cadastre-se

ledware

Membros
  • Total de ítens

    15
  • Registro em

  • Última visita

1 Seguidor

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

ledware's Achievements

Apprentice

Apprentice (3/14)

  • Collaborator Rare
  • One Year In
  • First Post
  • Conversation Starter
  • Week One Done

Recent Badges

2

Reputação

  1. Bom dia Renato. Pocha, matou a charada! Realmente o meu problema estava no tipos.xsd desatualizado! Pois depois que atualizei passou da validação normalmente! Muito obrigado. O que acontece é que, para essa situação, tem que usar a categoria "111"! Que se refere ao funcionário intermitente. Então para esse caso é obrigatório informar o grupo "infoInterm" com a campo "dia" mesmo estando com valor "0" zero. Fiz um teste de emissão sem passar pelo validador de schemas e foi com sucesso! Estou mandando em anexo um arquivo xml gerado com sucesso, no qual informei as tags e que não validei o schema pela procedure "Validar", conforme ilustrado abaixo: procedure TEventos.GerarXMLs; begin Gerar; Assinar; //Validar; end; Saberia me dizer o motivo de não ter validado o xml?
  2. O que acontece é que, para essa situação, tem que usar a categoria "111"! Que se refere ao funcionário intermitente. Então para esse caso é obrigatório informar o grupo "infoInterm" com a campo "dia" mesmo estando com valor "0" zero. Fiz um teste de emissão sem passar pelo validador de schemas e foi com sucesso! Estou mandando em anexo um arquivo xml gerado com sucesso, no qual informei as tags e que não validei o schema pela procedure "Validar", conforme ilustrado abaixo: procedure TEventos.GerarXMLs; begin Gerar; Assinar; //Validar; end; Saberia me dizer o motivo de não ter validado o xml? 1314919560000002022060716123794109-S-1200-0.xml
  3. Bom dia Renato. Pois é meu caro, realmente está confuso essa questão. Pois já chegamos a fazer essa modificação para teste não enviando o grupo "InfoInterm", até passa na validação do schema, porem dá problema lá o servidor, conforme abaixo: Código Retorno: 201 Código.....: 8 Descrição..: Grupo 'Informações relativas ao trabalho intermitente' deve ser preenchido. Verifique as condições de preenchimento no leiaute. Abraços.
  4. Só para complementar, debugando o fonte, a função SSL.Validar retornou esta mensagem: '1833 - Element ''{http://www.esocial.gov.br/schema/evt/evtRemun/v_S_01_00_00}dia'': [facet ''minInclusive''] The value ''0'' is less than the minimum value allowed (''1'').'#$A Dendo do arquivo do schema evtRemun já tem o zero como mínimo. <xs:element name="infoInterm" minOccurs="0" maxOccurs="31" type="T_infoInterm">
  5. Boa tarde. Estou tentando fazer a emissão do registro 1200, porem na validação do schema evtRemun-v_S_01_00_00.xsd e estou tendo o seguinte retorno: 1824 - Element ''{http://www.esocial.gov.br/schema/evt/evtRemun/v_S_01_00_00}dia'': ''0'' is not a valid value of the atomic type ''{http://www.esocial.gov.br/schema/evt/evtRemun/v_S_01_00_00}TS_dia A inconsistência acontece no campo "dia" que pertence ao grupo infoInterm, pois quando eu informo o valor "0" dá este erro, porem quando eu informo um valor entre 1 a 31 passa pela validação. O mas estranho é que no próprio layout diz que: "Dia do mês efetivamente trabalhado pelo empregado com contrato de trabalho intermitente. Caso não tenha havido trabalho no mês, informar 0 (zero). Validação: Deve ser um número entre 0 e 31, de acordo com o calendário anual." Já baixei o arquivo .xsd mais atual do site https://www.gov.br/esocial/pt-br/documentacao-tecnica. Anexei a este tópico os arquivos XML retornados após validação, schema e layout. Ficarei muito grato se puderem me ajudar. Abraços. evtRemun.xml evtRemun-v_S_01_00_00.xsd evtRemun-v_S_01_00_00_error.xml
  6. Boa tarde. Com base no arquivo já enviado anteriormente, no arquivo pcesS1005.pas precisei fazer um novo ajuste, conforme abaixo: Alteração: Sai o "or" e entra o "and" procedure TEvtTabEstab.GerarDadosEstab; begin Gerador.wGrupo('dadosEstab'); Gerador.wCampo(tcStr, '', 'cnaePrep', 1, 7, 1, infoEstab.DadosEstab.cnaePrep); if (VersaoDF > ve02_05_00) and <<<<-----------------AQUI. (infoEstab.DadosEstab.cnpjResp <> '') then Gerador.wCampo(tcStr, '', 'cnpjResp', 1, 14, 1, infoEstab.DadosEstab.cnpjResp); GerarAliqGilRat(FIdeEmpregador, infoEstab.FIdeEstab.tpInsc, infoEstab.DadosEstab.aliqGilrat, 'aliqGilrat'); GerarInfoCaepf; GerarInfoObra; GerarInfoTrab; Gerador.wGrupo('/dadosEstab'); end; Obrigado. pcesS1005.pas
  7. Bom dia, conforme layout Leiautes_do_eSocial_v._S-1.0_(cons._até_NT_04.2021) foi adicionado o campo percTransf página 56 item 24 e 25. Em anexo está o novo layout e a unit modificada como sugestão. Obs: para saber as linhas que eu modifiquei, basta fazer uma busca com o texto "Paulo". Obrigado. Novo Layout e pcesS1280.rar
  8. Bom dia. Houve uma atualização no layout do eSocial Simplificado Versão S-1.0 (consolidada até NT nº 04/2021). 1) Implantação no ambiente de produção: 19/07/2021 2) Período de convivência de versões (2.5 e S-1.0): 19/07/2021 a 09/03/2022 S1000: campo : dtTrans11096 S1005: campo : cnpjResp Com isso o arquivo pcesS1000.pas e pcesS1005.pas sofreram alterações. Mandei em anexo os dois arquivos, e neles deixei uma anotação com o nome "Paulo Ledware" para facilitar nos pontos que eu alterei. Fico no aguardo de uma analise e aprovação das modificações. Outro detalhe que percebi, aqui na criação do tópico neste fórum, que na opção DFE não tem o item eSocial. Caso já tenha, me desculpe pois não achei, mas caso não tenha mesmo, por favor teria como criar? Muito obrigado. pcesS1000.pas pcesS1005.pas
  9. Boa tarde. No registro S1280 na classe TInfoSubstPatrOpPortItem foi adicionado o campo codLocacao, e na geração no XML foi precisou colocá-lo para fazer a validação do schema. Com isso acabei ajustando a procedure GerarInfoSubstPatrOpPort, que é responsável pela inclusão da TAG. Coloquei uma condição validando a versão vigente do eSocial. Conforme abaixo, sai o campo cnpjOpPortuario e entrada o codLocacao para atender o Layout do eSocial Simplificado. procedure TEvtInfoComplPer.GerarInfoSubstPatrOpPort; var i: Integer; objInfoSubstPatrOpPortItem: TInfoSubstPatrOpPortItem; begin for i := 0 to InfoSubstPatrOpPort.Count - 1 do begin objInfoSubstPatrOpPortItem := InfoSubstPatrOpPort.Items[i]; Gerador.wGrupo('infoSubstPatrOpPort'); if VersaoDF <= ve02_05_00 then Gerador.wCampo(tcStr, '', 'cnpjOpPortuario', 14, 14, 1, objInfoSubstPatrOpPortItem.cnpjOpPortuario) else Gerador.wCampo(tcStr, '', 'codLotacao ', 30, 30, 1, objInfoSubstPatrOpPortItem.codLotacao); ---> Modificação Gerador.wGrupo('/infoSubstPatrOpPort'); end; if InfoSubstPatrOpPort.Count > 9999 then Gerador.wAlerta('', 'infoSubstPatrOpPort', 'Lista de Operadores Portuarios', ERR_MSG_MAIOR_MAXIMO + '9999'); end; pcesS1280.pas
  10. Boa tarde. Fiz os teste na modificação e ficou top! Porem Identifiquei uma outra divergência que ocorre na exportação do evento S3000 na mesma procedure GerarXML; Agora quando enviamos uma exclusão do S1280 eu preciso informar a tag indApuracao, pois atualmente está caindo na condição GerarIdeFolhaPagto2 que gera o xml sem a tag. Fiz uma modificação apenas para aprovar o meu teste, porem estou enviado em anexo o arquivo pcesS3000 linha 236 para vocês analisarem e ,se possível se acharem melhor, dar uma ajustadas nos "IF" que estão aumentando, rs. Atenciosamente Ledware pcesS3000.pas
  11. Bom dia. Fui efetuar um teste de exclusão do registro S1260 através do S3000 evento não periódico, e me retornou uma advertência no qual não posso informar o campo "indApuracao", é até plausível, pois o mesmo não faz mais parte do layout para este evento. Com isso fui analisar o fonte do componente, unit pcesGerador.pas e percebi que foi criado uma procedure "GerarIdeFolhaPagto2", porem na procedure GerarXML que fica na unit pcesS3000 as validações atuais não foram ajustadas para o evento S1260, com isso está acionando a procedure GerarIdeFolhaPagto e informando o campo indApuracao no xml. Fiz um ajuste só para teste aonde eu informei um período no campo perApur sem o idApuracao e me retornou com sucesso. Fico no aguardo. Atenciosamente Ledware.
  12. Bom dia Pessoal. Aos moderadores do grupo, peço a gentileza que atualizem a unit pcesConcersaoeSocial: linha 271 tpCodIncFGTS = (cdfNaoeBasedeCalculo, cdfBasedeCalculoFGTS, cdfBasedeCalculoFGTS13Sal, cdfBasedeCalculoFGTSRescisorio, cdfIncidenciadecisaoJudicialFGTSMensal, cdfIncidenciadecisaoJudicialFGTS13Sal, cdfIncidenciadecisaoJudicial); a partir da linha 1934 function eSCodIncFGTSToStr(const t:tpCodIncFGTS ): string; begin result := EnumeradoToStr2(t,[ '00', '11', '12', '21', '91', '92', '93' ] ); //--adicionado índice 92 e 93 end; function eSStrToCodIncFGTS(var ok: boolean; const s: string): tpCodIncFGTS; begin result := tpCodIncFGTS( StrToEnumerado2(ok , s,[ '00', '11', '12', '21', '91', '92', '93' ] )); //--adicionado índice 92 e 93 end; Obs: Layout em anexo, pagina 14. Obrigado. 03 - Leiautes do eSocial v. S-1.0 (cons. até NT 03.2021).pdf
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.