Index: openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-add-edit-2.tcl,v diff -u -r1.1.2.18 -r1.1.2.19 --- openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 5 Jul 2005 21:43:31 -0000 1.1.2.18 +++ openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 18 Jul 2005 18:28:46 -0000 1.1.2.19 @@ -73,6 +73,11 @@ set date [lindex $date [expr $i-1]] ad_return_error "[_ project-manager.Error]" "[_ project-manager.Date_error]" } + + #validate status field + if {$percent_complete($i) < -1 || $percent_complete($i) > 100 } { + ad_return_error "[_ project-manager.Error]" "[_ project-manager.Please_enter_valid_percent_complete]" + } if {[regexp {^\d{4}/\d{2}/\d{2}?} [lindex $date [expr $i-1]]]} { set delim "/" @@ -88,7 +93,6 @@ ad_page_contract_filter_proc_date end_date_$i end_date_$i - set log_date_$i [split [lindex $log_date [expr $i-1]] "-"] set log_date_${i}_day [lindex [set log_date_$i] 2]