loncom/interface/statistics/lonstudentassessment.pm - diff

Return to lonstudentassessment.pm CVS log

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

version 1.81, 2004/01/27 16:58:05	version 1.81.2.1, 2004/02/10 19:08:02
Line 1017 END	Line 1017 END
$seq->{'Excel:startcol'}=$cols_output;	$seq->{'Excel:startcol'}=$cols_output;
# Put the names of the problems and parts into the sheet	# Put the names of the problems and parts into the sheet
foreach my $res (@{$seq->{'contents'}}) {	foreach my $res (@{$seq->{'contents'}}) {
next if ($res->{'type'} ne 'assessment');	if ($res->{'type'} ne 'assessment' \|\|
	! exists($res->{'parts'}) \|\|
	ref($res->{'parts'}) ne 'ARRAY' \|\|
	scalar(@{$res->{'parts'}}) < 1) {
	next;
	}
if (scalar(@{$res->{'parts'}}) > 1) {	if (scalar(@{$res->{'parts'}}) > 1) {
foreach my $part (@{$res->{'parts'}}) {	foreach my $part (@{$res->{'parts'}}) {
$excel_sheet->write($rows_output,	$excel_sheet->write($rows_output,