Como calcular Vtottrib dos tributos

[Ernando Jose Souza]

 

O valor dos tributos estao saindo maior que o valor dos Itens

 subTotal:=(FQtde * lista.Items[0].PRECO);

 fParent.Entidade.vTribFedNac    := ((SubTotal * aLiqFedNac) /100);
  fParent.Entidade.vTribFedImp    := ((SubTotal * aLiqFedImp) /100);
  fParent.Entidade.vTribEst       := ((SubTotal * aLiqEst) /100);
  fParent.Entidade.vTribMun       := ((SubTotal * aLiqMun) /100);

vTotTrib:= fParent.Entidade.vTribFedNac +   fParent.Entidade.vTribFedImp   +   fParent.Entidade.vTribEst   +   fParent.Entidade.vTribMun;

 

Como resolver esta questao.

[Amarildo de Matos]

bom dia..

olhando assim.. a principio esta ok..

faça o seguinte

subTotal:=(FQtde * lista.Items[0].PRECO);

Depois dessa linha.. coloque um comando para mostrar o resultado do subtotal 

tambem ja coloque par mostrar o valor do aLiqFedNac

e tambem ja coloque para mostrar o resultado somente  fParent.Entidade.vTribFedNac

faça isso para cada uma dessa linhas. para descobrir o que esta acontecendo..