collateral data does not need to be manually duplicated
This commit is contained in:
parent
ec1910db58
commit
06fac95540
1 changed files with 0 additions and 11 deletions
|
|
@ -202,17 +202,6 @@ sub duplicate {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
foreach my $basename ('accessory', 'related') {
|
|
||||||
my $table = "Product_${basename}";
|
|
||||||
my $tableAssetId = "${basename}AssetId";
|
|
||||||
my $sth = $self->session->db->read("select * from $table where assetId=?", [$self->getId]);
|
|
||||||
my %data;
|
|
||||||
tie %data, 'Tie::CPHash';
|
|
||||||
while (%data = $sth->hash) {
|
|
||||||
$self->session->db->write("insert into $table (assetId, $tableAssetId, sequenceNumber) values (?, ?, ?)", [$newAsset->getId, $data{$tableAssetId}, $data{sequenceNumber}]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return $newAsset;
|
return $newAsset;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue