Revision f147b6eb
Von Jan Büren vor etwa 14 Jahren hinzugefügt
| SL/CP.pm | ||
|---|---|---|
| 240 | 240 |
qq| (c.link LIKE '%:AP:%')) |; |
| 241 | 241 |
} |
| 242 | 242 |
|
| 243 |
my $paymentamount = $form->{amount};
|
|
| 244 | 243 |
|
| 245 | 244 |
my $null; |
| 246 | 245 |
($null, $form->{department_id}) = split(/--/, $form->{department});
|
| ... | ... | |
| 260 | 259 |
$form->{"due_$i"} = $form->parse_amount($myconfig, $form->{"due_$i"});
|
| 261 | 260 |
|
| 262 | 261 |
if ($form->{"checked_$i"} && $form->{"paid_$i"}) {
|
| 263 |
$paymentamount = (($paymentamount * 1000) - ($form->{"paid_$i"} * 1000)) / 1000;
|
|
| 264 | 262 |
|
| 265 | 263 |
# get exchangerate for original |
| 266 | 264 |
$query = |
| ... | ... | |
| 365 | 363 |
# /saving the history |
| 366 | 364 |
} |
| 367 | 365 |
} |
| 368 |
|
|
| 369 | 366 |
my $rc; |
| 370 |
if ($form->round_amount($paymentamount, 2) < 0) {
|
|
| 371 |
# Hier werden negativen Zahlungseingänge abgefangen |
|
| 372 |
# Besser: in Oberfläche schon prüfen |
|
| 373 |
# Zahlungsein- und ausgänge sind immer positiv |
|
| 374 |
$dbh->rollback; |
|
| 375 |
$rc = 0; |
|
| 376 |
} |
|
| 377 |
if ($form->round_amount($paymentamount, 2) == 0) {
|
|
| 367 |
# Hier wurden negativen Zahlungseingänge abgefangen |
|
| 368 |
# da Zahlungsein- und ausgänge immer positiv sind |
|
| 369 |
# Besser: in Oberfläche schon prüfen erledigt jb 10.2010 |
|
| 378 | 370 |
$rc = $dbh->commit; |
| 379 |
} |
|
| 380 | 371 |
|
| 381 | 372 |
$dbh->disconnect; |
| 382 | 373 |
|
| bin/mozilla/cp.pl | ||
|---|---|---|
| 34 | 34 |
use SL::CP; |
| 35 | 35 |
use SL::IS; |
| 36 | 36 |
use SL::IR; |
| 37 |
|
|
| 38 | 37 |
use strict ("vars", "subs");
|
| 39 | 38 |
#use warnings; |
| 40 | 39 |
|
| ... | ... | |
| 773 | 772 |
&update; |
| 774 | 773 |
::end_of_request(); |
| 775 | 774 |
} |
| 776 |
|
|
| 777 |
$form->error($locale->text('Zero amount posting!')) if !$form->parse_amount(\%myconfig, $form->{amount});
|
|
| 778 | 775 |
$form->error($locale->text('Date missing!')) unless $form->{datepaid};
|
| 776 |
my $selected_check = 1; |
|
| 777 |
for my $i (1 .. $form->{rowcount}) {
|
|
| 778 |
if ($form->{"checked_$i"}) {
|
|
| 779 |
if ($form->parse_amount(\%myconfig, $form->{"paid_$i"}, 2) <= 0) { # negativen Betrag eingegeben
|
|
| 780 |
$form->error($locale->text('No zero or negative values, please! Correct row number:' . $i));
|
|
| 781 |
} |
|
| 782 |
undef($selected_check); |
|
| 783 |
# last; # ich muss doch über alle buchungen laufen, da ich noch |
|
| 784 |
# die freitext-eingabe der werte prüfen will |
|
| 785 |
} |
|
| 786 |
} |
|
| 787 |
$form->error($locale->text('No transaction selected!')) if $selected_check;
|
|
| 779 | 788 |
|
| 780 | 789 |
$closedto = $form->datetonum($form->{closedto}, \%myconfig);
|
| 781 | 790 |
$datepaid = $form->datetonum($form->{datepaid}, \%myconfig);
|
| locale/de/all | ||
|---|---|---|
| 526 | 526 |
'Delivery Order deleted!' => 'Lieferschein gelöscht!', |
| 527 | 527 |
'Delivery Orders' => 'Lieferscheine', |
| 528 | 528 |
'Department' => 'Abteilung', |
| 529 |
'Department Id' => 'Abteilungs Nummer', |
|
| 529 | 530 |
'Department deleted!' => 'Abteilung gel?scht.', |
| 530 | 531 |
'Department saved!' => 'Abteilung gespeichert.', |
| 531 | 532 |
'Departments' => 'Abteilungen', |
| ... | ... | |
| 1067 | 1068 |
'No part was found matching the search parameters.' => 'Es wurde kein Artikel gefunden, auf den die Suchparameter zutreffen.', |
| 1068 | 1069 |
'No prices will be updated because no prices have been entered.' => 'Es werden keine Preise aktualisiert, weil keine g?ltigen Preis?nderungen eingegeben wurden.', |
| 1069 | 1070 |
'No problems were recognized.' => 'Es wurden keine Probleme gefunden.', |
| 1071 |
'No transaction selected!' => 'Keine Transaktion ausgew?hlt', |
|
| 1070 | 1072 |
'No transfers were executed in this export.' => 'In diesem SEPA-Export wurden keine ?berweisungen ausgef?hrt.', |
| 1071 | 1073 |
'No unknown units where found.' => 'Es wurden keine unbekannten Einheiten gefunden.', |
| 1072 | 1074 |
'No user has been selected.' => 'Es wurde kein Benutzer ausgewählt.', |
| 1073 | 1075 |
'No valid number entered for pricegroup "#1".' => 'F?r Preisgruppe "#1" wurde keine g?ltige Nummer eingegeben.', |
| 1074 | 1076 |
'No vendor has been selected yet.' => 'Es wurde noch kein Lieferant ausgew?hlt.', |
| 1075 | 1077 |
'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.', |
| 1078 |
'No zero or negative values, please! Correct row number:' => 'Leere Eingabe oder Werte kleiner, gleich null eingegeben. Fehler in Reihe Nummer: ', |
|
| 1076 | 1079 |
'No.' => 'Position', |
| 1077 | 1080 |
'Non-taxable Purchases' => 'Nicht zu versteuernde Eink?ufe', |
| 1078 | 1081 |
'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