Revision 32394d82
Von Moritz Bunkus vor etwa 15 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
197 | 197 |
|
198 | 198 |
# rows |
199 | 199 |
for $i (1 .. $numrows) { |
200 |
my %column_data = (); |
|
200 | 201 |
|
201 | 202 |
# undo formatting |
202 | 203 |
map { $form->{"${_}_$i"} = $form->parse_amount(\%myconfig, $form->{"${_}_$i"}) } qw(qty discount sellprice price_new price_old) unless ($form->{simple_save}); |
Auch abrufbar als: Unified diff
Bei Anzeige der Zeilen keinen Code aus der vorhergehenden Zeile mitschleifen.