projekt kivitendo

use SL::DB::Manager::EmailImport;

use SL::Helper::EmailProcessing;

use SL::Presenter::Tag qw(link_tag);

use Params::Validate qw(:all);

use List::MoreUtils qw(any);

          #   , $email_journal->id

          # );

          my $email_journal_id = $email_journal->id;

        };

      }

      if ($created_records  && $config->{processed_imap_flag}) {

  my $result = "";

    . join(', ', @deleted_email_import_ids) . "."

    if scalar @deleted_email_import_ids;

    . join(', ', @not_found_email_import_ids) . " for deletion."

    if scalar @not_found_email_import_ids;

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

  die "ZUGFeRD-Import only implemented for ap transaction templates" unless $record_type == 'ap_transaction';

  my $form_defaults;

  if ($attachment_id) {

  unless ( defined $ap_chart_id ) {

    # If no default account is configured, just use the first AP account found.

      where   => [ link => 'AP' ],

      sort_by => [ 'accno' ],

  }

  my $currency = SL::DB::Manager::Currency->find_by(

  # Try to fill in AP account to book against

  my $ap_chart_id = $::instance_conf->get_ap_chart_id;

    # If no default account is configured, just use the first AP account found.

      where   => [ link => 'AP' ],

      sort_by => [ 'accno' ],

  }

  my $currency = SL::DB::Manager::Currency->find_by(

  my %template_params;

  my $template_ap = SL::DB::Manager::RecordTemplate->get_first(where => [vendor_id => $vendor->id]);

  if ($template_ap) {

    $template_params{payment_id}              = $template_ap->payment_id;

    $template_params{department_id}           = $template_ap->department_id;

    $template_params{ordnumber}               = $template_ap->ordnumber;

    taxzone_id   => $vendor->taxzone_id,

    currency_id  => $currency->id,

    direct_debit => $metadata{'direct_debit'},

    transactions => [],

    %template_params,

  );

  $self->assign_attributes(%params);

  # parse items

  foreach my $i (@items) {

    my %item = %{$i};

    my $net_total = $item{'subtotal'};

    # set default values for items

    } else {

    }

    $self->add_ap_amount_row(%line_params);

  }

  $self->recalculate_amounts();

use XML::LibXML;

use SL::ZUGFeRD;

use SL::DB::PurchaseInvoice;

sub process_attachments {

  my ($self, $function_name, $email_journal, %params) = @_;

    croak "Function not implemented for: $function_name";

  }

  foreach my $attachment (@{$email_journal->attachments_sorted}) {

  }

}

sub can_function {

  my ($self, $email_journal, $attachment, %params) = @_;

  my $content = $attachment->content; # scalar ref

  my %res;

  if ( $content =~ m/^%PDF/ ) {

  }

  unless ($res{'result'} == SL::ZUGFeRD::RES_OK()) {

  }

  my $purchase_invoice;

    1;

  } or do {

    my $error = $@;

  };

  $self->_add_attachment_to_record($email_journal, $attachment, $purchase_invoice);

}

