[BACK]Return to longradinganalysis.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface / statistics

Diff for /loncom/interface/statistics/longradinganalysis.pm between versions 1.5 and 1.9

version 1.5, 2006/05/05 20:03:43 version 1.9, 2008/10/23 09:07:51
Line 197  sub task_analysis { Line 197  sub task_analysis {
  }   }
  close($outputfile);   close($outputfile);
  $r->print('<br />'.   $r->print('<br />'.
   '<a href="'.$filename.'">'.&mt('Your csv file.')."</a>\n");    '<a href="'.$filename.'">'.&mt('Your CSV file.')."</a>\n");
     } elsif ($env{'form.output'} eq 'excel') {      } elsif ($env{'form.output'} eq 'excel') {
  my ($excel_workbook,$excel_sheet,$filename,$format,$rows_output) =    my ($excel_workbook,$excel_sheet,$filename,$format,$rows_output) = 
     &init_excel_output($r);      &init_excel_output($r);
Line 216  sub task_analysis { Line 216  sub task_analysis {
   '<a href="'.$filename.'">'.    '<a href="'.$filename.'">'.
   &mt('Your Excel spreadsheet.').'</a>'."\n");    &mt('Your Excel spreadsheet.').'</a>'."\n");
     } else {      } else {
  $r->print('<table class="thinborder">');   $r->print(&Apache::loncommon::start_data_table());
  $r->print('<tr><th>Name (username)</th><th>Grades Assigned</th></tr>');   $r->print(&Apache::loncommon::start_data_table_header_row().
     '<th>'.&mt('Name (username)').'</th><th>'.&mt('Grades Assigned').'</th>'.
     &Apache::loncommon::end_data_table_header_row() );
  foreach my $line (@output) {   foreach my $line (@output) {
     $r->print(sprintf("<tr><td>%s (<tt>%s</tt>)</td><td>%s</td></tr>",      $r->print(&Apache::loncommon::start_data_table_row().
       @{$line}));        sprintf("<td>%s (<tt>%s</tt>)</td><td>%s</td></tr>",
         @{$line}).
         &Apache::loncommon::end_data_table_row());
  }   }
  $r->print('</table>');   $r->print(&Apache::loncommon::end_data_table());
     }      }
     &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);      &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
 }  }
Line 305  sub create_interface { Line 309  sub create_interface {
     $str .= '<tr>';      $str .= '<tr>';
     $str .= '<td align="center"><b>'.&mt('Sections').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Sections').'</b></td>';
     $str .= '<td align="center"><b>'.&mt('Groups').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Groups').'</b></td>';
     $str .= '<td align="center"><b>'.&mt('Enrollment Status').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Access Status').'</b></td>';
     $str .= '<td>'.&mt('<b>Output as</b> [_1]',$output_selector).'</td>';      $str .= '<td>'.&mt('<b>Output as</b> [_1]',$output_selector).'</td>';
     $str .= '</tr>'."\n";      $str .= '</tr>'."\n";
     ##      ##
Line 324  sub create_interface { Line 328  sub create_interface {
     #      #
     $str .= '<td>';      $str .= '<td>';
     ##      ##
     $str .= '<nobr><label>'.&mt('Status: [_1]',      $str .= '<span class="LC_nobreak"><label>'
                                  '<input type="text" '.             .&mt('Status: [_1]',
                                  'name="stats_status" size="60" value="" />'                      '<input type="text" name="stats_status"'
                                  ).                     .' size="60" value="" readonly="readonly" />')
                     '</label></nobr>';             .'</label></span>';
     $str .= '</td>';      $str .= '</td>';
     ##      ##
     ##      ##
Removed from v.1.5  
changed lines
  Added in v.1.9

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>