× Linguagem de Programação ADVPL

Perguntas Dividir Valores

Mais
10 anos 2 dias atrás #26190 por macInfo
Dividir Valores foi criado por macInfo
Boa Tarde!
Preciso pegar um valor e dividi-lo em parcelas, mas a primeira parcela tem que ficar com o maior valor.
Ex.:

VALOR R$ 51.493,71 DIVIDIR POR 6 FICARIA 6 PARCELAS DE R$ 8.582,285

MAS GOSTARIA QUE O RESULTADO FOSSE:
1 parcela = 8.583,71
2 parcela = 8.582,00
3 parcela = 8.582,00
4 parcela = 8.582,00
5 parcela = 8.582,00
6 parcela = 8.582,00

como fazer isso em advpl ? Como fazer ao dividir a primeira parcela fique com o maior valor?
Obrigado..

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 dias atrás #26192 por lalberto
Respondido por lalberto no tópico Dividir Valores
Usa a função Condição, ela já faz isso, segue um exemplo:

Utilize uma condição de pagamento no cadastro SE4 que divida o valor em 6 parcelas:

nValor := 51493.71

aParcItem:= Condicao(nValor,SE4->E4_CODIGO,,dDataBase)

aParcItem[1,1] = data
aParcItem[1,2] = Valor da 1a. parcela
....
aParcItem[6,1] = data
aParcItem[6,2] = Valor da 6a. parcela

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.110 segundos
Joomla templates by a4joomla