LojaDev Pro Falar com o suporte

Área de membros

Você recebe o fonte.
Não uma caixa preta.

O ERP fiscal em Delphi que você entrega com a sua marca — com a Reforma Tributária 2026 acompanhada, fontes novos toda semana e o Discord onde a dúvida de rejeição vira resposta.

Acessar a plataforma

conexão criptografada · contrato assinado pelo GOV.BR

Reforma2026.NFe.pas Delphi Seattle → 12 Athens 
// Base de calculo do IBS/CBS conforme a NT vigente.
unit Reforma2026.NFe;

interface

type
  TTributoIBS = record
    cClassTrib : string[6];
    vBC        : Currency;
    pIBSUF     : Currency;
    pIBSMun    : Currency;
  end;

implementation

function CalcularIBS(const Item: TItemNFe): TTributoIBS;
begin
  Result.cClassTrib := ClassificarItem(Item.NCM, Item.CEST);
  Result.vBC        := Item.vProd - Item.vDesc;
  Result.pIBSUF     := AliquotaUF(Item.UF);
  Result.pIBSMun    := AliquotaMunicipio(Item.cMun);

  if Result.vBC < 0 then
    raise EFiscal.Create('vBC negativa no item ' + Item.cProd);
end;

end.