Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 2f9a5220

Von Jan Büren vor etwa 10 Jahren hinzugefügt

  • ID 2f9a52209e4bea503cebf447e498b4a5848eb02c
  • Vorgänger 6934a717
  • Nachfolger 942291e4

Aufräumarbeiten verknüpfte Positionen

- converted_from_quotation_orderitems_id entfernt, da es keine
    tabelle quotation_orderitems gibt und die variable langfristig nur
    verwirrend in der form ist.
  - IR.pm auch auf foreach $table_name umgestellt

Unterschiede anzeigen:

SL/IR.pm
name_prefix => 'ic_',
name_postfix => "_$i",
dbh => $dbh);
# link oe items with invoice
if ($form->{"converted_from_orderitems_id_$i"}) {
RecordLinks->create_links('dbh' => $dbh,
'mode' => 'ids',
'from_table' => 'orderitems',
'from_ids' => $form->{"converted_from_orderitems_id_$i"},
'to_table' => 'invoice',
'to_id' => $form->{"invoice_id_$i"},
);
delete $form->{"converted_from_orderitems_id_$i"};
}
# link doi items with invoice
if ($form->{"converted_from_delivery_order_items_id_$i"}) {
RecordLinks->create_links('dbh' => $dbh,
'mode' => 'ids',
'from_table' => 'delivery_order_items',
'from_ids' => $form->{"converted_from_delivery_order_items_id_$i"},
'to_table' => 'invoice',
'to_id' => $form->{"invoice_id_$i"},
);
delete $form->{"converted_from_delivery_order_items_id_$i"};
# link previous items with invoice items See IS.pm (no credit note -> no invoice item)
foreach (qw(delivery_order_items orderitems)) {
if ($form->{"converted_from_${_}_id_$i"}) {
RecordLinks->create_links('dbh' => $dbh,
'mode' => 'ids',
'from_table' => $_,
'from_ids' => $form->{"converted_from_${_}_id_$i"},
'to_table' => 'invoice',
'to_id' => $form->{"invoice_id_$i"},
);
delete $form->{"converted_from_${_}_id_$i"};
}
}
}
SL/OE.pm
name_postfix => "_$i",
dbh => $dbh);
# link previous items with orderitems
foreach (qw(quotation_orderitems orderitems invoice)) {
foreach (qw(orderitems invoice)) {
if ($form->{"converted_from_${_}_id_$i"}) {
my $table = $_;
$table = 'orderitems' if $table eq 'quotation_orderitems';
RecordLinks->create_links('dbh' => $dbh,
'mode' => 'ids',
'from_table' => $table,
'from_table' => $_,
'from_ids' => $form->{"converted_from_${_}_id_$i"},
'to_table' => 'orderitems',
'to_id' => $orderitems_id,
bin/mozilla/io.pl
push @hidden_vars, qw(orderitems_id converted_from_orderitems_id);
}
if ($is_s_p_order) {
push @hidden_vars, qw(orderitems_id converted_from_quotation_orderitems_id converted_from_invoice_id);
push @hidden_vars, qw(orderitems_id converted_from_orderitems_id converted_from_invoice_id);
}
if ($is_invoice) {
push @hidden_vars, qw(invoice_id converted_from_orderitems_id converted_from_delivery_order_items_id);
......
marge_price_factor lastcost price_factor_id partnotes
stock_out stock_in has_sernumber reqdate orderitems_id
active_price_source active_discount_source delivery_order_items_id
invoice_id converted_from_quotation_orderitems_id
converted_from_orderitems_id converted_from_delivery_order_items_id
converted_from_invoice_id);
invoice_id converted_from_orderitems_id
converted_from_delivery_order_items_id converted_from_invoice_id);
my $ic_cvar_configs = CVar->get_configs(module => 'IC');
push @flds, map { "ic_cvar_$_->{name}" } @{ $ic_cvar_configs };
bin/mozilla/oe.pl
# reset
map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal delivered ordnumber);
# this converted variable is also used for sales_order to purchase order and vice versa
$form->{"converted_from_quotation_orderitems_id_$_"} = delete $form->{"orderitems_id_$_"} for 1 .. $form->{"rowcount"};
$form->{"converted_from_orderitems_id_$_"} = delete $form->{"orderitems_id_$_"} for 1 .. $form->{"rowcount"};
# if purchase_order was generated from sales_order, use lastcost_$i as sellprice_$i
# also reset discounts

Auch abrufbar als: Unified diff