Great work! Really could tool for the overall grading of students and the split into single tasks etc. !! Congratulations!!
One question on the CONCEPTIONAL SIDE:
A student can still upload a new answer to a task when this is already evaluated by the professor (which definitly shouldn't be the case) and the grade just stays as it is
.... or did I just miss something somewhere?
Two more things, actually ERRORS:
- When changing the name of an Assignment Type "Exam" to the German "Abschlussarbeit" I had a server error and now I don't get to the "Admin my Assignment Types" page from the admin page http://www.theservice.de/dotlrn/classes/betriebswirtschaft/entrepreneurship/usp/evaluation/admin/
PLEASE SEE THE ERROR MESSAGE BELOW
- When I click on the single user in the "grades report" in www.theservice.de (installation using .LRN vers. 2.1.0 a2, with login mailto:prof2@ab.de & "p" as password and click on a single user (I guess for going to the single grading sheet of this user), this link is broken. Ups, no - I now don't come to the "grades report page" any more and have the same ERROR MESSAGE THAN WITH THE OTHER ERROR
The admin of this page is timo hentschel (mailto:timo@studio-k4.de).
+++++++++++++++++++++++++++++++++
There was a server error processing your request. We apologize.
Here is a detailed dump of what took place at the time of the error, which may assist a programmer in tracking down the problem:
expected floating-point number but got "40,00"
while executing
"format %.0f [lc_numeric $weight]"
invoked from within
"set weight [format %.0f [lc_numeric $weight]]"
("uplevel" body line 2)
invoked from within
"uplevel 1 $code_block "
("1" arm line 1)
invoked from within
"switch $errno {
0 {
# TCL_OK
}
1 {
# TCL_ERROR
..."
("while" body line 20)
invoked from within
"while { [db_getrow $db $selection] } {
incr counter
if { [info exists array_val] } {
unset array_val
..."
("uplevel" body line 5)
invoked from within
"uplevel 1 $code_block "
invoked from within
"db_with_handle -dbn $dbn db {
set selection [db_exec select $db $full_statement_name $sql]
set counter 0
while { [db_getrow $..."
(procedure "db_foreach" line 36)
invoked from within
"db_foreach grade_type { *SQL* } {
set weight [format %.0f [lc_numeric $weight]]
set grade_label_${grade_id} "${grade_plural_name} ($weight%) <..."
("uplevel" body line 39)
invoked from within
"uplevel {
# /packages/evaluation/www/admin/grades/grades-reports.tcl
ad_page_contract {
Grades reports of a group
@creation-date Apr..."
(procedure "code::tcl::/web/theservice/packages/evaluation/www/admin/gra..." line 2)
invoked from within
"code::tcl::$__adp_stub"
invoked from within
"if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure exists and is up-to-date
adp_init tcl $__adp_stub
..."
("uplevel" body line 3)
invoked from within
"uplevel {
if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure exists and is up-to-date
adp_init t..."
(procedure "adp_prepare" line 2)
invoked from within
"adp_prepare "
(procedure "template::adp_parse" line 30)
invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
(procedure "adp_parse_ad_conn_file" line 5)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
set tcl_url2path_info..."