Revision 2d4412f1
Von Tamino Steinert vor 8 Monaten hinzugefügt
- ID 2d4412f12bae26a760b36c0135407df2a2d60f51
- Vorgänger 000aec50
| bin/mozilla/is.pl | ||
|---|---|---|
|
|
||
|
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
|
||
|
|
||
|
if( $form->{customer_id} && !$form->{taxincluded_changed_by_user} ) {
|
||
|
my $customer = SL::DB::Customer->load_cached($form->{customer_id});
|
||
|
$form->{taxincluded} = defined($customer->taxincluded_checked) ? $customer->taxincluded_checked : $myconfig{taxincluded_checked};
|
||
|
}
|
||
|
$TMPL_VAR{taxincluded} = $form->{taxincluded};
|
||
|
|
||
|
$form->get_lists("taxzones" => ($form->{id} ? "ALL_TAXZONES" : "ALL_ACTIVE_TAXZONES"),
|
||
|
"currencies" => "ALL_CURRENCIES",
|
||
|
"price_factors" => "ALL_PRICE_FACTORS");
|
||
| ... | ... | |
|
my ($tax, $subtotal);
|
||
|
$form->{taxaccounts_array} = [ split(/ /, $form->{taxaccounts}) ];
|
||
|
|
||
|
if( $form->{customer_id} && !$form->{taxincluded_changed_by_user} ) {
|
||
|
my $customer = SL::DB::Customer->load_cached($form->{customer_id});
|
||
|
$form->{taxincluded} = defined($customer->taxincluded_checked) ? $customer->taxincluded_checked : $myconfig{taxincluded_checked};
|
||
|
}
|
||
|
|
||
|
foreach my $item (@{ $form->{taxaccounts_array} }) {
|
||
|
if ($form->{"${item}_base"}) {
|
||
|
if ($form->{taxincluded}) {
|
||
| ... | ... | |
|
my ($recursive_call) = @_;
|
||
|
|
||
|
$form->{print_and_post} = 0 if $form->{second_run};
|
||
|
my $taxincluded = $form->{taxincluded} ? "checked" : '';
|
||
|
$form->{update} = 1;
|
||
|
|
||
|
if (($form->{previous_customer_id} || $form->{customer_id}) != $form->{customer_id}) {
|
||
| ... | ... | |
|
$::form->{billing_address_id} = $::form->{default_billing_address_id};
|
||
|
}
|
||
|
|
||
|
$form->{taxincluded} ||= $taxincluded;
|
||
|
|
||
|
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
|
||
|
if ($form->{defaultcurrency} ne $form->{currency}) {
|
||
|
if ($form->{exchangerate}) { # user input OR first default -> leave this value
|
||
Auch abrufbar als: Unified diff
FIX: 'Steur im Preis inbegiffen' VK-Rechnungen korrekten Wert anzeigen