Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Gerar Chave ESocial


Go to solution Solved by Italo Giurizzato Junior,
  • Este tópico foi criado há 1424 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

bom dia, na geração da chave do esocial, ao comparar o cnpj está considerando o tamanho 14, quando a quantidade do valor enviado é de 8 (raiz do cnpj), gerando erro ao informar 2 para cnpj e 1 para cpf. como não conheço de componente, fiz a mudança abaixo no arquivo pcesgerador, na funcao gerarchaveesocial, e resolveu.

de

  if (Length(CNPJF) = 14) then // errado
    Result := Result + IntToStr(1)
  else
    Result := Result + IntToStr(2);

para

  if (Length(CNPJF) <> 11) then // para a garantia de que se for cpf tera o tamanho 11
    Result := Result + IntToStr(1)
  else
    Result := Result + IntToStr(2);

att

 

pcesGerador.pas

Link to comment
Share on other sites

  • Consultores
  • Solution

Bom dia,

(tópico movido para a área do SAC)

Não veja a necessidade dessa alteração uma vez que sempre devemos informar o CNPJ completo com os 14 dígitos, pois dependendo de onde essa informação for utilizada será considerado apenas os 8 primeiros dígitos ou os 14 dígitos.

Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

  • Este tópico foi criado há 1424 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.