version 1.159, 2006/04/28 21:14:03
|
version 1.160, 2006/04/28 21:18:15
|
Line 2413 sub RDs_tries { return 0; }
|
Line 2413 sub RDs_tries { return 0; }
|
sub RDs_awarded { return 4; } |
sub RDs_awarded { return 4; } |
sub RDs_response_eval { return 5; } |
sub RDs_response_eval { return 5; } |
sub RDs_response_eval_2 { return 6; } |
sub RDs_response_eval_2 { return 6; } |
|
sub RDs_part_award { return 7; } |
|
|
sub get_response_data_by_student { |
sub get_response_data_by_student { |
my ($student,$symb,$response,$courseid) = @_; |
my ($student,$symb,$response,$courseid) = @_; |
Line 2431 sub get_response_data_by_student {
|
Line 2432 sub get_response_data_by_student {
|
return undef if (! defined($dbh)); |
return undef if (! defined($dbh)); |
my $request = 'SELECT '. |
my $request = 'SELECT '. |
'c.tries, b.timestamp, a.submission, a.awarddetail, c.awarded, '. |
'c.tries, b.timestamp, a.submission, a.awarddetail, c.awarded, '. |
'a.response_specific_value, a.response_specific_value_2, '. |
'a.response_specific_value, a.response_specific_value_2, c.award '. |
'FROM '.$fulldump_response_table.' AS a '. |
'FROM '.$fulldump_response_table.' AS a '. |
'LEFT JOIN '.$fulldump_timestamp_table.' AS b '. |
'LEFT JOIN '.$fulldump_timestamp_table.' AS b '. |
'ON a.symb_id=b.symb_id AND a.student_id=b.student_id AND '. |
'ON a.symb_id=b.symb_id AND a.student_id=b.student_id AND '. |