projekt kivitendo

use SL::Auth::DB;

use SL::Auth::LDAP;

use SL::AM;

use SL::Common;

use SL::DBUtils;

use SL::Mailer;

undef $standard_dbh;

}

$main::lxdebug->leave_sub(2);

package OE;

use List::Util qw(max first);

use SL::AM;

use SL::Common;

use SL::CVar;

use SL::DBUtils;

use SL::IC;

my @values;

my $where;

my $rate = ($form->{vc} eq 'customer') ? 'buy' : 'sell';

if ($form->{type} =~ /_quotation$/) {

$quotation = '1';

$ordnumber = 'quonumber';

}

my $vc = $form->{vc} eq "customer" ? "customer" : "vendor";

qq| pr.projectnumber AS globalprojectnumber, | .

qq| e.name AS employee, s.name AS salesman, | .

qq| ct.${vc}number AS vcnumber, ct.country, ct.ustid | .

qq|FROM oe o | .

qq|JOIN $vc ct ON (o.${vc}_id = ct.id) | .

qq|LEFT JOIN employee e ON (o.employee_id = e.id) | .

qq|LEFT JOIN exchangerate ex ON (ex.curr = o.curr | .

qq| AND ex.transdate = o.transdate) | .

qq|LEFT JOIN project pr ON (o.globalproject_id = pr.id) | .

qq|WHERE (o.quotation = ?) |;

push(@values, $quotation);

push(@values, '%' . $form->{transaction_description} . '%');

}

my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';

my $sortorder = join(', ', map { "${_} ${sortdir} " } ("o.id", $form->sort_columns("transdate", $ordnumber, "name")));

my %allowed_sort_columns = (

my ($self, $myconfig, $form) = @_;

# connect to database, turn off autocommit

my ($query, @values, $sth, $null);

my $exchangerate = 0;

}

}

$form->{saved_xyznumber} = $form->{$form->{type} =~ /_quotation$/ ?

"quonumber" : "ordnumber"};

Common::webdav_folder($form) if ($main::webdav);

my $rc = $dbh->commit;

$main::lxdebug->leave_sub();

return $rc;

}

sub _close_quotations_rfqs {

$main::lxdebug->enter_sub();

# delete-values

@values = (conv_i($form->{id}));

# delete status entries

$query = qq|DELETE FROM status | .

qq|WHERE trans_id = ?|;

}

$sth->finish;

} else {

# get last name used

Common::webdav_folder($form) if ($main::webdav);

my $rc = $dbh->commit;

$main::lxdebug->leave_sub();

use SL::MoreCommon qw(ary_diff);

use SL::PE;

use SL::ReportGenerator;

use List::Util qw(max reduce sum);

use Data::Dumper;

$onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|;

$TMPL_VAR{onload} = $onload;

$form->{javascript} .= qq|<script type="text/javascript" src="js/show_form_details.js"></script>|;

$form->{javascript} .= qq|<script type="text/javascript" src="js/show_history.js"></script>|;

$form->{javascript} .= qq|<script type="text/javascript" src="js/show_vc_details.js"></script>|;

"salesman",

"shipvia", "globalprojectnumber",

"transaction_description", "open",

"vcnumber", "ustid",

"country",

);

unshift @columns, "ids";

}

my $attachment_basename;

