Arh/Model/Unit.pm

use strict;
use warnings;

package Arh::Model::Unit;
use Jifty::DBI::Schema;

use Data::Dump qw/dump/;

use Arh::Record schema {

        column name =>
                type is 'text',
                label is _("Name"),
                is mandatory;
        
        column number =>
                type is 'text',
                label is _("Number"),
                is mandatory;

        column campaign =>
                label is _("Part of campaign"),
                refers_to Arh::Model::Campaign,
                is mandatory,
                since '0.0.9';

        column dimensions =>
                label is _("Dimensions"),
                hit is _("Separate values with ; (semicolumn)"),
                type is 'text';
        
        column position =>
                label is _("Place of discovery"),
                type is 'text';

        column description =>
                label is _("Description"),
                render as 'textarea';

        column chronology =>
                label is _("Chronology"),
                refers_to Arh::Model::Chronology,
                since '0.0.2';

        column location =>
                label is _("Current location"),
                refers_to Arh::Model::Location;

};

#use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on

# Your model-specific methods go here.

sub material {
        my $self = shift;
        my $m = Arh::Model::UnitMaterialCollection->new;
        $m->limit( column => 'unit', value => $self->id );
        return $m;
}

use Arh::DefaultACL;

1;

1	use strict;
2	use warnings;
3
4	package Arh::Model::Unit;
5	use Jifty::DBI::Schema;
6
7	use Data::Dump qw/dump/;
8
9	use Arh::Record schema {
10
11	column name =>
12	type is 'text',
13	label is _("Name"),
14	is mandatory;
15
16	column number =>
17	type is 'text',
18	label is _("Number"),
19	is mandatory;
20
21	column campaign =>
22	label is _("Part of campaign"),
23	refers_to Arh::Model::Campaign,
24	is mandatory,
25	since '0.0.9';
26
27	column dimensions =>
28	label is _("Dimensions"),
29	hit is _("Separate values with ; (semicolumn)"),
30	type is 'text';
31
32	column position =>
33	label is _("Place of discovery"),
34	type is 'text';
35
36	column description =>
37	label is _("Description"),
38	render as 'textarea';
39
40	column chronology =>
41	label is _("Chronology"),
42	refers_to Arh::Model::Chronology,
43	since '0.0.2';
44
45	column location =>
46	label is _("Current location"),
47	refers_to Arh::Model::Location;
48
49	};
50
51	#use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on
52
53	# Your model-specific methods go here.
54
55	sub material {
56	my $self = shift;
57	my $m = Arh::Model::UnitMaterialCollection->new;
58	$m->limit( column => 'unit', value => $self->id );
59	return $m;
60	}
61
62	use Arh::DefaultACL;
63
64	1;
65