Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Bloco P quando sem movimentação


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

Recommended Posts

Pessoal boa tarde, 

Gerei o Sped contribuições novamente a pedido do contador devido ao PVA 3.1.1 

e o mesmo acusou erro do Bloco P.

Revisei minha geração e verifiquei que eu não alimentava esse registro, atualizei o ACBr e  fiz a alimentação com a opção  "IND_MOV <> imSemDados"

porem o mesmo não gerou os registros :

|P001|1|
|P990|2|

|9900|P001|1|
|9900|P990|1| 

Debugando o os fontes , me deparei com a procedure e fiz a mudança e passou a gerar corretamente.

procedure TACBrSPEDPisCofins.WriteBloco_P;
begin
   if not Bloco_M.Gravado then
      WriteBloco_M;

//   if (Bloco_P.Gravado) or (Bloco_0.Registro0145Count = 0) then exit ;  { original .. Acbr atualizado 27/02/19 }

   if ((Bloco_P.Gravado) or (Bloco_0.Registro0145Count = 0)) and
      (Bloco_P.RegistroP001.IND_MOV <> imSemDados) then exit ;    { <= Quando sem movimentação }

   /// BLOCO P
   WriteRegistroP001;
   WriteRegistroP990;
   Bloco_P.WriteBuffer;
   Bloco_P.Conteudo.Clear;
   Bloco_P.Gravado := True ;
end;

 

Obrigado (tentei colocar o topico no lugar certo, é a primeira vez que posto aqui)

Carlos

 

Link to comment
Share on other sites

  • Administradores

Bom dia.

Obrigada pelo interesse em colaborar, o tópico está sim no lugar correto, porém é necessário anexar o arquivo alterado para análise.

Att.

  • Like 1
Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

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 to comment
Share on other sites

  • Consultores
4 horas atrás, delphi7sp1 disse:

Bom dia

Segue unit em anexo,

linha 700...

Obrigado ,

Carlos

ACBrSpedPisCofins.pas 67 kB · 1 download

tem razão.

já está no svn a sugestão

  • Like 1
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

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