Ir para conteúdo
  • Cadastre-se

dev botao

Importação Arquivo Sped


Ver Solução Respondido por econdotta,
  • Este tópico foi criado há 1315 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Olá a todos.

Estou tentando importar arquivos SPED EFD-Contribuições e Sped-Fiscal mas estou tendo problemas para ler o Bloco 0 Registro 150.

A função SpedFiscal.Bloco_0.Registro0150Count retorna zero sempre e dentro do arquivo (que já foi validado pela Sefaz) existem estes registros como abaixo descrevo.

|0150|FOR000000008|DOANDO DISTRIBUIDORA LTDA|1058|32254261000228||1770119075|4303103||R. DO SANTO NASCIMENTO|90||DISTRITO INDUSTRIAL|
|0150|FOR000000009|PARAMIM S.A|1058|82949812000171||250864877|4216909||RUA DO DENTISTA|475||PADRE FRANCISCO|
|0150|FOR000000011|COOPERATIVA SANTO AMARO LTDA|1058|88388357003001||0250317821|4305108||R IRMAO JOSE|20||SANTA FAMILIA|
 

Estou fazendo o seguinte codigo:

For Linha := 0 To DM.SpedContribuicao.Bloco_0.Registro0150Count - 1 Do
  Begin
    LocaldeDestino := DM.SpedContribuicao.Bloco_0.Registro0150New.COD_PART;

End;
O que pode estar acontecendo? Desde já agradeço a atenção de todos.

Link para o comentário
Compartilhar em outros sites

Bom dia, eu faço a importação do arquivo txt através do do componente ACBRSpedPCImp associado ao ACBRSpedFiscal seguindo o exemplo do ACBR, o bloco 0 Registro 0000 consigo ler corretamente. O problema fica na leitura do Bloco 0 Registro 150. A propriedade DM.SpedContribuicao.Bloco_0.Registro0150Count retorna sempre 0.

Obrigado

Link para o comentário
Compartilhar em outros sites

  • Solution

Pessoal achei o meu erro.

Para acessar os Registros 0150 utilizei o seguinte código.
   For Linha := 0 To SpedFiscal.Bloco_0.Registro0001.Registro0150.Count - 1 Do
   Begin
      Codigo := SpedFiscal.Bloco_0.Registro0001.Registro0150.Items[Linha].COD_PART;
  End;

Muito obrigado a todos.

Link para o comentário
Compartilhar em outros sites

  • Administradores

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

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 para o comentário
Compartilhar em outros sites

  • 4 semanas depois ...
  • Consultores

Apenas para registro, não consegui reproduzir esse problema. Não parece ser no componente.

Mas notei o seguinte destacado em negrito na mensagem:

Em 18/07/2020 at 07:54, econdotta disse:

Bom dia, eu faço a importação do arquivo txt através do do componente ACBRSpedPCImp associado ao ACBRSpedFiscal seguindo o exemplo do ACBR, o bloco 0 Registro 0000 consigo ler corretamente. O problema fica na leitura do Bloco 0 Registro 150. A propriedade DM.SpedContribuicao.Bloco_0.Registro0150Count retorna sempre 0.

Obrigado

Como se pode ver, apesar de estarmos falando de importação pelo componente do SPED Fiscal, o componente citado no código parece ser o do PIS/COFINS (SpedContribuicao).

Assim, é possível que o erro seja apenas a troca dos componentes nessa linha específica.

  • Curtir 3

[]'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 para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1315 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.