future_years_list { num_year "10" }What it does:
Returns a list containing the next num_year years in the future.Defined in: /web/philip/packages/acs-core/widgets-procs.tcl
Source code:
    set year [ns_fmttime [ns_time] %Y] 
    set counter  0
    while {$counter < $num_year } {
	incr counter
	lappend year_list $year    
	incr year    
    }
    return $year_list