Revision d33b65c4
Von mh@waldpark.octosoft.eu vor fast 8 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 794 | 794 |
$main::lxdebug->enter_sub(); |
| 795 | 795 |
|
| 796 | 796 |
my $form = $main::form; |
| 797 |
my %myconfig = %main::myconfig; |
|
| 797 | 798 |
my $locale = $main::locale; |
| 798 | 799 |
|
| 799 | 800 |
$main::auth->assert('vendor_invoice_edit');
|
| 800 | 801 |
|
| 802 |
if ( IR->has_sepaexport(\%myconfig, \%$form) ) {
|
|
| 803 |
$form->error($locale->text('Cannot delete because of existing SEPA Export Items!'));
|
|
| 804 |
} |
|
| 801 | 805 |
$form->header; |
| 802 | 806 |
print qq| |
| 803 | 807 |
<form method=post action=$form->{script}>
|
Auch abrufbar als: Unified diff
Einkaufsrechnungen nicht löschbar wegen SEPA
Abfangen einer Datenbankfehlermeldung falls ein Fremdschlüssel
im sepaexport auf die Rechnung gibt.