Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

SPED Contábil - Layout 4


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

Recommended Posts

  • Consultores
Agora, Leandro Paixão disse:

Bom dia a todos!

Estão sabendo do layout 4 do SPED Contábil?

Já temos algum andamento em relação a atualização desse novo layout?

 

Um abraço.

Não! mas fique a vontade

contribuições são sempre bem vindas

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

Bom dia pessoal,

Aqui onde trabalho, estou precisando implementar o Layout 4, mas não usaremos a funcionalidade na sua totalidade. Há um novo campo IDENT_MF (identificador de moeda funcional) no registro 0000, em que, caso alimentado com 'S', é necessário alimentar os registros   I155, I157, I200, I250, I310 e I355. Mas, utilizaremos este campo com 'N', sendo assim não necessário alimentar estes registros. Outra alteração é necessária no registro J150, dois campos novos.

A dúvida é, posso contribuir parcialmente com o projeto (apenas alteração nos registros 0000 e J150)? E se sim, como proceder.

Abraço...

Link to comment
Share on other sites

  • Consultores

implemente, teste e depois anexe aqui os fontes que fazemos o merge e conferimos

22 horas atrás, Anderson Nunes Kovaski disse:

Bom dia pessoal,

Aqui onde trabalho, estou precisando implementar o Layout 4, mas não usaremos a funcionalidade na sua totalidade. Há um novo campo IDENT_MF (identificador de moeda funcional) no registro 0000, em que, caso alimentado com 'S', é necessário alimentar os registros   I155, I157, I200, I250, I310 e I355. Mas, utilizaremos este campo com 'N', sendo assim não necessário alimentar estes registros. Outra alteração é necessária no registro J150, dois campos novos.

A dúvida é, posso contribuir parcialmente com o projeto (apenas alteração nos registros 0000 e J150)? E se sim, como proceder.

Abraço...

 

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

  • Consultores
38 minutos atrás, Anderson Nunes Kovaski disse:

Olá! Segue arquivos alterados.

ACBrSPEDContabil.zip

Obrigado já está no svn a contribuição!

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

  • 2 months later...
11 minutos atrás, ALUISIO disse:

os registros j100 e j150, estão com o contador de registros duplicados, como resolvo?

 

Bom dia Aluisio,

Pela implementação que temos aqui na empresa, não estamos com esse problema. Será que no seu fonte não está realizando duas chamadas ou algo parecido?

Edited by Leandro Paixão

Leandro Paixão

[email protected]

 

Tecnólogo em Análise e Desenvolvimento de Sistemas.

Professor do Curso de Técnico em Informática.

@leandropaixao

 

 

Link to comment
Share on other sites

  • 3 weeks later...

Boa Tarde,

Fiz uma alteração no SPED Contábil  no Registro J150: Demonstração do Resultado do Exercício, existem campos novos somente para lay-out 4.00 a partir de 2015, em anos anteriores, não deve existir os campos.

Também tem uma otimização na Totalização dos Termos referente a quantidade de linhas do arquivo.

Anexo alterações.
 

acbr_SpedContabil_J150.zip

Link to comment
Share on other sites

Em 20/05/2016 at 14:42, Dalvan disse:

Boa Tarde,

Fiz uma alteração no SPED Contábil  no Registro J150: Demonstração do Resultado do Exercício, existem campos novos somente para lay-out 4.00 a partir de 2015, em anos anteriores, não deve existir os campos.

Também tem uma otimização na Totalização dos Termos referente a quantidade de linhas do arquivo.

Anexo alterações.
 

acbr_SpedContabil_J150.zip

 

Link to comment
Share on other sites

  • Consultores

     3.2 - Não faça "bump" de forma excessiva (postar simplesmente para que um tópico vá para o topo da lista). Isso é considerado flooding.

Favor leia as regras do fórum.

Esse trecho não ficou bom!

No caso mudou de TFileStream pra TStringList!

 

procedure TACBrSPEDContabil.TotalizarTermos;
var
  txtIn,txtOut: TextFile;
  sTotal,sLinha,sFileNameTmp: String;
begin
  sTotal := FACBrTXT.LFill(Bloco_9.Registro9999.QTD_LIN, 9, false);
  sFileNameTmp := FACBrTXT.NomeArquivo + '.tmp';
  // Renomear Arquivo gerado e abrir no TxtIn
  RenameFile(FACBrTXT.NomeArquivo, sFileNameTmp);
  AssignFile(TxtIn, sFileNameTmp);
  Reset(TxtIn);
  // Novo Arquivo a ser gerado e abrir no TxtOut
  AssignFile(TxtOut, FACBrTXT.NomeArquivo);
  Rewrite(TxtOut);
  // Trocar [*******] somente nas linhas que existem
  try
    while not Eof(TxtIn) do
    begin
      Readln(TxtIn, sLinha);
      if Copy(sLinha,1,6)='|I030|' then
        sLinha:=StringReplace(sLinha,'[*******]',sTotal,[rfReplaceAll]);
      if Copy(sLinha,1,6)='|J900|' then
        sLinha:=StringReplace(sLinha,'[*******]',sTotal,[rfReplaceAll]);
      Writeln(TxtOut, sLinha);
    end;
  finally
    CloseFile(TxtIn);
    CloseFile(TxtOut);
    DeleteFile(sFileNameTmp)
  end;
end;

 

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

Boa tarde,

desculpe por reenviar o post, cliquei em citar indevidamente.

No caso da sped contábil, temos clientes com grande movimentação, que geram arquivos enormes, a função atual faz uma leitura caracter por caracter usando o TFileStream ,
para gerar nosso maior cliente, levou cerca de 10 minutos, somente nesse trecho, para totalizar as linhas.

Fiz um teste e estou usando essa função modificada usando o TextFile que faz a leitura linha a linha.

Att
Dalvan

Link to comment
Share on other sites

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