• Files
• Commits
• Log
• Graph
• Stats

package LIMS::DB::PreRegistrationSpecimen;

use strict;

use base qw(LIMS::RDBO);

__PACKAGE__->meta->setup(
    table   => 'pre_registration_specimen',

    columns => [
        id            => { type => 'serial', not_null => 1 },
        pre_reg_id    => { type => 'integer', default => '0', not_null => 1 },
        specimen_code => { type => 'character', length => 2, not_null => 1 },
    ],

    primary_key_columns => [ 'id' ],

    unique_key => [ 'pre_reg_id', 'specimen_code' ],
    
    foreign_keys => [
        pre_reg => {
            class       => 'LIMS::DB::PreRegistration',
            key_columns => { pre_reg_id => 'id' },
        },
    ],

    relationships => [
        pre_registration_lab_test => {
            class      => 'LIMS::DB::PreRegistrationLabTest',
            column_map => { id => 'reg_specimen_id' },
            type       => 'one to many',
        },
    ],
);

__PACKAGE__->meta->make_manager_class('pre_registration_specimens');

1;