version 1.55, 2002/11/26 18:02:38
|
version 1.55.2.1, 2003/01/13 20:34:24
|
Line 490 sub CreateMainMenu {
|
Line 490 sub CreateMainMenu {
|
|
|
$Str .= '<table border="0"><tbody><tr>'."\n"; |
$Str .= '<table border="0"><tbody><tr>'."\n"; |
$Str .= '<td></td><td></td>'."\n"; |
$Str .= '<td></td><td></td>'."\n"; |
$Str .= '<td align="center"><b>Analysis Reports:</b></td>'."\n"; |
$Str .= '<td align="center"><b>Select a Report</b></td>'."\n"; |
$Str .= '<td align="center"><b>Student Status:</b></td></tr>'."\n"; |
$Str .= '<td align="center"><b>Student Status</b></td></tr>'."\n"; |
$Str .= '<tr>'."\n"; |
$Str .= '<tr>'."\n"; |
$Str .= '<td align="center"><input type="submit" name="Refresh" '; |
$Str .= '<td align="center"><input type="submit" name="Refresh" '; |
$Str .= 'value="Refresh" /></td>'."\n"; |
$Str .= 'value="Refresh" /></td>'."\n"; |
Line 534 sub BuildStatistics {
|
Line 534 sub BuildStatistics {
|
my %reports = ('classlist' => 'Class list', |
my %reports = ('classlist' => 'Class list', |
'problem_statistics' => 'Problem Statistics', |
'problem_statistics' => 'Problem Statistics', |
'student_assessment' => 'Student Assessment', |
'student_assessment' => 'Student Assessment', |
'percentage' => 'Percentage Graphs', |
'percentage' => 'Correct-problems Plot', |
# 'activitylog' => 'Activity Log', |
# 'activitylog' => 'Activity Log', |
'reportSelected' => 'Class list'); |
'reportSelected' => 'Class list'); |
|
|
Line 614 sub BuildStatistics {
|
Line 614 sub BuildStatistics {
|
} elsif($GoToPage eq 'Class list') { |
} elsif($GoToPage eq 'Class list') { |
&BuildClasslist($cacheDB, $students, \@studentInformation, |
&BuildClasslist($cacheDB, $students, \@studentInformation, |
\@headings, $r); |
\@headings, $r); |
} elsif($GoToPage eq 'Percentage Graphs') { |
} elsif($GoToPage eq 'Correct-problems Plot') { |
&Apache::lonpercentage::BuildPercentageGraph($cacheDB, $students, |
&Apache::lonpercentage::BuildPercentageGraph($cacheDB, $students, |
$courseID, $c, $r); |
$courseID, $c, $r); |
} |
} |