You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
109 lines
1.8 KiB
109 lines
1.8 KiB
package NGCP::Schema::Result::carrier_orders;
|
|
use Scalar::Util qw(blessed);
|
|
use parent 'DBIx::Class::Core';
|
|
|
|
our $VERSION = '2.007';
|
|
|
|
__PACKAGE__->load_components("InflateColumn::DateTime", "Helper::Row::ToJSON");
|
|
|
|
__PACKAGE__->table("carrier.orders");
|
|
|
|
__PACKAGE__->add_columns(
|
|
"id",
|
|
{
|
|
data_type => "integer",
|
|
extra => { unsigned => 1 },
|
|
is_auto_increment => 1,
|
|
is_nullable => 0,
|
|
},
|
|
"customer_id",
|
|
{
|
|
data_type => "integer",
|
|
extra => { unsigned => 1 },
|
|
is_foreign_key => 1,
|
|
is_nullable => 0,
|
|
},
|
|
);
|
|
|
|
__PACKAGE__->set_primary_key("id");
|
|
|
|
__PACKAGE__->belongs_to(
|
|
"customer",
|
|
"NGCP::Schema::Result::carrier_customers",
|
|
{ id => "customer_id" },
|
|
{ is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
|
|
);
|
|
|
|
__PACKAGE__->has_many(
|
|
"carrier_payments",
|
|
"NGCP::Schema::Result::carrier_payments",
|
|
{ "foreign.order_id" => "self.id" },
|
|
{ cascade_copy => 0, cascade_delete => 0 },
|
|
);
|
|
|
|
sub TO_JSON {
|
|
my ($self) = @_;
|
|
return {
|
|
map { blessed($_) && $_->isa('DateTime') ? $_->datetime : $_ } %{ $self->next::method }
|
|
};
|
|
}
|
|
|
|
1;
|
|
__END__
|
|
|
|
=encoding UTF-8
|
|
|
|
=head1 NAME
|
|
|
|
NGCP::Schema::Result::carrier_orders
|
|
|
|
=head1 COMPONENTS LOADED
|
|
|
|
=over 4
|
|
|
|
=item * L<DBIx::Class::InflateColumn::DateTime>
|
|
|
|
=item * L<DBIx::Class::Helper::Row::ToJSON>
|
|
|
|
=back
|
|
|
|
=head1 TABLE: C<carrier.orders>
|
|
|
|
=head1 ACCESSORS
|
|
|
|
=head2 id
|
|
|
|
data_type: 'integer'
|
|
extra: {unsigned => 1}
|
|
is_auto_increment: 1
|
|
is_nullable: 0
|
|
|
|
=head2 customer_id
|
|
|
|
data_type: 'integer'
|
|
extra: {unsigned => 1}
|
|
is_foreign_key: 1
|
|
is_nullable: 0
|
|
|
|
=head1 PRIMARY KEY
|
|
|
|
=over 4
|
|
|
|
=item * L</id>
|
|
|
|
=back
|
|
|
|
=head1 RELATIONS
|
|
|
|
=head2 customer
|
|
|
|
Type: belongs_to
|
|
|
|
Related object: L<NGCP::Schema::Result::carrier_customers>
|
|
|
|
=head2 carrier_payments
|
|
|
|
Type: has_many
|
|
|
|
Related object: L<NGCP::Schema::Result::carrier_payments>
|