Jump to content

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Carlos Hendrik Oliveira

Erro em SPED pis e cofins com matriz e filiais

Recommended Posts

Não que eu saiba. Você poderia postar o código para reproduzir o problema?


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

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.

Share this post


Link to post
Share on other sites

Na verdade, seria mais útil o código fonte pra reproduzir o problema. Ou a correção se você souber como corrigir.


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

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.

Share this post


Link to post
Share on other sites

Bom dia.

Tente fazer algo assim no procedimento RegC010, na linha 552 da ufrmPrincipal.pas:

      with RegistroC010New do
      begin
        CNPJ := SomenteNumeros(queryEmpresa.FieldByName('cgc').AsString);;
        IND_ESCRI := IndEscriIndividualizado;

Como você está passando duas vezes o RegistroC010New no seu procedimento, ele pode estar criando duas vezes o registro.

Espero que ajude.

Obrigado.

Edited by brsamn
  • Like 1

Share this post


Link to post
Share on other sites
1 hora atrás, brsamn disse:

Bom dia.

Tente fazer algo assim no procedimento RegC010, na linha 552 da ufrmPrincipal.pas:

      with RegistroC010New do
      begin
        CNPJ := SomenteNumeros(queryEmpresa.FieldByName('cgc').AsString);;
        IND_ESCRI := IndEscriIndividualizado;

Como você está passando duas vezes o RegistroC010New no seu procedimento, ele pode estar criando duas vezes o registro.

Espero que ajude.

Obrigado.

Deu certo, obrigado.

Ficou assim

 

procedure TfrmPrincipal.RegC010(pBloco: TBloco_C);
begin
  try
    with pBloco.RegistroC010New do
      begin
        CNPJ := SomenteNumeros(queryEmpresa.FieldByName('cgc').AsString);
        IND_ESCRI := IndEscriIndividualizado;
      end;
  except on E: Exception do
    raise Exception.Create('Erro ao criar registro C010. Motivo:'+#13+E.Message);
  end;
end;

 

  • Like 1

Share this post


Link to post
Share on other sites
Em 08/01/2018 at 10:51, Carlos Hendrik Oliveira disse:

Deu certo, obrigado.

Ficou assim

 

procedure TfrmPrincipal.RegC010(pBloco: TBloco_C);
begin
  try
    with pBloco.RegistroC010New do
      begin
        CNPJ := SomenteNumeros(queryEmpresa.FieldByName('cgc').AsString);
        IND_ESCRI := IndEscriIndividualizado;
      end;
  except on E: Exception do
    raise Exception.Create('Erro ao criar registro C010. Motivo:'+#13+E.Message);
  end;
end;

 

voce tem exe deste seu projeto para me fazer um teste

estou precisando unificar sped fiscal contribuição alguém pode me ajudar!

Share this post


Link to post
Share on other sites

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