Revision f147b6eb
Von Jan Büren vor mehr als 14 Jahren hinzugefügt
| SL/CP.pm | ||
|---|---|---|
|
qq| (c.link LIKE '%:AP:%')) |;
|
||
|
}
|
||
|
|
||
|
my $paymentamount = $form->{amount};
|
||
|
|
||
|
my $null;
|
||
|
($null, $form->{department_id}) = split(/--/, $form->{department});
|
||
| ... | ... | |
|
$form->{"due_$i"} = $form->parse_amount($myconfig, $form->{"due_$i"});
|
||
|
|
||
|
if ($form->{"checked_$i"} && $form->{"paid_$i"}) {
|
||
|
$paymentamount = (($paymentamount * 1000) - ($form->{"paid_$i"} * 1000)) / 1000;
|
||
|
|
||
|
# get exchangerate for original
|
||
|
$query =
|
||
| ... | ... | |
|
# /saving the history
|
||
|
}
|
||
|
}
|
||
|
|
||
|
my $rc;
|
||
|
if ($form->round_amount($paymentamount, 2) < 0) {
|
||
|
# Hier werden negativen Zahlungseingänge abgefangen
|
||
|
# Besser: in Oberfläche schon prüfen
|
||
|
# Zahlungsein- und ausgänge sind immer positiv
|
||
|
$dbh->rollback;
|
||
|
$rc = 0;
|
||
|
}
|
||
|
if ($form->round_amount($paymentamount, 2) == 0) {
|
||
|
# Hier wurden negativen Zahlungseingänge abgefangen
|
||
|
# da Zahlungsein- und ausgänge immer positiv sind
|
||
|
# Besser: in Oberfläche schon prüfen erledigt jb 10.2010
|
||
|
$rc = $dbh->commit;
|
||
|
}
|
||
|
|
||
|
$dbh->disconnect;
|
||
|
|
||
| bin/mozilla/cp.pl | ||
|---|---|---|
|
use SL::CP;
|
||
|
use SL::IS;
|
||
|
use SL::IR;
|
||
|
|
||
|
use strict ("vars", "subs");
|
||
|
#use warnings;
|
||
|
|
||
| ... | ... | |
|
&update;
|
||
|
::end_of_request();
|
||
|
}
|
||
|
|
||
|
$form->error($locale->text('Zero amount posting!')) if !$form->parse_amount(\%myconfig, $form->{amount});
|
||
|
$form->error($locale->text('Date missing!')) unless $form->{datepaid};
|
||
|
my $selected_check = 1;
|
||
|
for my $i (1 .. $form->{rowcount}) {
|
||
|
if ($form->{"checked_$i"}) {
|
||
|
if ($form->parse_amount(\%myconfig, $form->{"paid_$i"}, 2) <= 0) { # negativen Betrag eingegeben
|
||
|
$form->error($locale->text('No zero or negative values, please! Correct row number:' . $i));
|
||
|
}
|
||
|
undef($selected_check);
|
||
|
# last; # ich muss doch über alle buchungen laufen, da ich noch
|
||
|
# die freitext-eingabe der werte prüfen will
|
||
|
}
|
||
|
}
|
||
|
$form->error($locale->text('No transaction selected!')) if $selected_check;
|
||
|
|
||
|
$closedto = $form->datetonum($form->{closedto}, \%myconfig);
|
||
|
$datepaid = $form->datetonum($form->{datepaid}, \%myconfig);
|
||
| locale/de/all | ||
|---|---|---|
|
'Delivery Order deleted!' => 'Lieferschein gelöscht!',
|
||
|
'Delivery Orders' => 'Lieferscheine',
|
||
|
'Department' => 'Abteilung',
|
||
|
'Department Id' => 'Abteilungs Nummer',
|
||
|
'Department deleted!' => 'Abteilung gel?scht.',
|
||
|
'Department saved!' => 'Abteilung gespeichert.',
|
||
|
'Departments' => 'Abteilungen',
|
||
| ... | ... | |
|
'No part was found matching the search parameters.' => 'Es wurde kein Artikel gefunden, auf den die Suchparameter zutreffen.',
|
||
|
'No prices will be updated because no prices have been entered.' => 'Es werden keine Preise aktualisiert, weil keine g?ltigen Preis?nderungen eingegeben wurden.',
|
||
|
'No problems were recognized.' => 'Es wurden keine Probleme gefunden.',
|
||
|
'No transaction selected!' => 'Keine Transaktion ausgew?hlt',
|
||
|
'No transfers were executed in this export.' => 'In diesem SEPA-Export wurden keine ?berweisungen ausgef?hrt.',
|
||
|
'No unknown units where found.' => 'Es wurden keine unbekannten Einheiten gefunden.',
|
||
|
'No user has been selected.' => 'Es wurde kein Benutzer ausgewählt.',
|
||
|
'No valid number entered for pricegroup "#1".' => 'F?r Preisgruppe "#1" wurde keine g?ltige Nummer eingegeben.',
|
||
|
'No vendor has been selected yet.' => 'Es wurde noch kein Lieferant ausgew?hlt.',
|
||
|
'No warehouse has been created yet or the quantity of the bins is not configured yet.' => 'Es wurde noch kein Lager angelegt, bzw. die dazugeh?rigen Lagerpl?tze sind noch nicht konfiguriert.',
|
||
|
'No zero or negative values, please! Correct row number:' => 'Leere Eingabe oder Werte kleiner, gleich null eingegeben. Fehler in Reihe Nummer: ',
|
||
|
'No.' => 'Position',
|
||
|
'Non-taxable Purchases' => 'Nicht zu versteuernde Eink?ufe',
|
||
|
'Non-taxable Sales' => 'Nicht zu versteuernde Verk?ufe',
|
||
Auch abrufbar als: Unified diff
Zahlungsein- und ausgänge. Die Prüfung, ob negative oder leere Werte eingetragen wurden vom CP.pm auf cp.pl verlagert. Genauere Fehlermeldung, falls kein Eintrag gewählt wurde. Die Überprüfung auf ->{amount} rausgenommen, sodass man ohne Erneuern direkt nach Auswahl der Überweisung buchen kann. Teilfix für Bug: 1484