Revision 38f76dd9
Von Sven Schöling vor etwa 14 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
|
|
||
|
my $i = 1;
|
||
|
|
||
|
while (($form->{"make_$i"}, $form->{"model_$i"}, $form->{"old_lastcost_$i"},
|
||
|
while (($form->{"make_$i"}, $form->{"model_$i"}, $form->{"old_lastcost_$i"},
|
||
|
$form->{"lastcost_$i"}, $form->{"lastupdate_$i"}, $form->{"sortorder_$i"}) = $sth->fetchrow_array)
|
||
|
{
|
||
|
$i++;
|
||
| ... | ... | |
|
if (($form->{"make_$i"}) || ($form->{"model_$i"})) {
|
||
|
#hli
|
||
|
$value = $form->parse_amount($myconfig, $form->{"lastcost_$i"});
|
||
|
if ($value == $form->{"old_lastcost_$i"})
|
||
|
if ($value == $form->{"old_lastcost_$i"})
|
||
|
{
|
||
|
if ($form->{"lastupdate_$i"} eq "") {
|
||
|
if ($form->{"lastupdate_$i"} eq "") {
|
||
|
$lastupdate = 'now()';
|
||
|
} else {
|
||
|
$lastupdate = $dbh->quote($form->{"lastupdate_$i"});
|
||
Auch abrufbar als: Unified diff
Whitespace.
(Holger, bringt Deinem Editor bitte bei Witespace am Ende von Zeilen automatisch zu löschen)