Ir para conteúdo
  • Cadastre-se

  • Este tópico foi criado há 159 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores
Postado
2 horas atrás, Eleandro Be More Web disse:

Encontrei no exemplo, minha dúvida agora é os valores e alíquotas, saber os campos que pego para preencher, tem alguma tabela específica para alíquotas por estado?

Veja a NT 2025/002 v1.33.

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Postado

Boa dica, quando eu desenvolver, vou postar o código pronto aqui. Caso alguém deseje usar. Vai  estar bem explicado campo e coluna por coluna. Obrigado pela dica. Por favor, não fechem o post, até eu postar a resposta de minha pergunta detalhada. Penso que a comunidade é para ajudar declaradamente quando sabemos. Aguardem que vou postar o resultado final. Código comentado. Caso mesmo assim alguém tenha dúvida, pode entrar em contato.

  • Consultores
Postado
11 horas atrás, Eleandro Be More Web disse:

Boa dica, quando eu desenvolver, vou postar o código pronto aqui. Caso alguém deseje usar. Vai  estar bem explicado campo e coluna por coluna. Obrigado pela dica. Por favor, não fechem o post, até eu postar a resposta de minha pergunta detalhada. Penso que a comunidade é para ajudar declaradamente quando sabemos. Aguardem que vou postar o resultado final. Código comentado. Caso mesmo assim alguém tenha dúvida, pode entrar em contato.

Creio que é melhor você pesquisar no ACBr primeiro para ver se o que você vai postar já foi postado e caso não tenha sido, você criar um novo tópico, até por que vai ser um assunto diferente do que foi postado aqui.

Valter Patrick
Gerente de Projetos na empresa CTEC
Consultor ACBr
(33)98400-0936
GitHub: https://github.com/valterpatrick

Ajude o Projeto ACBr crescer - Assine o Clube PRO                    

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  ícone Discórdia Discord   

Postado (editado)

Como tinha prometido, o código com anotações linha por linha. Caso eu tenha errado em algo, por favor, entre em contato para deixarmos alinhados aqui no fórum e super bem detalhado para todos. Segue abaixo
// Reforma Tributária
//***Entrega prevista para?***\\
if rgReformaTributaria.ItemIndex = 0 then
FNota.NFe.Ide.dPrevEntrega := Date + 10;

// Indicador de intermediador/marketplace
FNota.NFe.Ide.indIntermed := iiSemOperacao;

 

// Reforma Tributária
//Se não é uma operação de venda para governo, deixe esse grupo zerado.
if rgReformaTributaria.ItemIndex = 0 then
begin
  FNota.NFe.Ide.cMunFGIBS := FEmpresa.IBGE.ToInteger;

  FNota.NFe.Ide.tpNFDebito := tdNenhum;
  FNota.NFe.Ide.tpNFCredito := tcNenhum;

  FNota.NFe.Ide.gCompraGov.tpEnteGov := tcgNenhum;//tcgEstados;
  //pRedutor = percentual de redutor do benefício fiscal aplicado na operação de compra governamental.
  //Se você não está emitindo NF-e para órgão público com benefício/isenção específica, deixe 0.
  FNota.NFe.Ide.gCompraGov.pRedutor := 0;
  //Se não é operação para órgão público, então:
  //Deixar comentando
  //FNota.NFe.Ide.gCompraGov.tpOperGov := togFornecimento;

  //Informado para abater as parcelas de antecipação de pagamento, conforme Art. 10. § 4º
  //refNFe: Referência uma NF-e (modelo 55) emitida anteriormente, referente a pagamento antecipado

  //with FNota.NFe.Ide.gPagAntecipado.New do
  //  refNFe := '12345678901234567890123456789012345678901234';

  //with FNota.NFe.Ide.gPagAntecipado.New do
  //  refNFe := '12345678901234567890123456789012345678904567';
end;

