Ir para conteúdo
  • Cadastre-se

dev botao

Seja bem-vindo
Curso Dominando a NFCe - Fim do SAT em São Paulo? Esteja preparado Curso Responsável Técnico na NFe - Atenda à nova legislação Curso Dominando o ACBrBoleto - Via API ou CNAB Seja um membro do ACBr Pro e agilize seu software Participe do Discord do ACBr Regras e orientações da nossa comunidade

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á 1269 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.

  • 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 ACBr Pro

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 !!

alexcamilo01 Contributor

alexcamilo01

Postado
  • Autor
Postado (editado)
  Em 24/08/2021 at 12:56, 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..

Expandir  

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
  • 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 ACBr Pro

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 !!

Joceandro Perin Community Regular

Joceandro Perin

Postado
Postado
  Em 24/08/2021 at 13:15, 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.

Expandir  

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..

IMATECH Community Regular

IMATECH

Postado
Postado
  Em 24/08/2021 at 13:15, 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.

Expandir  

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
chacalgo@gmail.com
Goiânia - GO.

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.pasFetching info...

Editado por IMATECH

by IMATECH
chacalgo@gmail.com
Goiânia - GO.

Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
  Em 25/08/2021 at 02: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

Expandir  

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 31/08/2021 at 12:48, 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

Expandir  

Em anexo o XML de envio.

1_S-1005_INC_000001_31082021_094512_ENV.xmlFetching info...

alexcamilo01 Contributor

alexcamilo01

Postado
  • Autor
Postado
  Em 31/08/2021 at 12:48, 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

Expandir  

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)

 

Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
  Em 31/08/2021 at 14:18, 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)

 

Expandir  

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

Kelly Diego Rakelly Enthusiast

Kelly Diego Rakelly

Postado
Postado
  Em 25/08/2021 at 02: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

Expandir  

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?

  • 2 semanas depois ...
  • Consultores
  • Solution
EMBarbosa Veteran

EMBarbosa

Postado
  • Consultores
  • Solution
Postado
  Em 25/08/2021 at 02: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

Expandir  

 

  Em 02/08/2021 at 20: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

Expandir  

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.
  • Consultores
EMBarbosa Veteran

EMBarbosa

Postado
  • Consultores
Postado
  Em 18/09/2021 at 17: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"

Expandir  

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.
  • 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.
  • Este tópico foi criado há 1269 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.