projekt kivitendo

  $main::lxdebug->message(0, "err " . $template->error());

# Partsgroups and pricegroups

  my $table = $form->{type} eq "pricegroup" ? "pricegroup" : "partsgroup";

#=====================================================================

# LX-Office ERP

# Copyright (C) 2004

# Based on SQL-Ledger Version 2.1.9

# Web http://www.lx-office.org

#

#=====================================================================

# SQL-Ledger Accounting

# Copyright (C) 1998-2002

#

#  Author: Dieter Simader

#   Email: dsimader@sql-ledger.org

#     Web: http://www.sql-ledger.org

#

#  Contributors:

#

# This program is free software; you can redistribute it and/or modify

# it under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 2 of the License, or

# (at your option) any later version.

#

# This program is distributed in the hope that it will be useful,

# but WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

# GNU General Public License for more details.

# You should have received a copy of the GNU General Public License

# along with this program; if not, write to the Free Software

# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

#======================================================================

#

# Project module

#

#======================================================================

package Projects;

use Data::Dumper;

use SL::DBUtils;

my %project_id_column_prefixes  = ("ar"              => "global",

                                   "ap"              => "global",

                                   "oe"              => "global",

                                   "delivery_orders" => "global");

my @tables_with_project_id_cols = qw(acc_trans

                                     invoice

                                     orderitems

                                     rmaitems

                                     ar

                                     ap

                                     oe

                                     delivery_orders

                                     delivery_order_items);

sub search_projects {

  $main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  my (@filters, @values);

  foreach my $column (qw(projectnumber description)) {

    if ($params{$column}) {

      push @filters, "$column ILIKE ?";

      push @values, '%' . $params{$column} . '%';

    }

  }

  if ($params{status} eq 'orphaned') {

    my @sub_filters;

    foreach my $table (@tables_with_project_id_cols) {

      push @sub_filters, qq|SELECT DISTINCT $project_id_column_prefixes{$table}project_id FROM $table

                            WHERE NOT $project_id_column_prefixes{$table}project_id ISNULL|;

    }

    push @filters, "id NOT IN (" . join(" UNION ", @sub_filters) . ")";

  }

  if ($params{active} eq "active") {

    push @filters, 'active';

  } elsif ($params{active} eq "inactive") {

    push @filters, 'NOT COALESCE(active, FALSE)';

  }

  my $where = 'WHERE ' . join(' AND ', map { "($_)" } @filters) if (scalar @filters);

  my $sortorder =  $params{sort} ? $params{sort} : "projectnumber";

  $sortorder    =~ s/[^a-z_]//g;

  my $query     = qq|SELECT id, projectnumber, description, active

                     FROM project

                     $where

                     ORDER BY $sortorder|;

  $form->{project_list} = selectall_hashref_query($form, $dbh, $query, @values);

  $main::lxdebug->leave_sub();

  return scalar(@{ $form->{project_list} });

}

sub get_project {

  $main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  if (!$params{id}) {

    $main::lxdebug->leave_sub();

    return { };

  }

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  my $project  = selectfirst_hashref_query($form, $dbh, qq|SELECT * FROM project WHERE id = ?|, conv_i($params{id})) || { };

  if ($params{orphaned}) {

    # check if it is orphaned

    my (@values, $query);

    foreach my $table (@tables_with_project_id_cols) {

      $query .= " + " if ($query);

      $query .= qq|(SELECT COUNT(*) FROM $table

                    WHERE $project_id_column_prefixes{$table}project_id = ?) |;

      push @values, conv_i($params{id});

    }

    $query = 'SELECT ' . $query;

    ($project->{orphaned}) = selectrow_query($form, $dbh, $query, @values);

    $project->{orphaned}   = !$project->{orphaned};

  }

  $main::lxdebug->leave_sub();

  return $project;

}

