Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 8ed7bcad

Von Tamino Steinert vor fast 2 Jahren hinzugefügt

  • ID 8ed7bcad2f8f27a3a0bca9ced1f54c8229eb8457
  • Vorgänger dc0172cf
  • Nachfolger 43ff5237

Reclamation: don't need shipped_qty

Unterschiede anzeigen:

SL/Controller/Reclamation.pm
27 27 

  		




  28
  28
  
    
use SL::Helper::CreatePDF qw(:all);


  		




  29
  29
  
    
use SL::Helper::PrintOptions;


  		




  30
  
  
    
use SL::Helper::ShippedQty;


  		




  31
  30
  
    
use SL::Helper::UserPreferences::PositionsScrollbar;


  		




  32
  31
  
    
use SL::Helper::UserPreferences::UpdatePositions;


  		




  33
  32
  
    

  		




  ......




  900
  899
  
    
    reason       => sub { $_[0]->reason eq undef ? "" : $_[0]->reason->name },


  		




  901
  900
  
    
    reason_description_ext => sub { $_[0]->reason_description_ext },


  		




  902
  901
  
    
    reason_description_int => sub { $_[0]->reason_description_int },


  		




  903
  
  
    
    shipped_qty  => sub { $_[0]->shipped_qty },


  		




  904
  902
  
    
    qty          => sub { $_[0]->qty },


  		




  905
  903
  
    
    sellprice    => sub { $_[0]->sellprice },


  		




  906
  904
  
    
    discount     => sub { $_[0]->discount },


  		




  ......




  909
  907
  
    

  		




  910
  908
  
    
  $self->get_item_cvpartnumber($_) for @{$self->reclamation->items_sorted};


  		




  911
  909
  
    

  		




  912
  
  
    
  if ($::form->{order_by} eq 'shipped_qty') {


  		




  913
  
  
    
    # Calculate shipped qtys here to prevent calling calculate for every item


  		




  914
  
  
    
    # via the items method. Do not use write_to_objects to prevent


  		




  915
  
  
    
    # reclamation->delivered to be set, because this should be the value from


  		




  916
  
  
    
    # db, which can be set manually or is set when linked delivery orders are


  		




  917
  
  
    
    # saved.


  		




  918
  
  
    
    SL::Helper::ShippedQty->new->calculate($self->reclamation)->write_to(\@{$self->reclamation->items});


  		




  919
  
  
    
  }


  		




  920
  
  
    

  		




  921
  910
  
    
  my $method = $sort_keys{$::form->{order_by}};


  		




  922
  911
  
    
  my @to_sort = map { { old_pos => $_->position, order_by => $method->($_) } } @{ $self->reclamation->items_sorted };


  		




  923
  912
  
    
  if ($::form->{sort_dir}) {


  		




  ......




  1892
  1881
  
    
    $item->active_discount_source($price_source->discount_from_source($item->active_discount_source));


  		




  1893
  1882
  
    
  }


  		




  1894
  1883
  
    

  		




  1895
  
  
    
  # Calculate shipped qtys here to prevent calling calculate for every item via


  		




  1896
  
  
    
  # the items method. Do not use write_to_objects to prevent


  		




  1897
  
  
    
  # reclamation->delivered to be set, because this should be the value from db,


  		




  1898
  
  
    
  # which can be set manually or is set when linked delivery orders are saved.


  		




  1899
  
  
    
  SL::Helper::ShippedQty->new->calculate($self->reclamation)->write_to(\@{$self->reclamation->items});


  		




  1900
  
  
    

  		




  1901
  1884
  
    
  if ($self->reclamation->record_number && $::instance_conf->get_webdav) {


  		




  1902
  1885
  
    
    my $webdav = SL::Webdav->new(


  		




  1903
  1886
  
    
      type     => $self->type,


  		




  ......




  2631
  2614
  
    

  		




  2632
  2615
  
    
=item *


  		




  2633
  2616
  
    

  		




  
  2617
  
    
<<<<<<< HEAD


  		




  2634
  2618
  
    
Ordering item rows with drag and drop is possible. Sorting item rows is possible


  		




  2635
  2619
  
    
(by partnumber, description, reason, reason_description_int,


  		




  2636
  2620
  
    
reason_description_ext, qty, sellprice and discount for now).


  		




  
  2621
  
    
=======


  		




  
  2622
  
    
Ordering item rows with drag and drop is possible. Sorting item rows is


  		




  
  2623
  
    
possible (by partnumber, description, reason, qty, sellprice


  		




  
  2624
  
    
and discount for now).


  		




  
  2625
  
    
>>>>>>> 66ac9fa6c7 (Reclamation: don't need shipped_qty)


  		




  2637
  2626
  
    

  		




  2638
  2627
  
    
=item *


  		




  2639
  2628
  
    

  		












  

    
      SL/DB/ReclamationItem.pm
    
  





  21
  21
  
    
    }


  		




  22
  22
  
    
  },


  		




  23
  23
  
    
);


  		




  24
  
  
    
use SL::Helper::ShippedQty;


  		




  25
  24
  
    

  		




  26
  25
  
    
__PACKAGE__->meta->initialize;


  		




  27
  26
  
    

  		




  28
  27
  
    
