--- loncom/interface/statistics/lonstudentsubmissions.pm	2014/02/26 03:15:04	1.68.2.3
+++ loncom/interface/statistics/lonstudentsubmissions.pm	2014/03/28 15:07:01	1.71
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentsubmissions.pm,v 1.68.2.3 2014/02/26 03:15:04 raeburn Exp $
+# $Id: lonstudentsubmissions.pm,v 1.71 2014/03/28 15:07:01 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -30,6 +30,7 @@ use strict;
 use Apache::lonnet;
 use Apache::loncommon();
 use Apache::lonhtmlcommon();
+use Apache::lonquickgrades();
 use Apache::loncoursedata();
 use Apache::lonstatistics;
 use Apache::lonlocal;
@@ -63,6 +64,7 @@ sub BuildStudentSubmissionsPage {
     &Apache::lonstatistics::PrepareClasslist();
     #
     $r->print( &Apache::lonhtmlcommon::breadcrumbs('Student Submission Reports'));
+    &Apache::lonquickgrades::startGradeScreen($r,'statistics');
     $r->print(&CreateInterface());
     #
     my @Students = @Apache::lonstatistics::Students;
@@ -729,6 +731,12 @@ sub html_non_essay_results {
                 push(@values,$response->{$original_header});
             }
         }
+        # FIXME: Bug #6700 - Properly process multiple answer fields
+        # Would be a good place here but the data needs to be properly
+        # compiled somewhere before.
+        #      elsif (($resptype =~ /^(numerical|formula|custom)$/) &&
+        #             (submission) && (ref)) {
+        #        de-ref...: push(@values,$response->{$original_header}); }
     } else {
         foreach my $original_header (@$headers) {
             if ($original_header eq 'Time') {