Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Postado

Olá...

Estou fazendo a geração do Sped Pis/Cofins pelo componente e surgiu um problema...

Estou fazendo a geração parcial, somente os blocos 0, A e C. Nestes blocos eu passo o validador e o arquivo é aprovado, mais para isso eu preciso entrar no arquivo e alterar 3 valores nos blocos D, F e 1.

Como eu não gero estes arquivos eu precisava que eles viessem setados como 1 ao invés de virem como 0

Segue parte do arquivo após ser alterado e como era antes para melhor entendimento.

Após ser alterado...

|D001|1|

|D990|2|

|F001|1|

|F990|2|

|M001|0|

|M200|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|

|M600|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|

|M990|4|

|1001|1|

|1990|2|

Antes de ser alterado

|D001|0|

|D990|2|

|F001|0|

|F990|2|

|M001|0|

|M200|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|

|M600|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|

|M990|4|

|1001|0|

|1990|2|

Lembrando que eu não gero estes blocos, portanto acredito que deveriam vir setados como não contém informação.

Após fazer esta alteração o arquivo valida.

  • Consultores
Postado

O seu pedido faz sentido. Mas notou que o exemplo do componente trata isso?

[]'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.
  • Consultores
Postado

Pasta \trunk\Exemplos\ACBrSPED\Delphi\PisCofins

Acho que é o caso do Bloco 1...

[]'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.
Postado

Encontrei isto... acredito que seja isto...

Mais está acusando erro de parametro, inclusive no exemplo estava comentado...

with ACBrSPEDPisCofins1.Bloco_1 do

   begin

      with Registro1001New do

      begin

        IND_MOV := 1;

      end;

   end;

Acusa erro que parametro não pode ser integer.

Postado

Consegui...

with ACBrSPEDPisCofins1.Bloco_1 do

   begin

      with Registro1001New do begin

        IND_MOV := imSemDados;

      end;

   end;

Somente passar "imSemDados" como parametro...

Obrigado a atenção...

Duvida sanada...

  • Consultores
Postado

Exato. Que bom que resolveu.

Ainda assim vou adicionar no Mantis uma sugestão no sentido de quando não for criado um certo bloco, ele ser gerado sem dados por padrão, caso seja obrigatório. Daí poderá ser implementado quando houver tempo hábil.

EDIT: Adicionado como caso 1127

[]'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.
  • Este tópico foi criado há 4714 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.