Revision 510ca0b0
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/cp.pl | ||
|---|---|---|
| 306 | 306 |
<td colspan=3><input name=source value="$form->{source}" size=10></td>
|
| 307 | 307 |
</tr> |
| 308 | 308 |
<tr> |
| 309 |
<th align=right nowrap>| . $locale->text('Amount') . qq|</th>
|
|
| 310 |
<td colspan=3><input name=amount size=10 value=|
|
|
| 311 |
. $form->format_amount(\%myconfig, $form->{amount}, 2) . qq| onBlur=\"check_right_number_format(this)\"></td>
|
|
| 309 |
<th align="right" nowrap>| . $locale->text('Amount') . qq|</th>
|
|
| 310 |
<td colspan="3"><input name="amount" size="10" value="|
|
|
| 311 |
. $form->format_amount(\%myconfig, $form->{amount}, 2) . qq|" onBlur=\"check_right_number_format(this)\"></td>
|
|
| 312 | 312 |
</tr> |
| 313 | 313 |
</table> |
| 314 | 314 |
</td> |
| ... | ... | |
| 674 | 674 |
|
| 675 | 675 |
$form->{amount} = $form->format_amount(\%myconfig, $form->{amount}, 2);
|
| 676 | 676 |
|
| 677 |
$form->{decimal} .= "00";
|
|
| 677 |
#$form->{decimal} .= "00";
|
|
| 678 | 678 |
$form->{decimal} = substr($form->{decimal}, 0, 2);
|
| 679 | 679 |
|
| 680 | 680 |
$check = new CP $myconfig{countrycode};
|
| ... | ... | |
| 747 | 747 |
exit; |
| 748 | 748 |
} |
| 749 | 749 |
|
| 750 |
$form->error($locale->text('Zero amount posting!')) if ($form->{amount} eq "0,00" || $form->{amount} eq "0.00");
|
|
| 750 | 751 |
$form->error($locale->text('Date missing!')) unless $form->{datepaid};
|
| 751 | 752 |
|
| 752 | 753 |
$closedto = $form->datetonum($form->{closedto}, \%myconfig);
|
Auch abrufbar als: Unified diff
Nullbuchungen führen ab jetzt zu einem Fehler.