Diff for /loncom/interface/loncoursedata.pm between versions 1.63 and 1.64

version 1.63, 2003/03/27 19:29:36 version 1.64, 2003/03/28 15:19:35
Line 1150  the students you are concerned with prio Line 1150  the students you are concerned with prio
   
 Inputs: $students, $symb, $part, $courseid  Inputs: $students, $symb, $part, $courseid
   
   =over 4
   
   =item $students is an array of hash references.  
   Each hash must contain at least the 'username' and 'domain' of a student.
   
   =item $symb is the symb for the problem.
   
   =item $part is the part id you need statistics for
   
   =item $courseid is the course id, of course!
   
   =back
   
   Outputs: See the code for up to date information.
   
   =over 4
   
   =item $num The number of students attempting the problem
   
   =item $tries The total number of tries for the students
   
   =item $mod The maximum number of tries taken
   
   =item $mean The average number of tries
   
   =item $Solved The number of students able to solve the problem
   
   =item $solved The number of students whose answer is 'correct_by_override'
   
   =item $DegOfDiff The degree of difficulty of the problem
   
   =item $STD The standard deviation of the number of tries
   
   =item $SKEW The skew of the number of tries
   
   =back
   
 =cut  =cut
   
 ################################################  ################################################
Line 1182  sub get_problem_statistics { Line 1219  sub get_problem_statistics {
         'CREATE TEMPORARY TABLE '.$stats_table.          'CREATE TEMPORARY TABLE '.$stats_table.
             ' SELECT student_id,solved,award,tries FROM '.$performance_table.              ' SELECT student_id,solved,award,tries FROM '.$performance_table.
                 ' WHERE symb_id='.$symb_id.' AND part_id='.$part_id;                  ' WHERE symb_id='.$symb_id.' AND part_id='.$part_id;
       if (defined($students)) {
           $request .= ' AND ('.
               join(' OR ', map {'student_id='.
                                     &get_student_id($_->{'username'},
                                                     $_->{'domain'})
                                     } @$students
                    ).')';
       }
 #    &Apache::lonnet::logthis($request);  #    &Apache::lonnet::logthis($request);
     $dbh->do($request);      $dbh->do($request);
     my ($num,$tries,$mod,$mean,$STD) = &execute_SQL_request      my ($num,$tries,$mod,$mean,$STD) = &execute_SQL_request

Removed from v.1.63  
changed lines
  Added in v.1.64


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>