package NGCP::Schema::Result::xmlhostgroups; use Scalar::Util qw(blessed); use parent 'DBIx::Class::Core'; our $VERSION = '2.007'; __PACKAGE__->load_components("InflateColumn::DateTime", "Helper::Row::ToJSON"); __PACKAGE__->table("provisioning.xmlhostgroups"); __PACKAGE__->add_columns( "id", { data_type => "integer", extra => { unsigned => 1 }, is_auto_increment => 1, is_nullable => 0, }, "group_id", { data_type => "integer", extra => { unsigned => 1 }, is_foreign_key => 1, is_nullable => 0, }, "host_id", { data_type => "integer", extra => { unsigned => 1 }, is_foreign_key => 1, is_nullable => 0, }, ); __PACKAGE__->set_primary_key("id"); __PACKAGE__->belongs_to( "group", "NGCP::Schema::Result::xmlgroups", { id => "group_id" }, { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" }, ); __PACKAGE__->belongs_to( "host", "NGCP::Schema::Result::xmlhosts", { id => "host_id" }, { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" }, ); sub TO_JSON { my ($self) = @_; return { map { blessed($_) && $_->isa('DateTime') ? $_->datetime : $_ } %{ $self->next::method } }; } 1; __END__ =encoding UTF-8 =head1 NAME NGCP::Schema::Result::xmlhostgroups =head1 COMPONENTS LOADED =over 4 =item * L =item * L =back =head1 TABLE: C =head1 ACCESSORS =head2 id data_type: 'integer' extra: {unsigned => 1} is_auto_increment: 1 is_nullable: 0 =head2 group_id data_type: 'integer' extra: {unsigned => 1} is_foreign_key: 1 is_nullable: 0 =head2 host_id data_type: 'integer' extra: {unsigned => 1} is_foreign_key: 1 is_nullable: 0 =head1 PRIMARY KEY =over 4 =item * L =back =head1 RELATIONS =head2 group Type: belongs_to Related object: L =head2 host Type: belongs_to Related object: L