+
+ # use an other input number format than output numberformat
+ # look at Form.pm, sub parse_amount
+ my $ in_numberformat = '';
+ $text1 = qq|value="0">| . $locale->text('equal Outputformat');
+ $text2 = qq|value="1">| . $locale->text('1000,00 or 1000.00');
+ @in_nf = ($text1, $text2);
+ foreach $item ( @in_nf ) {
+ $in_numberformat .=
+ ( substr($item, 7, 1) eq $myconfig{in_numberformat})
+ ? "<option selected $item\n"
+ : "<option $item\n";
+ }
+