if ($form->{vc} eq 'vendor') {

my @hidden_variables = map { "l_${_}" } @columns;

push @hidden_variables, "l_subtotal", $form->{vc}, qw(l_closed l_notdelivered open closed delivered notdelivered ordnumber quonumber

transaction_description transdatefrom transdateto type vc employee_id salesman_id

my $href = build_std_url('action=orders', grep { $form->{$_} } @hidden_variables);

'vcnumber' => { 'text' => $form->{vc} eq 'customer' ? $locale->text('Customer Number') : $locale->text('Vendor Number'), },

'country' => { 'text' => $locale->text('Country'), },

'ustid' => { 'text' => $locale->text('USt-IdNr.'), },

);

foreach my $name (qw(id transdate reqdate quonumber ordnumber name employee salesman shipvia transaction_description)) {

push @options, $locale->text('Closed') if $form->{closed};

push @options, $locale->text('Delivered') if $form->{delivered};

push @options, $locale->text('Not delivered') if $form->{notdelivered};

$report->set_options('top_info_text' => join("\n", @options),

'raw_top_info_text' => $form->parse_html_template('oe/orders_top'),

foreach my $oe (@{ $form->{OE} }) {

map { $oe->{$_} *= $oe->{exchangerate} } @subtotal_columns;

map { $subtotals{$_} += $oe->{$_};

$totals{$_} += $oe->{$_} } @subtotal_columns;

return $content;

}

sub dispatcher {

my $form = $main::form;

my $locale = $main::locale;

'Company Name' => 'Firmenname',

'Compare to' => 'Gegenüberstellen zu',

'Configuration of individual TODO items' => 'Konfiguration f&uuml;r die einzelnen Aufgabenlistenpunkte',

'Confirm' => 'Best&auml;tigen',

'Confirm!' => 'Bestätigen Sie!',

'Confirmation' => 'Auftragsbestätigung',

'Edit rights' => 'Rechte bearbeiten',

'Edit templates' => 'Vorlagen bearbeiten',

'Edit the Delivery Order' => 'Lieferschein bearbeiten',

'Edit the membership of all users in all groups:' => 'Bearbeiten der Mitgliedschaft aller Benutzer in allen Gruppen:',

'Edit the purchase_order' => 'Bearbeiten des Lieferantenauftrags',

'Edit the request_quotation' => 'Bearbeiten der Preisanfrage',

'Payment posted!' => 'Zahlung gebucht!',

'Payment terms deleted!' => 'Zahlungskonditionen gelöscht!',

'Payments' => 'Zahlungsausgänge',

'Period' => 'Zeitraum',

'Period:' => 'Zeitraum:',

'Personal settings' => 'Pers&ouml;nliche Einstellungen',

'Pg Database Administration' => 'Datenbankadministration',

'Phone' => 'Telefon',

'Pricegroups' => 'Preisgruppen',

'Print' => 'Drucken',

'Print and Post' => 'Drucken und Buchen',

'Print dunnings' => 'Mahnungen drucken',

'Print list' => 'Liste ausdrucken',

'Print options' => 'Druckoptionen',

'Spoolfile' => 'Druckdatei',

'Start Dunning Process' => 'Mahnprozess starten',

'Start analysis' => 'Analyse beginnen',

'Start the correction assistant' => 'Korrekturassistenten starten',

'Startdate_coa' => 'Gültig ab',

'Starting Balance' => 'Eröffnungsbilanzwerte',

'The selected warehouse is empty.' => 'Das ausgew&auml;hlte Lager ist leer.',

'The session is invalid or has expired.' => 'Sie sind von Lx-Office abgemeldet.',

'The source warehouse does not contain any bins.' => 'Das Quelllager enth&auml;lt keine Lagerpl&auml;tze.',

'The subject is missing.' => 'Der Betreff fehlt.',

'The tables for user management and authentication do not exist. They will be created in the next step in the following database:' => 'Die Tabellen zum Speichern der Benutzerdaten und zur Benutzerauthentifizierung wurden nicht gefunden. Sie werden in der folgenden Datenbank angelegt:',

'The tabulator character' => 'Das Tabulator-Symbol',

'[email]' => '[email]',

'account_description' => 'Beschreibung',

'accrual' => 'Bilanzierung (Soll-Versteuerung)',

'all entries' => 'alle Einträge',

'ap_aging_list' => 'liste_offene_verbindlichkeiten',

'ar_aging_list' => 'liste_offene_forderungen',

'general_ledger_list' => 'buchungsjournal',

'history' => 'Historie',

'history search engine' => 'Historien Suchmaschine',

'invoice' => 'Rechnung',

'invoice_list' => 'debitorenbuchungsliste',

'lead deleted!' => 'Kundenquelle gelöscht',

'mark as paid' => 'als bezahlt markieren',

'missing' => 'Fehlbestand',

'month' => 'Monatliche Abgabe',

'new Window' => 'neues Fenster',

'no' => 'nein',

'no bestbefore' => 'keine Mindesthaltbarkeit',

'no chargenumber' => 'keine Chargennummer',

'none (pricegroup)' => 'keine',

'not executed' => 'nicht ausgeführt',

'not transferred in yet' => 'noch nicht eingelagert',

'not transferred out yet' => 'noch nicht ausgelagert',

'purchase_order' => 'Auftrag',

'purchase_order_list' => 'lieferantenauftragsliste',

'quarter' => 'Vierteljährliche (quartalsweise) Abgabe',

'quotation_list' => 'angebotsliste',

'release_material' => 'Materialausgabebe',

'report_generator_dispatch_to is not defined.' => 'report_generator_dispatch_to ist nicht definiert.',

'warehouse_journal_list' => 'lagerbuchungsliste',

'warehouse_report_list' => 'lagerbestandsliste',

'wrongformat' => 'Falsches Format',

'yes' => 'ja',

};

[%- USE T8 %]

[%- USE HTML %]

[%- USE LxERP %]

<tr>

<td>

<table width="100%">

show_empty = 1 -%]

</td>

</tr>

[%- IF id && num_follow_ups %]

<tr>

<td colspan="2">[% LxERP.t8('There are #1 unfinished follow-ups of which #2 are due.', num_follow_ups, num_due_follow_ups) %]</td>

[%- USE T8 %]

[%- USE HTML %]

[%- USE LxERP %]

<body onLoad="[% onload %]">

<form method="post" name="oe" action="[% script %]">

<script type="text/javascript" src="js/calculate_qty.js"></script>

<script type="text/javascript" src="js/customer_or_vendor_selection.js"></script>

<script type="text/javascript" src="js/follow_up.js"></script>

[%- FOREACH row = HIDDENS %]

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

[%- USE HTML %]

[%- USE T8 %]

[%- USE LxERP %]

[%- SET vclabel = vc == 'customer' ? LxERP.t8('Customer') : LxERP.t8('Vendor') %]

[%- SET vcnumberlabel = vc == 'customer' ? LxERP.t8('Customer Number') : LxERP.t8('Vendor Number') %]

<body>

<label for="delivered">[% 'Delivered' | $T8 %]</label>

</td>

</tr>

[%- END %]

<tr>

<td>