Oracle ERP Customization-OM 销售单价折扣范围限定

Technology Document
Oracle EBS Customization
--OM 销售单价折扣范围限定
Author: Jack Chang
Creation Date: 2015/09/25
Last Updated: 2015/09/25
Version: 1.0
备注：
本文档为free resource，仅作为促进技术交流使用；您可对文档的内容进行修改，及更新版本。

Copy Number 1.0
文件控管
变更记录
检阅记录
发布记录
Contents
Technology Document (1)
1.需求内容 (4)
2.问题和解决思路 (4)
3.解决步骤 (5)
3.1创建修改量 (5)
3.1.1修改量001 (5)
3.1.2修改量002 (5)
3.2建立价格公式 (6)
3.3修改标准的Package：QP_CUSTOM (6)
4.测试 (8)
1.可能出现的错误 (10)
Open/Closed Issues (10)
Open Issues (10)
Close Issues (10)
1.需求内容
研究议题：在销售时，业务员有一定折扣权限，所以，希望销售订单中能够给出折扣限额，例如：如果业务员折扣限额为10%（上限和下限），当价格在此折扣范围内时，则允许此销售价格进行作为订单价格，如果超出此范围，则变为基本价格。

2.问题和解决思路
问题简述：
Oracle 标准功能中，销售订单单价价格取值来自于“价目表”，价目表中价格限定为一个设定的常数值；在常用功能中，销售订单价格折扣只能使用“修改量”来进行限定；
但是，修改量限定的值，有四种：新价格、金额、一次总付、折扣；
这四种方式，都只能够限定一个固定的值，无法依据需求中的内容去修正和变动；
思路：
解决此问题，有两种方式进行处理；
1．二次开发
a)此方式暂不考虑，二次开发可以快速准确的处理这个问题，只是此处不进行考虑。

2．高阶定价
a)高阶定价中，此次解题主要用到两种：修改量，价格公式；
b)思路：
首先，需求为可以手动修改价格；（建立修改量1）
之后，检查价格是否符合折扣范围；（修改量2限定词）
符合：则可以通过；
不符合：则变动为基本价格；
c)程序思路
i.建立两个修改量1和2
1.其中1 是可以允许修改
2.其中2是自动执行
3.优先级为1大于2；（此处先触发修改，再触发检查和更新）
ii.建立取价公式
1.由于修改量1修改价格之后，使用修改量2自动变更价格时，价格取值会参考修改量1的
价差；
2.所以，需要建立价格公式，取中间差价；
a)大于10%：此时，修改为原来价格
b)小于10%：此时，维持现在修正后的价格。

这次重点讨论高阶定价方式处理。

3.解决步骤
3.1创建修改量
3.1.1 修改量001
修改量001 ，允许修正价格；
3.1.2修改量002
修改量002，自动应用，需要有限定词
3.2建立价格公式
建立价格公式，用以取价；
3.3 修改标准的Package：QP_CUSTOM
QP_CUSTOM 此Package在Oracle有预制，只是没有被实例化，所以，只需要在此Package 中写入需要的逻辑；
以下，是我测试时使用的Package范例，仅供参考：
CREATE OR REPLACE PACKAGE BODY QP_CUSTOM AS
---add by jack for price limited test
FUNCTION get_custom_price(p_price_formula_id IN NUMBER,
P_list_price IN NUMBER,
P_price_effective_date IN DATE,
P_req_line_attrs_tbl IN
QP_FORMULA_PRICE_CALC_PVT.REQ_LINE_ATTRS_TBL)
RETURN NUMBER IS
l_item_price NUMBER;
l_price_vc number; --折扣额度
l_line_id number;
C_cost_plus_formula CONSTANT NUMBER := 7041;
BEGIN
/*L_item_id := OE_ORDER_PUB.G_LINE.inventory_item_id;
L_organization_id := OE_ORDER_PUB.G_LINE.ship_to_org_id;*/
/*l_line_id := oe_order_pub.g_line.line_id;*/
If p_price_formula_id = c_cost_plus_formula THEN
FOR i IN 1 .. p_req_line_attrs_tbl.count LOOP
Select line_id
Into l_line_id
from qp_preq_lines_tmp
where line_index = p_req_line_attrs_tbl(i).line_index;
select abs(ool.unit_list_price - ool.unit_selling_price) /
ool.unit_list_price
into l_price_vc
from oe_order_lines_all ool
where ool.line_id = l_line_id;
if l_price_vc > 0.1 then --折扣范围超过10%，则将销售单价回复为基本价格，否则使用当前的售价
select ool.unit_list_price * 2 - ool.unit_selling_price
into l_item_price
from oe_order_lines_all ool
where ool.line_id = l_line_id;
else
select ool.unit_list_price
into l_item_price
from oe_order_lines_all ool
where ool.line_id = l_line_id;
end if;
END LOOP;
End if;
RETURN l_item_price;
EXCEPTION
WHEN NO_DATA_FOUND THEN
RETURN NULL;
WHEN OTHERS THEN
RETURN NULL;
END get_custom_price;
希望此文档对大家以后的编程有帮助。

4.测试
超出10%折扣：
此处测试为粗略测试，详细步骤不写！
修改价格，金额大于10%
登记订单
小于10%的此处不做测试写明，因为可以成功。

1.可能出现的错误Open/Closed Issues Open Issues
Close Issues。