projekt kivitendo

use SL::DB::Business;

use SL::DB::BusinessModel;

                                  makemodels businessmodels shops_not_assigned

                                  all_languages all_units all_price_factors

                                  all_businesses) ],

sub action_add_businessmodel_row {

  my ($self) = @_;

  my $business_id = $::form->{add_businessmodel};

  my $business = SL::DB::Manager::Business->find_by(id => $business_id) or

    return $self->js->error(t8("No business selected or found!"))->render;

  if ( grep { $business_id == $_->business_id } @{ $self->businessmodels } ) {

    $self->js->flash('info', t8("This business has already been added."));

  };

  my $bm = SL::DB::BusinessModel->new(#parts_id             => $::form->{part}->{id},

                                      business             => $business,

                                      model                => '',

                                      part_description     => '',

                                      part_longdescription => '',

  ) or die "Can't create BusinessModel object";

  my $row_as_html = $self->p->render('part/_businessmodel_row',

                                     businessmodel => $bm);

  # after selection focus on the model field in the row that was just added

  $self->js

    ->append('#businessmodel_rows', $row_as_html)  # append in tbody

    ->val('#add_businessmodel', '')

    ->run('kivi.Part.focus_last_businessmodel_input')

    ->render;

}

  $self->parse_form_businessmodels;

sub parse_form_businessmodels {

  my ($self) = @_;

  my $make_key = sub { return $_[0]->parts_id . '+' . $_[0]->business_id; };

  my $businessmodels_map;

  if ( $self->part->businessmodels ) { # check for new parts or parts without businessmodels

    $businessmodels_map = { map { $make_key->($_) => Rose::DB::Object::Helpers::clone($_) } @{$self->part->businessmodels} };

  };

  $self->part->businessmodels([]);

  my $businessmodels = delete($::form->{businessmodels}) || [];

  foreach my $businessmodel ( @{$businessmodels} ) {

    next unless $businessmodel->{business_id};

    my $bm = SL::DB::BusinessModel->new( #parts_id            => $self->part->id,            # will be assigned by row add_businessmodels

                                         business_id          => $businessmodel->{business_id},

                                         model                => $businessmodel->{model} || '',

                                         part_description     => $businessmodel->{part_description} || '',

                                         part_longdescription => $businessmodel->{part_longdescription} || '',

    );

    $self->part->add_businessmodels($bm);

  };

}

    return SL::DB::Part->new(id => $::form->{part}{id})->load(with => [ qw(makemodels businessmodels customerprices prices translations partsgroup shop_parts shop_parts.shop) ]);

sub init_businessmodels {

  my ($self) = @_;

  my @businessmodel_array = ();

  my $businessmodels = delete($::form->{businessmodels}) || [];

  foreach my $businessmodel ( @{$businessmodels} ) {

    next unless $businessmodel->{business_id};

    my $bm = SL::DB::BusinessModel->new(#parts_id            => $self->part->id,             # will be assigned by row add_businessmodels

                                        business_id          => $businessmodel->{business_id},

                                        model                => $businessmodel->{model} || '',

                                        part_description     => $businessmodel->{part_description} || '',

                                        part_longdescription => $businessmodel->{part_longdescription} || '',

                                  ) or die "Can't create bm";

    push(@businessmodel_array, $bm);

  };

  return \@businessmodel_array;

}

sub init_all_businesses {

  SL::DB::Manager::Business->get_all_sorted;

}

# This file has been auto-generated only because it didn't exist.

# Feel free to modify it at will; it will not be overwritten automatically.

package SL::DB::BusinessModel;

use strict;

use SL::DB::MetaSetup::BusinessModel;

__PACKAGE__->meta->initialize;

# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.

__PACKAGE__->meta->make_manager_class;

1;

use SL::DB::BusinessModel;

  business_models                => 'business_model',

# This file has been auto-generated. Do not modify it; it will be overwritten

# by rose_auto_create_model.pl automatically.

package SL::DB::BusinessModel;

use strict;

use parent qw(SL::DB::Object);

__PACKAGE__->meta->table('business_models');

__PACKAGE__->meta->columns(

  business_id          => { type => 'integer', not_null => 1 },

  itime                => { type => 'timestamp', default => 'now()' },

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

  mtime                => { type => 'timestamp' },

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

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

  parts_id             => { type => 'integer', not_null => 1 },

);

__PACKAGE__->meta->primary_key_columns([ 'parts_id', 'business_id' ]);

__PACKAGE__->meta->allow_inline_column_values(1);

__PACKAGE__->meta->foreign_keys(

  business => {

    class       => 'SL::DB::Business',

    key_columns => { business_id => 'id' },

  },

  parts => {

    class       => 'SL::DB::Part',

    key_columns => { parts_id => 'id' },

  },

);

1;

