Ir para conteúdo
  • Cadastre-se

dev botao

Importar SPED FIscal


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

Recommended Posts

  • Consultores

Não... Tem para o PIS/COFINS.

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

  • Membros Pro

Vlw pessoal, é porque um cliente quer que eu faço a importação, manipule algumas informações para ele e depois gere novamente o arquivo, vou alterar apenas o bloco H, vou ver como fazer, se for o caso vou me base no importador do PIS/COFINS e faço um novo, ou então apenas altero na "mão" mesmo o que ele quer.

Link para o comentário
Compartilhar em outros sites

  • 1 ano depois...
  • Moderadores
1 hora atrás, Digibyte disse:

Foi feito alguma coisa para importar Sped Fiscal? Se não tiver nada vou iniciar com base no TFrmImpoSped

Não tem !

mas a sugestão é que faça o load no componente mesmo sem criar um novo para isso. pois o que tem hoje para alguns speds está criando outro componente

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
  • Membros Pro

Realmente acho que a opção de load ficaria melhor. No momento porém eu teria que estudar um pouco mais como fazer e levaria mais tempo pois não tenho tanta experiência com a parte de componentes. De qualquer forma desenvolvi o importador Fiscal com base no importador Contribuições.

ACBr_SPEDImportar.dpk

ACBrEFDBlocos.pas

ACBrSPEDFiscalImportar.rar

Link para o comentário
Compartilhar em outros sites

  • Moderadores
Em 13/07/2017 at 15:02, Digibyte disse:

Realmente acho que a opção de load ficaria melhor. No momento porém eu teria que estudar um pouco mais como fazer e levaria mais tempo pois não tenho tanta experiência com a parte de componentes. De qualquer forma desenvolvi o importador Fiscal com base no importador Contribuições.

ACBr_SPEDImportar.dpk

ACBrEFDBlocos.pas

ACBrSPEDFiscalImportar.rar

Boa noite

não entendi . tu colocou no mesmo componente pra importar isso

como faço pra usar e configurações.

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Foi criado um novo componente (TACBrSpedFiscalImportar) que é o importador do Sped Fiscal. Ele foi criado nos mesmos moldes do importador do Sped Contribuições e colocado no mesmo pacote de instalação. Para usá-lo basta ligar o mesmo, pela propriedade ACBrSpedFiscal, a um TAcbrSpedFiscal e usar da seguinte forma:

  if OpenDialog.Execute then
  begin
    ACBrSpedImpEF.Arquivo := OpenDialog.FileName; (ler arquivo sped)
    ACBrSpedImpEF.Importar;
  end;

Feito isso estarão disponíveis os valores como por exemplo:

  with ACBrSpedImpEF.ACBrSPEDFiscal.Bloco_0 do
  begin
    vCnpj := ACBrSpedImpEF.ACBrSpedFiscal.Bloco_0.Registro0000.CNPJ;
    vCpf := ACBrSpedImpEF.ACBrSpedFiscal.Bloco_0.Registro0000.CPF;
  end;

Pode ter melhorias a fazer mas está plenamente funcional.

Link para o comentário
Compartilhar em outros sites

  • 3 meses depois ...
  • Moderadores
21 horas atrás, Digibyte disse:

Segue correção da importação dos registros C500, C590

ACBrEFDBloco_C_Importar.pas

Bom dia

Obrigado já está no svn.

  • Curtir 1
Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
2 horas atrás, Digibyte disse:

Além da alteração acima, mais uma que implementa o registro C465. São alterações no ACBrImporta e no ACBrSped.

ACBrEFDBloco_C.pas

ACBrEFDBloco_C_Class.pas

ACBrEFDBloco_C_Events.pas

ACBrEFDBloco_C_Importar.pas

ACBrSpedFiscal.pas

estão no svn.

mas por favor tente separar em tópicos distintos mesmo sendo quase um único situação mas separe.

  • Curtir 1
Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • 2 meses depois ...
  • Moderadores

Bom dia,

3 minutos atrás, ivanilsonpacheco disse:

não sei seria aqui mesmo

Se está usando o componente, e a dúvida tem a ver com o tópico, sim, é aqui mesmo.

3 minutos atrás, ivanilsonpacheco disse:

mas poderiam me dar um help pra ler o registro c100 e c190?

Qual o problema?

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link para o comentário
Compartilhar em outros sites

Estou tentando ler o conteúdo do registro C100 e C190, mas não consegui, todas as formas que tentei só me retorna vazio.

Se faço assim, consigo obter dados do RegistroC001, mas se mudar pra o c190 não retorna nada. Não tenho muita experiencia com ACBr.

begin
  opendialog1.FileName := '';
  if opendialog1.Execute then
  begin

    ACBrSpedFiscalImportar1.Arquivo := opendialog1.FileName;
    ACBrSpedFiscalImportar1.Importar;


    with ACBrSpedFiscalImportar1.ACBrSpedFiscal.Bloco_C do
    begin
      memo1.Lines.Add(ACBrSpedFiscalImportar1.ACBrSpedFiscal.Bloco_C.RegistroC001New.RegistroC100.Items[0].COD_MOD);
    end;
  end;

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
25 minutos atrás, ivanilsonpacheco disse:

    with ACBrSpedFiscalImportar1.ACBrSpedFiscal.Bloco_C do     begin       memo1.Lines.Add(ACBrSpedFiscalImportar1.ACBrSpedFiscal.Bloco_C.RegistroC001New.RegistroC100.Items[0].COD_MOD);     end;

Os métodos com final New servem para gerar um novo registro no SPED e não consultar.

Teste assim:

  for I := 0 to ACBrSPEDFiscal1.Bloco_C.RegistroC001.RegistroC100.Count - 1 do
    Memo1.Lines.Add(ACBrSPEDFiscal1.Bloco_C.RegistroC001.RegistroC100.Items[I].CHV_NFE);

 

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Eu uso +- assim, acho que dá pra entender

 

      for i := 0 to ACBrSpedImpEF.ACBrSpedFiscal.Bloco_C.RegistroC001.RegistroC100.Count -1 do
      begin
        with ACBrSpedImpEF.ACBrSpedFiscal.Bloco_C.RegistroC001.RegistroC100.Items do             

          begin         

              for j := 0 to RegistroC190.Count -1 do
              begin
                  with RegistroC190.Items[j] do
                  begin

                      seu código :=  VL_BC_ICMS;

                      etc ...

                  end;
              end;

     end

Link para o comentário
Compartilhar em outros sites

  • 4 meses depois ...
  • Este tópico foi criado há 2135 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.