--- loncom/interface/loncoursedata.pm 2006/04/28 21:14:03 1.159 +++ loncom/interface/loncoursedata.pm 2006/04/28 21:18:15 1.160 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: loncoursedata.pm,v 1.159 2006/04/28 21:14:03 albertel Exp $ +# $Id: loncoursedata.pm,v 1.160 2006/04/28 21:18:15 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2413,6 +2413,7 @@ sub RDs_tries { return 0; } sub RDs_awarded { return 4; } sub RDs_response_eval { return 5; } sub RDs_response_eval_2 { return 6; } +sub RDs_part_award { return 7; } sub get_response_data_by_student { my ($student,$symb,$response,$courseid) = @_; @@ -2431,7 +2432,7 @@ sub get_response_data_by_student { return undef if (! defined($dbh)); my $request = 'SELECT '. '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 '. 'LEFT JOIN '.$fulldump_timestamp_table.' AS b '. 'ON a.symb_id=b.symb_id AND a.student_id=b.student_id AND '.