projekt kivitendo

    )->load;

    $email_journal->link_to_record_with_attachment(

      $ap_transaction_storno,

    );

  }

    )->load;

    $email_journal->link_to_record_with_attachment(

      $ar_transaction_storno,

    );

  }

    class      => 'Reclamation',

    types => SL::DB::Reclamation::TypeData->valid_types(),

  },

  ArTransaction => {

    controller => 'ar.pl',

    class      => 'Invoice',

      'purchase_credit_note',

    ],

  },

    class      => 'RecordTemplate',

    types => [

      'gl_transaction_template',

      'ar_transaction_template',

      'ap_transaction_template',

    ],

);

my %RECORD_TYPE_TO_CONTROLLER =

  map {

      $_ => 'invnumber';

    } elsif (any {$model eq $_} qw(SL::DB::RecordTemplate)) {

      $_ => 'template_name';

    } else {

      my $type_data = SL::DB::Helper::TypeDataProxy->new($model, $_);

      $_ => $type_data->properties('nr_key');

    { record_type => 'purchase_invoice',      customervendor => 'vendor', workflow_needed => 0, can_workflow => 1, text => t8('Purchase Invoice')},

    { record_type => 'purchase_credit_note',  customervendor => 'vendor', workflow_needed => 0, can_workflow => 1, text => t8('Purchase Credit Note')},

    # transactions

    { record_type => 'ar_transaction', customervendor => 'customer', workflow_needed => 0, can_workflow => 1, text => t8('AR Transaction')},

    { record_type => 'ap_transaction', customervendor => 'vendor',   workflow_needed => 0, can_workflow => 1, text => t8('AP Transaction')},

    # templates

  my ($self, $customer_vendor_type, $action) = @_;

  return [

    map { $_->{record_type} }

    grep {

      ($_->{customervendor} eq $customer_vendor_type)

      && ($action eq 'workflow_record' ? $_->{can_workflow} : 1)

      $additional_where{$nr_key} = { ilike => "%$record_number%" };

    }

    unless ($with_closed) {

        $additional_where{closed} = 0;

        $additional_where{amount} = { gt => \'paid' };

      }

    }

  my $action             = $::form->{action_selection};

  my $record_id          = $::form->{"record_id"};

  my $record_type        = $::form->{"record_type"};

  die t8("No record type is selected.")          unless $record_type;

  die "no 'email_journal_id' was given"          unless $email_journal_id;

  die "no 'customer_vendor_selection' was given" unless $customer_vendor;

  }

  my %additional_params = ();

    $additional_params{action} = 'add_from_email_journal';

    $additional_params{"${customer_vendor}_id"} = $customer_vendor_id;

    $additional_params{action} = 'edit_with_email_journal_workflow';

    $additional_params{id} = $record_id;

  }

    # TODO: file and webdav use different types

    $record_type = 'accounts_payable' if $record_type eq 'ap_transaction';

    $record_type = 'general_ledger'   if $record_type eq 'ar_transaction';

    $record_type = 'invoice'          if $record_type eq 'invoice_storno';

    my $webdav = SL::Webdav->new(

      type     => $record_type,

use SL::DB::Helper::LinkedRecords;

use SL::DB::MetaSetup::GLTransaction;

use SL::Locale::String qw(t8);

use List::Util qw(sum);

use SL::DATEV;

use Carp;

use Data::Dumper;

__PACKAGE__->meta->add_relationship(

  transactions   => {

    type         => 'one to many',

__PACKAGE__->meta->initialize;

sub abbreviation {

  my $self = shift;

use SL::DB::Chart;

use SL::DB::Draft;

use SL::DB::ValidityToken;

use SL::Util qw(trim);

use SL::DB;

    do_query($form, $dbh, $query, (values %$row));

  }

  return 1;

}

  &add;

}

sub edit_with_email_journal_workflow {

  my ($self) = @_;

  die "No 'email_journal_id' was given." unless ($::form->{email_journal_id});

  &add;

}

sub edit_with_email_journal_workflow {

  my ($self) = @_;

  die "No 'email_journal_id' was given." unless ($::form->{email_journal_id});

use SL::DB::BankTransactionAccTrans;

use SL::DB::Tax;

use SL::DB::ValidityToken;

use SL::FU;

use SL::GL;

use SL::Helper::Flash qw(flash flash_later);

}

sub prepare_transaction {

  $main::lxdebug->enter_sub();

                   )->webdav_path;

  }

  my $msg = $::locale->text("General ledger transaction '#1' posted (ID: #2)", $form->{reference}, $form->{id});

  if ($form->{callback} =~ /BankTransaction/ && $form->{bt_id}) {

    SL::Helper::Flash::flash_later('info', $msg) if $msg;

input.record_button {

  color: var(--color-dark);

  background-color: var(--color-lighter);

  padding: 5px;

  margin: 5px;

  float: left;

  'Create customers and vendors. Edit all vendors. Edit only customers where salesman equals employee (login)' => 'Kunden und Lieferanten erfassen. Alle Lieferanten bearbeiten. Nur Kunden bearbeiten bei denen der Verkäufer gleich Bearbeiter (login) ist',

  'Create delivery order'       => 'Lieferschein erstellen',

  'Create first invoice on'     => 'Erste Rechnung erzeugen am',

  'Create from Workflow'        => 'Workflow weiterführen von',

  'Create invoice'              => 'Buchung erstellen',

  'Create invoice?'             => 'Rechnung erstellen?',

<div id="ui-tabs-basic-data">

  <div class="wrapper" id="email_attachment_wrapper">

    [%

      BLOCK panel_1;

        </div><!-- /.record_toggle -->

      </div><!-- record_div -->

    </div><!-- record_selection_div -->

        [% L.button_tag('kivi.EmailJournal.apply_action_with_attachment();',

          LxERP.t8('Apply with Attachment')) %]

    </div>

[% USE LxERP %]

[% USE T8 %]

[% USE L %]

<script type="text/javascript">

  <!--

[% IF !id %]

[%   L.hidden_tag('form_validity_token', form_validity_token) %]

[% END %]

<input type=hidden name=title value="[% hide_title | html %]">

<ul>

  <li><a href="#ui-tabs-basic-data">[% 'Basic Data' | $T8 %]</a></li>

  [% IF INSTANCE_CONF.get_webdav %]

    <li><a href="#ui-tabs-webdav">[% 'WebDAV' | $T8 %]</a></li>

  [% END %]

</div><!-- /.wrapper -->

<div class="wrapper">

<table class="tbl-horizontal">