//Dentro do loop da ItensNFE
while not mtItensNFe.Eof do
begin // Reforma Tributária
//🡇este bloco do If criar uma classe que define se é venda de produtos usados
if rgReformaTributaria.ItemIndex = 0 then
begin
  //🡇 Indicador de fornecimento de bem móvel usado
  Prod.indBemMovelUsado := tieNenhum;

  // Valor total do Item, correspondente à sua participação no total da nota.
  // A soma dos itens deverá corresponder ao total da nota.
  vItem := LValordosItens;
  // Referenciamento de item de outro Documento Fiscal Eletrônico - DF-e
  DFeReferenciado.chaveAcesso := '';
  DFeReferenciado.nItem := LItem;
 end;

 

 

Editado por Eleandro Be More Web
dei enter sem terminar
Postado

Seguindo dei enter sem querer, ainda dentro do loop mtItensNFe.
 

// Reforma Tributária
          if rgReformaTributaria.ItemIndex = 0 then
          begin
            //  Informações do tributo: Imposto Seletivo só para 2027 e para os
            //  os produtos nocivos ao meio ambiente e a saúde.
            {
            ISel.CSTIS := cstis000;
            ISel.cClassTribIS := '000001';

            ISel.vBCIS := 100;
            ISel.pIS := 5;
            ISel.pISEspec := 5;
            ISel.uTrib := 'UNIDAD';
            ISel.qTrib := 10;
            ISel.vIS := 100;
            }
            {
              Utilize os CST (cst000, cst200, cst220 e cst510) e os cClassTrib
              correspondentes para gerar o grupo IBSCBS
              Utilize o CST cst620 e os cClassTrib correspondentes para gerar o grupo
              IBSCBSMono
            }

            //  Informações do tributo: IBS / CBS
            //🡇Classificação Tributária IBS/CBS: '000001' = padrão para produtos comuns.
            //🡇Só alterar se houver classificação específica definida pela legislação.
            //🡇Para o CST e cClassTrib
            IBSCBS.CST := cst000;
            IBSCBS.cClassTrib := '000001';
            //🡇Indicador de doação: usar 'tieNao' para venda normal; 'tieSim' somente em operações de doação.
            IBSCBS.indDoacao := tieNao;
            // Base de cálculo do IBS/CBS ↓ usar o subtotal do item.
            IBSCBS.gIBSCBS.vBC := LValordosItens;//sub total item

            //🡇Alíquota do IBS-UF 🡇manter 0 até a legislação definir os percentuais reais.
            IBSCBS.gIBSCBS.gIBSUF.pIBSUF := 0;
            //🡇vIBSUF → valor calculado sobre o subtotal do item (LValordosItens).
            IBSCBS.gIBSCBS.gIBSUF.vIBSUF := LValordosItens * (IBSCBS.gIBSCBS.gIBSUF.pIBSUF / 100);//sub total item;

            //🡇cálculando a diferença de alíquota %
            IBSCBS.gIBSCBS.gIBSUF.gDif.pDif := LIBSCalcular
                                                 .AliquotaInterna(LAliquotaICMEmitente)//alíquota ICMS do estado do emitente
                                                 .AliquotaExterna(LAliquotaICMDestino)//alíquota ICMS do estado do destino
                                               .CalcularDiferenca;
            //🡇cálculando o Valor da diferença R$
            IBSCBS.gIBSCBS.gIBSUF.gDif.vDif := LIBSCalcular
                                                 .AliquotaInterna(LAliquotaICMEmitente)//alíquota ICMS do estado do emitente
                                                 .AliquotaExterna(LAliquotaICMDestino)//alíquota ICMS do estado do destino
                                                 .SubTotal(LValordosItens)//(Valor do produto * Quantidade vendida)
                                               .CalcularValorDiferenca;

            //🡇 Valor do tributo a devolver ↓ somente preencher se houver devolução de imposto
            IBSCBS.gIBSCBS.gIBSUF.gDevTrib.vDevTrib := 0; // normalmente 0 para venda normal

            //🡇 Percentual de redução da alíquota IBS/CBS ↓ calculado automaticamente pela classe LIBSCalcular
            //🡇 Diferença entre alíquota do emitente e alíquota do destinatário
            IBSCBS.gIBSCBS.gIBSUF.gRed.pRedAliq := LIBSCalcular.CalcularDiferenca;

            //🡇 Alíquota efetiva após redução ↓ normalmente igual à alíquota do emitente
            //🡇 Pode ser ajustada se houver benefício fiscal ou incentivo
            IBSCBS.gIBSCBS.gIBSUF.gRed.pAliqEfet := LAliquotaICMEmitente;

            //🡇 Valor do IBS estadual/municipal sobre o subtotal do item ↓ usando percentual fixo de simulação 0,1%
            IBSCBS.gIBSCBS.gIBSUF.vIBSUF := LValordosItens * (0.1 / 100);
            //******************************************\\

            //✅ IBSCBS.gIBSCBS.gIBSMun
            //🡇 Percentual do IBS Municipal ↓ atualmente fixo para teste, simulando 0,1%
            //🡇 Representa a parte do imposto que vai para o município do destinatário
            IBSCBS.gIBSCBS.gIBSMun.pIBSMun := 0.1;
            //🡇 Valor do IBS Municipal ↓ calculado sobre o subtotal do item
            IBSCBS.gIBSCBS.gIBSMun.vIBSMun := LValordosItens * (IBSCBS.gIBSCBS.gIBSMun.pIBSMun / 100);
            //******************************************\\

            //✅ IBSCBS.gIBSCBS.gIBSMun.gDif
            //🡇 Diferença de alíquota municipal (%) ↓ normalmente 0 se não houver diferença
            //🡇 Calculado automaticamente pela classe LIBSCalcular, se necessário
            IBSCBS.gIBSCBS.gIBSMun.gDif.pDif := 0;

            //🡇 Valor da diferença do IBS Municipal ↓ subtotal do item × pDif/100
            IBSCBS.gIBSCBS.gIBSMun.gDif.vDif := LValordosItens * (IBSCBS.gIBSCBS.gIBSMun.gDif.pDif / 100);

            //******************************************\\

            //✅ IBSCBS.gIBSCBS.gIBSMun.gDevTrib
            //🡇Valor do tributo municipal a devolver ↓ só preencher se houver devolução de imposto municipal
            IBSCBS.gIBSCBS.gIBSMun.gDevTrib.vDevTrib := 0;
            //🡇Percentual de redução da alíquota municipal ↓ só preencher se houver benefício ou redução específica
            IBSCBS.gIBSCBS.gIBSMun.gRed.pRedAliq := 0;
            //🡇Alíquota efetiva após redução ↓ só preencher se houver redução; caso contrário igual à alíquota do emitente
            IBSCBS.gIBSCBS.gIBSMun.gRed.pAliqEfet := 0;
            //******************************************\\

            // vIBS = vIBSUF + vIBSMun
            // Valor total do IBS/CBS ↓ soma de todos os itens do imposto (federal + estadual + municipal)
            // Preencher com 0 se não houver IBS
            IBSCBS.gIBSCBS.vIBS := 0;
            //******************************************\\

            //🡇Se não houver CBS para o item, os campos podem ficar 0.
            //🡇Se houver, preencher conforme alíquota federal e base do item.
            //✅ IBSCBS.gIBSCBS.gCBS
            //pCBS → percentual do CBS federal (parte que vai para a União)
            //🡇Percentual do CBS federal ↓ normalmente a alíquota vigente do imposto federal
            IBSCBS.gIBSCBS.gCBS.pCBS := 0;
            //🡇vCBS → valor correspondente em R$
            //🡇Valor do CBS federal ↓ calculado sobre o subtotal do item
            IBSCBS.gIBSCBS.gCBS.vCBS := 0;
            //******************************************\\


            //✅ IBSCBS.gIBSCBS.gCBS.gDif
            //🡇Diferença de alíquota CBS federal (%) ↓ normalmente 0 se não houver diferença
            //🡇Hoje dia 03/12/2025 não consta alíquota ainda, quando entrar em figor criar tabela
            IBSCBS.gIBSCBS.gCBS.gDif.pDif := 0;
            //🡇Valor da diferença do CBS federal ↓ subtotal do item × pDif/100
            IBSCBS.gIBSCBS.gCBS.gDif.vDif := 0;
            //🡇Valor da CBS devolvida ao consumidor; em vendas normais manter 0
            IBSCBS.gIBSCBS.gCBS.gDevTrib.vDevTrib := 0;

            //🡇Percentual de redução da alíquota da CBS; usar 0 se não houver benefício
            IBSCBS.gIBSCBS.gCBS.gRed.pRedAliq := 0;
            //🡇Alíquota efetiva da CBS após a redução; normalmente igual à alíquota padrão (0,90%)
            IBSCBS.gIBSCBS.gCBS.gRed.pAliqEfet := 0.90;

            //🡇CSTReg = Código da Situação Tributária do regime regular.
            //🡇Atualmente só existe o cst000 (tributação integral).
            //🡇A tabela oficial será publicada pelo Comitê Gestor do IBS/RFB nos atos complementares.
            IBSCBS.gIBSCBS.gTribRegular.CSTReg := cst000;

            //🡇Código da classe tributária (fixo conforme tabela da legislação)
            IBSCBS.gIBSCBS.gTribRegular.cClassTribReg := '000001';

            //🡇Alíquota efetiva do IBS-UF no regime regular
            IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegIBSUF := 0.10; // 0,10% atual do IBS

            //🡇Valor do IBS-UF no regime regular (base × alíquota)
            IBSCBS.gIBSCBS.gTribRegular.vTribRegIBSUF := 0;

            //🡇Alíquota efetiva do IBS-Município no regime regular
            IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegIBSMun := 0.00; // hoje 0% até definição municipal

            //🡇Valor do IBS-Município
            IBSCBS.gIBSCBS.gTribRegular.vTribRegIBSMun := 0;

            //🡇Alíquota efetiva da CBS no regime regular
            IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegCBS := 0.90; // 0,90% da CBS atual
            LpAliqEfetRegCBS := IBSCBS.gIBSCBS.gTribRegular.pAliqEfetRegCBS;
            //🡇Valor da CBS no regime regular (base × alíquota)
            IBSCBS.gIBSCBS.gTribRegular.vTribRegCBS := LIBSCalcular
                                                         .Aliquota(LpAliqEfetRegCBS)//alíquota
                                                         .SubTotal(LValordosItens)//(Valor do produto * Quantidade vendida)
                                                         .CalcularTributos;

            // Tipo Tributação Compra Governamental
            //🡇Alíquota IBS-UF (%)  → esperando sair alíquota correta
            IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSUF := 0.10;
            LpAliqIBSUF := IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSUF;

            //🡇Valor IBS-UF → CÁLCULO = LValorDosItens * (pAliqIBSUF / 100)
            IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSUF := LIBSCalcular
                                                          .Aliquota(LpAliqIBSUF)//alíquota
                                                          .SubTotal(LValordosItens)//(Valor do produto * Quantidade vendida)
                                                        .CalcularTributos;

            //🡇Alíquota IBS Municipal (%) → esperando sair alíquota correta
            IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSMun := 0.10;
            LpAliqIBSMun := IBSCBS.gIBSCBS.gTribCompraGov.pAliqIBSMun;
            //🡇Valor IBS-Mun → CÁLCULO = LValorDosItens * (pAliqIBSMun / 100)
            IBSCBS.gIBSCBS.gTribCompraGov.vTribIBSMun := LIBSCalcular
                                                           .Aliquota(LpAliqIBSMun)//alíquota
                                                           .SubTotal(LValordosItens)//(Valor do produto * Quantidade vendida)
                                                         .CalcularTributos;
            //🡇Alíquota CBS (%) →
            IBSCBS.gIBSCBS.gTribCompraGov.pAliqCBS := 0.90;
            LpAliqCBS := IBSCBS.gIBSCBS.gTribCompraGov.pAliqCBS;

            //🡇Valor CBS → CÁLCULO = LValorDosItens * (pAliqCBS / 100)
            IBSCBS.gIBSCBS.gTribCompraGov.vTribCBS := LIBSCalcular
                                                        .Aliquota(LpAliqCBS)//alíquota
                                                        .SubTotal(LValordosItens)//(Valor do produto * Quantidade vendida)
                                                      .CalcularTributos;

            //🡇Informações do tributo: IBS / CBS em operações com imposto monofásico
            //🡇Quantidade base de cálculo monofásica (qBCMono)
            //🡇Quantidade do item(Produto)
            IBSCBS.gIBSCBSMono.gMonoPadrao.qBCMono := LQtdeProduto;

            //🡇Alíquota monofásica ad rem do IBS (R$ por unidade)
            //🡇⚠ Ainda NÃO existe valor oficial → permanece 0
            IBSCBS.gIBSCBSMono.gMonoPadrao.adRemIBS := 0.10; // IBS = 0,10% → mas aqui seria valor FIXO (ad rem). Ainda NÃO existe → deixar 0.

            //🡇Alíquota monofásica ad rem da CBS (R$ por unidade)
            //🡇⚠ Também NÃO existe tabela oficial → permanece 0
            IBSCBS.gIBSCBSMono.gMonoPadrao.adRemCBS := 0.90; // CBS = 0,90% → mas ad rem ainda não definido → normalmente 0.

            //🡇Cálculo do IBS monofásico
            //🡇vIBSMono = qBCMono × adRemIBS
            IBSCBS.gIBSCBSMono.gMonoPadrao.vIBSMono :=
              IBSCBS.gIBSCBSMono.gMonoPadrao.qBCMono *
              IBSCBS.gIBSCBSMono.gMonoPadrao.adRemIBS;

            //🡇Cálculo do CBS monofásico
            //🡇vCBSMono = qBCMono × adRemCBS
            IBSCBS.gIBSCBSMono.gMonoPadrao.vCBSMono :=
              IBSCBS.gIBSCBSMono.gMonoPadrao.qBCMono *
              IBSCBS.gIBSCBSMono.gMonoPadrao.adRemCBS;

            //🡇Quantidade base da retenção (quantidade do item(Produto))
            IBSCBS.gIBSCBSMono.gMonoReten.qBCMonoReten := LQtdeProduto;

            //🡇Alíquota ad rem IBS na retenção (ainda não definida → manter 0.10 quando existir)
            IBSCBS.gIBSCBSMono.gMonoReten.adRemIBSReten := 0.10;

            //🡇Valor IBS retido = qBCMonoReten × adRemIBSReten
            IBSCBS.gIBSCBSMono.gMonoReten.vIBSMonoReten :=
              IBSCBS.gIBSCBSMono.gMonoReten.qBCMonoReten *
              IBSCBS.gIBSCBSMono.gMonoReten.adRemIBSReten;

            //🡇Valor CBS retido = qBCMonoReten × adRemCBSReten (CBS 0.90)
            IBSCBS.gIBSCBSMono.gMonoReten.vCBSMonoReten :=
              IBSCBS.gIBSCBSMono.gMonoReten.qBCMonoReten * 0.90;


            //🡇Quantidade base da retenção (quantidade do item(Produto))
            IBSCBS.gIBSCBSMono.gMonoRet.qBCMonoRet := LQtdeProduto;

            //🡇Alíquota ad rem do IBS para retenção (valor fixo por unidade)
            IBSCBS.gIBSCBSMono.gMonoRet.adRemIBSRet := 0.90; // IBS

            //🡇Valor do IBS retido (qBCMonoRet × adRemIBSRet)
            IBSCBS.gIBSCBSMono.gMonoRet.vIBSMonoRet := IBSCBS.gIBSCBSMono.gMonoRet.qBCMonoRet *
                                                       IBSCBS.gIBSCBSMono.gMonoRet.adRemIBSRet;

            //🡇Valor da CBS retida (qBCMonoRet × adRemCBSRet)
            IBSCBS.gIBSCBSMono.gMonoRet.vCBSMonoRet := IBSCBS.gIBSCBSMono.gMonoRet.qBCMonoRet * 0.10; // CBS

            //🡇 percentual aplicado ao IBS
            IBSCBS.gIBSCBSMono.gMonoDif.pDifIBS := 0.90;
            //🡇valor IBS calculado
            IBSCBS.gIBSCBSMono.gMonoDif.vIBSMonoDif := (LValordosItens * 0.90);
            //🡇percentual aplicado à CBS
            IBSCBS.gIBSCBSMono.gMonoDif.pDifCBS := 0.10;
            //🡇valor CBS calculado
            IBSCBS.gIBSCBSMono.gMonoDif.vCBSMonoDif := (LValordosItens * 0.10);
            //🡇total IBS do item no regime mono
            IBSCBS.gIBSCBSMono.vTotIBSMonoItem := (LValordosItens * 0.90);
            //🡇total CBS do item no regime mono
            IBSCBS.gIBSCBSMono.vTotCBSMonoItem := (LValordosItens * 0.10);


            //🡇valor IBS transferido
            IBSCBS.gTransfCred.vIBS := (LValordosItens * 0.90);
            //🡇valor CBS transferido
            IBSCBS.gTransfCred.vCBS := (LValordosItens * 0.10);

            //🡇competência de apuração
            IBSCBS.gAjusteCompet.competApur := Date;
            //🡇valor IBS no ajuste de competência
            IBSCBS.gAjusteCompet.vIBS := (LValordosItens * 0.90);
            //🡇valor CBS no ajuste de competência
            IBSCBS.gAjusteCompet.vCBS := (LValordosItens * 0.10);


            //🡇valor IBS estornado
            IBSCBS.gEstornoCred.vIBSEstCred := (LValordosItens * 0.90);
            //🡇valor CBS estornado
            IBSCBS.gEstornoCred.vCBSEstCred := (LValordosItens * 0.10);


            //🡇tipo de crédito presumido operacional
            IBSCBS.gCredPresOper.cCredPres := cpNenhum;
            //🡇base de cálculo do crédito presumido
            IBSCBS.gCredPresOper.vBCCredPres := LValordosItens;
            //🡇percentual IBS do crédito presumido
            IBSCBS.gCredPresOper.gIBSCredPres.pCredPres := 0.90;
            //🡇valor IBS do crédito presumido
            IBSCBS.gCredPresOper.gIBSCredPres.vCredPres := (LValordosItens * 0.90);
            //🡇valor IBS do crédito presumido condicionado
            IBSCBS.gCredPresOper.gIBSCredPres.vCredPresCondSus := 0;
            //🡇percentual CBS do crédito presumido
            IBSCBS.gCredPresOper.gCBSCredPres.pCredPres := 0.10;
            //🡇valor CBS do crédito presumido
            IBSCBS.gCredPresOper.gCBSCredPres.vCredPres := (LValordosItens * 0.10);
            //🡇valor CBS do crédito presumido condicionado
            IBSCBS.gCredPresOper.gCBSCredPres.vCredPresCondSus := 0;


            //🡇competência de apuração do crédito presumido IBS ZFM
            IBSCBS.gCredPresIBSZFM.competApur := Date;
            //🡇tipo de crédito presumido IBS ZFM
            IBSCBS.gCredPresIBSZFM.tpCredPresIBSZFM := tcpBensInformaticaOutros;
            //🡇valor do crédito presumido IBS ZFM
            IBSCBS.gCredPresIBSZFM.vCredPresIBSZFM := (LValordosItens * 0.90);
          end;
