Diff for /loncom/interface/statistics/lonstudentsubmissions.pm between versions 1.65 and 1.66

version 1.65, 2011/11/21 20:12:36 version 1.66, 2011/12/21 21:25:51
Line 875  sub prepare_excel_output { Line 875  sub prepare_excel_output {
     }      }
     #      #
     # Populate the worksheet with the student data      # Populate the worksheet with the student data
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin      my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$Students));
         ($r,'Excel File Compilation Status',  
          'Excel File Compilation Progress',   
          scalar(@$Students),'inline',undef,'Statistics','stats_status');  
     my $max_row = $rows_output;      my $max_row = $rows_output;
     foreach my $student (@$Students) {      foreach my $student (@$Students) {
         last if ($c->aborted());          last if ($c->aborted());
Line 955  sub prepare_excel_output { Line 952  sub prepare_excel_output {
                 }                  }
             }              }
         }          }
         &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,          &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,'last student');
                                                  'last student');  
     }      }
     &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);      &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
     #      #
Line 1069  sub prepare_csv_output { Line 1065  sub prepare_csv_output {
               &mt('Generating CSV report of student responses').'</h2>');                &mt('Generating CSV report of student responses').'</h2>');
     #      #
     # Progress window      # Progress window
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin      my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$students));
         ($r,'CSV File Compilation Status',  
          'CSV File Compilation Progress',   
          scalar(@$students),'inline',undef,'Statistics','stats_status');  
           
     $r->rflush();      $r->rflush();
     #      #
Line 1222  sub prepare_csv_output { Line 1215  sub prepare_csv_output {
             print $outputfile $/;              print $outputfile $/;
         }          }
         undef(@rows);          undef(@rows);
         &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,          &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,'last student');
                                                  'last student');  
     }      }
     close($outputfile);      close($outputfile);
     #      #
Line 1347  sub CreateInterface { Line 1339  sub CreateInterface {
     $Str .= &Apache::loncommon::end_data_table_row();      $Str .= &Apache::loncommon::end_data_table_row();
     $Str .= &Apache::loncommon::end_data_table();      $Str .= &Apache::loncommon::end_data_table();
     #      #
     $Str .= '<p><span class="LC_nobreak">'  
            .&mt('Status: [_1]',  
                     '<input type="text" name="stats_status"'  
                    .' size="60" value="" readonly="readonly" />')  
            .'</span></p>';  
     ##  
     return $Str;      return $Str;
 }  }
   

Removed from v.1.65  
changed lines
  Added in v.1.66


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