Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Importar SPED FIscal


nazarenoneto
  • Este tópico foi criado há 1463 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 to comment
Share on other sites

  • Consultores

Lembrando que é um componente separado!

minha sugestão é usar o próprio componente e preencher o mesmo com os dados !

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

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

  • 1 year later...
  • Consultores
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
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

  • 2 weeks later...

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

  • Consultores
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
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

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

  • Consultores

Boa tarde

subi ao svn mas se quiser ajudar e deixar essa possibilidade junto ao componente do Sped é melhor

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

  • 3 months later...
  • Consultores
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.

  • 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

  • Consultores
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.

  • 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

  • 2 months later...
  • 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 to comment
Share on other 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 to comment
Share on other 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 to comment
Share on other sites

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

  • 4 months later...
  • Este tópico foi criado há 1463 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.