__PACKAGE__->configure_acts_as_list(group_by => [qw(reclamation_id)]);


  		




  29
  28
  
    

  		




  30
  
  
    
sub shipped_qty {


  		




  31
  
  
    
  my ($self, %params) = @_;


  		




  32
  
  
    

  		




  33
  
  
    
  my $force = delete $params{force};


  		




  34
  
  
    

  		




  35
  
  
    
  SL::Helper::ShippedQty->new(%params)->calculate($self)->write_to_objects if $force || !defined $self->{shipped_qty};


  		




  36
  
  
    

  		




  37
  
  
    
  $self->{shipped_qty};


  		




  38
  
  
    
}


  		




  39
  
  
    

  		




  40
  29
  
    
sub is_linked_to_record {


  		




  41
  30
  
    
  my ($self) = @_;


  		




  42
  31
  
    

  		




  ......




  131
  120
  
    
  return $self->reclamation->customervendor;


  		




  132
  121
  
    
}


  		




  133
  122
  
    

  		




  134
  
  
    
sub delivered_qty { goto &shipped_qty }


  		




  135
  123
  
    
sub record { goto &reclamation }


  		




  136
  124
  
    
sub record_id { goto &reclamation_id }


  		




  137
  125
  
    
sub trans_id { goto &reclamation_id }


  		




  ......




  149
  137
  
    

  		




  150
  138
  
    
=head1 FUNCTIONS


  		




  151
  139
  
    

  		




  152
  
  
    
=over 4


  		




  153
  
  
    

  		




  154
  
  
    
=item C<shipped_qty PARAMS>


  		




  155
  
  
    

  		




  156
  
  
    
Calculates the shipped qty for this reclamationitem (measured in the current unit)


  		




  157
  
  
    
and returns it.


  		




  158
  
  
    

  		




  159
  
  
    
Note that the shipped qty is expected not to change within the request and is


  		




  160
  
  
    
cached in C<shipped_qty> once calculated. If C<< force => 1 >> is passed, the


  		




  161
  
  
    
existibng cache is ignored.


  		




  162
  
  
    

  		




  163
  
  
    
Given parameters will be passed to L<SL::Helper::ShippedQty>, so you can force


  		




  164
  
  
    
the shipped/delivered distinction like this:


  		




  165
  
  
    

  		




  166
  
  
    
  $_->shipped_qty(require_stock_out => 0);


  		




  167
  
  
    

  		




  168
  
  
    
Note however that calculating shipped_qty on individual Reclamationitems is generally


  		




  169
  
  
    
a bad idea. See L<SL::Helper::ShippedQty> for way to compute these all at once.


  		




  170
  
  
    

  		




  171
  
  
    
=item C<delivered_qty>


  		




  172
  
  
    

  		




  173
  
  
    
Alias for L</shipped_qty>.


  		




  174
  
  
    

  		




  175
  
  
    
=back


  		




  176
  
  
    

  		




  177
  140
  
    
=head1 AUTHORS


  		




  178
  141
  
    

  		




  179
  142
  
    
G. Richardson E<lt>grichardson@kivitendo-premium.deE<gt>


  		












  

    
      templates/webpages/reclamation/tabs/basic_data.html
    
  





  226
  226
  
    
                <th id="reason_header_id"   class="listheading" nowrap width="100"><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason")'>[%- 'Reason' | $T8 %]</a></th>


  		




  227
  227
  
    
                <th id="reason_description_ext_header_id"  class="listheading" nowrap ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason_description_ext")'>[%- 'Reason Description Extern' | $T8 %]</a></th>


  		




  228
  228
  
    
                <th id="reason_description_int_header_id"  class="listheading" nowrap ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason_description_int")'>[%- 'Reason Description Intern' | $T8 %]</a></th>


  		




  229
  
  
    
                <th id="shipped_qty_header_id"  class="listheading" nowrap width="5" ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("shipped_qty")'>[%- 'Delivered'   | $T8 %]</a></th>


  		




  230
  229
  
    
                <th id="qty_header_id"          class="listheading" nowrap width="5" ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("qty")'>        [%- 'Qty'         | $T8 %]</a></th>


  		




  231
  230
  
    
                <th class="listheading" nowrap width="5" >[%- 'Price Factor' | $T8 %] </th>


  		




  232
  231
  
    
                <th class="listheading" nowrap width="5" >[%- 'Unit'         | $T8 %] </th>


  		












  

    
      templates/webpages/reclamation/tabs/basic_data/_row.html
    
  





  83
  83
  
    
                     size='40',


  		




  84
  84
  
    
                     style='width: 150px') %]


  		




  85
  85
  
    
    </td>


  		




  86
  
  
    
    <td nowrap>


  		




  87
  
  
    
      [%- L.div_tag(LxERP.format_amount(ITEM.shipped_qty, 2, 0) _ ' ' _ ITEM.unit, name="shipped_qty", class="numeric") %]


  		




  88
  
  
    
    </td>


  		




  89
  86
  
    
    <td nowrap>


  		




  90
  87
  
    
      [%- L.input_tag("reclamation.reclamation_items[].qty_as_number",


  		




  91
  88
  
    
                      ITEM.qty_as_number,


  		












Auch abrufbar als:  Unified diff