X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/62f2141002f5b8c11fa9d881473fd3bc469b4eef..0e9f6f033ae78206cfa0fd56e310dd79327f99f4:/SL/IR.pm diff --git a/SL/IR.pm b/SL/IR.pm index ebb29fdc7..55c0bc8bf 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -1378,18 +1378,6 @@ sub retrieve_item { $stw->finish(); chop $ref->{taxaccounts}; - ## vendor_id ggf beim ersten mal noch nicht gesetzt nur vendor -- - ($form->{vendor}, $form->{vendor_id}) = split(/--/, $form->{vendor}) if ! $form->{vendor_id}; - - if ( $form->{vendor_id} ) { - my $mm = SL::DB::Manager::MakeModel->get_first( - query => [ parts_id => $ref->{id} , make => $form->{vendor_id} ] ); - if ( $mm ) { - $::lxdebug->message(LXDebug->DEBUG2(), "mm id=".$mm->{id}." price=".$mm->{lastcost}); - $ref->{lastcost} = $mm->{lastcost}; - } - } - $ref->{onhand} *= 1; push @{ $form->{item_list} }, $ref;