Revision f4cf3038
Von Moritz Bunkus vor etwa 16 Jahren hinzugefügt
bin/mozilla/oe.pl | ||
---|---|---|
333 | 333 |
# business |
334 | 334 |
$TMPL_VAR{business_label} = ($form->{vc} eq "customer" ? $locale->text('Customer type') : $locale->text('Vendor type')); |
335 | 335 |
|
336 |
push @custom_hiddens, "ordnumber" if $form->{type} =~ /_quotation$/; |
|
337 | 336 |
push @custom_hiddens, "customer_klass" if $form->{vc} eq 'customer'; |
338 | 337 |
|
339 | 338 |
$credittext = $locale->text('Credit Limit exceeded!!!'); |
... | ... | |
1795 | 1794 |
$form->{old_salesman_id} = $form->{salesman_id}; |
1796 | 1795 |
|
1797 | 1796 |
# reset |
1798 |
map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal delivered); |
|
1797 |
map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal delivered |
|
1798 |
ordnumber); |
|
1799 | 1799 |
|
1800 | 1800 |
for $i (1 .. $form->{rowcount}) { |
1801 | 1801 |
map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor); |
Auch abrufbar als: Unified diff
Beim Umwandeln in Aufträge die Auftragsnummer auf keinen Fall vorbelegt lassen.