Revision 213317d3
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
SL/IC.pm | ||
---|---|---|
|
||
$main::lxdebug->leave_sub();
|
||
}
|
||
|
||
sub has_storno {
|
||
$main::lxdebug->enter_sub();
|
||
|
||
my ($self, $myconfig, $form) = @_;
|
||
|
||
$main::lxdebug->leave_sub() and return 0 unless ($form->{id});
|
||
|
||
my $dbh = $form->dbconnect($myconfig);
|
||
|
||
my $query = qq|SELECT storno FROM ar WHERE id = ?|;
|
||
my ($result) = selectrow_query($form, $dbh, $query, $form->{id});
|
||
|
||
$dbh->disconnect();
|
||
|
||
$main::lxdebug->leave_sub();
|
||
|
||
return $result;
|
||
}
|
||
|
||
1;
|
bin/mozilla/is.pl | ||
---|---|---|
$form->error($locale->text('Cannot storno storno invoice!'));
|
||
}
|
||
|
||
if (IC->has_storno(\%myconfig, $form)) {
|
||
$form->error($locale->text("Invoice has already been storno'd!"));
|
||
}
|
||
|
||
$form->{storno_id} = $form->{id};
|
||
$form->{storno} = 1;
|
||
$form->{id} = "";
|
locale/de/all | ||
---|---|---|
'Invoice Number' => 'Rechnungsnummer',
|
||
'Invoice Number missing!' => 'Rechnungsnummer fehlt!',
|
||
'Invoice deleted!' => 'Rechnung gel?scht!',
|
||
'Invoice has already been storno\'d!' => 'Diese Rechnung wurde bereits storniert.',
|
||
'Invoices' => 'Rechnungen',
|
||
'Is this a summary account to record' => 'Buchungskonto in',
|
||
'It is possible to do this automatically for some Buchungsgruppen, but not for all.' => 'Es ist möglich, dies für einige, aber nicht für alle Buchungsgruppen automatisch zu erledigen.',
|
locale/de/is | ||
---|---|---|
'Invoice Number' => 'Rechnungsnummer',
|
||
'Invoice Number missing!' => 'Rechnungsnummer fehlt!',
|
||
'Invoice deleted!' => 'Rechnung gel?scht!',
|
||
'Invoice has already been storno\'d!' => 'Diese Rechnung wurde bereits storniert.',
|
||
'Item not on file!' => 'Dieser Artikel ist nicht in der Datenbank!',
|
||
'Jan' => 'Jan',
|
||
'January' => 'Januar',
|
Auch abrufbar als: Unified diff
Das mehrmalige Stornieren von Kundenrechnungen definitiv verhindern.