Revision 6637a9e9
Von Martin Helmling vor fast 11 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
| 434 | 434 |
$form->{javascript} .= qq|<script type="text/javascript" src="js/show_vc_details.js"></script>|;
|
| 435 | 435 |
|
| 436 | 436 |
$form->header; |
| 437 |
|
|
| 437 |
if ($form->{CFDD_shipto} && $form->{CFDD_shipto_id} ) {
|
|
| 438 |
$form->{shipto_id} = $form->{CFDD_shipto_id};
|
|
| 439 |
} |
|
| 438 | 440 |
$TMPL_VAR{HIDDENS} = [ map { name => $_, value => $form->{$_} },
|
| 439 | 441 |
qw(id action type vc formname media format proforma queued printed emailed |
| 440 | 442 |
title creditlimit creditremaining tradediscount business |
| 441 | 443 |
max_dunning_level dunning_amount shiptoname shiptostreet shiptozipcode |
| 442 |
shiptocity shiptocountry shiptocontact shiptophone shiptofax |
|
| 444 |
CFDD_shipto shipto_id CFDD_shipto_id shiptocity shiptocountry shiptocontact shiptophone shiptofax
|
|
| 443 | 445 |
shiptodepartment_1 shiptodepartment_2 shiptoemail shiptocp_gender |
| 444 | 446 |
message email subject cc bcc taxpart taxservice taxaccounts cursor_fokus |
| 445 | 447 |
show_details), |
| ... | ... | |
| 1670 | 1672 |
delete @{$form}{grep /^shipto/, keys %{ $form }};
|
| 1671 | 1673 |
map { s/^CFDD_//; $form->{$_} = $form->{"CFDD_${_}"} } grep /^CFDD_/, keys %{ $form };
|
| 1672 | 1674 |
$form->{shipto} = 1;
|
| 1675 |
$form->{CFDD_shipto} = 1;
|
|
| 1673 | 1676 |
purchase_order(); |
| 1674 | 1677 |
$main::lxdebug->leave_sub(); |
| 1675 | 1678 |
} |
| ... | ... | |
| 1683 | 1686 |
|
| 1684 | 1687 |
$form->{direct_delivery_checked} = 1;
|
| 1685 | 1688 |
delete @{$form}{grep /^shipto/, keys %{ $form }};
|
| 1689 |
$form->{CFDD_shipto} = 0;
|
|
| 1686 | 1690 |
purchase_order(); |
| 1687 | 1691 |
|
| 1688 | 1692 |
$main::lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Die Lieferadresse des Kunden wird nun bei Lieferantenaufträgen
auch nach Wechsel des Lieferanten als Lieferadresse übernommen : check_for_direct_delivery.
Falls ein Lieferant eine extra Lieferantenadresse besitzt, wird jedoch aus Kompatibilitätsgründen diese Adresse eingesetzt