sub save_project {

  $main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  my @values;

  if (!$params{id}) {

    ($params{id}) = selectfirst_array_query($form, $dbh, qq|SELECT nextval('id')|);

    do_query($form, $dbh, qq|INSERT INTO project (id) VALUES (?)|, conv_i($params{id}));

    $params{active} = 1;

  }

  $query  = qq|UPDATE project SET projectnumber = ?, description = ?, active = ?

               WHERE id = ?|;

  @values = ($params{projectnumber}, $params{description}, $params{active} ? 't' : 'f', conv_i($params{id}));

  do_query($form, $dbh, $query, @values);

  $dbh->commit();

  $main::lxdebug->leave_sub();

  return $params{id};

}

sub delete_project {

  $main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  Common::check_params(\%params, qw(id));

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  do_query($form, $dbh, qq|DELETE FROM project WHERE id = ?|, conv_i($params{id}));

  $dbh->commit();

  $main::lxdebug->leave_sub();

}

1;

use SL::Projects;

        my %params             = map { $_ => $form->{$_} } qw(projectnumber description active);

        if (($rows = Projects->search_projects(%params)) > 1) {

# partsgroup, pricegroup administration

#=====================================================================

# LX-Office ERP

# Copyright (C) 2004

# Based on SQL-Ledger Version 2.1.9

# Web http://www.lx-office.org

#

#=====================================================================

# SQL-Ledger Accounting

# Copyright (c) 1998-2002

#

#  Author: Dieter Simader

#   Email: dsimader@sql-ledger.org

#     Web: http://www.sql-ledger.org

#

#

# This program is free software; you can redistribute it and/or modify

# it under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 2 of the License, or

# (at your option) any later version.

#

# This program is distributed in the hope that it will be useful,

# but WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

# GNU General Public License for more details.

# You should have received a copy of the GNU General Public License

# along with this program; if not, write to the Free Software

# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

#======================================================================

#

# project administration

#======================================================================

use POSIX qw(strftime);

use SL::Projects;

use SL::ReportGenerator;

require "bin/mozilla/common.pl";

require "bin/mozilla/reportgenerator.pl";

sub add {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  # construct callback

  $form->{callback} = build_std_url('action') unless $form->{callback};

  display_project_form();

  $lxdebug->leave_sub();

}

sub edit {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  # show history button

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

  #/show hhistory button

  $form->{title} = "Edit";

  $form->{project} = Projects->get_project('id' => $form->{id}, 'orphaned' => 1);

  display_project_form();

  $lxdebug->leave_sub();

}

sub search {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  $form->{title} = $locale->text('Projects');

  $form->header();

  print $form->parse_html_template('projects/search');

  $lxdebug->leave_sub();

}

sub project_report {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  $form->{sort} ||= 'projectnumber';

  my $filter      = $form->{filter} || { };

  Projects->search_projects(%{ $filter }, 'sort' => $form->{sort});

  my $report      = SL::ReportGenerator->new(\%myconfig, $form);

  my @columns     = qw(projectnumber description active);

  my @hidden_vars = ('filter');

  my $href        = build_std_url('action=project_report', @hidden_vars);

  my %column_defs = (

    'projectnumber'            => { 'text' => $locale->text('Number'), },

    'description'              => { 'text' => $locale->text('Description'), },

    'active'                   => { 'text' => $locale->text('Active'), 'visible' => 'both' eq $filter->{active}, },

    );

  foreach (qw(projectnumber description)) {

    $column_defs{$_}->{link}    = $href . "&sort=$_";

    $column_defs{$_}->{visible} = 1;

  }

  $report->set_columns(%column_defs);

  $report->set_column_order(@columns);

  $report->set_export_options('project_report', @hidden_vars);

  $report->set_sort_indicator($form->{sort}, 1);

  my @options;

  push @options, $locale->text('All')                                            if ($filter->{all});

  push @options, $locale->text('Orphaned')                                       if ($filter->{orphaned});

  push @options, $locale->text('Project Number') . " : $filter->{projectnumber}" if ($filter->{projectnumber});

  push @options, $locale->text('Description') . " : $filter->{description}"      if ($filter->{description});

  push @options, $locale->text('Active')                                         if ($filter->{active} eq 'active');

  push @options, $locale->text('Inactive')                                       if ($filter->{active} eq 'inactive');

  push @options, $locale->text('Orphaned')                                       if ($filter->{status} eq 'orphaned');

  $form->{title} = $locale->text('Projects');

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

                       'output_format'       => 'HTML',

                       'title'               => $form->{title},

                       'attachment_basename' => $locale->text('project_list') . strftime('_%Y%m%d', localtime time),

    );

  $report->set_options_from_form();

  my $edit_url = build_std_url('action=edit&type=project');

  my $callback = $form->escape($href) . '&sort=' . E($form->{sort});

  foreach $project (@{ $form->{project_list} }) {

    $project->{active} = $project->{active} ? $locale->text('Yes')  : $locale->text('No');

    my $row = { map { $_ => { 'data' => $project->{$_} } } keys %{ $project } };

    $row->{projectnumber}->{link} = $edit_url . "&id=" . E($project->{id}) . "&callback=${callback}";

    $report->add_data($row);

  }

  $report->generate_with_headers();

  $lxdebug->leave_sub();

}

