1 PACKAGE OE_ADJ_PRIVILEGE AS
2 /* $Header: OEXSADJS.pls 120.0 2005/05/31 23:17:10 appldev noship $ */
3
4 -- Start of Comments
5 -- API name Check_Manual_Discount_Priv
6 -- Type Private
7 -- Function
8 --
9 -- Pre-reqs
10 --
11 -- Parameters
12 --
13 -- Version Current version = 1.0
14 -- Initial version = 1.0
15 --
16 -- Notes
17 --
18 -- End of Comments
19
20
21
22
23
24 -- This procedure is used to check the ability to apply
25 -- price adjustments on lines. It does this by verifying
26 -- a) DISCOUTING PRIVILEGE
27 -- b) UNIT_SELLING_PRICE IS NOT NULL AND NOT 0
28 -- c) CHECK IF ORDER TYPE ENFORCES PRICE_LIST (if not being called from form)
29 -- d) CHECK IF ONLY 1 OR NO MANUAL DISCOUNT ARE ALREADY APPLIED
30 -- IF YES RETURN THE PRICE_ADJUSTMENT_ID
31
32
33 PROCEDURE Check_Manual_Discount_Priv
34 ( p_api_version_number IN NUMBER
35 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
36 , x_return_status OUT NOCOPY VARCHAR2
37
38 , x_msg_count OUT NOCOPY NUMBER
39
40 , x_msg_data OUT NOCOPY VARCHAR2
41
42 , p_order_type_id IN NUMBER := FND_API.G_MISS_NUM
43 , p_Header_Id IN NUMBER
44 , p_Line_Id IN NUMBER
45 , p_List_Price IN NUMBER
46 , p_Discounting_Privilege IN VARCHAR2
47 , p_apply_order_adjs_flag IN VARCHAR2 := 'N'
48 , p_Check_Multiple_Adj_Flag IN VARCHAR2 := 'Y'
49 , x_adjustment_total OUT NOCOPY NUMBER
50
51 , x_price_adjustment_id OUT NOCOPY NUMBER
52
53 );
54
55
56 -- Start of Comments
57 -- API name Check_Item_Category
58 -- Type Public
59 -- Function
60 --
61 -- Pre-reqs: NONE
62 --
63 -- Parameter
64 --
65 -- Version Current version = 1.0
66 -- Initial version = 1.0
67 --
68 -- Notes
69 --
70 -- End of Comments
71
72 FUNCTION Check_Item_Category
73 ( p_inv_item_id IN NUMBER
74 , p_ent_val IN VARCHAR2
75 , p_orgid IN NUMBER
76 , p_pricing_date IN DATE
77 ) RETURN VARCHAR2;
78 PRAGMA restrict_references(CHECK_ITEM_CATEGORY, WNDS, WNPS);
79
80 END OE_ADJ_PRIVILEGE;