Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision fe3e0ed3

Von Tamino Steinert vor fast 2 Jahren hinzugefügt

  • ID fe3e0ed3b2b549abc16fb207c5668530bb2c8b46
  • Vorgänger 8522a85e
  • Nachfolger 5398bba1

Workflow: sales_reclamation → credit_note

Unterschiede anzeigen:

bin/mozilla/io.pl
257 257
    my $record_item = $record->id && $record->items ? $record->items->[$i-1] : _make_record_item($i);
258 258

  
259 259
    # undo formatting
260
    $main::lxdebug->dump(0, "TST: before parse_amount", $form->{"sellprice_$i"});
260 261
    map { $form->{"${_}_$i"} = $form->parse_amount(\%myconfig, $form->{"${_}_$i"}) }
261 262
      qw(qty discount sellprice lastcost price_new price_old)
262 263
        unless ($form->{simple_save});
264
    $main::lxdebug->dump(0, "TST: after parse_amount", $form->{"sellprice_$i"});
263 265

  
264 266
    if ($form->{"prices_$i"} && ($form->{"new_pricegroup_$i"} != $form->{"old_pricegroup_$i"})) {
265 267
      $form->{"sellprice_$i"} = $form->{"price_new_$i"};
......
474 476
      push @hidden_vars, qw(invoice_id converted_from_orderitems_id converted_from_delivery_order_items_id converted_from_invoice_id);
475 477
    }
476 478
    if ($::form->{type} =~ /credit_note/) {
477
      push @hidden_vars, qw(invoice_id converted_from_invoice_id);
479
      push @hidden_vars, qw(invoice_id converted_from_invoice_id converted_from_reclamation_items_id);
478 480
    }
479 481
   if ($is_delivery_order) {
480 482
      map { $form->{"${_}_${i}"} = $form->format_amount(\%myconfig, $form->{"${_}_${i}"}) } qw(sellprice discount lastcost);
......
831 833
                stock_out stock_in has_sernumber reqdate orderitems_id
832 834
                active_price_source active_discount_source delivery_order_items_id
833 835
                invoice_id converted_from_orderitems_id
834
                converted_from_delivery_order_items_id converted_from_invoice_id);
836
                converted_from_delivery_order_items_id converted_from_invoice_id
837
                converted_from_reclamation_items_id);
835 838

  
836 839
  my $ic_cvar_configs = CVar->get_configs(module => 'IC');
837 840
  push @flds, map { "ic_cvar_$_->{name}" } @{ $ic_cvar_configs };

Auch abrufbar als: Unified diff