OM-销售订单行重订价 - oe_order_adj_pvt.price_action

转载原文链接：https://blog.csdn.net/cai_xingyun/article/details/40983239

销售订单行重订价

在登记订单之前，您可以为订单选择项目和价目表。如果在将价目表或折扣应用于订单中的项目之后要对其进行修改，则可以使用“行项目”标签区域“活动”菜单中的“价格行”来更新订单行。

在您使用“价格行”时，定价引擎会执行LINE 事件。植入的 LINE 事件包含“列表行基本价格”阶段和“列表行调整”阶段。如果更改了价目表行或行层修改量，价格行就会重估您的基本价格和行层调整。但是，由于LINE 事件不包括“题头层调整”阶段，因此价格行不会重估题头层修改量。

   要更新订单行的价格，请执行以下操作：
在“销售订单”窗口中，定位至要对其重新定价的项目。
选择“行项目”标签区域。
选择“活动”按钮。
选择“对行定价”。
Oracle Order Management 将根据当前价目表价格和自动折扣信息重新计算价格，并显示项目的新销售价格和扩展价格。

注：如果将人工订单层或行层折扣应用于订单之后重新定义了折扣，您必须从订单中将其删除，然后重新应用所定义的折扣。

另请参阅：

《UsingOracle Workflow in Oracle Order Management Manual》第11i 版。

DECLARE
   l_sel_rec_tbl   oe_globals.selected_record_tbl;
   l_return_status VARCHAR2(100);
   l_msg_count     NUMBER;
   l_msg_data      VARCHAR2(100);
   x_msg_data      VARCHAR2(1000);
 
BEGIN
   mo_global.init('ONT');
   oe_msg_pub.initialize;
   oe_debug_pub.initialize;
   fnd_global.apps_initialize(user_id      => 1170,
                              resp_id      => 50717,
                              resp_appl_id => 20005);
   l_sel_rec_tbl(1).id1 := 3012; --LINE_ID/HEADER_ID
   l_sel_rec_tbl(1).org_id := 82;
   oe_order_adj_pvt.price_action(p_selected_records => l_sel_rec_tbl,
                                 p_price_level      => 'LINE' --'LINE'/'ORDER'
                                ,
                                 x_return_status    => l_return_status,
                                 x_msg_count        => l_msg_count,
                                 x_msg_data         => l_msg_data);
 
   IF l_msg_count > 0 THEN
      FOR l_index IN 1 .. l_msg_count LOOP
         l_msg_data := oe_msg_pub.get(p_msg_index => l_index,
                                      p_encoded   => 'F');
         x_msg_data := x_msg_data || '-' || l_msg_data;
      END LOOP;
   
      dbms_output.put_line('E');
      dbms_output.put_line('l_return_status:' || l_return_status);
      dbms_output.put_line('l_msg_count:' || l_msg_count);
      dbms_output.put_line('x_msg_data:' || x_msg_data);
   
   ELSE
      dbms_output.put_line('S');
      dbms_output.put_line('l_return_status:' || l_return_status);
      dbms_output.put_line('l_msg_count:' || l_msg_count);
      dbms_output.put_line('x_msg_data:' || x_msg_data);
   END IF; -- IF l_msg_count > 0 THEN
END;
 
/*SELECT * FROM OE_PRICE_ADJUSTMENTS;*/