Eleandro Be More Web

Obrigado, já estou tentando configurar a aplicação no portal de desenvolvedor. Qualquer dúvida, entro em contato.

O ACBr tem algum componente que facilita a conciliação bancária? Caso tenha, alguém poderia estar orientando?

Já resolvido obrigado!

Status código:818 Status Descrição: Rejeição: CNPJ incorreto na assinatura da NFF UF:SP. Alguém poderia esta ajudando com esta situação?

https://www.homologacao.nfce.fazenda.sp.gov.br/qrcode?p=??????????. violates patters pattern constraint of https ????

Consegui resolver este erro. Podem fechar o tópico, por favor.

Alguém socorre este amigo aqui, eu já vi um tópico sobre, porém fiz as mesma configurações e no meu caso não deu certo. XmlNode não pode ser nulo. Estou usando ACBr + Delphi 13 32bts.

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?

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

Em qual modulo encontro o exemplo, TACBr CIOT?

Então eu já tentei enviar sem a tag, aí reclamou que preciso enviar? Então fiquei perdido. Tipo comentar e enviar o cclasstrib '000001' - Já tentei também, se envio somente assim, o ACBr preenche sozinho com 0 todas as tags, se envio sem, não passa, reclama pedindo as Tags. Lembrando que neste exemplo estou usando <CSTReg>000</CSTReg><<<<<<<<<<<-------------*********

codigo : 1114 Rejeição: Classificação tributária do IBS e da CBS informada não permite informação da tributação regular Segue o .xml se alguém puder ajudar <det nItem="1"> <prod> <cProd>003591</cProd> <cEAN>SEM GTIN</cEAN> <xProd>CABIDEIRO BRANCO BRANCO SK</xProd> <NCM>94032090</NCM> <CFOP>6101</CFOP> <uCom>PC</uCom> <qCom>6.0000</qCom> <vUnCom>49.0000000000</vUnCom> <vProd>294.00</vProd> <cEANTrib>SEM GTIN</cEANTrib> <uTrib>PC</uTrib> <qTrib>6.0000</qTrib> <vUnTrib>49.0000000000</vUnTrib> <vFrete>29.40</vFrete> <indTot>1</indTot> </prod> <imposto> <ICMS> <ICMS00> <orig>0</orig> <CST>00</CST> <modBC>3</modBC> <vBC>323.40</vBC> <pICMS>7.0000</pICMS> <vICMS>22.64</vICMS> </ICMS00> </ICMS> <IPI> <cEnq>999</cEnq> <IPINT> <CST>51</CST> </IPINT> </IPI> <PIS> <PISAliq> <CST>01</CST> <vBC>0.00</vBC> <pPIS>0.0000</pPIS> <vPIS>0.00</vPIS> </PISAliq> </PIS> <COFINS> <COFINSAliq> <CST>01</CST> <vBC>0.00</vBC> <pCOFINS>0.0000</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSAliq> </COFINS> <IBSCBS> <CST>000</CST> <cClassTrib>000001</cClassTrib> <gIBSCBS> <vBC>294.00</vBC> <gIBSUF> <pIBSUF>10.0000</pIBSUF> <vIBSUF>29.40</vIBSUF> </gIBSUF> <gIBSMun> <pIBSMun>10.0000</pIBSMun> <vIBSMun>29.40</vIBSMun> </gIBSMun> <vIBS>58.80</vIBS> <gCBS> <pCBS>9.0000</pCBS> <vCBS>26.46</vCBS> </gCBS> <gTribRegular> <CSTReg>000</CSTReg> <cClassTribReg>000001</cClassTribReg> <pAliqEfetRegIBSUF>10.0000</pAliqEfetRegIBSUF> <vTribRegIBSUF>29.40</vTribRegIBSUF> <pAliqEfetRegIBSMun>10.0000</pAliqEfetRegIBSMun> <vTribRegIBSMun>29.40</vTribRegIBSMun> <pAliqEfetRegCBS>9.0000</pAliqEfetRegCBS> <vTribRegCBS>26.46</vTribRegCBS> </gTribRegular> </gIBSCBS> <gEstornoCred> <vIBSEstCred>29.40</vIBSEstCred> <vCBSEstCred>26.46</vCBSEstCred> </gEstornoCred> <gCredPresIBSZFM> <competApur>2025-12</competApur> <tpCredPresIBSZFM>4</tpCredPresIBSZFM> <vCredPresIBSZFM>29.40</vCredPresIBSZFM> </gCredPresIBSZFM> </IBSCBS> </imposto> </det> Alguém pode dar uma força?

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

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.

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;