t/lib/DBICTest/Schema/ComputedColumn.pm

   1 package # hide from PAUSE
   2     DBICTest::Schema::ComputedColumn;
   3
   4 # for sybase and mssql computed column tests
   5
   6 use base qw/DBICTest::BaseResult/;
   7
   8 __PACKAGE__->table('computed_column_test');
   9
  10 __PACKAGE__->add_columns(
  11   'id' => {
  12     data_type => 'integer',
  13     is_auto_increment => 1,
  14   },
  15   'a_computed_column' => {
  16     data_type => undef,
  17     is_nullable => 0,
  18     default_value => \'getdate()',
  19   },
  20   'a_timestamp' => {
  21     data_type => 'timestamp',
  22     is_nullable => 0,
  23   },
  24   'charfield' => {
  25     data_type => 'varchar',
  26     size => 20,
  27     default_value => 'foo',
  28     is_nullable => 0,
  29   }
  30 );
  31
  32 __PACKAGE__->set_primary_key('id');
  33
  34 1;