1 PACKAGE BODY oe_cogs_extension AS
2 /* $Header: OEXECGSB.pls 120.0 2010/09/30 06:08:00 cpati noship $ */
3
4
5 PROCEDURE get_revenue_event_line
6 (
7 p_shippable_line_id IN NUMBER,
8 x_revenue_event_line_id OUT NOCOPY NUMBER,
9 x_return_status OUT NOCOPY VARCHAR2,
10 x_msg_count OUT NOCOPY NUMBER,
11 x_msg_data OUT NOCOPY VARCHAR2
12 ) IS
13
14 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
15
16
17 BEGIN
18 x_return_status := FND_API.G_RET_STS_SUCCESS;
19
20 IF l_debug_level > 0
21 THEN
22 OE_DEBUG_PUB.ADD('Entering oe_cogs_extension.get_revenue_event_line ');
23 END IF;
24
25 x_revenue_event_line_id := -1;
26
27 /*
28 This API by default returns -1.Customer can customize this API to derive
29 Revenue OM Line Id for ATO model.When this API would return -1 the seeded
30 logic of deriving revenue OM line ID would be executed else customer can
31 customize this to return a non -1 line id which would be honoured with
32 some validation.Please use customize debug messages so that in case of any
33 issue it can be easily identified.
34
35 */
36
37 IF l_debug_level > 0
38 THEN
39 OE_DEBUG_PUB.ADD('Exiting oe_cogs_extension.get_revenue_event_line ');
40 END IF;
41
42 EXCEPTION
43
44 WHEN OTHERS THEN
45 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
46 IF l_debug_level > 0
47 THEN
48 OE_DEBUG_PUB.ADD('Error oe_cogs_extension.get_revenue_event_line :'||substr(SQLCODE,1,250));
49 END IF;
50
51 END get_revenue_event_line;
52
53
54 END oe_cogs_extension;