Ir para conteúdo
  • Cadastre-se

dev botao
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Evento S-1005 "O Fap do estabelecimento não foi localizado na base"

alexcamilo01

Por alexcamilo01
em ACBreSocial

 Compartilhar
Ver Solução Respondido por EMBarbosa,
  • Este tópico foi criado há 1096 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • 2 semanas depois ...
jcmferreira Contributor

jcmferreira

Postado
Postado

Amigo,

Uma ideia interessante, até pq, o eSocial fez a gente ficar nas mãos com relação ao FAP. Antes, na 2.5, o FAP era enviado e se fosse divergente, era rejeitado exigindo o processo. 

Agora, vc não deve mandar o FAP e caso o eSocial não localize na base, vc reenvia o evento com o FAP. E como ficam os clientes usando o software e que mal sabem ler um retorno desses de eSocial? A simplificação esse ponto virou um complicador, isso sim.

Link para o comentário
Compartilhar em outros sites
  • Administradores
Juliana Tamizou Veteran

Juliana Tamizou

Postado
  • Administradores
Postado

Bom dia pessoal.

Apenas para confirmar, de qq forma a alteração se faz necessária, correto?

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

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

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


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites
alexcamilo01 Contributor

alexcamilo01

Postado
  • Autor
Postado (editado)
21 minutos atrás, Joceandro Perin disse:

Testado aqui e com o mesmo problema, alguma proposta pessoal pra solucionar essa questão? acredito que a tratativa terá que ser feita cada um nos seus respectivos sistemas..

A idéia nessa correção é se o evento retornar com essa mensagem,  então informa a propriedade aliqGilrat.ReenvioFap = tpsim e gera o evento novamente.

Editado por alexcamilo01
Link para o comentário
Compartilhar em outros sites
  • Administradores
Juliana Tamizou Veteran

Juliana Tamizou

Postado
  • Administradores
Postado

Bom dia pessoal,

As sugestões são bem vindas, esta análise está prevista para análise em nosso sprint da semana sob a TK-1854

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

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

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


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites
Joceandro Perin Community Regular

Joceandro Perin

Postado
Postado
52 minutos atrás, alexcamilo01 disse:

A idéia nessa correção é se o evento retornar com essa mensagem,  então informa a propriedade aliqGilrat.ReenvioFap = tpsim e gera o evento novamente.

Acho que a ideia é boa, não vamos ter muitas alternativas, já que dependendo da situação precise reenviar o fap novamente.. Esperar o pessoal subir os ajustes para efetuar os testes aqui, obrigado pessoal..

Link para o comentário
Compartilhar em outros sites
IMATECH Community Regular

IMATECH

Postado
Postado
8 horas atrás, alexcamilo01 disse:

A idéia nessa correção é se o evento retornar com essa mensagem,  então informa a propriedade aliqGilrat.ReenvioFap = tpsim e gera o evento novamente.

Não seria mais simples considerar a existência de valor para o 'fap' ? 

if pAliqRat.Fap > 0 then
   GeraCampo( ..., pAliqRat.Fap)

Fica a cargo do aplicativo gerar ou não (conforme necessário)

by IMATECH
[email protected]
Goiânia - GO.

Link para o comentário
Compartilhar em outros sites
IMATECH Community Regular

IMATECH

Postado
Postado (editado)

Testado e aprovado (1º envio não informa o fat. Em caso de rejeição gera novamente com o fat)

pcesGerador.pas

De: 

  if not(VersaoDF <= ve02_05_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= ve02_05_00) or bProcJudFap or (pTpInscEstab = tiCNO) then
      Gerador.wCampo(tcDe4, '', 'fap',          1, 5, 0, pAliqRat.Fap);

Para: 

  if not(VersaoDF <= veS01_00_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= veS01_00_00) or bProcJudFap or (pTpInscEstab = tiCNO) then

 

pcesGerador.pas

Editado por IMATECH

by IMATECH
[email protected]
Goiânia - GO.

Link para o comentário
Compartilhar em outros sites
Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
Em 24/08/2021 at 23:19, IMATECH disse:

Testado e aprovado (1º envio não informa o fat. Em caso de rejeição gera novamente com o fat)

pcesGerador.pas

D

  

  if not(VersaoDF <= veS01_00_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= veS01_00_00) or bProcJudFap or (pTpInscEstab = tiCNO) then

 

pcesGerador.pas 73 kB · 0 downloads

Bom dia, ainda esta tendo problemas com o FAP, para o envio pela primeira vez é necessário a informação do mesmo, após isso somente se houver processo. Fiz atualização hoje do repositório, mas ainda continua com o problema.

image.png.9873a1c200c91b103e0ca721f6bdbec3.png

Agora, Kelly Diego Rakelly disse:

Bom dia, ainda esta tendo problemas com o FAP, para o envio pela primeira vez é necessário a informação do mesmo, após isso somente se houver processo. Fiz atualização hoje do repositório, mas ainda continua com o problema.

image.png.9873a1c200c91b103e0ca721f6bdbec3.png

Em anexo o XML de envio.

1_S-1005_INC_000001_31082021_094512_ENV.xml

Link para o comentário
Compartilhar em outros sites
alexcamilo01 Contributor

alexcamilo01

Postado
  • Autor
Postado
1 hora atrás, Kelly Diego Rakelly disse:

Bom dia, ainda esta tendo problemas com o FAP, para o envio pela primeira vez é necessário a informação do mesmo, após isso somente se houver processo. Fiz atualização hoje do repositório, mas ainda continua com o problema.

image.png.9873a1c200c91b103e0ca721f6bdbec3.png

Em anexo o XML de envio.

