|
version 1.30, 2004/11/08 15:14:52
|
version 1.31, 2004/11/10 21:50:29
|
|
Line 555 Returns: nothing
|
Line 555 Returns: nothing
|
| ##################################################### |
##################################################### |
| sub GetStudentAnswers { |
sub GetStudentAnswers { |
| my ($r,$problem,$Students,$formname,$inputname) = @_; |
my ($r,$problem,$Students,$formname,$inputname) = @_; |
| |
my %answers; |
| my $status_type; |
my $status_type; |
| if (defined($formname)) { |
if (defined($formname)) { |
| $status_type = 'inline'; |
$status_type = 'inline'; |
|
Line 582 sub GetStudentAnswers {
|
Line 583 sub GetStudentAnswers {
|
| ($resource,$sname,$sdom,$partid,$respid); |
($resource,$sname,$sdom,$partid,$respid); |
| &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state, |
&Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state, |
| &mt('last student')); |
&mt('last student')); |
| |
$answers{$answer}++; |
| $student->{'answer'} = $answer; |
$student->{'answer'} = $answer; |
| } |
} |
| &Apache::lonstathelpers::write_analysis_cache(); |
&Apache::lonstathelpers::write_analysis_cache(); |
|
Line 589 sub GetStudentAnswers {
|
Line 591 sub GetStudentAnswers {
|
| $r->rflush(); |
$r->rflush(); |
| # close progress window |
# close progress window |
| &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state); |
&Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state); |
| return; |
return \%answers; |
| } |
} |
| |
|
| ##################################################### |
##################################################### |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonstathelpers.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface / statistics