end;final do loop mtItensNFe

 

// Reforma Tributária
    //***Ver sobre como pegar os valores e alíquotas
    if rgReformaTributaria.ItemIndex = 0 then
    begin
      //🡇valor total do ISS
      FNota.NFe.Total.ISTot.vIS := LValorTotalNFe * 0.10;  // ISS normalmente é 10%, ajusta se necessário

      //🡇base de cálculo total IBS/CBS
      FNota.NFe.Total.IBSCBSTot.vBCIBSCBS := LValorTotalNFe;

      //🡇total IBS
      FNota.NFe.Total.IBSCBSTot.gIBS.vIBS := LValorTotalNFe * 0.90;
      //🡇crédito presumido IBS
      FNota.NFe.Total.IBSCBSTot.gIBS.vCredPres := LValorTotalNFe * 0.90;
      //🡇crédito presumido IBS condicionado
      FNota.NFe.Total.IBSCBSTot.gIBS.vCredPresCondSus := 0;

      //🡇diferença IBS UF
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSUFTot.vDif := LValorTotalNFe * 0.90;
      //🡇valor devolvido IBS UF
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSUFTot.vDevTrib := 0;
      //🡇total IBS UF
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSUFTot.vIBSUF := LValorTotalNFe * 0.90;

      //🡇diferença IBS Município
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSMunTot.vDif := LValorTotalNFe * 0.90;
      //🡇valor devolvido IBS Município
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSMunTot.vDevTrib := 0;
      //🡇total IBS Município
      FNota.NFe.Total.IBSCBSTot.gIBS.gIBSMunTot.vIBSMun := LValorTotalNFe * 0.90;

      //🡇diferença CBS
      FNota.NFe.Total.IBSCBSTot.gCBS.vDif := LValorTotalNFe * 0.10;
      //🡇valor devolvido CBS
      FNota.NFe.Total.IBSCBSTot.gCBS.vDevTrib := 0;
      //🡇total CBS
      FNota.NFe.Total.IBSCBSTot.gCBS.vCBS := LValorTotalNFe * 0.10;
      //🡇crédito presumido CBS
      FNota.NFe.Total.IBSCBSTot.gCBS.vCredPres := LValorTotalNFe * 0.10;
      //🡇crédito presumido CBS condicionado
      FNota.NFe.Total.IBSCBSTot.gCBS.vCredPresCondSus := 0;

      //🡇IBS mono
      FNota.NFe.Total.IBSCBSTot.gMono.vIBSMono := LValorTotalNFe * 0.90;
      //🡇CBS mono
      FNota.NFe.Total.IBSCBSTot.gMono.vCBSMono := LValorTotalNFe * 0.10;
      //🡇IBS mono retido
      FNota.NFe.Total.IBSCBSTot.gMono.vIBSMonoReten := LValorTotalNFe * 0.90;
      //🡇CBS mono retido
      FNota.NFe.Total.IBSCBSTot.gMono.vCBSMonoReten := LValorTotalNFe * 0.10;
      //🡇IBS mono retido complementar
      FNota.NFe.Total.IBSCBSTot.gMono.vIBSMonoRet := LValorTotalNFe * 0.90;
      //🡇CBS mono retido complementar
      FNota.NFe.Total.IBSCBSTot.gMono.vCBSMonoRet := LValorTotalNFe * 0.10;

      //🡇IBS estornado
      FNota.NFe.Total.IBSCBSTot.gEstornoCred.vIBSEstCred := LValorTotalNFe * 0.90;
      //🡇CBS estornado
      FNota.NFe.Total.IBSCBSTot.gEstornoCred.vCBSEstCred := LValorTotalNFe * 0.10;

      //🡇valor total da NF-e
      FNota.NFe.Total.vNFTot := LValorTotalNFe;
    end;

