Ir para conteúdo
  • Cadastre-se

dev botao

Sped Fiscal registro c800 em branco


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

Recommended Posts

Boa tarde, gero os blocos C800 e C850 do sped fiscal, mas estou enfrentando problemas de performance pois o numero de registros é muito grande. Estou tentando realizar a geração através do componente ACBrSPEDFiscal1 para melhorar. Tentei gerar apenas o bloco C800 porém ele salva apenas o arquivo sem as informações dentro. ( Arquivo em anexo ) Alguém poderia me dizer onde estou errando? Já olhei o exemplo mas não consegui descobrir onde estou errando.

Outra duvida é a seguinte, quando vou passar o COD_SIT se eu utilizo COD_SIT.sdRegular; ou COD_SIT:= sdRegular; das duas formas ele da erro. Qual a forma correta de utilizar?

 

with ACBrSPEDFiscal1 do begin
    DT_INI  :=  DtInicial.Date;
    DT_FIN  :=  DtFinal.Date;
    Arquivo:='C:\Users\Felipe\Desktop\teste.txt';
    LinhasBuffer := StrToIntDef('10', 0);
    IniciaGeracao;
    while not qryC800.EOF do begin
      with Bloco_C.RegistroC800New do begin
        COD_MOD:='59';
        //COD_SIT.sdRegular;
        NUM_CFE   :=  qryC800.Fields[2].Text;
        DT_DOC    :=  StrToDate(qryC800.Fields[3].Text);
        VL_CFE    :=  StrToFloat(qryC800.Fields[4].Text);
        VL_PIS    :=  StrToFloat(qryC800.Fields[5].Text);
        VL_COFINS :=  StrToFloat(qryC800.Fields[6].Text);
        CNPJ_CPF  :=  qryC800.Fields[7].Text;;
        NR_SAT    :=  qryC800.Fields[8].Text;
        CHV_CFE   :=  qryC800.Fields[9].Text;
        VL_DESC   :=  StrToFloat(qryC800.Fields[10].Text);
        VL_MERC   :=  StrToFloat(qryC800.Fields[11].Text);
        VL_ICMS   :=  StrToFloat(qryC800.Fields[12].Text);
      end;
      qryC800.Next;
      WriteBloco_C(False);
    end;
    WriteBloco_C(True);
   SaveFileTXT;
   ShowMessage('finalizado');
  end;

 

teste.txt

Editado por Paulo Felipe Moretto
Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
  • Consultores
  • Solution
Em 06/07/2021 at 16:38, Paulo Felipe Moretto disse:

Boa tarde, gero os blocos C800 e C850 do sped fiscal, mas estou enfrentando problemas de performance pois o numero de registros é muito grande. Estou tentando realizar a geração através do componente ACBrSPEDFiscal1 para melhorar. Tentei gerar apenas o bloco C800 porém ele salva apenas o arquivo sem as informações dentro. ( Arquivo em anexo ) Alguém poderia me dizer onde estou errando? Já olhei o exemplo mas não consegui descobrir onde estou errando.

A resposta pro seu problema é que você precisa informar o campo "IND_MOV" como sendo "imComDados" dos blocos/registros que está preenchendo.

Por exemplo no Registro C001.

Em 06/07/2021 at 16:38, Paulo Felipe Moretto disse:

Outra duvida é a seguinte, quando vou passar o COD_SIT se eu utilizo COD_SIT.sdRegular; ou COD_SIT:= sdRegular; das duas formas ele da erro. Qual a forma correta de utilizar?

COD_SIT := sdRegular;

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