Página 1 de 1
ADICIONAR ANOS A UMA DATA
Enviado: 18 Dez 2004 12:30
por CDV
BOM DIA AMIGOS.
TEM COMO ADICIONAR ANOS A UMA DATA ?
A FORMA QUE EU ACHEI SERIA ACRESCENTANDO 36500 DIAS EXISTE
OUTRA FORMA ?
OBRIGADO.
Enviado: 18 Dez 2004 12:48
por Dudu_XBase
Postei mas somente com adição de 1 ano somente exemplo
Solução 1
Código: Selecionar todos
set century on
set date to briti
dInicio := date() // atribuo a data de hj
// Qtde de ano a adicionar
nAno := 1
// Adiciono mais um ano ...
dFim := ctod(strzero(day(dInicio),2)+"/"+strzero(month(dInicio),2)+"/"+strzero(year(dInicio)+nAno,4))
// mostro a data
? dtoc(dFim)
Código: Selecionar todos
set century on
set date to briti
// Adicionar um ano....ou mais eu incremento essa váriavel....
nAno := 1
dInicio := date() // atribuo a data de hj
// mostro a data com a função
? addmonth(dInicio,nAno*12)