1_S-1005_INC_000001_31082021_094512_ENV.xml 4 kB · 1 download

Kelly bom dia!

pela instrução contida neste link: https://www.gov.br/esocial/pt-br/noticias/ajuste-no-procedimento-de-informacao-do-fap-em-s-1005-versao-s-1.0 , vc envia sem a informação do FAP, e caso você receba essa mensagem ai de retorno, você gera novamente com o FAP e reenvia.

Utilizando as units do primeiro post, para gerar o evento com o FAP vc vai fazer assim:  

DadosEstab.aliqGilrat.ReenvioFap      := tpSim;

e para gerar sem o FAP assim:  

DadosEstab.aliqGilrat.ReenvioFap      := tpNao;  // (default)

 

Link para o comentário
Compartilhar em outros sites
Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
52 minutos atrás, alexcamilo01 disse:

Kelly bom dia!

pela instrução contida neste link: https://www.gov.br/esocial/pt-br/noticias/ajuste-no-procedimento-de-informacao-do-fap-em-s-1005-versao-s-1.0 , vc envia sem a informação do FAP, e caso você receba essa mensagem ai de retorno, você gera novamente com o FAP e reenvia.

Utilizando as units do primeiro post, para gerar o evento com o FAP vc vai fazer assim:  

DadosEstab.aliqGilrat.ReenvioFap      := tpSim;

e para gerar sem o FAP assim:  

DadosEstab.aliqGilrat.ReenvioFap      := tpNao;  // (default)

 

Entendi, então eu vou te controlar isso correto? 

Link para o comentário
Compartilhar em outros sites
Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
Em 24/08/2021 at 23:19, IMATECH disse:

Testado e aprovado (1º envio não informa o fat. Em caso de rejeição gera novamente com o fat)

pcesGerador.pas

De: 

  if not(VersaoDF <= ve02_05_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= ve02_05_00) or bProcJudFap or (pTpInscEstab = tiCNO) then
      Gerador.wCampo(tcDe4, '', 'fap',          1, 5, 0, pAliqRat.Fap);

Para: 

  if not(VersaoDF <= veS01_00_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= veS01_00_00) or bProcJudFap or (pTpInscEstab = tiCNO) then

 

pcesGerador.pas 73 kB · 2 downloads

Boa tarde, fiz o teste de acordo com essa alteração acima e deu certo, mas precisamos esperar a validação para ser colocado no repositório. Tem alguma previsão sobre a validação dessa alteração que por sinal deu certo?

Link para o comentário
Compartilhar em outros sites
  • 2 semanas depois ...
  • Consultores
  • Solution
EMBarbosa Veteran

EMBarbosa

Postado
  • Consultores
  • Solution
Postado
Em 24/08/2021 at 23:19, IMATECH disse:

Testado e aprovado (1º envio não informa o fat. Em caso de rejeição gera novamente com o fat)

pcesGerador.pas

De: 

  if not(VersaoDF <= ve02_05_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= ve02_05_00) or bProcJudFap or (pTpInscEstab = tiCNO) then
      Gerador.wCampo(tcDe4, '', 'fap',          1, 5, 0, pAliqRat.Fap);

Para: 

  if not(VersaoDF <= veS01_00_00) and not(bProcJudRat) and not(bProcJudFap) and not(pTpInscEstab = tiCNO) then
    Exit;

  Gerador.wGrupo(GroupName);

  if (VersaoDF <= ve02_05_00) or bProcJudRat then
    Gerador.wCampo(tcStr, '', 'aliqRat', 1, 1, 1, eSAliqRatToStr(pAliqRat.AliqRat));

  if (pEmp.TpInsc = tiCNPJ) then
  begin
    if (VersaoDF <= veS01_00_00) or bProcJudFap or (pTpInscEstab = tiCNO) then

 

pcesGerador.pas 73 kB · 3 downloads

 

Em 02/08/2021 at 17:23, alexcamilo01 disse:

Boa pessoal!

 

image.thumb.png.0921af77bcec7b01eaae96b71f4faf4c.png

https://www.gov.br/esocial/pt-br/noticias/ajuste-no-procedimento-de-informacao-do-fap-em-s-1005-versao-s-1.0

Segue anexo sugestão para solução da situação exposta no link acima.

pcesCommon.pas 84 kB · 9 downloads pcesGerador.pas 73 kB · 6 downloads

Muito obrigado pelas contribuições.
Fiz a implementação baseada nelas.
Subi as alterações para o SVN na Revisão  22920.
Pelo que vi está tudo certo.
Por favor atualizem, testem e reportem qualquer problema.

Mais uma vez obrigado.

  • Curtir 2

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites
  • Consultores
EMBarbosa Veteran

EMBarbosa

Postado
  • Consultores
Postado
Em 18/09/2021 at 14:12, IMATECH disse:

Remoção propriedade "ReenvioFap", pois não tem utilidade/função no *componente

Criação da TAG se faz exclusivamente pela existência de valor informado do campo "FAP"

Me parece que realmente não precisamos mais da propriedade para gerar a tag no xml.

@alexcamilo01 , Existe algum caso em que a propriedade ainda é necessária?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites
  • EMBarbosa unlocked this tópico
  • 1 mês depois ...
  • Consultores
EMBarbosa Veteran

EMBarbosa

Postado
  • Consultores
Postado

@alexcamilo01 @IMATECH

Muito obrigado pela contribuição.
Fiz a implementação baseada nela.
Subi as alterações para o SVN na Revisão  23468.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Mais uma vez obrigado.

  • Curtir 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites
  • Este tópico foi criado há 1096 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
 Compartilhar
Ir para a lista de tópicos
×
×
  • 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.