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

Diff for /loncom/interface/lonstatistics.pm between versions 1.85 and 1.88

version 1.85, 2003/10/08 15:32:00 version 1.88, 2003/10/23 15:12:45
Line 898  sub Gather_Student_Data { Line 898  sub Gather_Student_Data {
             ($student->{'username'},$student->{'domain'},              ($student->{'username'},$student->{'domain'},
              $ENV{'request.course.id'});               $ENV{'request.course.id'});
         &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,          &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,
                                                  'last student');                                                   &mt('last student'));
     }      }
     &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);      &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
     $r->rflush();      $r->rflush();
Line 1048  sub CreateMainMenu { Line 1048  sub CreateMainMenu {
                      short_description =>                        short_description => 
     &mt('Detailed statistics and graphs of student performance on problems.'),      &mt('Detailed statistics and graphs of student performance on problems.'),
                  },                   },
                    { internal_name => 'student_assessment',  #                   { internal_name => 'student_assessment',
                      name => &mt('Problem Status Chart'),  #                     name => &mt('Problem Status Chart'),
                      short_description =>   #                     short_description => 
     &mt('Brief view of each students performance in course.'),  #    &mt('Brief view of each students performance in course.'),
                  },  #                 },
                    # 'percentage'  => 'Correct-problems Plot',                     # 'percentage'  => 'Correct-problems Plot',
                    # 'activitylog' => 'Activity Log',                     # 'activitylog' => 'Activity Log',
                    );                     );
   
     #      #
     # Create the menu      # Create the menu
     my $Str;      my $Str;
     $Str =  "<h2>".&mt('Statistics and Problem Analysis')."</h2>\n";      $Str .= '<h1>'.&mt('Please select a report to generate').'</h1>';
     $Str .= &mt('Please select a report to generate.');  
     $Str .= "<dl>\n";  
     foreach my $reportdata (@reports) {      foreach my $reportdata (@reports) {
         $Str .='    <dt><a href="/adm/statistics?reportSelected='.          $Str .='    <h3><a href="/adm/statistics?reportSelected='.
             $reportdata->{'internal_name'}.'" >'.              $reportdata->{'internal_name'}.'" >'.
             $reportdata->{'name'}."</a></dt>\n";              $reportdata->{'name'}."</a></h3>\n";
         $Str .= '        <dd>'.$reportdata->{'short_description'}.          $Str .= '    '.('&nbsp;'x8).$reportdata->{'short_description'}.
             "</dd>\n";              "\n";
     }      }
     $Str .="</dl>\n";      $Str .="</dl>\n";
     #      #
Removed from v.1.85  
changed lines
  Added in v.1.88

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