Jump to content

chamada diadoacbr

Assista tectoy.png

Sped Fiscal registro c800 em branco


Go to solution Solved by EMBarbosa,
  • Este tópico foi criado há 343 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

Edited by Paulo Felipe Moretto
Link to comment
Share on other sites

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

  • Este tópico foi criado há 343 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.