;

  businessmodels     => {

    type         => 'one to many',

    class        => 'SL::DB::BusinessModel',

    column_map   => { id => 'parts_id' },

  },

  $query            = qq|SELECT bm.parts_id,

                         bm.model                AS business_model,

                         bm.part_description     AS bm_part_description,

                         bm.part_longdescription AS bm_part_longdescription,

                         b.description           AS business_make

                         FROM business_models bm

                         LEFT JOIN business b ON (bm.business_id = b.id)

                         WHERE bm.parts_id IN ($placeholders)|;

  my %businessmodel = ();

  $sth              = prepare_execute_query($form, $dbh, $query, @part_ids);

  while (my $ref = $sth->fetchrow_hashref()) {

    $businessmodel{$ref->{parts_id}} ||= [];

    push @{ $businessmodel{$ref->{parts_id}} }, $ref;

  }

  $sth->finish();

  map { $template_arrays{$_} = [] } (qw(make model mm_part_description mm_part_longdescription business_make business_model bm_part_description bm_part_longdescription customer_make customer_model cm_part_description cm_part_longdescription), @columns);

    push @{ $template_arrays{business_make} },           [];

    push @{ $template_arrays{business_model} },          [];

    push @{ $template_arrays{bm_part_description} },     [];

    push @{ $template_arrays{bm_part_longdescription} }, [];

    if ($businessmodel{$id}) {

      foreach my $ref (@{ $businessmodel{$id} }) {

        map { push @{ $template_arrays{$_}->[-1] }, $ref->{$_} } qw(business_make business_model bm_part_description bm_part_longdescription);

      }

    }

  // businessmodel

  ns.delete_businessmodel_row = function(clicked) {

    var row = $(clicked).closest('tr');

    $(row).remove();

  };

  ns.add_businessmodel_row = function() {

    if ($('#add_businessmodel').val() === '') return;

    var data = $('#businessmodel_table :input').serializeArray();

    data.push({ name: 'action', value: 'Part/add_businessmodel_row' });

    $.post("controller.pl", data, kivi.eval_json_result);

  };

  ns.focus_last_businessmodel_input = function () {

    $("#businessmodel_rows tr:last").find('input[type=text]').filter(':visible:first').focus();

  };

  'Business Type'               => 'Kunden-/Lieferantentyp',

  'Business Type Model'         => 'Kunden-/Lieferantentyp-Art.-Nr.',

  'Business Type'               => '',

  'Business Type Model'         => '',

-- @tag: add_business_models

-- @description: Tabelle für Kunden-/Lieferantentyp-Artikelnummern und Beschreibung

-- @depends: release_3_8_0

CREATE TABLE business_models (

  parts_id               integer NOT NULL,

  business_id            integer NOT NULL,

  model                  text,

  part_description       text,

  part_longdescription   text,

  itime                  timestamp              DEFAULT now(),

  mtime                  timestamp,

  FOREIGN KEY (parts_id)    REFERENCES parts(id),

  FOREIGN KEY (business_id) REFERENCES business(id),

  PRIMARY KEY(parts_id, business_id)

);

CREATE TRIGGER mtime_business_models BEFORE UPDATE ON business_models

    FOR EACH ROW EXECUTE PROCEDURE set_mtime();

 [% PROCESS 'part/_businessmodels.html' %]

[%- USE T8 %]

[%- USE L %]

[%- USE HTML %]

[%- USE LxERP %]

        <tr class="listrow businessmodel_row">

         <td align="center">

           [%- L.hidden_tag("businessmodels[+].business_id", businessmodel.business_id) -%]

           [%- L.button_tag("kivi.Part.delete_businessmodel_row(this)",

                            LxERP.t8("X")) %] [% # , confirm=LxERP.t8("Are you sure?")) %]

         </td>

         <td>[% businessmodel.business.description | html %]</td>

         <td>[% L.input_tag('businessmodels[].model', businessmodel.model, size=30 ) %]</td>

         <td>[% L.input_tag('businessmodels[].part_description',         businessmodel.part_description,     size=30 ) %]</td>

         <td>[% L.areainput_tag('businessmodels[].part_longdescription', businessmodel.part_longdescription, size=30 ) %]

        </tr>

[%- USE T8 %]

[%- USE L %]

[%- USE P %]

[%- USE HTML %]

[%- USE LxERP %]

  <tr>

  </tr>

  <tr>

    <td>

      <table id="businessmodel_table">

        <thead>

         <tr>

          <th class="listheading" style='text-align:center' nowrap width="1"><img src="image/close.png" alt="[%- LxERP.t8('delete item') %]"></th>

          <th class="listheading">[% 'Business'            | $T8 %]</th>

          <th class="listheading">[% 'Business Type Model' | $T8 %]</th>

          <th class="listheading">[% 'Part Description'    | $T8 %]</th>

          <th class="listheading">[% 'Long Description'    | $T8 %]</th>

         </tr>

        </thead>

        <tbody id="businessmodel_rows">

        [%- FOREACH businessmodel = SELF.part.businessmodels %]

          [% PROCESS 'part/_businessmodel_row.html' businessmodel=businessmodel %]

        [%- END %]

       </tbody>

       <tbody>

        <tr>

         <td></td>

         <td align="right">[% 'Business' | $T8 %]</td>

         <td>[% P.select_tag('add_businessmodel', SELF.all_businesses, title_key="description", with_empty=1, style='width: 300px', onchange='kivi.Part.add_businessmodel_row()') %]</td>

         <td align="right">[% L.button_tag('kivi.Part.add_businessmodel_row()', LxERP.t8('Add')) %]</td>

         <td></td>

        </tr>

       </tbody>

      </table>

    </td>

  </tr>