version 1.34, 2012/10/04 13:41:10
|
version 1.40, 2017/11/12 23:06:51
|
Line 185 sub get_max_time_in_db {
|
Line 185 sub get_max_time_in_db {
|
&Apache::lonhtmlcommon::Update_PrgWin |
&Apache::lonhtmlcommon::Update_PrgWin |
($r,$prog_state,&mt('Parsing results')); |
($r,$prog_state,&mt('Parsing results')); |
# |
# |
if (! open(TIMEDATA,$results_file)) { |
if (! open(TIMEDATA,"<",$results_file)) { |
$r->print('<h2>'.&mt('Unable to read results file.').'</h2>'. |
$r->print('<p class="LC_error">'.&mt('Unable to read results file.').'</p>'. |
'<p>'. |
'<p>'. |
&mt('This is a serious error and has been logged. '. |
&mt('This is a serious error and has been logged.'). |
'You should contact your system administrator '. |
'<br />'. |
'to resolve this issue.'). |
&mt('Please alert your LON-CAPA administrator.'). |
'</p>'); |
'</p>'); |
return; |
return; |
} |
} |
Line 254 sub output_results {
|
Line 254 sub output_results {
|
$r->print('<p class="LC_info">'.&mt('So far, no data has been returned for your request').'</p>'); |
$r->print('<p class="LC_info">'.&mt('So far, no data has been returned for your request').'</p>'); |
return -1; |
return -1; |
} |
} |
if (! open(ACTIVITYDATA,$results_file)) { |
if (! open(ACTIVITYDATA,"<",$results_file)) { |
$r->print('<p class="LC_error">'.&mt('Unable to read results file.').'</p>'. |
$r->print('<p class="LC_error">'.&mt('Unable to read results file.').'</p>'. |
'<p>'. |
'<p>'. |
&mt('This is a serious error and has been logged. '. |
&mt('This is a serious error and has been logged.'). |
'You should contact your system administrator '. |
'<br />'. |
'to resolve this issue.'). |
&mt('Please alert your LON-CAPA administrator.'). |
'</p>'); |
'</p>'); |
return -2; |
return -2; |
} |
} |
Line 432 sub convert_timezone {
|
Line 432 sub convert_timezone {
|
sub display_values { |
sub display_values { |
my ($action,$values)=@_; |
my ($action,$values)=@_; |
my $result='<table>'; |
my $result='<table>'; |
if ($action eq 'CSTORE') { |
if (($action eq 'CSTORE') || ($action eq 'PUTSTORE')) { |
my $is_anon; |
my $is_anon; |
my %values=map {split('=',$_,-1)} split(/\&/,$values); |
my %values=map {split('=',$_,-1)} split(/\&/,$values); |
foreach my $key (sort(keys(%values))) { |
foreach my $key (sort(keys(%values))) { |
Line 573 sub handler {
|
Line 573 sub handler {
|
title=>'Student Activity', |
title=>'Student Activity', |
text =>'Student Activity', |
text =>'Student Activity', |
faq=>139, |
faq=>139, |
bug=>'instructor interface'}); |
bug=>'instructor interface', |
|
help=>'View_recent_activity'}); |
# |
# |
# Give the LON-CAPA page header |
# Give the LON-CAPA page header |
my $args; |
my $args; |
if ($env{'form.only_body'}) { |
if ($env{'form.only_body'}) { |
$args = { only_body => 1, }; |
$args = { only_body => 1, }; |
|
$args->{'add_progressbar'} = 1; |
} |
} |
$r->print(&Apache::loncommon::start_page('Student Activity',&styles(),$args). |
$r->print(&Apache::loncommon::start_page('Student Activity',&styles(),$args). |
&Apache::lonhtmlcommon::breadcrumbs('Student Activity')); |
&Apache::lonhtmlcommon::breadcrumbs('Student Activity')); |
Line 586 sub handler {
|
Line 588 sub handler {
|
# |
# |
# Begin form output |
# Begin form output |
$r->print('<form name="trackstudent" method="post" action="/adm/trackstudent">'); |
$r->print('<form name="trackstudent" method="post" action="/adm/trackstudent">'); |
$r->print('<br />'); |
|
$r->print('<div name="statusline">'. |
|
&mt('Status: [_1]', |
|
'<input type="text" name="status" size="60" value="" readonly="readonly" />'). |
|
'</div>'); |
|
$r->rflush(); |
$r->rflush(); |
my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r); |
my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r); |
&Apache::lonhtmlcommon::Update_PrgWin |
&Apache::lonhtmlcommon::Update_PrgWin |