Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/asset.pm

   1 package OpenILS::Application::Storage::CDBI::asset;
   2 our $VERSION = 1;
   3
   4 #-------------------------------------------------------------------------------
   5 package asset;
   6 use base qw/OpenILS::Application::Storage::CDBI/;
   7 #-------------------------------------------------------------------------------
   8 package asset::call_number;
   9 use base qw/asset/;
  10
  11 __PACKAGE__->table( 'asset_call_number' );
  12 __PACKAGE__->columns( Primary => qw/id/ );
  13 __PACKAGE__->columns( Others => qw/record label/ );
  14
  15 #-------------------------------------------------------------------------------
  16 package asset::copy;
  17 use base qw/asset/;
  18
  19 __PACKAGE__->table( 'asset_copy' );
  20 __PACKAGE__->columns( Primary => qw/id/ );
  21 __PACKAGE__->columns( Others => qw/call_number barcode/ );
  22
  23 #-------------------------------------------------------------------------------
  24 package asset::copy_metadata;
  25 use base qw/asset/;
  26
  27 __PACKAGE__->table( 'asset_copy_metadata' );
  28 __PACKAGE__->columns( Primary => qw/id/ );
  29 __PACKAGE__->columns( Others => qw/checkout_status circulating_location hold_radius/ );
  30
  31 #-------------------------------------------------------------------------------
  32 1;
  33