• Files
• Commits
• Log
• Graph
• Stats

package LIMS::DB::RequestForm;

use strict;
use base qw(LIMS::RDBO);

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

    columns => [
        id              => { type => 'varchar' },
        last_name       => { type => 'varchar' },
        first_name      => { type => 'varchar' },
        dob             => { type => 'date'    },
        gender          => { type => 'enum', check_in => [ 'M', 'F', 'U' ] },
        nhs_number      => { type => 'varchar', length => 10 },
        patient_number  => { type => 'varchar' },
        location_name   => { type => 'varchar' },
        location_id     => { type => 'integer' },
        referrer        => { type => 'varchar' },
        pds_code        => { type => 'varchar' },
        created         => { type => 'timestamp' },
        imported        => { type => 'datetime' },
    ],

    primary_key_columns => [ 'id' ],

);

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

1;