set etc_planned [expr$planned_units * (100.0 - $percent_completed) / 100.0]
lappend result [list"Estimate to Complete<br>(Planned)"$etc_planned "Based on the number of hours left to work, according to planned hours and percent completed."]
lappend result [list"Estimate to Complete<br>(Planned)"$etc_planned "
Based on the number of hours left to work, according to planned hours and percent completed.<br>
set etc_eva [expr(100.0 - $percent_completed) * $reported_hours_cache / $percent_completed]
}
lappend result [list"Estimate to Complete<br>(Earned Value)"$etc_eva "Based on the logged hours that it took to achieve the current percent completed."]
lappend result [list"Estimate to Complete<br>(Manually Entered)"$etc_entered "Based on manually entered ETC values (during timesheet entry), taking planned ETC as a default if no estimates are available.<br>Watch out for outdated ETC estimates!"]
lappend result [list"Estimate to Complete<br>(Earned Value)"$etc_eva "
Based on the logged hours that it took to achieve the current percent completed.<br>