397d13a300
This gives us a place to put helper functions that act on entire tables, not just individual records. This should be a backwards compatible change, except in places we're manually using result class names.
158 lines
2.5 KiB
Perl
158 lines
2.5 KiB
Perl
use utf8;
|
|
package Hydra::Schema::Result::JobsetInputs;
|
|
|
|
# Created by DBIx::Class::Schema::Loader
|
|
# DO NOT MODIFY THE FIRST PART OF THIS FILE
|
|
|
|
=head1 NAME
|
|
|
|
Hydra::Schema::Result::JobsetInputs
|
|
|
|
=cut
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use base 'DBIx::Class::Core';
|
|
|
|
=head1 COMPONENTS LOADED
|
|
|
|
=over 4
|
|
|
|
=item * L<Hydra::Component::ToJSON>
|
|
|
|
=back
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->load_components("+Hydra::Component::ToJSON");
|
|
|
|
=head1 TABLE: C<jobsetinputs>
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->table("jobsetinputs");
|
|
|
|
=head1 ACCESSORS
|
|
|
|
=head2 project
|
|
|
|
data_type: 'text'
|
|
is_foreign_key: 1
|
|
is_nullable: 0
|
|
|
|
=head2 jobset
|
|
|
|
data_type: 'text'
|
|
is_foreign_key: 1
|
|
is_nullable: 0
|
|
|
|
=head2 name
|
|
|
|
data_type: 'text'
|
|
is_nullable: 0
|
|
|
|
=head2 type
|
|
|
|
data_type: 'text'
|
|
is_nullable: 0
|
|
|
|
=head2 emailresponsible
|
|
|
|
data_type: 'integer'
|
|
default_value: 0
|
|
is_nullable: 0
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->add_columns(
|
|
"project",
|
|
{ data_type => "text", is_foreign_key => 1, is_nullable => 0 },
|
|
"jobset",
|
|
{ data_type => "text", is_foreign_key => 1, is_nullable => 0 },
|
|
"name",
|
|
{ data_type => "text", is_nullable => 0 },
|
|
"type",
|
|
{ data_type => "text", is_nullable => 0 },
|
|
"emailresponsible",
|
|
{ data_type => "integer", default_value => 0, is_nullable => 0 },
|
|
);
|
|
|
|
=head1 PRIMARY KEY
|
|
|
|
=over 4
|
|
|
|
=item * L</project>
|
|
|
|
=item * L</jobset>
|
|
|
|
=item * L</name>
|
|
|
|
=back
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->set_primary_key("project", "jobset", "name");
|
|
|
|
=head1 RELATIONS
|
|
|
|
=head2 jobset
|
|
|
|
Type: belongs_to
|
|
|
|
Related object: L<Hydra::Schema::Result::Jobsets>
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->belongs_to(
|
|
"jobset",
|
|
"Hydra::Schema::Result::Jobsets",
|
|
{ name => "jobset", project => "project" },
|
|
{ is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
|
|
);
|
|
|
|
=head2 jobsetinputalts
|
|
|
|
Type: has_many
|
|
|
|
Related object: L<Hydra::Schema::Result::JobsetInputAlts>
|
|
|
|
=cut
|
|
|
|
__PACKAGE__->has_many(
|
|
"jobsetinputalts",
|
|
"Hydra::Schema::Result::JobsetInputAlts",
|
|
{
|
|
"foreign.input" => "self.name",
|
|
"foreign.jobset" => "self.jobset",
|
|
"foreign.project" => "self.project",
|
|
},
|
|
undef,
|
|
);
|
|
|
|
|
|
# Created by DBIx::Class::Schema::Loader v0.07049 @ 2021-08-26 12:02:36
|
|
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:CkU+hbVTmhfOzQhkHJHCsg
|
|
|
|
use JSON;
|
|
|
|
sub as_json {
|
|
my $self = shift;
|
|
|
|
my ($input) = $self->jobsetinputalts;
|
|
|
|
my %json = (
|
|
# string_columns
|
|
"name" => $self->get_column("name") // "",
|
|
"type" => $self->get_column("type") // "",
|
|
"value" => $input->value // "",
|
|
|
|
# boolean_columns
|
|
"emailresponsible" => $self->get_column("emailresponsible") ? JSON::true : JSON::false,
|
|
);
|
|
|
|
return \%json;
|
|
}
|
|
|
|
1;
|