Jump to content

2 Dia do ACBr

O Dia da Automação Comercial está chegando!
Inscreva-se

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

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

Italo Jurisato Junior

CT-e de Substituição - Componente

Recommended Posts

Olá pessoal,

Para quem utiliza o componente ACBrCTe e necessita emitir um CT-e de Substituição deve alimentar os seguintes campos:

Vamos a estrutura completa:

with infCTeNorm.infCteSub do
begin
  chCte         := chaveCTeOriginal;
  indAlteraToma := tiNao ou tiSim;  // Se atribuir tiSim significa que foi alterado o tomador
  
  // Para tomador contribuinte do ICMS
  tomaICMS.refNFe := chaveNFe; // NF-e de anulação emitenta pelo tomador

  // ou informações da Nota Fiscal comum de papel emitida pelo tomador
  tomaICMS.refNF.CNPJCPF  := sCNPJCPF;
  tomaICMS.refNF.modelo   := sModelo;
  tomaICMS.refNF.serie    := iSerie;
  tomaICMS.refNF.subserie := iSubSerie;
  tomaICMS.refNF.nro      := iNumero;
  tomaICMS.refNF.valor    := vValor;
  tomaICMS.refNF.dEmi     := DataEmissao;

  // ou a chave do CT-e emitido pelo tomador quanto este for uma transportadora
  tomaICMS.refCte := ChaveCTeTomador;

  // caso tenha sido emitido o CT-e de Anulação informar a chave do mesmo no campo abaixo
  refCteAnu := ChaveCTeAnulacao; 
end;

Exemplo 1: Caso tenha sido emitido um CT-e de Anulação

with infCTeNorm.infCteSub do
begin
  chCte         := chaveCTeOriginal;
  indAlteraToma := tiNao ou tiSim;  // Se atribuir tiSim significa que foi alterado o tomador
  
  // CT-e de Anulação informar a chave do mesmo no campo abaixo
  refCteAnu := ChaveCTeAnulacao; 
end;

Exemplo 2: Caso o tomador tenha emitido uma NF-e de Anulação

with infCTeNorm.infCteSub do
begin
  chCte         := chaveCTeOriginal;
  indAlteraToma := tiNao ou tiSim;  // Se atribuir tiSim significa que foi alterado o tomador
  
  // Para tomador contribuinte do ICMS
  tomaICMS.refNFe := chaveNFe; // NF-e de anulação emitenta pelo tomador
end;

Exemplo 3: Caso o tomador tenha emitido uma Nota Fiscal comum de papel

with infCTeNorm.infCteSub do
begin
  chCte         := chaveCTeOriginal;
  indAlteraToma := tiNao ou tiSim;  // Se atribuir tiSim significa que foi alterado o tomador
  
  // Informações da Nota Fiscal comum de papel emitida pelo tomador
  tomaICMS.refNF.CNPJCPF  := sCNPJCPF;
  tomaICMS.refNF.modelo   := sModelo;
  tomaICMS.refNF.serie    := iSerie;
  tomaICMS.refNF.subserie := iSubSerie;
  tomaICMS.refNF.nro      := iNumero;
  tomaICMS.refNF.valor    := vValor;
  tomaICMS.refNF.dEmi     := DataEmissao;
end;

Exemplo 4: Caso o tomador seja uma transportadora e tenha emitido um CT-e

with infCTeNorm.infCteSub do
begin
  chCte         := chaveCTeOriginal;
  indAlteraToma := tiNao ou tiSim;  // Se atribuir tiSim significa que foi alterado o tomador
  
  // chave do CT-e emitido pelo tomador quanto este for uma transportadora
  tomaICMS.refCte := ChaveCTeTomador;
end;
  • Like 4
  • Thanks 1

Consultor SAC ACBr Italo Jurisato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Share this post


Link to post
Share on other sites

×
×
  • Create New...