1 PACKAGE MTL_QP_PRICE AS
2 /* $Header: INVVICAS.pls 120.1.12000000.1 2007/01/17 16:34:59 appldev ship $ */
3
4
5 FUNCTION get_transfer_price (
6 p_transaction_id IN NUMBER,
7 p_sell_ou_id IN NUMBER,
8 p_ship_ou_id IN NUMBER,
9 p_order_line_id IN NUMBER DEFAULT NULL,
10 p_inventory_item_id IN NUMBER DEFAULT NULL,
11 p_organization_id IN NUMBER DEFAULT NULL,
12 p_uom_code IN VARCHAR2 DEFAULT NULL,
13 p_cto_item_flag IN VARCHAR2 DEFAULT 'N',
14 p_incr_code IN NUMBER,
15 p_incrcurrency IN VARCHAR2,
16 p_request_type_code IN VARCHAR2 DEFAULT 'IC', -- OPM INVCONV umoogala
17 p_pricing_event IN VARCHAR2 DEFAULT 'ICBATCH', -- OPM INVCONV umoogala
18 x_currency_code OUT NOCOPY VARCHAR2,
19 x_tfrPriceCode OUT NOCOPY NUMBER,
20 x_return_status OUT NOCOPY VARCHAR2,
21 x_msg_count OUT NOCOPY NUMBER,
22 x_msg_data OUT NOCOPY VARCHAR2)
23 return number;
24
25 PROCEDURE G_Hdr_Initialize (
26 p_header_id IN NUMBER
27 , p_incr_code IN NUMBER
28 , p_incrcurrency IN VARCHAR2
29 , x_return_status OUT NOCOPY VARCHAR2 );
30
31 PROCEDURE G_Line_Initialize (
32 p_line_id IN NUMBER
33 , l_sell_org_id IN NUMBER
34 , l_ship_org_id IN NUMBER
35 , l_primary_uom IN VARCHAR2
36 , p_inventory_item_id IN NUMBER
37 , p_cto_item_flag IN VARCHAR2
38 , p_base_item_id IN NUMBER
39 , p_request_type_code IN VARCHAR2 DEFAULT 'IC' -- OPM INVCONV umoogala
40 , x_return_status OUT NOCOPY VARCHAR2 );
41
42 PROCEDURE copy_Header_to_request(
43 p_header_rec IN INV_IC_Order_PUB.Header_Rec_Type
44 , p_Request_Type_Code IN VARCHAR2
45 , px_line_index IN OUT NOCOPY NUMBER);
46
47 PROCEDURE copy_Line_to_request (
48 p_Line_rec IN INV_IC_ORDER_PUB.Line_Rec_Type
49 , p_pricing_events IN VARCHAR2
50 , p_request_type_code IN VARCHAR2
51 , px_line_index IN OUT NOCOPY NUMBER);
52
53 PROCEDURE Populate_Temp_Table ( x_return_status OUT NOCOPY VARCHAR2 );
54
55 PROCEDURE Populate_Results ( p_line_index NUMBER
56 , x_return_status OUT NOCOPY VARCHAR2 );
57
58 PROCEDURE print_debug(p_message in VARCHAR2);
59
60 /** Added for J Development for Global Procurement **/
61 /** This is to populate the Hdr Information for Global Procurement **/
62
63 PROCEDURE copy_Proc_Header_to_request(
64 p_header_rec IN INV_IC_ORDER_PUB.Proc_Header_Rec_Type
65 , p_Request_Type_Code IN VARCHAR2
66 , px_line_index IN OUT NOCOPY NUMBER );
67
68 PROCEDURE copy_PROC_Line_to_request (
69 p_Line_rec IN INV_IC_ORDER_PUB.PROC_Line_Rec_Type
70 , p_pricing_events IN VARCHAR2
71 , p_request_type_code IN VARCHAR2
72 , px_line_index IN OUT NOCOPY NUMBER );
73
74
75 PROCEDURE G_PROC_Hdr_Initialize(
76 p_header_id IN NUMBER
77 , p_incr_code IN NUMBER
78 , p_incrcurrency IN VARCHAR2
79 , x_return_status OUT NOCOPY VARCHAR2);
80
81 /** This is to populate the Line Information for Global Procurement **/
82 PROCEDURE G_PROC_LINE_INITIALIZE(
83 p_line_id IN NUMBER
84 , p_from_org_id IN NUMBER
85 , p_to_org_id IN NUMBER
86 , p_primary_uom IN VARCHAR2
87 , p_inventory_item_id IN NUMBER
88 , p_cto_item_flag IN VARCHAR2
89 , x_return_status OUT NOCOPY VARCHAR2);
90
91 /** Overloaded Function to get the transfer price for global procurement **/
92 FUNCTION get_transfer_price_ds (
93 p_transaction_id IN NUMBER,
94 p_sell_ou_id IN NUMBER,
95 p_ship_ou_id IN NUMBER,
96 p_flow_type IN NUMBER,
97 p_order_line_id IN NUMBER,
98 p_inventory_item_id IN NUMBER,
99 p_organization_id IN NUMBER,
100 p_uom_code IN VARCHAR2,
101 p_cto_item_flag IN VARCHAR2 DEFAULT 'N',
102 p_incr_code IN NUMBER,
103 p_incrcurrency IN VARCHAR2,
104 x_currency_code OUT NOCOPY VARCHAR2,
105 x_tfrPriceCode OUT NOCOPY NUMBER,
106 x_return_status OUT NOCOPY VARCHAR2,
107 x_msg_count OUT NOCOPY NUMBER,
108 x_msg_data OUT NOCOPY VARCHAR2)
109 return number;
110
111 end MTL_QP_PRICE;