Final --> Bom, preenchi conforme entendi que esteja da maneira correta, colando aqui. Caso tenha me equivocado em alguma situação, por favor, ajudem. Assim, deixamos aqui no fórum, pronto para ajudar a comunidade. Espero ter ajudado.

  • 3 semanas depois ...
  • Consultores
Postado
Em 03/12/2025 at 21:26, Eleandro Be More Web disse:

“Pessoal, ajuste aqui: a alíquota é percentual, então é necessário dividir por 100. O valor que postei antes estava errado.” Bobeira minha aqui todas a linhas que tem cálculo / 100.

Quer dizer que deu certo

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Consultores
Postado
1 hora atrás, Eleandro Be More Web disse:

Sim resolvido, porém sem saber como vamos iniciar o Janeiro. Nem os contadores sabem dizer. Resumo estamos aqui perdido! 

na verdade nossos clientes já estão usando. não ficamos esperando pra atualizar em janeiro

já deu certo já está rodando e já estão emitindo

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado

Sim, eu já fiz o que vi no ACBr, porém quais as alíquotas que tenho que usar? Vocês já têm as alíquotas corretas? Deixei fixo assim como li na documentação da receita -> LCBSFD  = 0.90;//(Tributo Federal)  LIBSUF  = 0.10;//(Tributo Estadual)  LIBSMun = 0.00;//(Tributo Municipal).
Tem algo diferente que não sei?

  • Consultores
Postado
8 horas atrás, Eleandro Be More Web disse:

Sim, eu já fiz o que vi no ACBr, porém quais as alíquotas que tenho que usar? Vocês já têm as alíquotas corretas? Deixei fixo assim como li na documentação da receita -> LCBSFD  = 0.90;//(Tributo Federal)  LIBSUF  = 0.10;//(Tributo Estadual)  LIBSMun = 0.00;//(Tributo Municipal).
Tem algo diferente que não sei?

não que saiba. nada foi publicado além do que já existe

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

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