sub display_project_form {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  $form->{project} ||= { };

  $form->{title}     = $form->{project}->{id} ? $locale->text("Edit Project") : $locale->text("Add Project");

  $form->header();

  print $form->parse_html_template('projects/project_form');

  $lxdebug->leave_sub();

}

sub save {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  $form->isblank("project.projectnumber", $locale->text('Project Number missing!'));

  my $project    = $form->{project} || { };

  my $is_new     = !$project->{id};

  $project->{id} = Projects->save_project(%{ $project });

  # saving the history

  if(!exists $form->{addition} && $project->{id} ne "") {

    $form->{id}       = $project->{id};

    $form->{snumbers} = qq|projectnumber_| . $project->{projectnumber};

  	$form->{addition} = "SAVED";

  	$form->save_history($form->dbconnect(\%myconfig));

  }

  # /saving the history

  if ($form->{callback}) {

    map { $form->{callback} .= "&new_${_}=" . $form->escape($project->{$_}); } qw(projectnumber description id);

    my $message              = $is_new ? $locale->text('The project has been added.') : $locale->text('The project has been saved.');

    $form->{callback}       .= "&message="  . E($message);

  }

  $form->redirect($locale->text('Project saved!'));

  $lxdebug->leave_sub();

}

sub save_as_new {

  $lxdebug->enter_sub();

  delete $form->{project}->{id} if ($form->{project});

  save();

  $lxdebug->leave_sub();

}

sub delete {

  $lxdebug->enter_sub();

  $auth->assert('project_edit');

  my $project = $form->{project} || { };

  Projects->delete_project('id' => $project->{id});

  # saving the history

  if(!exists $form->{addition}) {

    $form->{snumbers} = qq|projectnumber_| . $project->{projectnumber};

  	$form->{addition} = "DELETED";

  	$form->save_history($form->dbconnect(\%myconfig));

  }

  # /saving the history

  $form->redirect($locale->text('Project deleted!'));

  $lxdebug->leave_sub();

}

sub continue {

  call_sub($form->{nextsub});

}

  'Both'                        => 'Beide',

  'The project has been added.' => 'Das Projekt wurde erfasst.',

  'The project has been saved.' => 'Das Projekt wurde gespeichert.',

  'project_list'                => 'projektliste',

#!/usr/bin/perl

