Revision 2f6a11fb
Von Bernd Bleßmann vor etwa 10 Jahren hinzugefügt
SL/Controller/Buchungsgruppen.pm | ||
---|---|---|
89 | 89 |
# constraint, if Buchungsgruppe is connected to a part |
90 | 90 |
|
91 | 91 |
my $db = $self->{config}->db; |
92 |
$db->do_transaction(sub {
|
|
92 |
$db->do_transaction(sub { |
|
93 | 93 |
my $taxzone_charts = SL::DB::Manager::TaxzoneChart->get_all(where => [ buchungsgruppen_id => $self->config->id ]); |
94 | 94 |
foreach my $taxzonechart ( @{$taxzone_charts} ) { $taxzonechart->delete }; |
95 | 95 |
$self->config->delete(); |
Auch abrufbar als: Unified diff
trailing whitespaces entfernt