loncom/interface/statistics/lonproblemstatistics.pm - diff

Return to lonproblemstatistics.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.51, 2003/06/02 13:58:43	version 1.52, 2003/06/10 19:19:57
Line 202 sub CreateInterface {	Line 202 sub CreateInterface {
$Str .= &CreateAndParseOutputSelector();	$Str .= &CreateAndParseOutputSelector();
$Str .= '</td></tr>'."\n";	$Str .= '</td></tr>'."\n";
$Str .= '</table>'."\n";	$Str .= '</table>'."\n";
	$Str .= '<input type="submit" value="Generate Statistics" />';
return $Str;	return $Str;
}	}

Line 362 sub BuildProblemStatisticsPage {	Line 363 sub BuildProblemStatisticsPage {
'" />');	'" />');
$r->print('<input type="hidden" name="plot" value="" />');	$r->print('<input type="hidden" name="plot" value="" />');
if (! exists($ENV{'form.statsfirstcall'})) {	if (! exists($ENV{'form.statsfirstcall'})) {
$r->print(<<ENDMSG);
<p>
<font size="+1">
Please make your selections in the boxes above and hit
the button marked "Update Display".
</font>
</p>
ENDMSG
return;	return;
}	}
#	#
Line 786 sub plot_statistics {	Line 779 sub plot_statistics {
}	}
}	}
return if (! defined($sortfield) \|\| $sortfield eq '');	return if (! defined($sortfield) \|\| $sortfield eq '');
&Apache::lonnet::logthis('data field = '.$datafield);
#	#
my $Max = 0;	my $Max = 0;
my $problem_num = 0;	my $problem_num = 0;