boa tarde, pessoal estou com um duvida, o contador passou pra mim que esse calculo da redução de base esta incorreto, eu estava fazendo assim no meu sistema
pRedBC := 0;
vBC := 0;
pICMS := 0;
vICMS := 0;
pRedBC_Total:=0;
vBase:=0;
pRedBC := qryItemPREDBC.AsFloat;
if qryVendaCONSUMIDOR_FINAL.Value = 'S' then
vBC := (qryItemTOTAL.AsFloat + qryItemVALOR_IPI.AsFloat +
qryItemSEGURO.AsFloat + qryItemFRETE.AsFloat + qryItemOUTROS.AsFloat -
qryItemDESCONTO.AsFloat) * (pRedBC / 100)
else
vBC := (qryItemTOTAL.AsFloat + qryItemSEGURO.AsFloat +
qryItemFRETE.AsFloat + qryItemOUTROS.AsFloat - qryItemDESCONTO.AsFloat)
* (pRedBC / 100);
pICMS := qryItemALIQ_ICMS.AsFloat;
vICMS := (vBC * pICMS) / 100;
qryItemBASE_ICMS.AsFloat := vbc;
qryItemVALOR_ICMS.AsFloat := vICMS;
por exemplo num produto que o valor e R$ 1243,00 com redução de Base de 60%, a base passaria a ser BC=R$ 745,80, nao meu ve seria assim, so que ele falou para mim que e para ficar assim
esse valor nesse produto = BC R$ 497,20 ou seja, Valor do produto menos a BC, procede isso?