projekt kivitendo

use SL::IO;

use SL::TransNumber;

use SL::DB::Chart;

use SL::DB::Default;

use SL::DB::Draft;

use SL::DB::Tax;

use SL::TransNumber;

use SL::DB;

use SL::Presenter::Part qw(type_abbreviation classification_abbreviation);

use Data::Dumper;

use strict;

  $amount = $form->round_amount( $netamount + $tax, 2, 1);

  # save AR record

  #erweiterung fuer lieferscheinnummer (donumber) 12.02.09 jb

                globalproject_id               = ?, delivery_customer_id             = ?,

                transaction_description        = ?, delivery_vendor_id               = ?,

                donumber    = ?, invnumber_for_credit_note = ?,        direct_debit  = ?, qrbill_without_amount = ?,

              WHERE id = ?|;

  @values = (          $form->{"invnumber"},           $form->{"ordnumber"},             $form->{"quonumber"},          $form->{"cusordnumber"},

             conv_date($form->{"invdate"}),  conv_date($form->{"orddate"}),    conv_date($form->{"quodate"}), conv_date($form->{tax_point}), conv_i($form->{"customer_id"}),

                conv_i($form->{"globalproject_id"}),                              conv_i($form->{"delivery_customer_id"}),

                       $form->{transaction_description},                          conv_i($form->{"delivery_vendor_id"}),

                       $form->{"donumber"}, $form->{"invnumber_for_credit_note"},        $form->{direct_debit} ? 't' : 'f', $form->{qrbill_without_amount} ? 't' : 'f',

                conv_i($form->{"id"}));

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

           a.mtime, a.itime,

           a.language_id, a.delivery_customer_id, a.delivery_vendor_id, a.type,

           a.transaction_description, a.donumber, a.invnumber_for_credit_note,

           dc.dunning_description,

           e.name AS employee

         FROM ar a

use SL::DB::BankAccount;

use SL::Helper::QrBill;

use SL::Helper::ISO3166;

use Cwd;

  my %ref_nr_data;

  if ($::instance_conf->get_create_qrbill_invoices == 1) {

    %ref_nr_data = (

      'type' => 'QRR',

    );

    # get ref. number/iban formatted with spaces and set into form for template

    # processing

  } elsif ($::instance_conf->get_create_qrbill_invoices == 2) {

    %ref_nr_data = (

      'type' => 'NON',

use SL::DB::Invoice;

use SL::DB::PaymentTerm;

use SL::DB::ValidityToken;

require "bin/mozilla/common.pl";

require "bin/mozilla/io.pl";

  $TMPL_VAR{creditwarning} = ($form->{creditlimit} != 0) && ($form->{creditremaining} < 0) && !$form->{update};

  $TMPL_VAR{is_credit_remaining_negativ} = $form->{creditremaining} =~ /-/;

# set option selected

  foreach my $item (qw(AR)) {

    $form->{"select$item"} =~ s/ selected//;

  'Purpose (if field names purpose, purpose1, purpose2 ... exist they will all combined into the field "purpose")' => 'Verwendungszweck (wenn die Spalten purpose, purpose1, purpose2 ... existieren werden diese zum Feld "purpose" zusammengefügt)',

  'Purpose/Reference'           => 'Verwendungszweck und Referenz',

  'QR bill without amount'      => 'QR-Rechnung ohne Betrag',

  'QR-Code placeholder image: QRCodePlaceholder not found in template.' => 'QR-Code Platzhalter Bild: QRCodePlaceholder nicht in Druckvorlage gefunden.',

  'QR-Image generation failed: ' => 'QR-Code Erzeugung fehlgeschlagen: ',

  'QUEUED'                      => 'In Warteschlange',

  'Purpose (if field names purpose, purpose1, purpose2 ... exist they will all combined into the field "purpose")' => '',

  'Purpose/Reference'           => '',

  'QR bill without amount'      => '',

  'QR-Code placeholder image: QRCodePlaceholder not found in template.' => '',

  'QR-Image generation failed: ' => '',

  'QUEUED'                      => '',

<input type="hidden" name="follow_up_rowcount" id="follow_up_rowcount" value="1">

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

<input type="hidden" name="already_printed_flag" id="already_printed_flag" value="0">

[% IF !id %]

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

[% END %]

            [%- L.select_tag('globalproject_id', ALL_PROJECTS, title_key = 'projectnumber', default = globalproject_id, with_empty = '1', onChange = "document.getElementById('update_button').click();") %]

          </td>

        </tr>

      </table>

    </td>

  </tr>