Revision 7a21a080
Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt
| SL/DB/RequirementSpecTextBlock.pm | ||
|---|---|---|
| 4 | 4 |
|
| 5 | 5 |
use SL::DB::MetaSetup::RequirementSpecTextBlock; |
| 6 | 6 |
use SL::DB::Manager::RequirementSpecTextBlock; |
| 7 |
# ActsAsList does not support position arguments grouped by other |
|
| 8 |
# columns, e.g. by the requirement_spec_id in this case. So we cannot |
|
| 9 |
# use it yet. |
|
| 10 |
# use SL::DB::Helper::ActsAsList; |
|
| 7 |
use SL::DB::Helper::ActsAsList; |
|
| 11 | 8 |
use SL::Locale::String; |
| 12 | 9 |
|
| 10 |
__PACKAGE__->meta->add_relationships( |
|
| 11 |
requirement_spec => {
|
|
| 12 |
type => 'one to many', |
|
| 13 |
class => 'SL::DB::RequirementSpec', |
|
| 14 |
column_map => { requirement_spec_id => 'id' },
|
|
| 15 |
}, |
|
| 16 |
); |
|
| 17 |
|
|
| 18 |
__PACKAGE__->meta->initialize; |
|
| 19 |
|
|
| 20 |
__PACKAGE__->configure_acts_as_list(group_by => [qw(requirement_spec_id output_position)]); |
|
| 21 |
|
|
| 13 | 22 |
sub validate {
|
| 14 | 23 |
my ($self) = @_; |
| 15 | 24 |
|
Auch abrufbar als: Unified diff
Pflichtenhefttextblöcke: ActsAsList nutzen, Beziehung zum Pflichtenheft