Revision 59adfa36
Von Moritz Bunkus vor fast 8 Jahren hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 45 | 45 |
|
| 46 | 46 |
use SL::DB::Default; |
| 47 | 47 |
use SL::DB::Customer; |
| 48 |
use SL::DB::Invoice; |
|
| 48 | 49 |
use SL::DB::PaymentTerm; |
| 49 | 50 |
|
| 50 | 51 |
require "bin/mozilla/io.pl"; |
| ... | ... | |
| 535 | 536 |
} |
| 536 | 537 |
|
| 537 | 538 |
sub mark_as_paid {
|
| 538 |
$main::lxdebug->enter_sub(); |
|
| 539 |
|
|
| 540 |
my $form = $main::form; |
|
| 541 |
my %myconfig = %main::myconfig; |
|
| 542 |
|
|
| 543 |
$main::auth->assert('invoice_edit');
|
|
| 539 |
$::auth->assert('invoice_edit');
|
|
| 544 | 540 |
|
| 545 |
&mark_as_paid_common(\%myconfig,"ar");
|
|
| 541 |
SL::DB::Invoice->new(id => $::form->{id})->load->mark_as_paid;
|
|
| 546 | 542 |
|
| 547 |
$main::lxdebug->leave_sub();
|
|
| 543 |
$::form->redirect($::locale->text("Marked as paid"));
|
|
| 548 | 544 |
} |
| 549 | 545 |
|
| 550 | 546 |
sub show_draft {
|
Auch abrufbar als: Unified diff
Alle Rechnungen: »als bezahlt markieren« auf neue Funktionen in SL::DB::(Purchase)Invoice umgestellt