Revision b59ec969
Von Stephan Köhler vor etwa 19 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
|
|
||
|
map { $form->{"${_}_$i"} = $ref->{$_} } keys %{$ref};
|
||
|
}
|
||
|
|
||
|
for my $i (1 .. $form->{rowcount}) {
|
||
|
$form->{"discount_$i"} =
|
||
|
$form->format_amount(\%myconfig, $form->{"discount_$i"} * 100);
|
||
|
|
||
|
if ($form->{id}) {
|
||
|
$form->{"discount_$i"} =
|
||
|
$form->format_amount(\%myconfig, $form->{"discount_$i"} * 100);
|
||
|
} else {
|
||
|
$form->{"discount_$i"} =
|
||
|
$form->format_amount(\%myconfig, $form->{"discount_$i"});
|
||
|
}
|
||
|
($dec) = ($form->{"sellprice_$i"} =~ /\.(\d+)/);
|
||
|
$dec = length $dec;
|
||
|
$decimalplaces = ($dec > 2) ? $dec : 2;
|
||
| ... | ... | |
|
|
||
|
$form->{"sellprice_$i"} =
|
||
|
$form->format_amount(\%myconfig, $form->{"sellprice_$i"},
|
||
|
$decimalplaces);
|
||
|
$decimalplaces);
|
||
|
|
||
|
(my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
|
||
|
$dec_qty = length $dec_qty;
|
||
| ... | ... | |
|
. $locale->text('Save as new') . qq|">
|
||
|
<input class=submit type=submit name=action value="|
|
||
|
. $locale->text('Delete') . qq|">|;
|
||
|
if ($form->{type} =~ /quotation$/) {
|
||
|
if ($form->{type} =~ /sales_quotation$/) {
|
||
|
print qq|
|
||
|
<input class=submit type=submit name=action value="|
|
||
|
. $locale->text('Order') . qq|">|;
|
||
|
. $locale->text('Sales Order') . qq|">|;
|
||
|
}
|
||
|
if ($form->{type} =~ /request_quotation$/) {
|
||
|
print qq|
|
||
|
<input class=submit type=submit name=action value="|
|
||
|
. $locale->text('Purchase Order') . qq|">|;
|
||
|
}
|
||
|
print qq|
|
||
|
<input class=submit type=submit name=action value="|
|
||
| ... | ... | |
|
sub purchase_order {
|
||
|
$lxdebug->enter_sub();
|
||
|
|
||
|
if ( $form->{type} eq 'sales_quotation'
|
||
|
|| $form->{type} eq 'request_quotation') {
|
||
|
$form->{closed} = 1;
|
||
|
OE->save(\%myconfig, \%$form);
|
||
|
}
|
||
|
|
||
|
($null, $form->{cp_id}) = split /--/, $form->{contact};
|
||
|
$form->{cp_id} *= 1;
|
||
|
|
||
|
$form->{title} = $locale->text('Add Purchase Order');
|
||
|
$form->{vc} = "vendor";
|
||
|
$form->{type} = "purchase_order";
|
||
Auch abrufbar als: Unified diff
Merge von 829,831 aus unstable: Bugfix 270
Rabatt wurde fehlerhaft uebernommen beim Umwandeln von Angebot in Auftrag. Fixes Bug#270
Bei der Umwandlung von Angeboten/Anfragen in Auftraege wurden verschiedene Felder beschnitten/flasch formatiert