Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision e44cbe16

Von Stephan Köhler vor fast 19 Jahren hinzugefügt

  • ID e44cbe168d7cdaedc952a23102d8c834bd3a2993
  • Vorgänger bf10f313
  • Nachfolger 0bb0eb67

Merge von 639,640 aus unstable: Rundungsfehler nach erneuern
-Bugfix: Angebot (Auch bei Rechnung): Menge mit Kommastelle, z.B 6,876, beim
Erneuern wird die Menge gerundet und ohne Nachkommastelle angezeigt. In
der Vorgaengerversion ging das noch. Der Positions-Preis wird korrekt
berechnet, nur die Anzeige der Menge scheint das Problem zu sein
-Bugfix: svn 639 - Auch die entsprechenden Buchungen sind falsch gewesen.
Angepasst für Verkauf: Rechnungen, Aufträge, Angebote und
Einkauf: Einkaufsrechnung, Lieferantenauftrag, Preisanfrage.

Unterschiede anzeigen:

bin/mozilla/oe.pl
215 215
      $form->{"sellprice_$i"} =
216 216
        $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
217 217
                             $decimalplaces);
218
      $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"});
218

  
219
      (my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
220
      $dec_qty      = length $dec_qty;
221

  
222
      $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
219 223

  
220 224
      map { $form->{"${_}_$i"} =~ s/\"/"/g }
221 225
        qw(partnumber description unit);
......
233 237
      $form->{"sellprice_$i"} =
234 238
        $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
235 239
                             $decimalplaces);
236
      $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"});
240
      
241
      (my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
242
      $dec_qty      = length $dec_qty;
243
      $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
237 244

  
238 245
      map { $form->{"${_}_$i"} =~ s/\"/"/g }
239 246
        qw(partnumber description unit);
......
973 980
          $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
974 981
                               $decimalplaces);
975 982
        $form->{"qty_$i"} =
976
          $form->format_amount(\%myconfig, $form->{"qty_$i"});
983
          $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
977 984

  
978 985
        # get pricegroups for parts
979 986
        IS->get_pricegroups_for_parts(\%myconfig, \%$form);
......
1857 1864
    $form->{"sellprice_$i"} =
1858 1865
      $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
1859 1866
                           $decimalplaces);
1860
    $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"});
1867
    
1868
    (my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
1869
      $dec_qty      = length $dec_qty;
1870
    $form->{"qty_$i"} = $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
1861 1871

  
1862 1872
    map { $form->{"${_}_$i"} =~ s/\"/"/g }
1863 1873
      qw(partnumber description unit);
......
2356 2366
      qq|<td>$description<input type=hidden name="description_$i" value="$form->{"description_$i"}"></td>|;
2357 2367
    $column_data{qty} =
2358 2368
        qq|<td align=right>|
2359
      . $form->format_amount(\%myconfig, $form->{"qty_$i"})
2369
      . $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty)
2360 2370
      . qq|<input type=hidden name="qty_$i" value="$form->{"qty_$i"}"></td>|;
2361 2371
    $column_data{ship} =
2362 2372
        qq|<td align=right><input name="ship_$i" size=5 value=|
......
2667 2677
      qq|<td><input type=hidden name="warehouse_id_$i" value=$ref->{warehouse_id}>$ref->{warehouse}&nbsp;</td>|;
2668 2678
    $column_data{qty} =
2669 2679
        qq|<td><input type=hidden name="qty_$i" value=$ref->{qty}>|
2670
      . $form->format_amount(\%myconfig, $ref->{qty})
2680
      . $form->format_amount(\%myconfig, $ref->{qty}, $dec_qty)
2671 2681
      . qq|</td>|;
2672 2682
    $column_data{transfer} = qq|<td><input name="transfer_$i" size=4></td>|;
2673 2683

  

Auch abrufbar als: Unified diff