--- loncom/interface/statistics/lonstudentassessment.pm	2003/04/29 19:46:24	1.45
+++ loncom/interface/statistics/lonstudentassessment.pm	2003/05/21 14:43:01	1.48
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.45 2003/04/29 19:46:24 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.48 2003/05/21 14:43:01 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -137,7 +137,7 @@ sub BuildStudentAssessmentPage {
     if (! exists($ENV{'form.notfirstrun'})) {
         $r->print(<<ENDMSG);
 <p>
-<font size="+1">
+<font size="+2">
 Please make your selections in the boxes above and hit 
 the button marked &quot;Update&nbsp;Display&quot;.
 </font>
@@ -156,10 +156,10 @@ ENDMSG
         $initialize     = \&excel_initialize;
         $output_student = \&excel_outputstudent;
         $finish         = \&excel_finish;
-    } elsif ($output_mode eq 'multi-sheet excel') {
-        $initialize     = \&multi_sheet_excel_initialize;
-        $output_student = \&multi_sheet_excel_outputstudent;
-        $finish         = \&multi_sheet_excel_finish;
+#    } elsif ($output_mode eq 'multi-sheet excel') {
+#        $initialize     = \&multi_sheet_excel_initialize;
+#        $output_student = \&multi_sheet_excel_outputstudent;
+#        $finish         = \&multi_sheet_excel_finish;
     } elsif ($output_mode eq 'csv') {
         $initialize     = \&csv_initialize;
         $output_student = \&csv_outputstudent;
@@ -224,6 +224,7 @@ sub CreateInterface {
     $Str .= '<tr>';
     $Str .= '<td align="center"><b>Sections</b></td>';
     $Str .= '<td align="center"><b>Student Data</b></td>';
+    $Str .= '<td align="center"><b>Enrollment Status</b></td>';
     $Str .= '<td align="center"><b>Sequences and Folders</b></td>';
     $Str .= '<td align="center"><b>Output Format</b></td>';
     $Str .= '</tr>'."\n";
@@ -242,6 +243,8 @@ sub CreateInterface {
     $Str .= &Apache::lonstatistics::StudentDataSelect('StudentData','multiple',
                                                       5,undef);
     $Str .= '</td><td>'."\n";
+    $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,5);
+    $Str .= '</td><td>'."\n";
     $Str .= &Apache::lonstatistics::MapSelect('Maps','multiple,all',5,
                                               $only_seq_with_assessments);
     $Str .= '</td><td>'."\n";
@@ -271,6 +274,15 @@ my @OutputOptions =
        show => 'all',
        show_links => 'yes',
        },
+     { name  => 'HTML, with all links',
+       value => 'html, with all links',
+       description => 'Output HTML with each symbol linked to the problem '.
+	   'which generated it.  '.
+           'This includes links for unattempted problems.',
+       mode => 'html',
+       show => 'all',
+       show_links => 'all',
+       },
      { name  => 'HTML, without links',
        value => 'html, without links',
        description => 'Output HTML.  By not including links, the size of the'.
@@ -323,27 +335,27 @@ my @OutputOptions =
        show => 'totals',
        show_links => 'no',
            },
-     { name  => 'multi-sheet Excel',
-       value => 'multi-sheet excel',
-       description => 'Output an Excel file (compatable with Excel 95), '.
-	   'with a seperate worksheet for each sequence you have selected '.
-           'the data for each problem part '.
-           '(number of tries, status, points awarded) will be listed.',
-       mode => 'multi-sheet excel',
-       show => 'totals',
-       show_links => 'no',
-           },
-     { name  => 'multi-sheet Excel, by section',
-       value => 'multi-sheet excel, by section',
-       description => 'Output an Excel file (compatable with Excel 95), '.
-	   'with a seperate worksheet for each sequence you have selected '.
-           'the data for each problem part '.
-           '(number of tries, status, points awarded) will be listed.  '.
-           'There will be one Excel workbook for each section selected.',
-       mode => 'multi-sheet excel',
-       show => 'by section',
-       show_links => 'no',
-           },
+#     { name  => 'multi-sheet Excel',
+#       value => 'multi-sheet excel',
+#       description => 'Output an Excel file (compatable with Excel 95), '.
+#	   'with a seperate worksheet for each sequence you have selected '.
+#           'the data for each problem part '.
+#           '(number of tries, status, points awarded) will be listed.',
+#       mode => 'multi-sheet excel',
+#       show => 'totals',
+#       show_links => 'no',
+#           },
+#     { name  => 'multi-sheet Excel, by section',
+#       value => 'multi-sheet excel, by section',
+#       description => 'Output an Excel file (compatable with Excel 95), '.
+#	   'with a seperate worksheet for each sequence you have selected '.
+#           'the data for each problem part '.
+#           '(number of tries, status, points awarded) will be listed.  '.
+#           'There will be one Excel workbook for each section selected.',
+#       mode => 'multi-sheet excel',
+#       show => 'by section',
+#       show_links => 'no',
+#           },
      { name  => 'CSV, everything',
        value => 'csv, everything',
        description => '',
@@ -1161,7 +1173,8 @@ sub StudentPerformanceOnSequence {
                 }
             }
             #
-            if ($links eq 'yes' && $symbol ne ' ') {
+            if ( ($links eq 'yes' && $symbol ne ' ') ||
+                 ($links eq 'all')) {
                 $symbol = '<a href="/adm/grades'.
                     '?symb='.&Apache::lonnet::escape($resource->{'symb'}).
                         '&student='.$student->{'username'}.