Jump to content

dev botao

Ind_Frt No Registro C100


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

Recommended Posts

Posted

Bom dia!

 

Estou verificando aqui, quando eu passo o valor do campo IND_FRT pro componente usando a conversão StrToIndFrt, ele converte usando os valores anteriores a 2012. Dei uma olhada no código do componente, vi que ele verifica pela data na hora de criar o arquivo TXT, mas ele já fez a conversão de forma errada antes. Acredito que possa atualizar essa conversão para os valores atuais, não?

 

Obrigado.

Guilherme Przewodowski

Posted

Olá, não, não pode, pois existe a necessidade de gerar arquivos retroativos.

 

Tenho gerado Sped de meus clientes, não detectei nenhum problema, pode ser mais especifico e nos da um exemplo ? Melhor consegue reproduzir o problema pelo demo, para que eu possa testar e vê o real problema que cita? 

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Posted

Consegui reproduzir o erro pelo demo. É o seguinte, altero as linhas 112, 113, 366 e 367 para gerar com data de 2014, depois altero a linha 491 (onde gera o bloco C) para o seguinte:

IND_FRT := StrToIndFrt('0'); //tfSemCobrancaFrete;

O certo seria gerar o txt com o campo IND_FRT = 0, mas está gerando como 2, como se convertesse para os valores antigos do SPED.

Espero que consiga reproduzir aí.

Guilherme Przewodowski

Posted

OK, assim que puder vou reproduzir o mesmo que você descreveu e analisar, assim que fizer dou o retorno.

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Posted

Por gentileza baixe esse .PAS e teste, em seguida me de um feedback, funcionando subo para o SVN.

ACBrEFDBloco_C_Class.pas

  • Like 1

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Posted

obrigado pelo feedback, logo subirei.

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Posted

Isaque, por acaso você já subiu pro svn? Ainda não recebi a atualização. Desculpe pelo incômodo.

 

Obrigado.

Guilherme Przewodowski

Posted

Ainda não subi.

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

  • 1 month later...
  • Membros Pro
Posted

Bom dia, Isaque! Estou tendo problema com o IND_FRT tambem.

Estou informando IND_FRT :=. tfPorContaEmitente e o arquivo esta sendo gerando com  valor '1' que corresponde a "Por conta do destinatário/remetente".

 

Verificando a função IndFrtToStr da unit ACBrEFDBlocos percebi que ao passar pela linha   Result := IntToStr( Integer( AValue ) );  sendo o AValue o tipo 
TACBrIndFrt = (tfPorContaTerceiros,     tfPorContaEmitente,       tfPorContaDestinatario,   tfSemCobrancaFrete,       tfNenhum); ele realmente esta retornando '1' e deveria retorna '0' pelo layout em vigor a partir de 01/01/2012.

Estou fazendo algo errado?

 

Grato pela atenção,

Emerson Rodrigues Ferreira.

  • Solution
Posted

Corrigido e já disponível, a ordem estava errado mesmo. 

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

  • Este tópico foi criado há 3699 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • 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.

The popup will be closed in 10 seconds...