projekt kivitendo

use SL::DB::Contact;

use SL::Helper::PrintOptions;

sub setup_sales_purchase_print_options {

  my $print_form = Form->new('');

  $print_form->{printers}  = SL::DB::Manager::Printer->get_all_sorted;

  $print_form->{languages} = SL::DB::Manager::Language->get_all_sorted;

  $print_form->{$_} = $::form->{$_} for qw(type media language_id printer_id);

  return SL::Helper::PrintOptions->get_print_options(

    form    => $print_form,

    options => {

      show_headers => 1,

    },

  );

}

sub show_sales_purchase_email_dialog {

  my $contact    = $::form->{cp_id} ? SL::DB::Contact->load_cached($::form->{cp_id}) : undef;

  my $email_form = {

    to                  => $contact ? $contact->cp_email : '',

    subject             => $::form->generate_email_subject,

    attachment_filename => $::form->generate_attachment_filename,

  };

  my $html = $::form->parse_html_template("common/_send_email_dialog", {

    email_form => $email_form,

    show_bcc   => $::auth->assert('email_bcc', 'may fail'),

  });

  print $::form->ajax_response_header, $html;

}

sub send_sales_purchase_email {

  my $type        = $::form->{type};

  my $id          = $::form->{id};

  my $script      = $type =~ m{sales_order|purchase_order|quotation} ? 'oe.pl'

                  : $type =~ m{delivery_}                            ? 'do.pl'

                  :                                                    'is.pl';

  my $email_form  = delete $::form->{email_form};

  my %field_names = (to => 'email');

  $::form->{ $field_names{$_} // $_ } = $email_form->{$_} for keys %{ $email_form };

  $::form->{media} = 'email';

  print_form("return");

  Common->save_email_status(\%::myconfig, $::form);

  flash_later('info', $::locale->text('The email has been sent.'));

  print $::form->redirect_header($script . '?action=edit&id=' . $::form->escape($id) . '&type=' . $::form->escape($type));

}

          call   => [ 'kivi.SalesPurchase.show_email_dialog' ],

     qw(id type vc proforma queued printed emailed

        taxpart taxservice taxaccounts cursor_fokus

  my $print_options_html = setup_sales_purchase_print_options();

     print_options   => $print_options_html,

  this.show_print_options_elements = function(elements, show) {

    $(elements).each(function(idx, elt) {

      var $elements = $('#print_options_header_' + elt + ',#print_options_input_' + elt);

      if (show)

        $elements.show();

      else

        $elements.hide();

    });

  };

  this.show_all_print_options_elements = function() {

    kivi.SalesPurchase.show_print_options_elements([ 'formname', 'language_id', 'format', 'sendmode', 'media', 'printer_id', 'copies', 'groupitems', 'remove_draft' ], true);

  };

  // Sending records via email.

  this.send_email = function() {

    var unset = $('#email_form_to,#email_form_subject,#email_form_message').filter(function(idx, elt) {

      return $(elt).val() === '';

    });

    if (unset.length > 0) {

      alert(kivi.t8("The recipient, subject or body is missing."));

      $(unset[0]).focus();

      return false;

    }

    $('#send_email_dialog').children().remove().appendTo('#email_inputs');

    $('#send_email_dialog').dialog('close');

    $('#action').val('send_sales_purchase_email');

    $('#form').submit();

    return true;

  };

  this.setup_send_email_dialog = function() {

    kivi.SalesPurchase.show_all_print_options_elements();

    kivi.SalesPurchase.show_print_options_elements([ 'sendmode', 'media', 'copies', 'remove_draft' ], false);

    $('#print_options').children().remove().appendTo('#email_form_print_options');

    var to_focus = $('#email_form_to').val() === '' ? 'to' : 'subject';

    $('#email_form_' + to_focus).focus();

  };

  this.finish_send_email_dialog = function() {

    $('#email_form_print_options').children().remove().appendTo('#print_options');

    return true;

  };

  this.show_email_dialog = function() {

    kivi.popup_dialog({

      id:     'send_email_dialog',

      url:    'io.pl',

      load:   kivi.SalesPurchase.setup_send_email_dialog,

      data:   {

        action:      'show_sales_purchase_email_dialog',

        type:        $('#type').val(),

        formname:    $('#formname').val(),

        format:      $('#format').val(),

        media:       'email',

        ordnumber:   $('#ordnumber').val(),

        donumber:    $('#donumber').val(),

        invnumber:   $('#invnumber').val(),

        quonumber:   $('#quonumber').val(),

        cp_id:       $('#cp_id').val(),

        language_id: $('#language_id').val(),

      },

      dialog: {

        height:      600,

        title:       kivi.t8('Send email'),

        beforeClose: kivi.SalesPurchase.finish_send_email_dialog

      }

    });

    return true;

  };

"Send email":"E-Mail verschicken",

  'Send email'                  => 'E-Mail verschicken',

[%- USE HTML %][%- USE LxERP -%][%- USE L -%]

<table>

 <tbody>

  <tr>

   <th align="right" nowrap>[% LxERP.t8("To") %]</th>

   <td>[% L.input_tag("email_form.to", email_form.to, size="80") %]</td>

  </tr>

  <tr>

   <th align="right" nowrap>[% LxERP.t8("Cc") %]</th>

   <td>[% L.input_tag("email_form.cc", email_form.cc, size="80") %]</td>

  </tr>

 [%- IF show_bcc %]

  <tr>

   <th align="right" nowrap>[% LxERP.t8("Bcc") %]</th>

   <td>[% L.input_tag("email_form.bcc", email_form.bcc, size="80") %]</td>

  </tr>

 [%- END %]

  <tr>

   <th align="right" nowrap>[% LxERP.t8("Subject") %]</th>

   <td>[% L.input_tag("email_form.subject", email_form.subject, size="80") %]</td>

  </tr>

  <tr>

   <th align="right" nowrap>[% LxERP.t8("Attachment name") %]</th>

   <td>[% L.input_tag("email_form.attachment_filename", email_form.attachment_filename, size="80") %]</td>

  </tr>

  <tr valign="top">

   <th align="right" nowrap>[% LxERP.t8("Message") %]</th>

   <td>[% L.textarea_tag("email_form.message", email_form.message, rows="15" cols="80" wrap="soft") %]</td>

  </tr>

 </tbody>

</table>

<div id="email_form_print_options"></div>

<p>

 [% L.button_tag("kivi.SalesPurchase.send_email()", LxERP.t8("Send email")) %]

 [% L.button_tag("\$('#send_email_dialog').dialog('close');", LxERP.t8("Abort")) %]

</p>

     <th align="left" id="print_options_header_[% row.sname %]">[%- row.hname %]</th>

     <th align="left" id="print_options_header_copies">[% 'Copies' | $T8 %]</th>

     <th align="left" id="print_options_header_groupitems">[% 'Group Items' | $T8 %]</th>

     <th align="left" id="print_options_header_remove_draft">[% 'Remove Draft' | $T8 %]</th>

     <td id="print_options_input_[% row.sname %]">

      <select name="[%- name_prefix %][%- row.sname %]" id="[%- id_prefix %][%- row.sname %]">

     <td id="print_options_input_copies">[%- IF !show_headers %][%- 'Copies' | $T8 %][%- END %]<input name="[%- name_prefix %]copies" id="[% id_prefix %]copies" size="2" value="[% HTML.escape(copies) %]"></td>

     <td id="print_options_input_groupitems">[%- IF !show_headers %][% 'Group Items' | $T8 %][%- END %]

      <input name="[%- name_prefix %]groupitems" id="[% id_prefix %]groupitems" type="checkbox" class="checkbox" [% groupitems_checked %]>

     <td id="print_options_input_remove_draft">[%- IF !show_headers %][% 'Remove Draft' | $T8 %][%- END %]

      <input name="[%- name_prefix %]remove_draft" id="[% id_prefix %]remove_draft" type="checkbox" class="checkbox" [% remove_draft_checked %]>

<input type="hidden" name="action" id="action" value="dispatcher">

<div id="email_inputs" class="hidden"></div>

<div id="print_options" class="hidden">

 [% print_options %]

</div>

   <input type="hidden" name="[% HTML.escape(row.name) %]" id="[% HTML.escape(row.name) %]" value="[% HTML.escape(row.value) %]" >

                    <td><input name="ordnumber" id="ordnumber" size="11" value="[% HTML.escape(ordnumber) %]"></td>

                    <td><input name="quonumber" id="quonumber" size="11" value="[% HTML.escape(quonumber) %]"></td>

                    <td><input name="cusordnumber" id="cusordnumber" size="11" value="[% HTML.escape(cusordnumber) %]"></td>