• Files
• Commits
• Log
• Graph
• Stats

package LIMS::DB::Screen;

use strict;

use base qw(LIMS::RDBO);

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

    columns => [
        id          => { type => 'serial', not_null => 1 },
        category_id => { type => 'int' },
        description => { type => 'varchar', length => 50 },
        active	    => { type => 'enum', check_in => [ 'yes', 'no' ], not_null => 1 },
    ],

    primary_key_columns => [ 'id' ],

    unique_key => [ 'category_id', 'description' ],

    foreign_keys => [
        category => {
            class       => 'LIMS::DB::ScreenCategory',
            key_columns => { category_id => 'id' },
        },
    ],
    
    relationships => [
        request_initial_screen => {
            class      => 'LIMS::DB::RequestInitialScreen',
            column_map => { id => 'screen_id' },
            type       => 'one to many',
        },

        screen_lab_test => {
            class      => 'LIMS::DB::ScreenLabTest',
            column_map => { id => 'screen_id' },
            type       => 'one to many',
        },

        screen_lab_test_detail => {
            class      => 'LIMS::DB::ScreenLabTestDetail',
            column_map => { id => 'screen_id' },
            type       => 'one to many',
        },
    ],
);

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

1;