Revision 59adfa36
Von Moritz Bunkus vor fast 8 Jahren hinzugefügt
| bin/mozilla/ar.pl | ||
|---|---|---|
| 443 | 443 |
} |
| 444 | 444 |
|
| 445 | 445 |
sub mark_as_paid {
|
| 446 |
$main::lxdebug->enter_sub();
|
|
| 446 |
$::auth->assert('ar_transactions');
|
|
| 447 | 447 |
|
| 448 |
$main::auth->assert('ar_transactions');
|
|
| 448 |
SL::DB::Invoice->new(id => $::form->{id})->load->mark_as_paid;
|
|
| 449 | 449 |
|
| 450 |
my $form = $main::form; |
|
| 451 |
my %myconfig = %main::myconfig; |
|
| 452 |
|
|
| 453 |
&mark_as_paid_common(\%myconfig,"ar"); |
|
| 454 |
|
|
| 455 |
$main::lxdebug->leave_sub(); |
|
| 450 |
$::form->redirect($::locale->text("Marked as paid"));
|
|
| 456 | 451 |
} |
| 457 | 452 |
|
| 458 | 453 |
sub show_draft {
|
Auch abrufbar als: Unified diff
Alle Rechnungen: »als bezahlt markieren« auf neue Funktionen in SL::DB::(Purchase)Invoice umgestellt