X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FDB%2FPart.pm;h=ae2612b9d3e4a6feca4b495b177ee2abe00bef0e;hb=51a0ea44fe475a940f9300326d3a29a44db123fe;hp=94ce4d207d30c5d8602a2ed0f0ff949a384a7004;hpb=7a6466811399cba50ab3a55f18665b5663f6d3a5;p=kivitendo-erp.git diff --git a/SL/DB/Part.pm b/SL/DB/Part.pm index 94ce4d207..ae2612b9d 100644 --- a/SL/DB/Part.pm +++ b/SL/DB/Part.pm @@ -4,11 +4,13 @@ use strict; use Carp; use List::MoreUtils qw(any); +use Rose::DB::Object::Helpers qw(as_tree); use SL::DBUtils; use SL::DB::MetaSetup::Part; use SL::DB::Manager::Part; use SL::DB::Chart; +use SL::DB::Helper::AttrHTML; use SL::DB::Helper::TransNumberGenerator; use SL::DB::Helper::CustomVariables ( module => 'IC', @@ -40,6 +42,8 @@ __PACKAGE__->meta->add_relationships( __PACKAGE__->meta->initialize; +__PACKAGE__->attr_html('notes'); + __PACKAGE__->before_save('_before_save_set_partnumber'); sub _before_save_set_partnumber { @@ -179,6 +183,25 @@ sub get_chart { return $charts->{$taxzone}->{$type}; } +# this is designed to ignore chargenumbers, expiration dates and just give a list of how much <-> where +sub get_simple_stock { + my ($self, %params) = @_; + + return [] unless $self->id; + + my $query = <<''; + SELECT sum(qty), warehouse_id, bin_id FROM inventory WHERE parts_id = ? + GROUP BY warehouse_id, bin_id + + my $stock_info = selectall_hashref_query($::form, $::form->get_standard_dbh, $query, $self->id); + [ map { bless $_, 'SL::DB::Part::SimpleStock'} @$stock_info ]; +} +# helper class to have bin/warehouse accessors in stock result +{ package SL::DB::Part::SimpleStock; + sub warehouse { require SL::DB::Warehouse; SL::DB::Manager::Warehouse->find_by_or_create(id => $_[0]->{warehouse_id}) } + sub bin { require SL::DB::Bin; SL::DB::Manager::Bin ->find_by_or_create(id => $_[0]->{bin_id}) } +} + sub long_description { join ' ', grep $_, map $_[0]->$_, qw(partnumber description); }