This repository has been archived on 2023-08-16. You can view files and clone it, but cannot push or open issues or pull requests.
Foodloop-Server/lib/Pear/LocalLoop/Schema/Result/AgeRange.pm

38 lines
683 B
Perl
Raw Normal View History

2017-02-24 19:27:43 +00:00
package Pear::LocalLoop::Schema::Result::AgeRange;
use strict;
use warnings;
use base 'DBIx::Class::Core';
__PACKAGE__->table("age_ranges");
2017-02-24 19:27:43 +00:00
__PACKAGE__->add_columns(
"id",
2017-02-24 19:27:43 +00:00
{ data_type => "integer", is_auto_increment => 1, is_nullable => 0 },
"string",
2017-02-24 19:27:43 +00:00
{ data_type => "text", is_nullable => 0 },
);
__PACKAGE__->set_primary_key("id");
2017-02-24 19:27:43 +00:00
__PACKAGE__->add_unique_constraint(["string"]);
2017-02-24 19:27:43 +00:00
__PACKAGE__->has_many(
"customers",
"Pear::LocalLoop::Schema::Result::Customer",
{ "foreign.age_range_id" => "self.id" },
2017-02-24 19:27:43 +00:00
{ cascade_copy => 0, cascade_delete => 0 },
);
sub TO_JSON {
my $self = shift;
return {
id => $self->id,
string => $self->string,
};
}
2017-02-24 19:27:43 +00:00
1;