$self->{texts} = {

  'ADDED'                       => 'Hinzugef?gt',

  'AP'                          => 'Einkauf',

  'AR'                          => 'Verkauf',

  'Active'                      => 'Aktiv',

  'Add Project'                 => 'Projekt erfassen',

  'Address'                     => 'Adresse',

  'Advance turnover tax return' => 'Umsatzsteuervoranmeldung',

  'All'                         => 'Alle',

  'All reports'                 => 'Alle Berichte (Kontenübersicht, Summen- u. Saldenliste, GuV, BWA, Bilanz, Projektbuchungen)',

  'Attempt to call an undefined sub named \'%s\'' => 'Es wurde versucht, eine nicht definierte Unterfunktion namens \'%s\' aufzurufen.',

  'Bcc'                         => 'Bcc',

  'Bin List'                    => 'Lagerliste',

  'Binding to the LDAP server as "#1" failed. Please check config/authentication.pl.' => 'Die Anmeldung am LDAP-Server als "#1" schlug fehl. Bitte überprüfen Sie die Angaben in config/authentication.pl.',

  'CANCELED'                    => 'Storniert',

  'CSV export -- options'       => 'CSV-Export -- Optionen',

  'Cc'                          => 'Cc',

  'Change Lx-Office installation settings (all menu entries beneath \'System\')' => 'Verändern der Lx-Office-Installationseinstellungen (Menüpunkte unterhalb von \'System\')',

  'Confirmation'                => 'Auftragsbest?tigung',

  'Contact'                     => 'Kontakt',

  'Could not spawn html2ps or GhostScript.' => 'html2ps oder GhostScript konnte nicht gestartet werden.',

  'Could not spawn the printer command.' => 'Die Druckanwendung konnte nicht gestartet werden.',

  'Could not write the html2ps config file.' => 'Die temporäre html2ps-Konfigurationsdatei konnte nicht geschrieben werden.',

  'Could not write the temporary HTML file.' => 'Eine temporäre HTML-Datei konnte nicht geschrieben werden.',

  'Create and edit RFQs'        => 'Lieferantenanfragen erfassen und bearbeiten',

  'Create and edit customers and vendors' => 'Kunden und Lieferanten erfassen und bearbeiten',

  'Create and edit dunnings'    => 'Mahnungen erfassen und bearbeiten',

  'Create and edit invoices and credit notes' => 'Rechnungen und Gutschriften erfassen und bearbeiten',

  'Create and edit parts, services, assemblies' => 'Artikel, Dienstleistungen, Erzeugnisse erfassen und bearbeiten',

  'Create and edit projects'    => 'Projekte erfassen und bearbeiten',

  'Create and edit purchase delivery orders' => 'Lieferscheine von Lieferanten erfassen und bearbeiten',

  'Create and edit purchase orders' => 'Lieferantenaufträge erfassen und bearbeiten',

  'Create and edit sales delivery orders' => 'Lieferscheine für Kunden erfassen und bearbeiten',

  'Create and edit sales orders' => 'Auftragsbestätigungen erfassen und bearbeiten',

  'Create and edit sales quotations' => 'Angebote erfassen und bearbeiten',

  'Create and edit vendor invoices' => 'Eingangsrechnungen erfassen und bearbeiten',

  'Credit Note'                 => 'Gutschrift',

  'Customer Number'             => 'Kundennummer',

  'Customer details'            => 'Kundendetails',

  'DATEV Export'                => 'DATEV-Export',

  'DELETED'                     => 'Gel?scht',

  'DUNNING STARTED'             => 'Mahnprozess gestartet',

  'Dataset upgrade'             => 'Datenbankaktualisierung',

  'Date'                        => 'Datum',

  'Delivery Order'              => 'Lieferschein',

  'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',

  'Description'                 => 'Beschreibung',

  'Directory'                   => 'Verzeichnis',

  'ELSE'                        => 'Zusatz',

  'Edit Project'                => 'Projekt bearbeiten',

  'Enter longdescription'       => 'Langtext eingeben',

  'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',

  'File'                        => 'Datei',

  'General ledger and cash'     => 'Finanzbuchhaltung und Zahlungsverkehr',

  'History'                     => 'Historie',

  'Inactive'                    => 'Inaktiv',

  'Invoice'                     => 'Rechnung',

  'MAILED'                      => 'Gesendet',

  'Manage license keys'         => 'Lizenzschlüssel verwalten',

  'Mark as paid?'               => 'Als bezahlt markieren?',

  'Marked as paid'              => 'Als bezahlt markiert',

  'Master Data'                 => 'Stammdaten',

  'May set the BCC field when sending emails' => 'Beim Verschicken von Emails das Feld \'BCC\' setzen',

  'Message'                     => 'Nachricht',

  'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.',

  'Missing \'tag\' field.'      => 'Fehlendes Feld \'tag\'.',

  'Missing parameter #1 in call to sub #2.' => 'Fehlernder Parameter \'#1\' in Funktionsaufruf \'#2\'.',

  'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.',

  'Name'                        => 'Name',

  'No'                          => 'Nein',

  'No %s was found matching the search parameters.' => 'Es wurde kein %s gefunden, auf den die Suchparameter zutreffen.',

  'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden',

  'No Vendor was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein H?ndler gefunden',

  'No customer has been selected yet.' => 'Es wurde noch kein Kunde ausgew?hlt.',

  'No or an unknown authenticantion module specified in "config/authentication.pl".' => 'Es wurde kein oder ein unbekanntes Authentifizierungsmodul in "config/authentication.pl" angegeben.',

  'No part was found matching the search parameters.' => 'Es wurde kein Artikel gefunden, auf den die Suchparameter zutreffen.',

  'No vendor has been selected yet.' => 'Es wurde noch kein Lieferant ausgew?hlt.',

  'Number'                      => 'Nummer',

  'Orphaned'                    => 'Nie benutzt',

  'Others'                      => 'Andere',

  'PAYMENT POSTED'              => 'Rechung gebucht',

  'PDF export -- options'       => 'PDF-Export -- Optionen',

  'POSTED'                      => 'Gebucht',

  'POSTED AS NEW'               => 'Als neu gebucht',

  'PRINTED'                     => 'Gedruckt',

  'Packing List'                => 'Lieferschein',

  'Part Number'                 => 'Artikelnummer',

  'Part description'            => 'Artikelbeschreibung',

  'Pick List'                   => 'Sammelliste',

  'Please enter values'         => 'Bitte Werte eingeben',

  'Proforma Invoice'            => 'Proformarechnung',

  'Project Number'              => 'Projektnummer',

  'Project Number missing!'     => 'Projektnummer fehlt!',

  'Project deleted!'            => 'Projekt gel?scht!',

  'Project saved!'              => 'Projekt gespeichert!',

  'Projects'                    => 'Projekte',

  'Purchase Order'              => 'Lieferantenauftrag',

  'Quotation'                   => 'Angebot',

  'RFQ'                         => 'Anfrage',

  'Receipt, payment, reconciliation' => 'Zahlungseingang, Zahlungsausgang, Kontenabgleich',

  'Reports'                     => 'Berichte',

  'SAVED'                       => 'Gespeichert',

  'SAVED FOR DUNNING'           => 'Gespeichert',

  'SCREENED'                    => 'Angezeigt',

  'Select a Customer'           => 'Endkunde ausw?hlen',

  'Select a customer'           => 'Einen Kunden auswählen',

  'Select a part'               => 'Artikel auswählen',

  'Select a vendor'             => 'Einen Lieferanten auswählen',

  'Storno Invoice'              => 'Stornorechnung',

  'Storno Packing List'         => 'Stornolieferschein',

  'Subject'                     => 'Betreff',

  'The \'tag\' field must only consist of alphanumeric characters or the carachters - _ ( )' => 'Das Feld \'tag\' darf nur aus alphanumerischen Zeichen und den Zeichen - _ ( ) bestehen.',

  'The LDAP server "#1:#2" is unreachable. Please check config/authentication.pl.' => 'Der LDAP-Server "#1:#2" ist nicht erreichbar. Bitte überprüfen Sie die Angaben in config/authentication.pl.',

  'The config file "config/authentication.pl" contained invalid Perl code:' => 'Die Konfigurationsdatei "config/authentication.pl" enthielt ungütigen Perl-Code:',

  'The config file "config/authentication.pl" was not found.' => 'Die Konfigurationsdatei "config/authentication.pl" wurde nicht gefunden.',

  'The connection to the LDAP server cannot be encrypted (SSL/TLS startup failure). Please check config/authentication.pl.' => 'Die Verbindung zum LDAP-Server kann nicht verschlüsselt werden (Fehler bei SSL/TLS-Initialisierung). Bitte überprüfen Sie die Angaben in config/authentication.pl.',

  'The connection to the authentication database failed:' => 'Die Verbindung zur Authentifizierungsdatenbank schlug fehl:',

  'The connection to the template database failed:' => 'Die Verbindung zur Vorlagendatenbank schlug fehl:',

  'The creation of the authentication database failed:' => 'Das Anlegen der Authentifizierungsdatenbank schlug fehl:',

  'The list has been printed.'  => 'Die Liste wurde ausgedruckt.',

  'The project has been added.' => 'Das Projekt wurde erfasst.',

  'The project has been saved.' => 'Das Projekt wurde gespeichert.',

  'To (email)'                  => 'An',

  'Transactions, AR transactions, AP transactions' => 'Dialogbuchen, Debitorenrechnungen, Kreditorenrechnungen',

  'Trying to call a sub without a name' => 'Es wurde versucht, eine Unterfunktion ohne Namen aufzurufen.',

  'Unit'                        => 'Einheit',

  'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',

  'Value'                       => 'Wert',

  'Variable'                    => 'Variable',

  'Vendor details'              => 'Lieferantendetails',

  'View warehouse content'      => 'Lagerbestand ansehen',

  'Warehouse management'        => 'Lagerverwaltung/Bestandsver?nderung',

  'Yes'                         => 'Ja',

  'You do not have the permissions to access this function.' => 'Sie verfügen nicht über die notwendigen Rechte, um auf diese Funktion zuzugreifen.',

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

  'bin_list'                    => 'Lagerliste',

  'config/authentication.pl: Key "DB_config" is missing.' => 'config/authentication.pl: Das Schlüsselwort "DB_config" fehlt.',

  'config/authentication.pl: Key "LDAP_config" is missing.' => 'config/authentication.pl: Der Schlüssel "LDAP_config" fehlt.',

  'config/authentication.pl: Missing parameters in "DB_config". Required parameters are "host", "db" and "user".' => 'config/authentication.pl: Fehlende Parameter in "DB_config". Benötigte Parameter sind "host", "db" und "user".',

  'config/authentication.pl: Missing parameters in "LDAP_config". Required parameters are "host", "attribute" and "base_dn".' => 'config/authentication.pl: Fehlende Parameter in "LDAP_config". Benötigt werden "host", "attribute" und "base_dn".',

  'customer'                    => 'Kunde',

  'invoice'                     => 'Rechnung',

  'no'                          => 'nein',

  'packing_list'                => 'Versandliste',

  'pick_list'                   => 'Entnahmeliste',

  'proforma'                    => 'Proforma',

  'project_list'                => 'projektliste',

  'purchase_order'              => 'Auftrag',

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

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

  'request_quotation'           => 'Angebotsanforderung',

  'sales_order'                 => 'Kundenauftrag',

  'sales_quotation'             => 'Verkaufsangebot',

  'vendor'                      => 'Lieferant',

  'yes'                         => 'ja',

};

