projekt kivitendo

#ShopPartMassUpload

      use SL::Shop;

#     shop_part_record_ids       => [ 603, 604, 605],

#     num_order_created           => 0,

#     orders_ids                  => [1,2,3]

#     conversation_errors         => [ { id => 603 , item => 2, message => "Out of stock"}, ],

        push @{ $data->{conversion_errors} }, { id => $shop_part_id, number => '', message => 'Shoppart not found' };

      my $part_hash = $shop_part->part->as_tree;

      require SL::JSON;

      my $json      = SL::JSON::to_json($part_hash);

      my $return    = $shop->connector->update_part($shop_part, $json, $data->{todo});

      push @{ $data->{conversion_errors} }, { id => $shop_part_id, number => '', message => $return };

      push @{ $data->{conversion_errors} }, { id => $shop_part_id, number => '', message => $@ };

  my $part_hash = $shop_part->part->as_tree;

  my $json      = SL::JSON::to_json($part_hash);

  my $return    = $shop->connector->update_part($self->shop_part, $json,'all');

sub action_update {

  my ($self) = @_;

  $self->create_or_update;

}

    # The ShopwareConnector works with the CategoryID @categories[x][0] in others/new Connectors it must be tested

    # Each assigned categorie is saved with id,categorie_name an multidimensional array and could be expanded with categoriepath or what is needed

      push( @cattmp,$online_cat->{$_}->{id} );

      push( @cattmp,$online_cat->{$_}->{name} );

      push( @cat,\@cattmp );

sub create_or_update {

  my ($self) = @_;

  my $is_new = !$self->shop_part->id;

  # in edit.html all variables start with shop_part

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

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

  $self->shop_part->save;

  my ( $price, $price_src_str ) = $self->get_price_n_pricesource($self->shop_part->active_price_source);

  flash('info', $is_new ? t8('The shop part has been created.') : t8('The shop part has been saved.'));

  $self->js->html('#shop_part_description_' . $self->shop_part->id, $self->shop_part->shop_description)

           ->html('#shop_part_active_' . $self->shop_part->id, $self->shop_part->active)

           ->html('#price_' . $self->shop_part->id, $::form->format_amount(\%::myconfig,$price,2))

           ->html('#active_price_source_' . $self->shop_part->id, $price_src_str)

           ->run('kivi.ShopPart.close_dialog')

           ->flash('info', t8("Updated shop part"))

           ->render;

}

sub render_shop_part_edit_dialog {

  my ($self) = @_;

  # when self->shop_part is called in template, it will be an existing shop_part with id,

  # or a new shop_part with only part_id and shop_id set

  $self->js

    ->run(

      'kivi.ShopPart.shop_part_dialog',

      t8('Shop part'),

      $self->render('shop_part/edit', { output => 0 })

    )

    ->reinit_widgets;

  $self->js->render;

}

    # The ShopwareConnector works with the CategoryID @categories[x][0] in others/new Connectors it must be tested

    # Each assigned categorie is saved with id,categorie_name an multidimensional array and could be expanded with categoriepath or what is needed

  my $job                   = SL::DB::BackgroundJob->new(

    type                    => 'once',

    active                  => 1,

    package_name            => 'ShopPartMassUpload',

  )->set_data(

     shop_part_record_ids         => [ @shop_parts ],

     todo                         => $::form->{upload_todo},

     status                       => SL::BackgroundJob::ShopPartMassUpload->WAITING_FOR_EXECUTION(),

     conversation_errors          => [ ],

   my $html = $self->render('shop_part/_transfer_status', { output => 0 }, job => $job);

  # the price sources to use for the article: sellprice, lastcost,

  # listprice, or one of the pricegroups. It overwrites the default pricesource from the shopconfig.

  # TODO: implement valid pricerules for the article

                             { id => "master_data/lastcost",  name => t8("Master Data")." - ".t8("Lastcost") }

    my $part       = SL::DB::Manager::Part->get_all( where => [id => $self->shop_part->part_id], with_objects => ['prices'],limit => 1)->[0];

  # data for drop down filter options

}

sub init_producers {

  # data for drop down filter options

  my @producers_dd = [ { title => t8("all") ,   value =>'' } ];

  return @producers_dd;

  SL::Controller::ShopPart - Controller for managing ShopParts

  ShopParts are configured in a tab of the corresponding part.

=head1 FUNCTIONS

  To be called from the "Update" button of the shoppart, for manually syncing/upload one part with its shop. Generates a  Calls some ClientJS functions to modifiy original page.

  Can be used to sync the categories of a shoppart with the categories from online.

  Pricesrules, pricessources aren't fully implemented yet.

  G. Richardson E<lt>information@kivitendo-premium.deE<gt>

  W. Hahn E<lt>wh@futureworldsearch.netE<gt>

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

  # TODO: Prices (pricerules, pricegroups, multiple prices)

  my $images = SL::DB::Manager::ShopImage->get_all( where => [ 'files.object_id' => $part->{id}, ], with_objects => 'file', sort_by => 'position' );

  my @upload_img = ();

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

    my $file               = SL::File->get(id => $img->file->id );

    my ($path, $extension) = (split /\./, $file->file_name);

    my $content            = File::Slurp::read_file($file->get_file);

    my $temp ={ ( link        => 'data:' . $file->mime_type . ';base64,' . MIME::Base64::encode($content, ""), #$content, # MIME::Base64::encode($content),

                  description => $img->file->title,

                  position    => $img->position,

                  extension   => $extension,

                  path        => $path,

                      )}    ;

    push( @upload_img, $temp);

  }

  my ($import,$data,$data_json);

