loncom/interface/lonstatistics.pm - diff

Return to lonstatistics.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.156.2.7, 2016/08/14 16:38:05	version 1.162, 2016/04/25 23:00:58
Line 547 sub SectionSelect {	Line 547 sub SectionSelect {
&PrepareClasslist()	&PrepareClasslist()
}	}
#	#
# Make sure course's student table is up to date
if (@Sections) {
&Apache::loncoursedata::ensure_current_sections();
}
#
# Build the form element	# Build the form element
my $Str = "\n";	my $Str = "\n";
$Str .= '<select name="'.$elementname.'" ';	$Str .= '<select name="'.$elementname.'" ';
Line 856 ENDSTYLE	Line 851 ENDSTYLE
bug=>'Statistics and Charts'});	bug=>'Statistics and Charts'});
if (! exists($env{'form.reportSelected'}) \|\|	if (! exists($env{'form.reportSelected'}) \|\|
$env{'form.reportSelected'} eq '') {	$env{'form.reportSelected'} eq '') {
$r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page').	$r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page'));
&CreateMainMenu());	&Apache::lonquickgrades::startGradeScreen($r,'statistics');
	$r->print(&CreateMainMenu());
} else {	} else {
#	#
if (! &Apache::lonmysql::verify_sql_connection()) {	if (! &Apache::lonmysql::verify_sql_connection()) {
Line 944 ENDSTYLE	Line 940 ENDSTYLE
#	#
$r->print("</form>\n");	$r->print("</form>\n");
}	}
	&Apache::lonquickgrades::endGradeScreen($r);
$r->print(&Apache::loncommon::end_page());	$r->print(&Apache::loncommon::end_page());
$r->rflush();	$r->rflush();
#	#