projekt kivitendo

  my $defaults   = SL::DB::Default->get;

    my $current_number = SL::PrefixedNumber->new(number => $defaults->{$_});

    $current_number->set_to($next_year * $multiplier);

    $defaults->{$_} = $current_number->get_current;

              request_quotation         => { number_column => 'quonumber',      number_range_column => 'rfqnumber',      scoping => \&oe_scoping,    },

              purchase_quotation_intake => { number_column => 'quonumber',      number_range_column => 'pqinumber',      scoping => \&oe_scoping,    },

              purchase_order            => { number_column => 'ordnumber',      number_range_column => 'ponumber',       scoping => \&oe_scoping,    },

              sales_delivery_order      => { number_column => 'donumber',       number_range_column => 'sdonumber',      scoping => \&do_scoping,    },

              purchase_delivery_order   => { number_column => 'donumber',       number_range_column => 'pdonumber',      scoping => \&do_scoping,    },

              supplier_delivery_order   => { number_column => 'donumber',       number_range_column => 'sudonumber',     scoping => \&do_scoping,    },

      SALES_ORDER_TYPE(),

      SALES_QUOTATION_TYPE(),

      PURCHASE_ORDER_TYPE(),

      REQUEST_QUOTATION_TYPE(),

      PURCHASE_QUOTATION_INTAKE_TYPE(),

    ));

  partsgroup_required                       => { type => 'boolean', default => 'false', not_null => 1 },

  payments_changeable                       => { type => 'integer', default => '0', not_null => 1 },

  pdonumber                                 => { type => 'text' },

  ponumber                                  => { type => 'text' },

  pqinumber                                 => { type => 'text' },

  precision                                 => { type => 'numeric', default => '0.01', not_null => 1, precision => 15, scale => 5 },

);

my @SUPPORTED_TYPES = (

  @{ SL::DB::DeliveryOrder::TypeData::valid_types() },

);

    $filters{where}         = 'NOT COALESCE(quotation, FALSE)';

    $filters{where}        .= $type =~ /^sales/ ? ' AND (customer_id IS NOT NULL)' : ' AND (vendor_id IS NOT NULL)';

  } elsif ($type =~ /_quotation$/) {

    $filters{trans_number}  = "quonumber";

    $filters{numberfield}   = $type eq 'sales_quotation' ? "sqnumber" : "rfqnumber";

      <th>[% LxERP.t8('Purchase Order') %]</th>

      <td>[% L.input_tag("defaults.ponumber", SELF.defaults.ponumber, size="15", class="wi-normal") %]</td>

    </tr>

    <tr>

      <th>[% LxERP.t8('Sales quotation') %]</th>

      <td>[% L.input_tag("defaults.sqnumber", SELF.defaults.sqnumber, size="15", class="wi-normal") %]</td>

   <td>[% L.input_tag("defaults.articlenumber", SELF.defaults.articlenumber, size="15") %]</td>

  </tr>

  <tr>

   <td align="right" nowrap>[% LxERP.t8('Last Sales Quotation Number') %]</td>

   <td>[% L.input_tag("defaults.sqnumber", SELF.defaults.sqnumber, size="15") %]</td>