Whitespace. gah.
[working/Evergreen.git] / 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( Essential => qw/fingerprint master_record mods/ );
14
15 #-------------------------------------------------------------------------------
16 package metabib::identifier_field_entry;
17 use base qw/metabib/;
18
19 metabib::identifier_field_entry->table( 'metabib_identifier_field_entry' );
20 metabib::identifier_field_entry->columns( Primary => qw/id/ );
21 metabib::identifier_field_entry->columns( Essential => qw/field value source/ );
22
23
24 #-------------------------------------------------------------------------------
25 package metabib::title_field_entry;
26 use base qw/metabib/;
27
28 metabib::title_field_entry->table( 'metabib_title_field_entry' );
29 metabib::title_field_entry->columns( Primary => qw/id/ );
30 metabib::title_field_entry->columns( Essential => qw/field value source/ );
31
32
33 #-------------------------------------------------------------------------------
34 package metabib::author_field_entry;
35 use base qw/metabib/;
36
37 metabib::author_field_entry->table( 'metabib_author_field_entry' );
38 metabib::author_field_entry->columns( Primary => qw/id/ );
39 metabib::author_field_entry->columns( Essential => qw/field value source/ );
40
41
42 #-------------------------------------------------------------------------------
43 package metabib::subject_field_entry;
44 use base qw/metabib/;
45
46 metabib::subject_field_entry->table( 'metabib_subject_field_entry' );
47 metabib::subject_field_entry->columns( Primary => qw/id/ );
48 metabib::subject_field_entry->columns( Essential => qw/field value source/ );
49
50
51 #-------------------------------------------------------------------------------
52 package metabib::keyword_field_entry;
53 use base qw/metabib/;
54
55 metabib::keyword_field_entry->table( 'metabib_keyword_field_entry' );
56 metabib::keyword_field_entry->columns( Primary => qw/id/ );
57 metabib::keyword_field_entry->columns( Essential => qw/field value source/ );
58
59 #-------------------------------------------------------------------------------
60 package metabib::series_field_entry;
61 use base qw/metabib/;
62
63 metabib::series_field_entry->table( 'metabib_series_field_entry' );
64 metabib::series_field_entry->columns( Primary => qw/id/ );
65 metabib::series_field_entry->columns( Essential => qw/field value source/ );
66
67 #-------------------------------------------------------------------------------
68 package metabib::metarecord_source_map;
69 use base qw/metabib/;
70
71 metabib::metarecord_source_map->table( 'metabib_metarecord_source_map' );
72 metabib::metarecord_source_map->columns( Primary => qw/id/ );
73 metabib::metarecord_source_map->columns( Essential => qw/metarecord source/ );
74
75 #-------------------------------------------------------------------------------
76 package metabib::full_rec;
77 use base qw/metabib/;
78
79 metabib::full_rec->table( 'metabib_full_rec' );
80 metabib::full_rec->columns( Primary => qw/id/ );
81 metabib::full_rec->columns( Essential => qw/record tag ind1 ind2 subfield value/ );
82
83 #-------------------------------------------------------------------------------
84 package metabib::record_descriptor;
85 use base qw/metabib/;
86 #use OpenILS::Application::Storage::CDBI::asset;
87
88 metabib::record_descriptor->table( 'metabib_rec_descriptor' );
89 metabib::record_descriptor->columns( Primary => qw/id/ );
90 metabib::record_descriptor->columns( Essential => qw/record item_type item_form bib_level
91                                          control_type char_encoding enc_level lit_form vr_format
92                                          cat_form pub_status item_lang audience type_mat date1 date2/ );
93
94 #-------------------------------------------------------------------------------
95
96 1;
97