Magento - 在销售订单中设置原始价格

Question

我已经以编程方式创建销售订单。销售订单已成功生成所有价格，但原始价格列变为空白。我尝试在Quote对象和Order对象中设置，但没有运气。

您能告诉我如何在销售订单中设置原始价格。

谢谢！

CODE -

    $productModel = Mage::getModel('catalog/product');
$productObj = $productModel->setStore($storeId)->setStoreId($storeId)->load($key);
$productObj->setSkipCheckRequiredOption(true);

$quoteItem = Mage::getModel('sales/quote_item')->setProduct($productObj);
$product_price = $productModel->getPrice();

$quoteItem->setOriginalCustomPrice($product_price);
$quoteItem->setOriginalPrice('2.2'); //NOT SET IN DB
$quoteItem->setCustomPrice($product_price);
$quoteItem->setQty($qty);

$quoteItem->setQuote($quoteObj);
$quoteObj->addItem($quoteItem);

$productObj->unsSkipCheckRequiredOption();
$quoteItem->checkData();


$quoteObj->getShippingAddress()->setCollectShippingRates(true);
$quoteObj->getShippingAddress()->collectShippingRates();
$quoteObj->collectTotals();
$quoteObj->setIsActive(0);
$quoteObj->save();