X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Foe.pl;h=79cbe59bf210a0502e86e03a39c516001b267cf2;hb=2da8f5ca6e9f7a164585d180eef47169298f12c5;hp=063059a36538b1b80d9f46cb01f07399ce06af95;hpb=5aec18fed79986d088e3a7ed05a9166c48d05b39;p=kivitendo-erp.git diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index 063059a36..79cbe59bf 100644 --- a/bin/mozilla/oe.pl +++ b/bin/mozilla/oe.pl @@ -437,6 +437,40 @@ sub form_header { $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.SalesPurchase kivi.File kivi.Part show_form_details show_history show_vc_details ckeditor/ckeditor ckeditor/adapters/jquery kivi.io autocomplete_customer)); + + # 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 + 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 $tpca_remainder = 0; + + $::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 } ], checks => [ qw(require-data-dransation) ] ], + [ t8('E Mail'), submit => [ '#form', { action_print => 1 } ], checks => [ qw(require-data-dransation) ] ], + [ t8('Save'), submit => [ '#form', { action_save => 1 } ], checks => [ qw(require-data-dransation) ], confirm => t8('Missing transport cost: #1 Are you sure?', $tpca_remainder) ], # always, optional warn_save_active_periodic_invoice, + [ t8('Save and Close'), submit => [ '#form', { action_save_and_close => 1 } ], checks => [ qw(require-data-dransation) ], confirm => t8('Missing transport cost: #1 Are you sure?', $tpca_remainder) ], # always, optional warn_save_active_periodic_invoice, + [ t8('Follow Up'), function => [ 'follow_up_window' ], disabled => !$::form->{id} ], + [ t8('History'), function => [ 'set_history_window', $::form->{id} * 1, 'id' ], disabled => !$::form->{id} ], + [ t8('Save as new'), submit => [ '#form', { action_save_as_new => 1 } ], checks => [ qw(require-data-dransation) ], disabled => !$::form->{id} ], + ([ t8('Delete'), submit => [ '#form', { action_delete => 1 } ], disabled => !$::form->{id} ]) x!!( $::form->{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 } ], disabled => !$::form->{id} ]) x!!($is_sales_quo ), + ([ t8('Purchase Order'), submit => [ '#form', { action_sales_order => 1 } ], disabled => !$::form->{id} ]) x!!($is_req_quo ), + ([ t8('Delivery Order'), submit => [ '#form', { action_delivery_order => 1 } ], disabled => !$::form->{id} ]) x!!(($is_sales_ord || $is_pur_ord ) ), + ([ t8('Invoice'), submit => [ '#form', { action_invoice => 1 } ], disabled => !$::form->{id} ]) x!!($allow_invoice ), + [ t8('Quotation'), submit => [ '#form', { action_quotation => 1 } ], disabled => !$::form->{id} ], + [ t8('Request for Quotation'), submit => [ '#form', { action_reqest_for_quotation => 1 } ], disabled => !$::form->{id} ], + ); + $form->header; if ($form->{CFDD_shipto} && $form->{CFDD_shipto_id} ) { $form->{shipto_id} = $form->{CFDD_shipto_id}; @@ -457,12 +491,12 @@ sub form_header { %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) ];