$self->{subs} = {

  'E'                           => 'E',

  'H'                           => 'H',

  'NTI'                         => 'NTI',

  'Q'                           => 'Q',

  'add'                         => 'add',

  'build_std_url'               => 'build_std_url',

  'calculate_qty'               => 'calculate_qty',

  'call_sub'                    => 'call_sub',

  'continue'                    => 'continue',

  'cov_selection_internal'      => 'cov_selection_internal',

  'delete'                      => 'delete',

  'delivery_customer_selection' => 'delivery_customer_selection',

  'display_project_form'        => 'display_project_form',

  'edit'                        => 'edit',

  'format_dates'                => 'format_dates',

  'mark_as_paid_common'         => 'mark_as_paid_common',

  'part_selection_internal'     => 'part_selection_internal',

  'project_report'              => 'project_report',

  'reformat_numbers'            => 'reformat_numbers',

  'report_generator_back'       => 'report_generator_back',

  'report_generator_dispatcher' => 'report_generator_dispatcher',

  'report_generator_do'         => 'report_generator_do',

  'report_generator_export_as_csv' => 'report_generator_export_as_csv',

  'report_generator_export_as_pdf' => 'report_generator_export_as_pdf',

  'retrieve_partunits'          => 'retrieve_partunits',

  'save'                        => 'save',

  'save_as_new'                 => 'save_as_new',

  'search'                      => 'search',

  'select_part'                 => 'select_part',

  'select_part_internal'        => 'select_part_internal',

  'set_longdescription'         => 'set_longdescription',

  'show_history'                => 'show_history',

  'show_vc_details'             => 'show_vc_details',

  'vendor_selection'            => 'vendor_selection',

  'weiter'                      => 'continue',

  'l?schen'                     => 'delete',

  'neue_ware'                   => 'new_part',

  'speichern'                   => 'save',

  'als_neu_speichern'           => 'save_as_new',

};

