View of /trunk/webwork2/lib/WeBWorK/DB/Record/UserProblem.pm

    1 ################################################################################
    2 # WeBWorK mod_perl (c) 2000-2002 WeBWorK Project
    3 # $Id$
    4 ################################################################################
    5 
    6 package WeBWorK::DB::Record::UserProblem;
    7 use base WeBWorK::DB::Record;
    8 
    9 =head1 NAME
   10 
   11 WeBWorK::DB::Record::UserProblem - represent a record from the problem_user
   12 table.
   13 
   14 =cut
   15 
   16 use strict;
   17 use warnings;
   18 
   19 sub KEYFIELDS($) {qw(
   20   user_id
   21   set_id
   22   problem_id
   23 )}
   24 
   25 sub FIELDS($) {qw(
   26   user_id
   27   set_id
   28   problem_id
   29   source_file
   30   value
   31   max_attempts
   32   problem_seed
   33   status
   34   attempted
   35   last_answer
   36   num_correct
   37   num_incorrect
   38 )}
   39 
   40 1;