Jump to content

dev botao

ERRO PIS\COFINS


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

Recommended Posts

Bom dia,

Estou com um problema com o acbrpiscofins, quando estou mando gerar o arquivo o campo [ DTFIN ] quando esta gravando ele não está obdecendo a data passada sempre ela é modificada, os bloco [ A,C,D,F ] estou passando em [ IND_MOV = imsemdados ] e quando é preenchido no arquivo txt ele esta colocando 0. E ao validar o arquivo esta apresendo esses erros de validação ainda não conseguir encontrar solução caso alguem tenha passado por isso e conseguiu uma solução da um ajudinha ai ^.^

Att,

Éverton Bueno Lima

Link to comment
Share on other sites

  • Consultores

Por favor, verifique o demo. Acho que ele tem ambos os exemplos.

[]'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.
Link to comment
Share on other sites

Ola amigo, com os exemplos esta acontecendo a mesma coisa

|A001|0| <==== Deveria ficar: |A001|1|

|A990|2|

|C001|0| <==== Deveria ficar: |C001|1|

|C990|2|

|D001|0| <==== Deveria ficar: |D001|1|

|D990|2|

|F001|0| <==== Deveria ficar: |F001|1|

|F990|2|

Esse teste foi realizado com o exemplo [ ACBRPISCOFINS ], não marcando os arquivos acima para ser gerado.

Att,

Éverton

Link to comment
Share on other sites

  • Consultores

???

Observe o bloco 1 a tag imSemDados

   with ACBrSPEDPisCofins1.Bloco_1 do
begin
with Registro1001New do
begin
IND_MOV := imSemDados;
end;
end;
[/code]

[]'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.
Link to comment
Share on other sites

Estou passando

with ACBrSPEDPisCofins1.Bloco_A do

begin

with RegistroA001New do

begin

IND_MOV := imSemDados;

end;

ACBrSPEDPisCofins1.WriteBloco_A(True);

end;

e quando entra no [ ACBRPISCOFINS ] nesse procedure

procedure TACBrSPEDPisCofins.WriteBloco_A( FechaBloco : Boolean );

begin

if Bloco_A.Gravado then exit ;

if not Bloco_0.Gravado then

WriteBloco_0;

/// BLOCO A

WriteRegistroA001;

******************** Esse campo está trazendo sempre [ imcomdados ] *******************************

if Bloco_A.RegistroA001.IND_MOV = imSemDados then

FechaBloco := True ;

***************************************************************************************

if FechaBloco then

WriteRegistroA990;

Bloco_A.WriteBuffer;

Bloco_A.Conteudo.Clear;

Bloco_A.Gravado := FechaBloco;

end;

Att,

Everton

Link to comment
Share on other sites

  • Consultores

seu componente deve estar desatualizado ou eu não estou entendendo o seu problema.

Eu fiz o Seguinte:

Abri o demo do SPEDpisCofins

Mudei o código de icomDados para isemDados (linha 927):

   with ACBrSPEDPisCofins1.Bloco_A do
begin
with RegistroA001New do
begin
IND_MOV := imSemDados;
//
with RegistroA010New do
begin
[/code]

Cliquei em Todos os Blocos.

Cliquei em Gerar TXT.

Veja aí o resultado do Bloco A:

......

|0990|60|

|A001|1|

|A990|2|

|C001|0|

......

[]'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.
Link to comment
Share on other sites

  • Consultores

Amigo, obrigado pela ajuda realmente o exemplo informando imsemdados ele colocou corretamente no txt, vou verificar aqui pq o meu esta deixando errado.

Obrigaod pela ajuda.....

Espero que resolva. :)

Uma sugestão é tentar mudar o código removendo o with. As vezes o uso dele confunde mais do que ajuda principalmente na hora de fazer o debug.

[]'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.
Link to comment
Share on other sites

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