1;

module=projects.pl

module=projects.pl

am.pl

[% USE HTML %][% USE LxERP %]<body>

 [%- IF message %]

 <p>[% message %]</p>

 <hr>

 [%- END %]

 <form method="post" action="projects.pl">

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

  <div class="listtop">[% title %]</div>

  <p>

   <table>

    <tr>

     <th align="right">Nummer</th>

     <td><input name="project.projectnumber" size="20" value="[% HTML.escape(project.projectnumber) %]"></td>

    </tr>

    <tr>

     <th align="right">Beschreibung</th>

     <td>

      [%- SET rows = LxERP.numtextrows(project.description, 60) %]

      [%- IF rows > 1 %]

      <textarea name="project.description" rows="rows" cols="60" style="width: 100%" wrap="soft">[% HTML.escape(project.description) %]</textarea>

      [%- ELSE %]

      <input name="project.description" size="60" value="[% HTML.escape(project.description) %]">

      [%- END %]

     </td>

    </tr>

    [%- IF project.id %]

    <tr>

     <th align="right">&nbsp;</th>

     <td>

      <input type="radio" name="project.active" id="active_1" value="1"[% IF project.active %] checked[% END %]><label for="active_1">Aktiv</label>

      <input type="radio" name="project.active" id="active_0" value="0"[% IF !project.active %] checked[% END %]><label for="active_0">Inaktiv</label>

     </td>

    </tr>

    [%- END %]

   </table>

  </p>

  <p><hr size="3" noshade></p>

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

  <p>

   <input type="submit" class="submit" name="action" value="Speichern">

   [%- IF project.id %]

   <input type="submit" class="submit" name="action" value="als neu speichern">

   [%- IF project.orphaned %]

   <input type="submit" class="submit" name="action" value="L?schen">

   [%- END %]

   <input type="button" onclick="set_history_window([% HTML.escape(project.id) %]);" name="history" id="history" value="Historie">

   [%- END %]

  </p>

 </form>