sub _add_attachment_to_record {

  'Could not create new project #1' => 'Neues Projekt #1 kann nicht angelegt werden',

  'Could not extract Factur-X/ZUGFeRD data, data and error message:' => 'Konnte keine Factur-X-/ZUGFeRD-Daten extrahieren, folgende Fehlermeldung und das PDF:',

  'Could not find an entry for this part in the pricegroup.' => 'Konnte keinen Eintrag für diesen Artikel in der Preisgruppe finden.',

  'Could not load class #1 (#2): "#3"' => 'Konnte Klasse #1 (#2) nicht laden: "#3"',

  'Could not load class #1, #2' => 'Konnte Klasse #1 nicht laden: "#2"',

  'Could not load employee'     => 'Konnte Benutzer nicht laden',

  'Delete text block'           => 'Textblock löschen',

  'Delete transaction'          => 'Buchung löschen',

  'Deleted'                     => 'Gelöscht',

  'Deleting this type of record has been disabled in the configuration.' => 'Das Löschen von dieser Belegart ist in der Konfiguration deaktiviert.',

  'Delivered'                   => 'Geliefert',

  'Delivered amount'            => 'Gelieferter Betrag',

  'Error when saving: #1'       => 'Fehler beim Speichern: #1',

  'Error while applying year-end bookings!' => 'Fehler beim Durchführen der Abschlußbuchungen!',

  'Error while creating project with project number of new order number, project number #1 already exists!' => 'Fehler beim Erstellen eines Projekts mit der Projektnummer der neuen Auftragsnummer, Projektnummer #1 existiert bereits!',

  'Error while saving shop order #1. DB Error #2. Generic exception #3.' => 'Fehler beim Speichern der Shop-Bestellung #1. DB Fehler #2. Genereller Fehler #3.',

  'Error with default taxzone'  => 'Ungültige Standardsteuerzone',

  'Error!'                      => 'Fehler!',

  'Errors during printing:'     => 'Druckfehler:',

  'Errors in GL transaction:'   => 'Fehler in Dialogbuchung:',

  'Errors while deleting record:' => 'Fehler beim Speichern des Belegs:',

  'Errors: #1'                  => 'Fehler: #1',

  'Ertrag'                      => 'Ertrag',

  'Ertrag prozentual'           => 'Ertrag prozentual',

  'No articles have been added yet.' => 'Es wurden noch keine Artikel hinzugefügt.',

  'No assembly has been selected yet.' => 'Es wurde noch kein Erzeugnis ausgewahlt.',

  'No attachment'               => 'Kein Anhang',

  'No background job has been created yet.' => 'Es wurden noch keine Hintergrund-Jobs angelegt.',

  'No bank account chosen!'     => 'Kein Bankkonto ausgewählt!',

  'No bank account configured for bank code/BIC #1, account number/IBAN #2.' => 'Kein Bankkonto für BLZ/BIC #1, Kontonummer/IBAN #2 konfiguriert.',

  'No transactions yet.'        => 'Bisher keine Buchungen.',

  'No transfers were executed in this export.' => 'In diesem SEPA-Export wurden keine Überweisungen ausgeführt.',

  'No users have been created yet.' => 'Es wurden noch keine Benutzer angelegt.',

  'No valid invoice(s) found'   => 'Keine gültige(n) Rechnung(en) gefunden.',

  'No valid number entered for pricegroup "#1".' => 'Für Preisgruppe "#1" wurde keine gültige Nummer eingegeben.',

  'No vendor available'         => 'Kein Lieferant verfügbar',

  'Normalize Customer / Vendor names' => 'Normalisierung Kunden- / Lieferantennamen',

  'Normalize part description and part notes' => 'Normalisierung Artikelbeschreibung und Artikellangtext (Bemerkung)',

  'Not Discountable'            => 'Nicht rabattierfähig',

  'Not delivered'               => 'Nicht geliefert',

  'Not delivered amount'        => 'nicht gelieferte Menge',

  'Not done yet'                => 'Noch nicht fertig',

  'Private E-mail'              => 'Private E-Mail',

  'Private Phone'               => 'Privates Tel.',

  'Problem'                     => 'Problem',

  'Produce'                     => 'Fertigen',

  'Produce Assembly'            => 'Erzeugnis fertigen',

  'Produce Assembly Configuration' => 'Konfiguration für Erzeugnis fertigen',

  'Could not create new project #1' => '',

  'Could not extract Factur-X/ZUGFeRD data, data and error message:' => '',

  'Could not find an entry for this part in the pricegroup.' => '',

  'Could not load class #1 (#2): "#3"' => '',

  'Could not load class #1, #2' => '',

  'Could not load employee'     => '',

  'Delete text block'           => '',

  'Delete transaction'          => '',

  'Deleted'                     => '',

  'Deleting this type of record has been disabled in the configuration.' => '',

  'Delivered'                   => '',

  'Delivered amount'            => '',

  'Error when saving: #1'       => '',

  'Error while applying year-end bookings!' => '',

  'Error while creating project with project number of new order number, project number #1 already exists!' => '',

  'Error while saving shop order #1. DB Error #2. Generic exception #3.' => '',

  'Error with default taxzone'  => '',

  'Error!'                      => '',

  'Errors during printing:'     => '',

  'Errors in GL transaction:'   => '',

  'Errors while deleting record:' => '',

  'Errors: #1'                  => '',

  'Ertrag'                      => '',

  'Ertrag prozentual'           => '',

  'No articles have been added yet.' => '',

  'No assembly has been selected yet.' => '',

  'No attachment'               => '',

  'No background job has been created yet.' => '',

  'No bank account chosen!'     => '',

  'No bank account configured for bank code/BIC #1, account number/IBAN #2.' => '',

  'No transactions yet.'        => '',

  'No transfers were executed in this export.' => '',

  'No users have been created yet.' => '',

  'No valid invoice(s) found'   => '',

  'No valid number entered for pricegroup "#1".' => '',

  'No vendor available'         => '',

  'Normalize Customer / Vendor names' => '',

  'Normalize part description and part notes' => '',

  'Not Discountable'            => '',

  'Not delivered'               => '',

  'Not delivered amount'        => '',

  'Not done yet'                => '',

  'Private E-mail'              => '',

  'Private Phone'               => '',

  'Problem'                     => '',

  'Produce'                     => '',

  'Produce Assembly'            => '',

  'Produce Assembly Configuration' => '',