Revision 50305a6d
Von Sven Schöling vor fast 18 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
| 2112 | 2112 |
# these checks only apply if the items don't bring their own ordnumbers/transdates. |
| 2113 | 2113 |
# The if clause ensures that by searching for empty ordnumber_#/transdate_# fields. |
| 2114 | 2114 |
$form->isblank("ordnumber", $locale->text('Order Number missing!'))
|
| 2115 |
if (+{ map { $form->{"ordnumber_$_"}, 1 } (1 .. $form->{rowcount} - 1) }
|
|
| 2116 |
->{''});
|
|
| 2115 |
if (+{ map { $form->{"ordnumber_$_"}, 1 } (1 .. $form->{rowcount} - 1) }->{''});
|
|
| 2117 | 2116 |
$form->isblank("transdate", $locale->text('Order Date missing!'))
|
| 2118 |
if (+{ map { $form->{"transdate_$_"}, 1 } (1 .. $form->{rowcount} - 1) }
|
|
| 2119 |
->{''});
|
|
| 2117 |
if (+{ map { $form->{"transdate_$_"}, 1 } (1 .. $form->{rowcount} - 1) }->{''});
|
|
| 2120 | 2118 |
|
| 2121 | 2119 |
# also copy deliverydate from the order |
| 2122 | 2120 |
$form->{deliverydate} = $form->{reqdate} if $form->{reqdate};
|
Auch abrufbar als: Unified diff
perltidy aenderungen rueckgaengig gemacht, der lesbarkeit zuliebe