</body>

</html>

[% USE HTML %][% USE LxERP %]<body>

 [%- IF message %]

 <p>[% message %]</p>

 <hr>

 [%- END %]

 <form method="post" action="projects.pl">

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

  <div class="listtop">[% title %]</div>

  <p>

   <table>

    <tr>

     <th align="right"><translate>Number</translate></th>

     <td><input name="project.projectnumber" size="20" value="[% HTML.escape(project.projectnumber) %]"></td>

    </tr>

    <tr>

     <th align="right"><translate>Description</translate></th>

     <td>

      [%- SET rows = LxERP.numtextrows(project.description, 60) %]

      [%- IF rows > 1 %]

      <textarea name="project.description" rows="rows" cols="60" style="width: 100%" wrap="soft">[% HTML.escape(project.description) %]</textarea>

      [%- ELSE %]

      <input name="project.description" size="60" value="[% HTML.escape(project.description) %]">

      [%- END %]

     </td>

    </tr>

    [%- IF project.id %]

    <tr>

     <th align="right">&nbsp;</th>

     <td>

      <input type="radio" name="project.active" id="active_1" value="1"[% IF project.active %] checked[% END %]><label for="active_1"><translate>Active</translate></label>

      <input type="radio" name="project.active" id="active_0" value="0"[% IF !project.active %] checked[% END %]><label for="active_0"><translate>Inactive</translate></label>

     </td>

    </tr>

    [%- END %]

   </table>

  </p>

  <p><hr size="3" noshade></p>

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

  <p>

   <input type="submit" class="submit" name="action" value="<translate>Save</translate>">

   [%- IF project.id %]

   <input type="submit" class="submit" name="action" value="<translate>Save as new</translate>">

   [%- IF project.orphaned %]

   <input type="submit" class="submit" name="action" value="<translate>Delete</translate>">

   [%- END %]

   <input type="button" onclick="set_history_window([% HTML.escape(project.id) %]);" name="history" id="history" value="<translate>history</translate>">

   [%- END %]

  </p>

 </form>

</body>

</html>