#  if( $shop_part->last_update){

    my $partnumber = $::form->escape($part->{partnumber});#shopware don't accept / in articlenumber

# Shopware RestApi schreibt Fehleremail wenn Artikel nicht gefunden. es braucht aber irgendeine Abfrage, ob der Artikel schon im Shop ist.

# LWP->post = neuanlegen LWP->put = update

    $data       = $self->connector->get($url . "api/articles/$partnumber?useNumberAsId=true");

    $data_json  = $data->content;

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

#  }

  # get the right price

  # TODO In extra Helper??

  my ( $price_src_str, $price_src_id ) = split(/\//,$shop_part->active_price_source);

  require SL::DB::Part;

  my $price;

  if ($price_src_str eq "master_data") {

    my $part = SL::DB::Manager::Part->get_all( where => [id => $shop_part->part_id], with_objects => ['prices'],limit => 1)->[0];

    $price = $part->$price_src_id;

  }else{

    my $part = SL::DB::Manager::Part->get_all( where => [id => $shop_part->part_id, 'prices.'.pricegroup_id => $price_src_id], with_objects => ['prices'],limit => 1)->[0];

    $price =  $part->prices->[0]->price;

  }

  # get the right taxrate for the article

  # TODO In extra Helper??

  my $taxrate;

  my $dbh  = $::form->get_standard_dbh();

  my $b_id = $part->buchungsgruppen_id;

  my $t_id = $shop_part->shop->taxzone_id;

  my $sql_str = "SELECT a.rate AS taxrate from tax a

  WHERE a.taxkey = (SELECT b.taxkey_id

  FROM chart b LEFT JOIN taxzone_charts c ON b.id = c.income_accno_id

  WHERE c.taxzone_id = $t_id

  AND c.buchungsgruppen_id = $b_id)";

  my $rate = selectall_hashref_query($::form, $dbh, $sql_str);

  $taxrate = @$rate[0]->{taxrate}*100;

    my $imgup      = $self->connector->put($url . "api/generatearticleimages/$partnumber?usenumberasid=true");

  my $data      = $self->connector->get($url . "api/articles/$partnumber?usenumberasid=true");

  // this is called by sub render, with a certain prerendered html (edit.html,categories.html)

  // save existing shop_part_id with new params from form, calls create_or_update and saves to db

  // add part to a shop

  // this is called from tabs/_shop.html, opens edit_window (render)

  // does the same as edit_shop_part (existing), but with part_id and shop_id, opens edit window (render)

  // gets all categories from the webshop

    //var form = new Array; //$('form').serializeArray();

    //form.push( { name: 'action', value: 'ShopPart/get_categories' }

    //         , { name: 'shop_part_id', value: shop_part_id }

    //);

    //$.post('controller.pl', form, function(data) {

    //  kivi.eval_json_result(data);

    //});

  // write categories in kivi DB not in the shops DB TODO: create new categories in the shops db

  //shows the Name and price in _shop.html. Pricerules not implemented yet, just master_data and pricegroups

  //shows the local and the online stock

        <div id="toogle_[% shop_part.id %]" style="background-image:url(image/gruener_punkt.gif);background-repeat:no-repeat;witdh:15px;height:15px;" onclick="kivi.ShopPart.part_toggle_active([% shop_part.id %] ,[% shop_part.active %]);" onMouseOver="this.style.cursor='pointer'">&nbsp; </div>

        <div id="toogle_[% shop_part.id %]" style="background-image:url(image/roter_punkt.gif);background-repeat:no-repeat;witdh:15px;height:15px;" onclick="kivi.ShopPart.part_toggle_active([% shop_part.id %] ,[% shop_part.active %]);" onMouseOver="this.style.cursor='pointer'">&nbsp; </div>

     [% LxERP.t8("Creating orders") %]

   <th valign="top" align="left">[% LxERP.t8("Number of orders created:") %]</th>

   <td valign="top">[% IF data.status > 0 %][% HTML.escape(data.num_created) %] / [% HTML.escape(data.record_ids.size) %][% ELSE %]–[% END %]</td>

   <th valign="top" align="left">[% LxERP.t8("Errors during conversion:") %]</th>

[% ELSIF !data.conversion_errors.size %]

 [% LxERP.t8("No errors have occurred.") %]

[% ELSE %]

      <th>[% LxERP.t8("Shop Order") %]</th>

      <th>[% LxERP.t8("Error") %]</th>

 [% FOREACH error = data.conversion_errors %]

      <td valign="top">[% HTML.escape(error.message) %]</td>

     [% LxERP.t8("Creating orders") %]

   <th valign="top" align="left">[% LxERP.t8("Number of orders created:") %]</th>

   <td valign="top">[% IF data.status > 0 %][% HTML.escape(data.num_created) %] / [% HTML.escape(data.record_ids.size) %][% ELSE %]–[% END %]</td>

   <th valign="top" align="left">[% LxERP.t8("Errors during conversion:") %]</th>

[% IF !data.status %]

[% ELSIF !data.conversion_errors.size %]

 [% LxERP.t8("No errors have occurred.") %]

[% ELSE %]

      <th>[% LxERP.t8("Shop Order") %]</th>

      <th>[% LxERP.t8("Error") %]</th>

 [% FOREACH error = data.conversion_errors %]

      <td valign="top">[% IF error.id %][% L.link(SELF.url_for(controller='ShopOrder', action='show', id=error.id), HTML.escape(error.number), target="_blank") %][% ELSE %]–[% END %]</td>

      <td valign="top">[% HTML.escape(error.message) %]</td>

 [% END %]