projekt kivitendo

  $self->render('shop_part/_list_images', { header => 0 }, IMAGES => $images);

#  my $shop_part = SL::DB::Manager::ShopPart->find_by(id => $::form->{shop_part_id});

#  die unless $shop_part;

  my $shop = SL::Shop->new( config => $self->shop_part->shop );

sub action_save_categories {

  my @categories =  @{ $::form->{categories} || [] };

  $main::lxdebug->dump(0, 'WH: KATEGORIEN: ', \@categories);

  my @cat = ();

  foreach my $cat ( @categories) {

    # TODO das koma macht Probleme z.B kategorie "Feldsalat, Rapunzel"

    my @temp = [split(/,/,$cat)];

    push( @cat, @temp );

  }

  $main::lxdebug->dump(0, 'WH: KAT2:',\@cat);

  my $categories->{shop_category} = \@cat;

  my $params = delete($::form->{shop_part}) || { };

  $self->shop_part->assign_attributes(%{ $params });

  $self->shop_part->assign_attributes(%{ $categories });

  $self->shop_part->save;

  flash('info', t8('The categories has been saved.'));

  $self->js->run('kivi.shop_part.close_dialog')

           ->flash('info', t8("Updated categories"))

           ->render;

#use SL::DB::Helper::ActsAsList;

sub update_part {

  my ($self, $shop_part, $json) = @_;

  #shop_part is passed as a param

  die unless ref($shop_part) eq 'SL::DB::ShopPart';

  $main::lxdebug->dump(0, 'WH: UPDATE SHOPPART: ', \$shop_part);

  $main::lxdebug->dump(0, 'WH: UPDATE SELF: ', \$self);

  $main::lxdebug->dump(0, 'WH: UPDATE JSON: ', \$json);

  my $url = $self->url;

  my $part = SL::DB::Part->new(id => $shop_part->{part_id})->load;

  #my $part = $shop_part->part;

  $main::lxdebug->dump(0, 'WH: Part',\$part);

  # TODO: Prices (pricerules, pricegroups,

  my $cvars = { map { ($_->config->name => { value => $_->value_as_text, is_valid => $_->is_valid }) } @{ $part->cvars_by_config } };

  #my $categories = { map { ( name => $_) } @{ $shop_part->{shop_category} } };

  my @cat = ();

  foreach my $row_cat ( @{ $shop_part->shop_category } ) {

    $main::lxdebug->dump(0, 'WH:ROWCAT ',\$row_cat);

    my $temp = { ( id => @{$row_cat}[0], ) };

    $main::lxdebug->dump(0, 'WH: TEMP: ', \$temp);

    push ( @cat, $temp );

    #push ( @cat, map { ( name => $_[1]) } @{ $row_cat } );

  }

  $main::lxdebug->dump(0, 'WH: CATEGORIES',\@cat);

  my $images = SL::DB::Manager::File->get_all( where => [ modul => 'shop_part', trans_id => $part->{id} ]);

  $main::lxdebug->dump(0, 'WH: IMAGES',\@{ $images } );

  my $images2 = { map {

                    ( link        => 'data:' . $_->{file_content_type} . ';base64,' . MIME::Base64::encode($_->{file_content},''),

                      description => $_->{title},

                      position    => $_->{position},

                      extension   => 'jpg', # muss $extionsion sein

                      path        => $_->{filename}, # muss $path sein

                    ) } @{ $images } };

  $main::lxdebug->dump(0, 'WH: IMAGES 2 ',\$images2);

  my @images3 = ();

  foreach my $img (@{ $images }) {

    $main::lxdebug->dump(0, 'WH: FOR: ', \$img);

    my ($path, $extension) = (split /\./, $img->{filename});

    $main::lxdebug->message(0, "WH: PATH: $path Ext: $extension");

    my $temp ={

                      ( link        => 'data:' . $img->{file_content_type} . ';base64,' . MIME::Base64::encode($img->{file_content},''),

                        description => $img->{title},

                        position    => $img->{position},

                        extension   => $extension,

                        path        => $path,

                      )}    ;

    push( @images3, $temp);

  }

  $main::lxdebug->dump(0, 'WH: IMAGES 3 ',\@images3);

  my $data = $self->connector->get("http://$url/api/articles/$part->{partnumber}?useNumberAsId=true");

  my $data_json = $data->content;

  my $import = SL::JSON::decode_json($data_json);

  $main::lxdebug->dump(0, 'WH: IMPORT', \$import);

  $main::lxdebug->dump(0, 'WH: Active', $shop_part->active);

  my %shop_data =  (  name          => $part->{description},

                      taxId         => 4, # TODO Hardcoded kann auch der taxwert sein zB. tax => 19.00

                      mainDetail    => { number   => $part->{partnumber},

                                         inStock  => $part->{onhand},

                                         prices   =>  [ {          from   => 1,

                                                                   price  => $part->{sellprice},

                                                        customerGroupKey  => 'EK',

                                                      },

                                                    ],

                                       },

                      supplier      => $cvars->{freifeld_7}->{value},

                      description   => $shop_part->{shop_description},

                      active        => $shop_part->active,

                      images        => [ @images3 ],

                      __options_images => { replace => 1, },

                      categories    => [ @cat ], #{ path => 'Deutsch|test2' }, ], #[ $categories ],

                    )

                  ;

$main::lxdebug->dump(0, 'WH: SHOPDATA', \%shop_data );

my $dataString = SL::JSON::to_json(\%shop_data);

$dataString = encode_utf8($dataString);

$main::lxdebug->message(0, 'WH: JSONDATA2 '.$dataString);

  if($import->{success}){

$main::lxdebug->message(0, "WH: if success: ". $import->{success});

  my %del_img =  ( images        => [ {} ], ) ;

  my $del_imgString = SL::JSON::to_json(\%del_img);

  #my $delImg = $self->connector->put("http://$url/api/articles/$part->{partnumber}?useNumberAsId=true",Content => $del_imgString);

    #update

    my $upload = $self->connector->put("http://$url/api/articles/$part->{partnumber}?useNumberAsId=true",Content => $dataString);

    my $data_json = $upload->content;

    my $upload_content = SL::JSON::decode_json($data_json);

$main::lxdebug->dump(0, "WH:2 else success: ", \$upload);

    return $upload_content->{success};

  }else{

    #upload

$main::lxdebug->message(0, "WH: else success: ". $import->{success});

    my $upload = $self->connector->post("http://$url/api/articles/",Content => $dataString);

    my $data_json = $upload->content;

    my $upload_content = SL::JSON::decode_json($data_json);

$main::lxdebug->dump(0, "WH:2 else success: ", \$upload);

    return $upload_content->{success};

  }

>>>>>>> b616804... Kategorien werden mit ID und Name in die DB geschrieben. Ein Komma im Name erzeugt noch Fehler. Der Pfad muss noch gemacht werden

-- @tag: shop_parts_2

-- @description: Add tables for part information for shop

-- @charset: UTF-8

-- @depends: release_3_3_0 shops

-- @ignore: 0

ALTER TABLE shop_parts ALTER COLUMN shop_category TYPE TEXT[] USING array[shop_category];

[%- USE HTML %]

[%- USE T8 %]

[%- USE L -%]

[%- USE P -%]

[%- USE LxERP -%]

[%- USE Dumper -%]

[%  LxERP.t8("Part") %]: [% HTML.escape(SELF.shop_part.part.displayable_name) %]<br>

[%  LxERP.t8("Shop") %]: [% HTML.escape(SELF.shop_part.shop.description) %]

<br>

[% # Dumper.dump_html(SELF.shop_part.shop_category) %]

<br>

[% # Dumper.dump_html(CATEGORIES) %]

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

  [% BLOCK recurse %]

  [% # path = '' %]<!-- TODO: Pfad wg neuer Kategorie im Shop anlegen -->

    [% FOREACH obj = data %]

      <ul>

        <li>

        [% checked = '' %]

        [% # path = path _ obj.name %]

        [% # test = path.split('\|') %]

        [% # Dumper.dump_html(SELF.shop_part.shop_category.size) %]

        [% IF SELF.shop_part.shop_category.1.grep(obj.name).size %]

          [% checked = 'checked' %]

        [% ELSE %]

          [% FOREACH cat_row = SELF.shop_part.shop_category %]

            [% IF cat_row.1.grep(obj.name).size %]

              [% checked = 'checked' %]

            [% END %]

          [% END %]

        [% END %]

          [% L.checkbox_tag('categories[]',value=obj.id _"," _ obj.name _ ",PFAD", checked=checked) %][% HTML.escape(obj.name) %]</li>

        [% IF obj.childrenCount >= 1 %]

          [% # path = path _ '|' %]

          [% INCLUDE recurse data=obj.children %]

        [% END %]

      </ul>

    [% END %]

  [% END %]

  <div><h2>[% LxERP.t8("Shopcategories") %]</h2>

      [% FOREACH row = CATEGORIES %]

        [% IF row.name == 'Root' %]

          [% IF row.childrenCount >= 1 %]

            [% path = '' %]

            [% INCLUDE recurse data=row.children path=path %]

          [% END %]

        [% END %]

      [% END %]

  </div>

    [% L.button_tag("kivi.shop_part.save_categories(" _ SELF.shop_part.id _", " _ SELF.shop_part.shop.id _")", LxERP.t8("Save"))  %]</td>

</form>