Entenda como o sistema calcula os valores, assim como a figura abaixo:

Valor Total

A Coluna Valor Total nada mais é do que o Valor Total digitado no Pedido de Vendas.
Valor Total é a soma de: C6_QUANT * C6_PRCVEN

C.M.V

A Coluna C.M.V (Custo de Mercadoria Vendida) é o custo Médio do Produto.
Para ilustrar essa situação, podemos verificar o custo através da análise do Kardex do Produto (MATR900), assim como na figura abaixo:

Nesse caso como temos duas entradas com custos diferentes o cálculo é o seguinte:
R$1.300,00 / 8,00 = 162,50
O CMV é calculado através da função:
Ma410Custo(nItem,aVencto,cTEs,cProduto,cLocal,nQtdVen)

Valor Presente

A coluna Valor Presente que é uma fórmula matemático-financeira capaz de determinar o valor presente de pagamentos futuros descontados a uma taxa de juros apropriada.
O Valor Presente muda conforme a condição de Pagamento escolhida e com base no conteúdo do parâmetro MV_JUROS, que por padrão vem com 5%;
Nesse exemplo, a condição escolhida foi: 30,60,90.
Primeiro vamos entender a condição de pagamento. Minha data base é 11/03/15, sendo:

11/03 à 09/04 = 29 dias (1ª parcela = 333,33)
11/03 à 09/05 = 59 dias (2ª parcela = 333,33)
11/03 à 08/06 = 89 dias (3ª parcela = 333,34)

A fórmula para o cálculo é:

O cálculo do valor total ou valor presente e realizado parcela a parcela utilizando a taxa de juros definida no parâmetro MV_JUROS.

Valor Presente = Valor / ((1+ (Taxa Juros/100)) ** (Prazo_pgto/30))

Deveremos realizar o cálculo para cada parcela, então:

Calculo da 1ª.Parcela

nTaxa      := SuperGetMV("MV_JUROS")

nValor     := 333,33 (Valor da 1ª. Parcela)

dData      := 09/04/2015 (Vencimento 1ª. Parcela)

dDtEmissao := dDataBase (Neste Exemplo = 11/03/2015)

nPrazo     := dData-dDtEmissao

nPrazo     := 16/05/2017 – 17/04/2017

nPrazo     := 29 dias

Desmembramento da Formula

nValPres := nValor/( (1+(nTaxa/100)) ** (nPrazo/30) )

nValPres := 333,33 / ( ( 1+(5/100)) ** (29/30) )

nValPres := 333,33/ ( ( 1+(5/100)) ** (29/30) )

nValPres := 333,33 / ((1+(0,05)) ** (29/30))

nValPres := 72.39 / (1,05 ** 0.96666667)

nValPres := 333,33 / 317,97385061762432667048270927892

nValPres := 317,97385061762432667048270927892 (VALOR PRESENTE DA 1ª PARCELA)

Calculo da 2ª.Parcela

nTaxa      := SuperGetMV("MV_JUROS")

nValor     := 333,33 (Valor da 2ª. Parcela)

dData      := 09/05/2015 (Vencimento 2ª. Parcela)

dDtEmissao := dDataBase (Neste Exemplo = 11/03/2015)

nPrazo     := dData-dDtEmissao

nPrazo     := 09/05/2015 – 11/03/2015

nPrazo     := 59 dias

Desmembramento da Formula

nValPres := nValor/( (1+(nTaxa/100)) ** (nPrazo/30) )

nValPres := 333,33 / ( ( 1+(5/100)) ** (59/30) )

nValPres := 333,33 / ( ( 1+(5/100)) ** (59/30) )

nValPres := 333,33 / ((1+(0,05)) ** (59/30))

nValPres := 333,33 / (1,05 ** 1.96666667)

nValPres := 72,39 / 1.10070842

nValPres := 302,83223868345173968617400883707 (VALOR PRESENTE DA 2ª PARCELA)

Calculo da 3ª.Parcela

nTaxa := SuperGetMV("MV_JUROS")

nValor := 333,34 (Valor da 3ª. Parcela)

dData := 08/06/2015 (Vencimento 3ª. Parcela)

dDtEmissao := dDataBase (Neste Exemplo = 11/03/2015)

nPrazo := dData-dDtEmissao

nPrazo := 08/06/2015 – 11/03/2015

nPrazo := 89 dias

Desmembramento da Formula

nValPres := nValor/( (1+(nTaxa/100)) ** (nPrazo/30) )

nValPres := 333,34 / ( ( 1+(5/100)) ** (89/30) )

nValPres := 333,34 / ( ( 1+(5/100)) ** (89/30) )

nValPres := 333,34 / ((1+(0,05)) ** (89/30))

nValPres := 333,34 / (1,05 ** 2.96666667)

nValPres := 333,34 / 1.15574384

nValPres := 288,42030832520268890400116602808 (VALOR PRESENTE DA 3ª PARCELA)

Nesse caso o Valor Presente é: 909,226396

Apuração do Valor Presente TOTAL

nTotal: =317,97385061762432667048270927892 (Valor Presente 1ª. Parcela) + 302,83223868345173968617400883707 (Valor Presente 2ª. Parcela)

+ 288,42030832520268890400116602808 (Valor Presente 3ª. Parcela)

nTotal: = 909,226412 (Valor Presente TOTAL)

Obs: lembrando que ** refere-se a função exponencial (xy)

Lucro Bruto

A coluna lucro Bruto nada mais é do que a diferença entre o Valor Presente e o CMV.
Lucro Bruto = (Vlr. Presente – C.M.V)
Lucro Bruto = (909,226412 – 162,500000)
Lucro Bruto = 746,726412

Margem de Contribuição (%)

 
A margem de contribuição é calculada da seguinte forma:
Margem de contribuição % = Lucro Bruto / Vlr. Presente * 100
Margem de contribuição % = 746,726412 / 909,226412 * 100
Margem de contribuição % = 82,127664

Abaixo segue exemplo de utilização de produto que contém TES que valida impostos:

2ª. Fase – Cálculo de Impostos Sobre o Valor PRESENTE

Desmembramento do cálculo

Antes de iniciar o desmembramento do cálculo, vale ressaltar que a formula e semelhante a utilizada no documento de entrada (MATA103) para o cálculo do custo de entrada do produto, onde e amplamente utiliza as configurações da TES informada no pedido de vendas.

Simulação de Valores:

nVlrPres   := 197.44814307 (Valor Presente Total)

IT_VALCMP  := 0.00 (Valor do ICMS Complementar)

IT_VALICM  := 26.06 (Valor de ICMS)

IT_VALIPI  := 0.00 (Valor do IPI)

SF4->F4_IPI:= Não

Formula 1

nValTot := nVlrPres-IIf(SF4->F4_IPI=="R",0,MaFisRet(nItem,"IT_VALIPI"))+MaFisRet(nItem,"IT_VALCMP")

nValTot := 197.44814307 – 0 + 0

nValTot := 197.44814307

Algoritmo para cálculo dos impostos

nValTot à Valor Presente

nValIcm àValor do ICMS

nValIpi à Valor do IPI

Aplicando o algoritmo na TES 502

nValTot := 197.45 (Valor Presente Total)

nValIcm      := 26.06 (Valor de ICMS)

nValIpi      := 0.00 (Valor do IPI)

SF4->F4_CREDIPI:= Não

SF4->F4_CREDICM:= Sim

Tipo Pedido = N-Normal

Formula aplicada:

Resultado:= nValTot – nValIcm

Resultado:= 197.44814307 – 26.06

Resultado:= 171.38814307