Revision 510ca0b0
Von Thomas Kasulke vor fast 18 Jahren hinzugefügt
| bin/mozilla/cp.pl | ||
|---|---|---|
|
<td colspan=3><input name=source value="$form->{source}" size=10></td>
|
||
|
</tr>
|
||
|
<tr>
|
||
|
<th align=right nowrap>| . $locale->text('Amount') . qq|</th>
|
||
|
<td colspan=3><input name=amount size=10 value=|
|
||
|
. $form->format_amount(\%myconfig, $form->{amount}, 2) . qq| onBlur=\"check_right_number_format(this)\"></td>
|
||
|
<th align="right" nowrap>| . $locale->text('Amount') . qq|</th>
|
||
|
<td colspan="3"><input name="amount" size="10" value="|
|
||
|
. $form->format_amount(\%myconfig, $form->{amount}, 2) . qq|" onBlur=\"check_right_number_format(this)\"></td>
|
||
|
</tr>
|
||
|
</table>
|
||
|
</td>
|
||
| ... | ... | |
|
|
||
|
$form->{amount} = $form->format_amount(\%myconfig, $form->{amount}, 2);
|
||
|
|
||
|
$form->{decimal} .= "00";
|
||
|
#$form->{decimal} .= "00";
|
||
|
$form->{decimal} = substr($form->{decimal}, 0, 2);
|
||
|
|
||
|
$check = new CP $myconfig{countrycode};
|
||
| ... | ... | |
|
exit;
|
||
|
}
|
||
|
|
||
|
$form->error($locale->text('Zero amount posting!')) if ($form->{amount} eq "0,00" || $form->{amount} eq "0.00");
|
||
|
$form->error($locale->text('Date missing!')) unless $form->{datepaid};
|
||
|
|
||
|
$closedto = $form->datetonum($form->{closedto}, \%myconfig);
|
||
Auch abrufbar als: Unified diff
Nullbuchungen führen ab jetzt zu einem Fehler.