Revision c4bb14d6
Von G. Richardson vor fast 15 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
| 1688 | 1688 |
check_oe_access(); |
| 1689 | 1689 |
$main::auth->assert('purchase_order_edit');
|
| 1690 | 1690 |
|
| 1691 |
$form->{sales_order_to_purchase_order} = 0;
|
|
| 1691 | 1692 |
if ($form->{type} eq 'sales_order') {
|
| 1693 |
$form->{sales_order_to_purchase_order} = 1;
|
|
| 1692 | 1694 |
check_for_direct_delivery(); |
| 1693 | 1695 |
} |
| 1694 | 1696 |
|
| ... | ... | |
| 1706 | 1708 |
|
| 1707 | 1709 |
&poso; |
| 1708 | 1710 |
|
| 1711 |
delete $form->{sales_order_to_purchase_order};
|
|
| 1712 |
|
|
| 1709 | 1713 |
$main::lxdebug->leave_sub(); |
| 1710 | 1714 |
} |
| 1711 | 1715 |
|
| ... | ... | |
| 1754 | 1758 |
$form->{old_salesman_id} = $form->{salesman_id};
|
| 1755 | 1759 |
|
| 1756 | 1760 |
# reset |
| 1757 |
map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal delivered
|
|
| 1758 |
ordnumber); |
|
| 1761 |
map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal delivered ordnumber);
|
|
| 1762 |
|
|
| 1763 |
# if purchase_order was generated from sales_order, use lastcost_$i as sellprice_$i |
|
| 1764 |
if ( $form->{sales_order_to_purchase_order} ) {
|
|
| 1765 |
for my $i (1 .. $form->{rowcount}) {
|
|
| 1766 |
$form->{"sellprice_${i}"} = $form->parse_amount(\%myconfig, $form->{"lastcost_${i}"});
|
|
| 1767 |
}; |
|
| 1768 |
}; |
|
| 1759 | 1769 |
|
| 1760 | 1770 |
for my $i (1 .. $form->{rowcount}) {
|
| 1761 | 1771 |
map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor discount);
|
Auch abrufbar als: Unified diff
Einkaufspreis bei Einkaufsauftrag aus Verkaufsauftrag
Generiert man im Workflow aus einem Kundenauftrag einen Lieferantenauftrag so sollte als Verkaufspreis nicht der Verkaufspreis aus dem Verkaufsauftrag sondern der Einkaufspreis für die Waren in der Maske gesetzt werden.