PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 25 → Fator de Vencimento, como reverter?
Fator de Vencimento, como reverter?
Iniciado por ANGELROEIS, fev., 11 2015 9:16 PM - 1 resposta
Membro registado
44 mensagems
Popularité : +7 (7 votes)
Publicado em fevereiro, 11 2015 - 9:16 PM
Durante a produção do módulo de boleto, verifiquei que temos a opção de calcular o fator de vencimento. O mesmo, não é dado da forma tradicional DD/MM/AAAA e sim pelo cálculo da data do vencimento menos a data base do fator que é 10/02/1997. Com isso pode ser gerado valor para fator de vencimento, da seguinte forma:

DateDifference(datainicial,datafinal)


O meu caso é: tenho este fator vindo de um outro banco e quero reverter esse valor, como proceder?
Membro registado
44 mensagems
Popularité : +7 (7 votes)
Publicado em fevereiro, 11 2015 - 10:42 PM
Solução para este problema

Procedure FatorVencimento(datainicial is Date,datafinal is Date)

s_DataVencimento is string
n_Dias is int

n_Dias = DateDifference(datainicial,datafinal)

s_DataVencimento = IntegerToDate(DateToInteger(datainicial) + n_Dias)

ToastDisplay(s_DataVencimento+" "+n_Dias,toastShort,vaMiddle,haCenter,LightBlue)


Agradeciumento ao amigo ilustre José Jorge Matos via Skype

--
Analista de Sistemas Jr
Assessor de Comunicação
Fotografo nas horas Vagas
Pai da Alícia e Marido da Andréa ♥