Revision f147b6eb
Von Jan Büren vor etwa 14 Jahren hinzugefügt
| 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);
|
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