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

   1 package OpenILS::Application::Storage::CDBI::metabib;
   2 our $VERSION = 1;
   3
   4 #-------------------------------------------------------------------------------
   5 package metabib;
   6 use base qw/OpenILS::Application::Storage::CDBI/;
   7 #-------------------------------------------------------------------------------
   8 package metabib::metarecord;
   9 use base qw/metabib/;
  10
  11 metabib::metarecord->table( 'metabib_metarecord' );
  12 metabib::metarecord->columns( Primary => qw/id/ );
  13 metabib::metarecord->columns( Others => qw/fingerprint master_record mods/ );
  14
  15 #-------------------------------------------------------------------------------
  16 package metabib::title_field_entry;
  17 use base qw/metabib/;
  18
  19 metabib::title_field_entry->table( 'metabib_title_field_entry' );
  20 metabib::title_field_entry->columns( Primary => qw/id/ );
  21 metabib::title_field_entry->columns( Others => qw/field value/ );
  22
  23
  24 #-------------------------------------------------------------------------------
  25 package metabib::author_field_entry;
  26 use base qw/metabib/;
  27
  28 metabib::author_field_entry->table( 'metabib_author_field_entry' );
  29 metabib::author_field_entry->columns( Primary => qw/id/ );
  30 metabib::author_field_entry->columns( Others => qw/field value/ );
  31
  32
  33 #-------------------------------------------------------------------------------
  34 package metabib::subject_field_entry;
  35 use base qw/metabib/;
  36
  37 metabib::subject_field_entry->table( 'metabib_subject_field_entry' );
  38 metabib::subject_field_entry->columns( Primary => qw/id/ );
  39 metabib::subject_field_entry->columns( Others => qw/field value/ );
  40
  41
  42 #-------------------------------------------------------------------------------
  43 package metabib::keyword_field_entry;
  44 use base qw/metabib/;
  45
  46 metabib::keyword_field_entry->table( 'metabib_keyword_field_entry' );
  47 metabib::keyword_field_entry->columns( Primary => qw/id/ );
  48 metabib::keyword_field_entry->columns( Others => qw/field value/ );
  49
  50 #-------------------------------------------------------------------------------
  51 package metabib::title_field_entry_source_map;
  52 use base qw/metabib/;
  53
  54 metabib::title_field_entry_source_map->table( 'metabib_title_field_entry_source_map' );
  55 metabib::title_field_entry_source_map->columns( Primary => qw/id/ );
  56 metabib::title_field_entry_source_map->columns( Others => qw/field_entry metarecord source_record/ );
  57
  58 #-------------------------------------------------------------------------------
  59 package metabib::author_field_entry_source_map;
  60 use base qw/metabib/;
  61
  62 metabib::author_field_entry_source_map->table( 'metabib_author_field_entry_source_map' );
  63 metabib::author_field_entry_source_map->columns( Primary => qw/id/ );
  64 metabib::author_field_entry_source_map->columns( Others => qw/field_entry metarecord source_record/ );
  65
  66 #-------------------------------------------------------------------------------
  67 package metabib::subject_field_entry_source_map;
  68 use base qw/metabib/;
  69
  70 metabib::subject_field_entry_source_map->table( 'metabib_subject_field_entry_source_map' );
  71 metabib::subject_field_entry_source_map->columns( Primary => qw/id/ );
  72 metabib::subject_field_entry_source_map->columns( Others => qw/field_entry metarecord source_record/ );
  73
  74 #-------------------------------------------------------------------------------
  75 package metabib::keyword_field_entry_source_map;
  76 use base qw/metabib/;
  77
  78 metabib::keyword_field_entry_source_map->table( 'metabib_keyword_field_entry_source_map' );
  79 metabib::keyword_field_entry_source_map->columns( Primary => qw/id/ );
  80 metabib::keyword_field_entry_source_map->columns( Others => qw/field_entry metarecord source_record/ );
  81
  82 #-------------------------------------------------------------------------------
  83 package metabib::metarecord_source_map;
  84 use base qw/metabib/;
  85
  86 metabib::metarecord_source_map->table( 'metabib_metarecord_source_map' );
  87 metabib::metarecord_source_map->columns( Primary => qw/id/ );
  88 metabib::metarecord_source_map->columns( Others => qw/metarecord source_record/ );
  89
  90 #-------------------------------------------------------------------------------
  91 package metabib::full_rec;
  92 use base qw/metabib/;
  93
  94 metabib::full_rec->table( 'metabib_full_rec' );
  95 metabib::full_rec->columns( Primary => qw/id/ );
  96 metabib::full_rec->columns( Others => qw/record tag ind1 ind2 subfield value/ );
  97
  98 #-------------------------------------------------------------------------------
  99
 100 1;
 101