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

    1 ################################################################################
    2 # WeBWorK mod_perl (c) 2000-2002 WeBWorK Project
    3 # $Id$
    4 ################################################################################
    5 
    6 package WeBWorK::DB::Record::Set;
    7 use base WeBWorK::DB::Record;
    8 
    9 =head1 NAME
   10 
   11 WeBWorK::DB::Record::Set - represent a record from the set table.
   12 
   13 =cut
   14 
   15 use strict;
   16 use warnings;
   17 
   18 sub KEYFIELDS($) {qw(
   19   id
   20 )}
   21 
   22 sub FIELDS($) {qw(
   23   id
   24   set_header
   25   problem_header
   26   open_date
   27   due_date
   28   answer_date
   29   problem_order
   30 )}
   31 
   32 1;