-package SL::Controller::Order;
+package SL::Controller::DeliveryOrder;
use strict;
use parent qw(SL::Controller::Base);
# safety
__PACKAGE__->run_before('check_auth');
-__PACKAGE__->run_before('recalc',
- only => [ qw(save save_as_new save_and_delivery_order save_and_invoice save_and_ap_transaction
- print send_email) ]);
-
__PACKAGE__->run_before('get_unalterable_data',
only => [ qw(save save_as_new save_and_delivery_order save_and_invoice save_and_ap_transaction
print send_email) ]);
$self->pre_render();
$self->render(
- 'order/form',
+ 'delivery_order/form',
title => $self->get_title_for('add'),
%{$self->{template_args}}
);
$_->{render_second_row} = 1 for @{ $self->order->items_sorted };
}
- $self->recalc();
$self->pre_render();
$self->render(
- 'order/form',
+ 'delivery_order/form',
title => $self->get_title_for('edit'),
%{$self->{template_args}}
);
# fall back to save as new if only one id is given
if (scalar @multi_ids == 1) {
- $self->order(SL::DB::Order->new(id => $multi_ids[0])->load);
+ $self->order(SL::DB::DeliveryOrder->new(id => $multi_ids[0])->load);
$self->action_save_as_new();
return;
}
# make new order from given orders
- my @multi_orders = map { SL::DB::Order->new(id => $_)->load } @multi_ids;
+ my @multi_orders = map { SL::DB::DeliveryOrder->new(id => $_)->load } @multi_ids;
$self->{converted_from_oe_id} = join ' ', map { $_->id } @multi_orders;
- $self->order(SL::DB::Order->new_from_multi(\@multi_orders, sort_sources_by => 'transdate'));
+ $self->order(SL::DB::DeliveryOrder->new_from_multi(\@multi_orders, sort_sources_by => 'transdate'));
$self->action_edit();
}
}
# load order from db to check if values changed
- my $saved_order = SL::DB::Order->new(id => $order->id)->load;
+ my $saved_order = SL::DB::DeliveryOrder->new(id => $order->id)->load;
my %new_attrs;
# Lets assign a new number if the user hasn't changed the previous one.
$new_attrs{employee} = SL::DB::Manager::Employee->current;
# Create new record from current one
- $self->order(SL::DB::Order->new_from($order, destination_type => $order->type, attributes => \%new_attrs));
+ $self->order(SL::DB::DeliveryOrder->new_from($order, destination_type => $order->type, attributes => \%new_attrs));
# no linked records on save as new
delete $::form->{$_} for qw(converted_from_oe_id converted_from_orderitems_ids);
$self->redirect_to(@redirect_params);
}
-# open the periodic invoices config dialog
-#
-# If there are values in the form (i.e. dialog was opened before),
-# then use this values. Create new ones, else.
-sub action_show_periodic_invoices_config_dialog {
- my ($self) = @_;
-
- my $config = make_periodic_invoices_config_from_yaml(delete $::form->{config});
- $config ||= SL::DB::Manager::PeriodicInvoicesConfig->find_by(oe_id => $::form->{id}) if $::form->{id};
- $config ||= SL::DB::PeriodicInvoicesConfig->new(periodicity => 'm',
- order_value_periodicity => 'p', # = same as periodicity
- start_date_as_date => $::form->{transdate_as_date} || $::form->current_date,
- extend_automatically_by => 12,
- active => 1,
- email_subject => GenericTranslations->get(
- language_id => $::form->{language_id},
- translation_type =>"preset_text_periodic_invoices_email_subject"),
- email_body => GenericTranslations->get(
- language_id => $::form->{language_id},
- translation_type =>"preset_text_periodic_invoices_email_body"),
- );
- $config->periodicity('m') if none { $_ eq $config->periodicity } @SL::DB::PeriodicInvoicesConfig::PERIODICITIES;
- $config->order_value_periodicity('p') if none { $_ eq $config->order_value_periodicity } ('p', @SL::DB::PeriodicInvoicesConfig::ORDER_VALUE_PERIODICITIES);
-
- $::form->get_lists(printers => "ALL_PRINTERS",
- charts => { key => 'ALL_CHARTS',
- transdate => 'current_date' });
-
- $::form->{AR} = [ grep { $_->{link} =~ m/(?:^|:)AR(?::|$)/ } @{ $::form->{ALL_CHARTS} } ];
-
- if ($::form->{customer_id}) {
- $::form->{ALL_CONTACTS} = SL::DB::Manager::Contact->get_all_sorted(where => [ cp_cv_id => $::form->{customer_id} ]);
- my $customer_object = SL::DB::Manager::Customer->find_by(id => $::form->{customer_id});
- $::form->{postal_invoice} = $customer_object->postal_invoice;
- $::form->{email_recipient_invoice_address} = $::form->{postal_invoice} ? '' : $customer_object->invoice_mail;
- $config->send_email(0) if $::form->{postal_invoice};
- }
-
- $self->render('oe/edit_periodic_invoices_config', { layout => 0 },
- popup_dialog => 1,
- popup_js_close_function => 'kivi.Order.close_periodic_invoices_config_dialog()',
- popup_js_assign_function => 'kivi.Order.assign_periodic_invoices_config()',
- config => $config,
- %$::form);
-}
-
-# assign the values of the periodic invoices config dialog
-# as yaml in the hidden tag and set the status.
-sub action_assign_periodic_invoices_config {
- my ($self) = @_;
-
- $::form->isblank('start_date_as_date', $::locale->text('The start date is missing.'));
-
- my $config = { active => $::form->{active} ? 1 : 0,
- terminated => $::form->{terminated} ? 1 : 0,
- direct_debit => $::form->{direct_debit} ? 1 : 0,
- periodicity => (any { $_ eq $::form->{periodicity} } @SL::DB::PeriodicInvoicesConfig::PERIODICITIES) ? $::form->{periodicity} : 'm',
- order_value_periodicity => (any { $_ eq $::form->{order_value_periodicity} } ('p', @SL::DB::PeriodicInvoicesConfig::ORDER_VALUE_PERIODICITIES)) ? $::form->{order_value_periodicity} : 'p',
- start_date_as_date => $::form->{start_date_as_date},
- end_date_as_date => $::form->{end_date_as_date},
- first_billing_date_as_date => $::form->{first_billing_date_as_date},
- print => $::form->{print} ? 1 : 0,
- printer_id => $::form->{print} ? $::form->{printer_id} * 1 : undef,
- copies => $::form->{copies} * 1 ? $::form->{copies} : 1,
- extend_automatically_by => $::form->{extend_automatically_by} * 1 || undef,
- ar_chart_id => $::form->{ar_chart_id} * 1,
- send_email => $::form->{send_email} ? 1 : 0,
- email_recipient_contact_id => $::form->{email_recipient_contact_id} * 1 || undef,
- email_recipient_address => $::form->{email_recipient_address},
- email_sender => $::form->{email_sender},
- email_subject => $::form->{email_subject},
- email_body => $::form->{email_body},
- };
-
- my $periodic_invoices_config = SL::YAML::Dump($config);
-
- my $status = $self->get_periodic_invoices_status($config);
-
- $self->js
- ->remove('#order_periodic_invoices_config')
- ->insertAfter(hidden_tag('order.periodic_invoices_config', $periodic_invoices_config), '#periodic_invoices_status')
- ->run('kivi.Order.close_periodic_invoices_config_dialog')
- ->html('#periodic_invoices_status', $status)
- ->flash('info', t8('The periodic invoices config has been assigned.'))
- ->render($self);
-}
-
-sub action_get_has_active_periodic_invoices {
- my ($self) = @_;
-
- my $config = make_periodic_invoices_config_from_yaml(delete $::form->{config});
- $config ||= SL::DB::Manager::PeriodicInvoicesConfig->find_by(oe_id => $::form->{id}) if $::form->{id};
-
- my $has_active_periodic_invoices =
- $self->type eq sales_order_type()
- && $config
- && $config->active
- && (!$config->end_date || ($config->end_date > DateTime->today_local))
- && $config->get_previous_billed_period_start_date;
-
- $_[0]->render(\ !!$has_active_periodic_invoices, { type => 'text' });
-}
-
# save the order and redirect to the frontend subroutine for a new
# delivery order
sub action_save_and_delivery_order {
my ($self) = @_;
setup_order_from_cv($self->order);
- $self->recalc();
my $cv_method = $self->cv;
->focus( '#order_' . $self->cv . '_id')
->run('kivi.Order.update_exchangerate');
- $self->js_redisplay_amounts_and_taxes;
$self->js_redisplay_cvpartnumbers;
$self->js->render();
}
my $old_unit_obj = SL::DB::Unit->new(name => $::form->{old_unit})->load;
$item->sellprice($item->unit_obj->convert_to($item->sellprice, $old_unit_obj));
- $self->recalc();
-
$self->js
->run('kivi.Order.update_sellprice', $::form->{item_id}, $item->sellprice_as_number);
$self->js_redisplay_line_values;
- $self->js_redisplay_amounts_and_taxes;
$self->js->render();
}
$self->order->add_items($item);
- $self->recalc();
-
$self->get_item_cvpartnumber($item);
my $item_id = join('_', 'new', Time::HiRes::gettimeofday(), int rand 1000000000000);
- my $row_as_html = $self->p->render('order/tabs/_row',
+ my $row_as_html = $self->p->render('delivery_order/tabs/_row',
ITEM => $item,
ID => $item_id,
SELF => $self,
$item->discount(1) unless $assortment_item->charge;
$self->order->add_items( $item );
- $self->recalc();
$self->get_item_cvpartnumber($item);
my $item_id = join('_', 'new', Time::HiRes::gettimeofday(), int rand 1000000000000);
- my $row_as_html = $self->p->render('order/tabs/_row',
+ my $row_as_html = $self->p->render('delivery_order/tabs/_row',
ITEM => $item,
ID => $item_id,
SELF => $self,
$self->js->run('kivi.Order.row_table_scroll_down') if !$::form->{insert_before_item_id};
- $self->js_redisplay_amounts_and_taxes;
$self->js->render();
}
}
$self->order->add_items(@items);
- $self->recalc();
-
foreach my $item (@items) {
$self->get_item_cvpartnumber($item);
my $item_id = join('_', 'new', Time::HiRes::gettimeofday(), int rand 1000000000000);
- my $row_as_html = $self->p->render('order/tabs/_row',
+ my $row_as_html = $self->p->render('delivery_order/tabs/_row',
ITEM => $item,
ID => $item_id,
SELF => $self,
$self->js->run('kivi.Order.row_table_scroll_down') if !$::form->{insert_before_item_id};
- $self->js_redisplay_amounts_and_taxes;
- $self->js->render();
-}
-
-# recalculate all linetotals, amounts and taxes and redisplay them
-sub action_recalc_amounts_and_taxes {
- my ($self) = @_;
-
- $self->recalc();
-
- $self->js_redisplay_line_values;
- $self->js_redisplay_amounts_and_taxes;
$self->js->render();
}
my $data = {
is_standard => $self->order->currency_id == $::instance_conf->get_currency_id,
currency_name => $self->order->currency->name,
- exchangerate => $self->order->daily_exchangerate_as_null_number,
};
$self->render(\SL::JSON::to_json($data), { type => 'json', process => 0 });
$item->{new_fake_id} = join('_', 'new', Time::HiRes::gettimeofday(), int rand 1000000000000);
}
- $self->recalc();
$self->get_unalterable_data();
$self->pre_render();
$_->{render_longdescription} = 1 for @{ $self->order->items_sorted };
$self->render(
- 'order/form',
+ 'delivery_order/form',
title => $self->get_title_for('edit'),
%{$self->{template_args}}
);
sub action_load_second_rows {
my ($self) = @_;
- $self->recalc() if $self->order->is_sales; # for margin calculation
-
foreach my $item_id (@{ $::form->{item_ids} }) {
my $idx = first_index { $_ eq $item_id } @{ $::form->{orderitem_ids} };
my $item = $self->order->items_sorted->[$idx];
}
}
- $self->recalc();
$self->js_redisplay_line_values;
- $self->js_redisplay_amounts_and_taxes;
$self->js->render();
}
$item->parse_custom_variable_values;
}
- my $row_as_html = $self->p->render('order/tabs/_second_row', ITEM => $item, TYPE => $self->type);
+ my $row_as_html = $self->p->render('delivery_order/tabs/_second_row', ITEM => $item, TYPE => $self->type);
$self->js
->html('#second_row_' . $item_id, $row_as_html)
->run('kivi.Order.redisplay_line_values', $is_sales, \@data);
}
-sub js_redisplay_amounts_and_taxes {
- my ($self) = @_;
-
- if (scalar @{ $self->{taxes} }) {
- $self->js->show('#taxincluded_row_id');
- } else {
- $self->js->hide('#taxincluded_row_id');
- }
-
- if ($self->order->taxincluded) {
- $self->js->hide('#subtotal_row_id');
- } else {
- $self->js->show('#subtotal_row_id');
- }
-
- if ($self->order->is_sales) {
- my $is_neg = $self->order->marge_total < 0;
- $self->js
- ->html('#marge_total_id', $::form->format_amount(\%::myconfig, $self->order->marge_total, 2))
- ->html('#marge_percent_id', $::form->format_amount(\%::myconfig, $self->order->marge_percent, 2))
- ->action_if( $is_neg, 'addClass', '#marge_total_id', 'plus0')
- ->action_if( $is_neg, 'addClass', '#marge_percent_id', 'plus0')
- ->action_if( $is_neg, 'addClass', '#marge_percent_sign_id', 'plus0')
- ->action_if(!$is_neg, 'removeClass', '#marge_total_id', 'plus0')
- ->action_if(!$is_neg, 'removeClass', '#marge_percent_id', 'plus0')
- ->action_if(!$is_neg, 'removeClass', '#marge_percent_sign_id', 'plus0');
- }
-
- $self->js
- ->html('#netamount_id', $::form->format_amount(\%::myconfig, $self->order->netamount, -2))
- ->html('#amount_id', $::form->format_amount(\%::myconfig, $self->order->amount, -2))
- ->remove('.tax_row')
- ->insertBefore($self->build_tax_rows, '#amount_row_id');
-}
-
sub js_redisplay_cvpartnumbers {
my ($self) = @_;
# Needed, if customer/vendor changed.
sub build_business_info_row
{
- $_[0]->p->render('order/tabs/_business_info_row', SELF => $_[0]);
+ $_[0]->p->render('delivery_order/tabs/_business_info_row', SELF => $_[0]);
}
-# build the rows for displaying taxes
-#
-# Called if amounts where recalculated and redisplayed.
-sub build_tax_rows {
- my ($self) = @_;
-
- my $rows_as_html;
- foreach my $tax (sort { $a->{tax}->rate cmp $b->{tax}->rate } @{ $self->{taxes} }) {
- $rows_as_html .= $self->p->render('order/tabs/_tax_row', TAX => $tax, TAXINCLUDED => $self->order->taxincluded);
- }
- return $rows_as_html;
-}
-
-
-sub render_price_dialog {
- my ($self, $record_item) = @_;
-
- my $price_source = SL::PriceSource->new(record_item => $record_item, record => $self->order);
-
- $self->js
- ->run(
- 'kivi.io.price_chooser_dialog',
- t8('Available Prices'),
- $self->render('order/tabs/_price_sources_dialog', { output => 0 }, price_source => $price_source)
- )
- ->reinit_widgets;
-
-# if (@errors) {
-# $self->js->text('#dialog_flash_error_content', join ' ', @errors);
-# $self->js->show('#dialog_flash_error');
-# }
-
- $self->js->render;
-}
sub load_order {
my ($self) = @_;
return if !$::form->{id};
- $self->order(SL::DB::Order->new(id => $::form->{id})->load);
+ $self->order(SL::DB::DeliveryOrder->new(id => $::form->{id})->load);
# Add an empty custom shipto to the order, so that the dialog can render the cvar inputs.
# You need a custom shipto object to call cvars_by_config to get the cvars.
# be retrieved via items until the order is saved. Adding empty items to new
# order here solves this problem.
my $order;
- $order = SL::DB::Order->new(id => $::form->{id})->load(with => [ 'orderitems', 'orderitems.part' ]) if $::form->{id};
- $order ||= SL::DB::Order->new(orderitems => [],
+ $order = SL::DB::DeliveryOrder->new(id => $::form->{id})->load(with => [ 'orderitems', 'orderitems.part' ]) if $::form->{id};
+ $order ||= SL::DB::DeliveryOrder->new(orderitems => [],
quotation => (any { $self->type eq $_ } (sales_quotation_type(), request_quotation_type())),
currency_id => $::instance_conf->get_currency_id(),);
}
my $form_orderitems = delete $::form->{order}->{orderitems};
- my $form_periodic_invoices_config = delete $::form->{order}->{periodic_invoices_config};
$order->assign_attributes(%{$::form->{order}});
$self->setup_custom_shipto_from_form($order, $::form);
- if (my $periodic_invoices_config_attrs = $form_periodic_invoices_config ? SL::YAML::Load($form_periodic_invoices_config) : undef) {
- my $periodic_invoices_config = $order->periodic_invoices_config || $order->periodic_invoices_config(SL::DB::PeriodicInvoicesConfig->new);
- $periodic_invoices_config->assign_attributes(%$periodic_invoices_config_attrs);
- }
-
# remove deleted items
$self->item_ids_to_delete([]);
foreach my $idx (reverse 0..$#{$order->orderitems}) {
# add_custom_variables adds cvars to an orderitem with no cvars for saving, but
# they cannot be retrieved via custom_variables until the order/orderitem is
# saved. Adding empty custom_variables to new orderitem here solves this problem.
- $item ||= SL::DB::OrderItem->new(custom_variables => []);
+ $item ||= SL::DB::DeliveryOrderItem->new(custom_variables => []);
$item->assign_attributes(%$attr);
sub new_item {
my ($record, $attr) = @_;
- my $item = SL::DB::OrderItem->new;
+ my $item = SL::DB::DeliveryOrderItem->new;
# Remove attributes where the user left or set the inputs empty.
# So these attributes will be undefined and we can distinguish them
$price_src = $price_source->best_price
? $price_source->best_price
: $price_source->price_from_source("");
- $price_src->price($::form->round_amount($price_src->price / $record->exchangerate, 5)) if $record->exchangerate;
$price_src->price(0) if !$price_source->best_price;
}
}
}
-# recalculate prices and taxes
-#
-# Using the PriceTaxCalculator. Store linetotals in the item objects.
-sub recalc {
- my ($self) = @_;
-
- my %pat = $self->order->calculate_prices_and_taxes();
-
- $self->{taxes} = [];
- foreach my $tax_id (keys %{ $pat{taxes_by_tax_id} }) {
- my $netamount = sum0 map { $pat{amounts}->{$_}->{amount} } grep { $pat{amounts}->{$_}->{tax_id} == $tax_id } keys %{ $pat{amounts} };
-
- push(@{ $self->{taxes} }, { amount => $pat{taxes_by_tax_id}->{$tax_id},
- netamount => $netamount,
- tax => SL::DB::Tax->new(id => $tax_id)->load });
- }
- pairwise { $a->{linetotal} = $b->{linetotal} } @{$self->order->items_sorted}, @{$pat{items}};
-}
-
# get data for saving, printing, ..., that is not changed in the form
#
# Only cvars for now.
$self->order->custom_shipto(undef);
}
- SL::DB::OrderItem->new(id => $_)->delete for @{$self->item_ids_to_delete || []};
+ SL::DB::DeliveryOrderItem->new(id => $_)->delete for @{$self->item_ids_to_delete || []};
$self->order->save(cascade => 1);
# link records
if ($::form->{converted_from_oe_id}) {
my @converted_from_oe_ids = split ' ', $::form->{converted_from_oe_id};
foreach my $converted_from_oe_id (@converted_from_oe_ids) {
- my $src = SL::DB::Order->new(id => $converted_from_oe_id)->load;
+ my $src = SL::DB::DeliveryOrder->new(id => $converted_from_oe_id)->load;
$src->update_attributes(closed => 1) if $src->type =~ /_quotation$/;
$src->link_to_record($self->order);
}
my $destination_type = $::form->{type} eq sales_order_type() ? sales_quotation_type() : request_quotation_type();
- $self->order(SL::DB::Order->new_from($self->order, destination_type => $destination_type));
+ $self->order(SL::DB::DeliveryOrder->new_from($self->order, destination_type => $destination_type));
$self->{converted_from_oe_id} = delete $::form->{id};
# set item ids to new fake id, to identify them as new items
$self->cv ($self->init_cv);
$self->check_auth;
- $self->recalc();
$self->get_unalterable_data();
$self->pre_render();
$_->{render_second_row} = 1 for @{ $self->order->items_sorted };
$self->render(
- 'order/form',
+ 'delivery_order/form',
title => $self->get_title_for('edit'),
%{$self->{template_args}}
);
my $custom_shipto;
if ( $::form->{type} eq sales_order_type() && $destination_type eq purchase_order_type()
&& $::form->{use_shipto} && $self->order->shipto) {
- $custom_shipto = $self->order->shipto->clone('SL::DB::Order');
+ $custom_shipto = $self->order->shipto->clone('SL::DB::DeliveryOrder');
}
- $self->order(SL::DB::Order->new_from($self->order, destination_type => $destination_type));
+ $self->order(SL::DB::DeliveryOrder->new_from($self->order, destination_type => $destination_type));
$self->{converted_from_oe_id} = delete $::form->{id};
# set item ids to new fake id, to identify them as new items
$self->cv ($self->init_cv);
$self->check_auth;
- $self->recalc();
$self->get_unalterable_data();
$self->pre_render();
$_->{render_second_row} = 1 for @{ $self->order->items_sorted };
$self->render(
- 'order/form',
+ 'delivery_order/form',
title => $self->get_title_for('edit'),
%{$self->{template_args}}
);
obsolete => 0 ] ]);
$self->{all_delivery_terms} = SL::DB::Manager::DeliveryTerm->get_all_sorted();
$self->{current_employee_id} = SL::DB::Manager::Employee->current->id;
- $self->{periodic_invoices_status} = $self->get_periodic_invoices_status($self->order->periodic_invoices_config);
$self->{order_probabilities} = [ map { { title => ($_ * 10) . '%', id => $_ * 10 } } (0..10) ];
$self->{positions_scrollbar_height} = SL::Helper::UserPreferences::PositionsScrollbar->new()->get_height();
$self->get_item_cvpartnumber($_) for @{$self->order->items_sorted};
$::request->{layout}->use_javascript("${_}.js") for qw(kivi.SalesPurchase kivi.Order kivi.File ckeditor/ckeditor ckeditor/adapters/jquery
- edit_periodic_invoices_config calculate_qty kivi.Validator follow_up show_history);
+ calculate_qty kivi.Validator follow_up show_history);
$self->setup_edit_action_bar;
}
call => [ 'kivi.Order.save', 'save', $::instance_conf->get_order_warn_duplicate_parts,
$::instance_conf->get_order_warn_no_deliverydate,
],
- checks => [ 'kivi.Order.check_save_active_periodic_invoices', ['kivi.validate_form','#order_form'] ],
],
action => [
t8('Save as new'),
call => [ 'kivi.Order.save', 'save_as_new', $::instance_conf->get_order_warn_duplicate_parts ],
- checks => [ 'kivi.Order.check_save_active_periodic_invoices' ],
disabled => !$self->order->id ? t8('This object has not been saved yet.') : undef,
],
], # end of combobox "Save"
],
action => [
t8('Save and Quotation'),
- submit => [ '#order_form', { action => "Order/sales_quotation" } ],
+ submit => [ '#order_form', { action => "DeliveryOrder/sales_quotation" } ],
only_if => (any { $self->type eq $_ } (sales_order_type())),
],
action => [
t8('Save and RFQ'),
- submit => [ '#order_form', { action => "Order/request_for_quotation" } ],
+ submit => [ '#order_form', { action => "DeliveryOrder/request_for_quotation" } ],
only_if => (any { $self->type eq $_ } (purchase_order_type())),
],
action => [
t8('Save and Sales Order'),
- submit => [ '#order_form', { action => "Order/sales_order" } ],
+ submit => [ '#order_form', { action => "DeliveryOrder/sales_order" } ],
only_if => (any { $self->type eq $_ } (sales_quotation_type(), purchase_order_type())),
],
action => [
call => [ 'kivi.Order.save', 'save_and_delivery_order', $::instance_conf->get_order_warn_duplicate_parts,
$::instance_conf->get_order_warn_no_deliverydate,
],
- checks => [ 'kivi.Order.check_save_active_periodic_invoices' ],
only_if => (any { $self->type eq $_ } (sales_order_type(), purchase_order_type()))
],
action => [
t8('Save and Invoice'),
call => [ 'kivi.Order.save', 'save_and_invoice', $::instance_conf->get_order_warn_duplicate_parts ],
- checks => [ 'kivi.Order.check_save_active_periodic_invoices' ],
],
action => [
t8('Save and AP Transaction'),
return %files;
}
-sub make_periodic_invoices_config_from_yaml {
- my ($yaml_config) = @_;
-
- return if !$yaml_config;
- my $attr = SL::YAML::Load($yaml_config);
- return if 'HASH' ne ref $attr;
- return SL::DB::PeriodicInvoicesConfig->new(%$attr);
-}
-
-
-sub get_periodic_invoices_status {
- my ($self, $config) = @_;
-
- return if $self->type ne sales_order_type();
- return t8('not configured') if !$config;
-
- my $active = ('HASH' eq ref $config) ? $config->{active}
- : ('SL::DB::PeriodicInvoicesConfig' eq ref $config) ? $config->active
- : die "Cannot get status of periodic invoices config";
-
- return $active ? t8('active') : t8('inactive');
-}
-
sub get_title_for {
my ($self, $action) = @_;
the controller
-=item * C<template/webpages/order/form.html>
+=item * C<template/webpages/delivery_order/form.html>
main form
-=item * C<template/webpages/order/tabs/basic_data.html>
+=item * C<template/webpages/delivery_order/tabs/basic_data.html>
Main tab for basic_data.
=over 4
-=item * C<template/webpages/order/tabs/_business_info_row.html>
+=item * C<template/webpages/delivery_order/tabs/_business_info_row.html>
For displaying information on business type
-=item * C<template/webpages/order/tabs/_item_input.html>
+=item * C<template/webpages/delivery_order/tabs/_item_input.html>
The input line for items
-=item * C<template/webpages/order/tabs/_row.html>
+=item * C<template/webpages/delivery_order/tabs/_row.html>
One row for already entered items
-=item * C<template/webpages/order/tabs/_tax_row.html>
+=item * C<template/webpages/delivery_order/tabs/_tax_row.html>
Displaying tax information
-=item * C<template/webpages/order/tabs/_price_sources_dialog.html>
-
-Dialog for selecting price and discount sources
-
=back
=item * C<js/kivi.Order.js>
projects / mfinanz.git / blobdiff