version 1.49, 2002/08/30 15:35:08
|
version 1.52, 2002/10/21 00:19:39
|
Line 324 sub PrepareData {
|
Line 324 sub PrepareData {
|
return "Unable to tie hash to db file."; |
return "Unable to tie hash to db file."; |
} |
} |
|
|
if(!$isCached) { |
# if(!$isCached) { |
my $processTopResourceMapReturn= |
my $processTopResourceMapReturn= |
&Apache::loncoursedata::ProcessTopResourceMap(\%cache, $c, $r); |
&Apache::loncoursedata::ProcessTopResourceMap(\%cache, $c); |
if($processTopResourceMapReturn ne 'OK') { |
if($processTopResourceMapReturn ne 'OK') { |
untie(%cache); |
untie(%cache); |
return $processTopResourceMapReturn; |
return $processTopResourceMapReturn; |
} |
} |
} |
# } |
|
|
if($c->aborted()) { |
if($c->aborted()) { |
untie(%cache); |
untie(%cache); |
Line 509 sub BuildStatistics {
|
Line 509 sub BuildStatistics {
|
'updateTime'); |
'updateTime'); |
my @headings=('Full Name', 'Section', 'PID', 'Domain', 'User Name', |
my @headings=('Full Name', 'Section', 'PID', 'Domain', 'User Name', |
'Last Updated'); |
'Last Updated'); |
my $spacing = ' '; |
my $spacing = ' '; |
|
# my $spacing = ' '; |
|
|
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', |
Line 612 sub handler {
|
Line 614 sub handler {
|
|
|
# $jr = $r; |
# $jr = $r; |
|
|
|
my $loaderror=&Apache::lonnet::overloaderror($r); |
|
if ($loaderror) { return $loaderror; } |
|
$loaderror= |
|
&Apache::lonnet::overloaderror($r, |
|
$ENV{'course.'.$ENV{'request.course.id'}.'.home'}); |
|
if ($loaderror) { return $loaderror; } |
|
|
unless(&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'})) { |
unless(&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'})) { |
$ENV{'user.error.msg'}= |
$ENV{'user.error.msg'}= |
$r->uri.":vgr:0:0:Cannot view grades for complete course"; |
$r->uri.":vgr:0:0:Cannot view grades for complete course"; |