$TMPL_VAR{oe_obj} = $obj;
}
+ my $warn_save_active_periodic_invoice = $TMPL_VAR{warn_save_active_periodic_invoice};
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
# original snippets:
- # 'data-require-transaction-description'=INSTANCE_CONF.get_require_transaction_description_ps
- # data-warn-save-active-periodic-invoice="1" if warn_save_active_periodic_invoice
- # tpca_reminder
-
- $::request->layout->get('actionbar')->add_actions(
- [ t8('Update'), submit => [ '#form', { action_update => 1 } ] ], # always
- [ t8('Ship to'), submit => [ '#form', { action_ship_to => 1 } ] ], # always
- [ t8('Print'), submit => [ '#form', { action_print => 1 } ] ], # always, requires data-transaction-description
- [ t8('E Mail'), submit => [ '#form', { action_print => 1 } ] ], # always, requires data-transaction-description
- [ t8('Save'), submit => [ '#form', { action_save => 1 } ] ], # always, optional warn_save_active_periodic_invoice, requires data-transaction-description optional tpca_remainder
- [ t8('Save and Close'), submit => [ '#form', { action_save_and_close => 1 } ] ], # always, optional warn_save_active_periodic_invoice, requires data-transaction-description optional tpca_remainder
- [ t8('Follow Up'), function => [ 'follow_up_window' ], ], # if id
- [ t8('History'), function => [ 'set_history_window', $::form->{id} * 1, 'id' ], ], # if id
- [ t8('Save as new'), submit => [ '#form', { action_save_as_new => 1 } ] ], # if id, requires transaction-description
- [ t8('Delete'), submit => [ '#form', { action_delete => 1 } ] ], # if id && (!is_sales_ord || INSTANCE_CONF.get_sales_order_show_delete) && (!is_pur_ord || INSTANCE_CONF.get_purchase_order_show_delete)
- [ t8('Sales Order'), submit => [ '#form', { action_sales_order => 1 } ] ], # if id && is_sales_quo
- [ t8('Purchase Order'), submit => [ '#form', { action_sales_order => 1 } ] ], # if id && is_req_quo
- [ t8('Delivery Order'), submit => [ '#form', { action_delivery_order => 1 } ] ], # if id && (is_sales_ord || is_pur_ord)
- [ t8('Invoice'), submit => [ '#form', { action_invoice => 1 } ] ], # if id && allow_invoice
- [ t8('Quotation'), submit => [ '#form', { action_quotation => 1 } ] ], # if id
- [ t8('Request for Quotation'), submit => [ '#form', { action_reqest_for_quotation => 1 } ] ], # if id
- );
+ my $is_sales = scalar ($form->{type} =~ /^sales_/); # these vars are exported, so that the template
+ my $is_order = scalar ($form->{type} =~ /_order$/); # may determine what to show
+ my $is_sales_quo = scalar ($form->{type} =~ /sales_quotation$/);
+ my $is_req_quo = scalar ($form->{type} =~ /request_quotation$/);
+ my $is_sales_ord = scalar ($form->{type} =~ /sales_order$/);
+ my $is_pur_ord = scalar ($form->{type} =~ /purchase_order$/);
+ my $allow_invoice = $is_req_quo || $is_pur_ord || ($is_sales_quo && $::instance_conf->get_allow_sales_invoice_from_sales_quotation) || ($is_sales_ord && $::instance_conf->get_allow_sales_invoice_from_sales_order);
+ my @req_trans_desc = qw(kivi.SalesPurchase.check_transaction_description) x!!$::instance_conf->get_require_transaction_description_ps;
+ my @warn_p_invoice = qw(kivi.SalesPurchase.oe_warn_save_active_periodic_invoice) x!!$warn_save_active_periodic_invoice;
+
+ my $tpca_remainder = 0;
+
+ for my $bar ($::request->layout->get('actionbar')) {
+ $bar->add_actions([ t8('Update'),
+ submit => [ '#form', { action_update => 1 } ],
+ ]);
+ $bar->add_actions("combobox");
+ $bar->actions->[-1]->add_actions([ t8('Save'),
+ submit => [ '#form', { action_save => 1 } ],
+ checks => [ @req_trans_desc, @warn_p_invoice ],
+ confirm => t8('Missing transport cost: #1 Are you sure?', $tpca_remainder),
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Save as new'),
+ submit => [ '#form', { action_save_as_new => 1 } ],
+ checks => [ @req_trans_desc ],
+ disabled => !$::form->{id},
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Save and Close'),
+ submit => [ '#form', { action_save_and_close => 1 } ],
+ checks => [ @req_trans_desc, @warn_p_invoice ],
+ confirm => t8('Missing transport cost: #1 Are you sure?', $tpca_remainder),
+ ]);
+ $bar->add_actions([ t8('Delete'),
+ submit => [ '#form', { action_delete => 1 } ],
+ disabled => !$::form->{id}
+ || ($is_sales_ord && !$::instance_conf->get_sales_order_show_delete)
+ || ($is_pur_ord && !$::instance_conf->get_purchase_order_show_delete),
+ ]);
+ $bar->add_actions('separator');
+ $bar->add_actions('combobox');
+ $bar->actions->[-1]->add_actions([ t8('Workflow'),
+ disabled => 1,
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Sales Order'),
+ submit => [ '#form', { action_sales_order => 1 } ],
+ disabled => !$::form->{id},
+ ]) if $is_sales_quo;
+ $bar->actions->[-1]->add_actions([ t8('Purchase Order'),
+ submit => [ '#form', { action_sales_order => 1 } ],
+ disabled => !$::form->{id},
+ ]) if $is_req_quo;
+ $bar->actions->[-1]->add_actions([ t8('Delivery Order'),
+ submit => [ '#form', { action_delivery_order => 1 } ],
+ disabled => !$::form->{id},
+ ]) if $is_sales_ord || $is_pur_ord;
+ $bar->actions->[-1]->add_actions([ t8('Invoice'),
+ submit => [ '#form', { action_invoice => 1 } ],
+ disabled => !$::form->{id},
+ ]) if $allow_invoice;
+ $bar->actions->[-1]->add_actions([ t8('Quotation'),
+ submit => [ '#form', { action_quotation => 1 } ],
+ disabled => !$::form->{id},
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Request for Quotation'),
+ submit => [ '#form', { action_reqest_for_quotation => 1 } ],
+ disabled => !$::form->{id}
+ ]);
+ $bar->add_actions('combobox');
+ $bar->actions->[-1]->add_actions([ t8('Export'),
+ disabled => 1,
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Print'),
+ submit => [ '#form', { action_print => 1 } ],
+ checks => [ @req_trans_desc ],
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('E Mail'),
+ submit => [ '#form', { action_print => 1 } ],
+ checks => [ @req_trans_desc ],
+ ]);
+ $bar->add_actions([ t8('Ship to'),
+ submit => [ '#form', { action_ship_to => 1 } ],
+ ]);
+ $bar->add_actions('combobox');
+ $bar->actions->[-1]->add_actions([ t8('more'),
+ disabled => 1,
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('History'),
+ call => [ 'set_history_window', $::form->{id} * 1, 'id' ],
+ disabled => !$::form->{id},
+ ]);
+ $bar->actions->[-1]->add_actions([ t8('Follow-Up'),
+ call => [ 'follow_up_window' ],
+ disabled => !$::form->{id},
+ ]);
+ }
$form->header;
if ($form->{CFDD_shipto} && $form->{CFDD_shipto_id} ) {
%TMPL_VAR = (
%TMPL_VAR,
- is_sales => scalar ($form->{type} =~ /^sales_/), # these vars are exported, so that the template
- is_order => scalar ($form->{type} =~ /_order$/), # may determine what to show
- is_sales_quo => scalar ($form->{type} =~ /sales_quotation$/),
- is_req_quo => scalar ($form->{type} =~ /request_quotation$/),
- is_sales_ord => scalar ($form->{type} =~ /sales_order$/),
- is_pur_ord => scalar ($form->{type} =~ /purchase_order$/),
+ is_sales => $is_sales,
+ is_order => $is_order,
+ is_sales_quo => $is_sales_quo,
+ is_req_quo => $is_req_quo,
+ is_sales_ord => $is_sales_ord,
+ is_pur_ord => $is_pur_ord,
);
$TMPL_VAR{ORDER_PROBABILITIES} = [ map { { title => ($_ * 10) . '%', id => $_ * 10 } } (0..10) ];
%TMPL_VAR,
tpca_reminder => $tpca_reminder,
print_options => print_options(inline => 1),
- label_edit => $locale->text("Edit the $form->{type}"),
- label_workflow => $locale->text("Workflow $form->{type}"),
is_sales => scalar ($form->{type} =~ /^sales_/), # these vars are exported, so that the template
is_order => scalar ($form->{type} =~ /_order$/), # may determine what to show
is_sales_quo => scalar ($form->{type} =~ /sales_quotation$/),
projects / kivitendo-erp.git / blobdiff