projekt kivitendo

    # $sellprice_value setzt den Wert etwas unabhängiger von der Darstellung.

    # Hintergrund: Preisgruppen werden hier überprüft und neu berechnet.

    # Vorher wurde der ganze cgi->textfield Block zweimal identisch eingebaut, dass passiert

    # jetzt nach der Abfrage.

    my $sellprice_value;

      $sellprice_value           =($form->{"new_pricegroup_$i"} != $form->{"old_pricegroup_$i"})

                                      : $form->format_amount(\%myconfig, $form->{"sellprice_$i"}, $decimalplaces);

      $sellprice_value = $form->format_amount(\%myconfig, $form->{"sellprice_$i"}, $decimalplaces);

    # Falls der Benutzer die Preise nicht anpassen sollte, wird das entsprechende

    # Textfield auf readonly gesetzt. Anm. von Sven: Manipulation der Preise ist

    # immer noch möglich, konsequenterweise sollten diese NUR aus der Datenbank

    # geholt werden.

    my $edit_prices = $main::auth->assert('edit_prices', 1);

    $column_data{sellprice} = (!$edit_prices)

                                ? $cgi->textfield(-readonly => "readonly",

                                                  -name => "sellprice_$i", -size => 10, -onBlur => "check_right_number_format(this)", -value => $sellprice_value)

                                : $cgi->textfield(-name => "sellprice_$i", -size => 10, -onBlur => "check_right_number_format(this)", -value => $sellprice_value);

    $column_data{discount}    = (!$edit_prices)

                                  ? $cgi->textfield(-readonly => "readonly",

                                                    -name => "discount_$i", -size => 3, -value => $form->format_amount(\%myconfig, $form->{"discount_$i"}))

                                  : $cgi->textfield(-name => "discount_$i", -size => 3, -value => $form->format_amount(\%myconfig, $form->{"discount_$i"}));