DBA Data[Home] [Help]

APPS.OE_ADV_PRICE_PVT dependencies on FND_API

Line 56: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

52:
53: I NUMBER;
54: l_msg_count NUMBER;
55: l_msg_data VARCHAR2(2000);
56: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
57: l_index NUMBER:=1;
58: l_new_line_tbl OE_Order_Pub.Line_Tbl_Type;
59: l_old_line_tbl OE_Order_Pub.Line_Tbl_Type;
60: --

Line 120: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL

116: END IF;
117:
118: IF (px_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) Then
119: OE_Order_Pvt.Header
120: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL
121: , p_control_rec => p_control_rec
122: , p_x_header_rec => px_header_rec
123: , p_x_old_header_rec => lx_old_header_rec
124: , x_return_status => l_return_status);

Line 126: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

122: , p_x_header_rec => px_header_rec
123: , p_x_old_header_rec => lx_old_header_rec
124: , x_return_status => l_return_status);
125:
126: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;

Line 127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

123: , p_x_old_header_rec => lx_old_header_rec
124: , x_return_status => l_return_status);
125:
126: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131: END IF;

Line 128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

124: , x_return_status => l_return_status);
125:
126: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131: END IF;
132: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_LINE;

Line 129: RAISE FND_API.G_EXC_ERROR;

125:
126: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131: END IF;
132: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_LINE;
133: IF (l_new_line_tbl.count > 0) THEN --bug 2855986 change px_line_tbl to l_new_line_tbl.count

Line 135: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL

131: END IF;
132: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_LINE;
133: IF (l_new_line_tbl.count > 0) THEN --bug 2855986 change px_line_tbl to l_new_line_tbl.count
134: OE_Order_Pvt.Lines
135: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL
136: , p_control_rec => p_control_rec
137: , p_x_line_tbl => l_new_line_tbl
138: , p_x_old_line_tbl => l_old_line_tbl
139: , x_return_status => l_return_status);

Line 141: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

137: , p_x_line_tbl => l_new_line_tbl
138: , p_x_old_line_tbl => l_old_line_tbl
139: , x_return_status => l_return_status);
140:
141: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;

Line 142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

138: , p_x_old_line_tbl => l_old_line_tbl
139: , x_return_status => l_return_status);
140:
141: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146: END IF;

Line 143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

139: , x_return_status => l_return_status);
140:
141: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146: END IF;
147: OE_GLOBALS.G_PRICING_RECURSION := 'N';

Line 144: RAISE FND_API.G_EXC_ERROR;

140:
141: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146: END IF;
147: OE_GLOBALS.G_PRICING_RECURSION := 'N';
148: END IF; -- count > 0

Line 279: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

275: IF l_debug_level > 0 THEN
276: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE IS: ' || L_RETURN_STATUS ) ;
277: END IF;
278:
279: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
280:
281: IF l_debug_level > 0 THEN
282: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
283: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' , 1 ) ;

Line 285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

281: IF l_debug_level > 0 THEN
282: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
283: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' , 1 ) ;
284: END IF;
285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
286: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
287: IF l_debug_level > 0 THEN
288: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' ) ;
289: oe_debug_pub.add( 'EXITING OE_ORDER_PRICE_PVT.DELETE_DEPENDENTS' , 1 ) ;

Line 286: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

282: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
283: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' , 1 ) ;
284: END IF;
285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
286: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
287: IF l_debug_level > 0 THEN
288: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' ) ;
289: oe_debug_pub.add( 'EXITING OE_ORDER_PRICE_PVT.DELETE_DEPENDENTS' , 1 ) ;
290: END IF;

Line 291: RAISE FND_API.G_EXC_ERROR;

287: IF l_debug_level > 0 THEN
288: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.DELETE_ATTRIBS_FOR_IUE' ) ;
289: oe_debug_pub.add( 'EXITING OE_ORDER_PRICE_PVT.DELETE_DEPENDENTS' , 1 ) ;
290: END IF;
291: RAISE FND_API.G_EXC_ERROR;
292: END IF;
293:
294: DELETE FROM OE_PRICE_ADJ_ATTRIBS WHERE price_adjustment_id = p_price_adjustment_id;
295: End;

Line 370: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id = FND_API.G_MISS_NUM) THEN

366: -- 8631297
367: -- Replaced i.line_id with l_mod_line_id
368: --bug 2858712
369: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id IS NULL OR
370: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id = FND_API.G_MISS_NUM) THEN
371: set_item_for_iue(px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)),to_number(i.modified_from));
372: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
373: --bug 2795409
374: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).change_reason := 'SYSTEM';

Line 401: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).top_model_line_id = FND_API.G_MISS_NUM) THEN

397:
398: -- 8631297
399: -- Replaced i.line_id with l_mod_line_id
400: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).top_model_line_id IS NULL OR
401: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).top_model_line_id = FND_API.G_MISS_NUM) THEN
402: --bug 2858712
403: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id IS NULL OR
404: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id = FND_API.G_MISS_NUM) THEN
405:

Line 404: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id = FND_API.G_MISS_NUM) THEN

400: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).top_model_line_id IS NULL OR
401: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).top_model_line_id = FND_API.G_MISS_NUM) THEN
402: --bug 2858712
403: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id IS NULL OR
404: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).line_set_id = FND_API.G_MISS_NUM) THEN
405:
406: set_item_for_iue(px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)),i.Related_Item_ID);
407: px_line_tbl(G_PRICE_LINE_ID_TBL(l_mod_line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
408: --bug 2795409

Line 1485: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1481: p_param1 => l_line_rec.header_id,
1482: p_param2 => l_pricing_event,
1483: p_request_type => OE_GLOBALS.G_PRICE_LINE,
1484: x_return_status => l_return_status);
1485: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1486: IF l_debug_level > 0 THEN
1487: oe_debug_pub.add( 'unexp error logging batch event for updated free goods line', 3) ;
1488: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1489: END IF;

Line 1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1486: IF l_debug_level > 0 THEN
1487: oe_debug_pub.add( 'unexp error logging batch event for updated free goods line', 3) ;
1488: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1489: END IF;
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: IF l_debug_level > 0 THEN
1493: oe_debug_pub.add( 'error logging batch event for update free goods line',3);
1494: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;

Line 1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1487: oe_debug_pub.add( 'unexp error logging batch event for updated free goods line', 3) ;
1488: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1489: END IF;
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: IF l_debug_level > 0 THEN
1493: oe_debug_pub.add( 'error logging batch event for update free goods line',3);
1494: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;
1495: END IF;

Line 1496: RAISE FND_API.G_EXC_ERROR;

1492: IF l_debug_level > 0 THEN
1493: oe_debug_pub.add( 'error logging batch event for update free goods line',3);
1494: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;
1495: END IF;
1496: RAISE FND_API.G_EXC_ERROR;
1497: END IF;
1498: -- sol_ord_er #16014165
1499: /* The current Line is PRG line, hence Order has to be logged and check for FPOM should not be used */
1500: oe_delayed_requests_pvt.log_request(

Line 1509: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1505: p_request_type => OE_GLOBALS.G_SERVICE_FIRST_PERIOD_BILL,
1506: p_request_unique_key1 => 'ORDER',
1507: p_param1 => l_line_rec.header_id,
1508: x_return_status => l_return_status);
1509: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1510: IF l_debug_level > 0 THEN
1511: oe_debug_pub.add( 'unexp error logging G_SERVICE_FIRST_PERIOD_BILL', 3) ;
1512: oe_debug_pub.add( '(1) EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1513: END IF;

Line 1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1510: IF l_debug_level > 0 THEN
1511: oe_debug_pub.add( 'unexp error logging G_SERVICE_FIRST_PERIOD_BILL', 3) ;
1512: oe_debug_pub.add( '(1) EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1513: END IF;
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add( 'error logging G_SERVICE_FIRST_PERIOD_BILL',3);
1518: oe_debug_pub.add( '(2) EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;

Line 1515: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1511: oe_debug_pub.add( 'unexp error logging G_SERVICE_FIRST_PERIOD_BILL', 3) ;
1512: oe_debug_pub.add( '(1) EXITING OE_ADV_PRICE_PVT.set_prg', 3);
1513: END IF;
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add( 'error logging G_SERVICE_FIRST_PERIOD_BILL',3);
1518: oe_debug_pub.add( '(2) EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;
1519: END IF;

Line 1520: RAISE FND_API.G_EXC_ERROR;

1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add( 'error logging G_SERVICE_FIRST_PERIOD_BILL',3);
1518: oe_debug_pub.add( '(2) EXITING OE_ADV_PRICE_PVT.set_prg' , 1 ) ;
1519: END IF;
1520: RAISE FND_API.G_EXC_ERROR;
1521: END IF;
1522: -- sol_ord_er #16014165 end
1523: END IF;
1524:

Line 1530: raise fnd_api.g_exc_error;

1526: exception when others then
1527: IF l_debug_level > 0 THEN
1528: oe_debug_pub.add( 'ERROR IN SET_PRG'||SQLERRM ) ;
1529: END IF;
1530: raise fnd_api.g_exc_error;
1531: end Set_Prg;
1532:
1533: Procedure Delete_Prg(
1534: px_line_rec IN OUT NOCOPY OE_Order_Pub.line_rec_type

Line 1611: Raise FND_API.G_EXC_ERROR;

1607: end if;
1608: px_line_rec := l_line_rec;
1609: Exception
1610: When Others then
1611: Raise FND_API.G_EXC_ERROR;
1612: End Delete_Prg;
1613:
1614: procedure Process_PRG(px_line_Tbl in out nocopy oe_order_pub.line_tbl_type
1615: , px_old_line_tbl in out nocopy oe_order_pub.line_tbl_type

Line 1726: AND (l_line_rec.service_reference_line_id IS NULL OR l_line_rec.service_reference_line_id = FND_API.G_MISS_NUM) Then

1722: oe_debug_pub.ADD(' l_line_rec.service_reference_line_id :'||l_line_rec.service_reference_line_id,1); --bug 16317034
1723: END IF;
1724: --added condition to stop deletion of service lines after splitting for bug 16317034
1725: if (l_ordered_quantity <= nvl(l_line_rec.cancelled_quantity, 0)) AND l_line_rec.service_reference_type_code <> 'ORDER'
1726: AND (l_line_rec.service_reference_line_id IS NULL OR l_line_rec.service_reference_line_id = FND_API.G_MISS_NUM) Then
1727: oe_line_util.update_adjustment_flags(l_line_rec, l_line_rec);
1728: Delete_Prg(l_line_rec);
1729: else
1730: l_ordered_quantity := l_ordered_quantity - nvl(l_line_rec.cancelled_quantity, 0);

Line 1751: IF l_line_rec.service_reference_type_code = 'ORDER' AND l_line_rec.service_reference_line_id IS NOT NULL AND l_line_rec.service_reference_line_id <>FND_API.G_MISS_NUM THEN

1747: l_line_rec.change_reason := 'SYSTEM';
1748: l_line_rec.change_comments := 'REPRICING';
1749:
1750: --bug 16317034 start
1751: IF l_line_rec.service_reference_type_code = 'ORDER' AND l_line_rec.service_reference_line_id IS NOT NULL AND l_line_rec.service_reference_line_id <>FND_API.G_MISS_NUM THEN
1752: l_ordered_quantity := i.line_quantity;
1753: l_pricing_quantity := i.priced_quantity;
1754: oe_debug_pub.ADD('l_ordered_quantity :'||l_ordered_quantity,1);
1755: oe_debug_pub.ADD('l_pricing_quantity :'||l_pricing_quantity,1);

Line 1885: IF (l_buy_line_rec.ship_set_id is NOT NULL AND l_buy_line_rec.ship_set_id <> FND_API.G_MISS_NUM) THEN

1881: oe_debug_pub.add( 'PUTTING TO SHIP SET'||L_BUY_LINE_REC.SHIP_SET_ID ) ;
1882: END IF;
1883: l_line_rec.ship_set_id := l_buy_line_rec.ship_set_id;
1884: --bug 7000338/7002146
1885: IF (l_buy_line_rec.ship_set_id is NOT NULL AND l_buy_line_rec.ship_set_id <> FND_API.G_MISS_NUM) THEN
1886: select set_name INTO l_line_rec.ship_set from oe_sets where set_id= l_buy_line_rec.ship_set_id ;
1887: oe_debug_pub.add( 'PUTTING TO SHIP SET name'||L_LINE_REC.SHIP_SET ) ;
1888: END IF;
1889:

Line 1938: RAISE FND_API.G_EXC_ERROR;

1934: WHEN OTHERS THEN
1935: IF l_debug_level > 0 THEN
1936: oe_debug_pub.add( 'ERROR IN PROCESS_PRG'||SQLERRM ) ;
1937: END IF;
1938: RAISE FND_API.G_EXC_ERROR;
1939: End Process_PRG;
1940:
1941:
1942: Procedure Promotion_Put_Hold(

Line 2011: IF (l_return_status <> FND_API.g_ret_sts_success) THEN

2007: --oe_debug_pub.add('PAL PROMOTIONS - hold_entity_code is '|| l_hold_source_rec.Hold_Entity_code||l_x_result_out,2);
2008: null;
2009: end if;
2010:
2011: IF (l_return_status <> FND_API.g_ret_sts_success) THEN
2012: RAISE FND_API.G_EXC_ERROR;
2013: END IF;
2014: If l_x_result_out = FND_API.G_FALSE then
2015: IF l_debug_level > 0 THEN

Line 2012: RAISE FND_API.G_EXC_ERROR;

2008: null;
2009: end if;
2010:
2011: IF (l_return_status <> FND_API.g_ret_sts_success) THEN
2012: RAISE FND_API.G_EXC_ERROR;
2013: END IF;
2014: If l_x_result_out = FND_API.G_FALSE then
2015: IF l_debug_level > 0 THEN
2016: oe_debug_pub.add('PAL PROMOTIONS - apply holds in procedure Promotion_Put_Hold ');

Line 2014: If l_x_result_out = FND_API.G_FALSE then

2010:
2011: IF (l_return_status <> FND_API.g_ret_sts_success) THEN
2012: RAISE FND_API.G_EXC_ERROR;
2013: END IF;
2014: If l_x_result_out = FND_API.G_FALSE then
2015: IF l_debug_level > 0 THEN
2016: oe_debug_pub.add('PAL PROMOTIONS - apply holds in procedure Promotion_Put_Hold ');
2017: oe_debug_pub.add('hold line with header_id:'||p_header_id||' line_id: '||p_line_id,1);
2018: END IF;

Line 2028: If l_return_status = FND_API.g_ret_sts_success then

2024: ,x_msg_data => l_x_msg_data
2025:
2026: );
2027:
2028: If l_return_status = FND_API.g_ret_sts_success then
2029: IF (p_line_id IS NULL) THEN
2030: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_HOLD_APPLIED');
2031: ELSE
2032: FND_MESSAGE.SET_NAME('ONT', 'ONT_LINE_PROMO_HOLD_APPLIED');

Line 2039: RAISE FND_API.G_EXC_ERROR;

2035: Else
2036: IF l_debug_level > 0 THEN
2037: oe_debug_pub.add('error applying hold',3);
2038: END IF;
2039: RAISE FND_API.G_EXC_ERROR;
2040: End If;
2041: End If; /* check hold */
2042:
2043: IF l_debug_level > 0 THEN

Line 2144: l_line_id <> FND_API.G_MISS_NUM THEN

2140: ,p_source_document_type_id => oe_order_cache.g_header_rec.source_document_type_id);
2141: ELSE
2142: l_line_id := i.line_id;
2143: IF l_line_id IS NOT NULL AND l_line_id <> 0 AND
2144: l_line_id <> FND_API.G_MISS_NUM THEN
2145: BEGIN
2146: IF l_debug_level > 0 THEN
2147: oe_debug_pub.add('Getting reference data ');
2148: END IF;

Line 2371: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;

2367:
2368: l_Line_Adj_rec.ADJUSTED_AMOUNT_PER_PQTY := l_insert.adjustment_amount;
2369:
2370: l_Line_Adj_rec.line_index := l_insert.line_index;
2371: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
2372: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
2373: l_Line_Adj_rec.db_flag := FND_API.G_FALSE;
2374: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2375: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,

Line 2373: l_Line_Adj_rec.db_flag := FND_API.G_FALSE;

2369:
2370: l_Line_Adj_rec.line_index := l_insert.line_index;
2371: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
2372: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
2373: l_Line_Adj_rec.db_flag := FND_API.G_FALSE;
2374: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2375: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2376: p_old_line_adj_rec => NULL,
2377: p_line_adj_rec =>l_line_adj_rec,

Line 2382: l_Line_Adj_rec.db_flag := FND_API.G_TRUE;

2378: p_line_adj_id => l_line_adj_rec.price_adjustment_id,
2379: x_index => l_index,
2380: x_return_status => l_return_status);
2381: ELSIF l_insert.process_code = QP_PREQ_GRP.G_STATUS_UPDATED Then
2382: l_Line_Adj_rec.db_flag := FND_API.G_TRUE;
2383: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
2384:
2385: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2386: p_line_adj_rec =>l_line_adj_rec,

Line 2417: l_Line_Adj_rec.db_flag := FND_API.G_TRUE;

2413: oe_debug_pub.add('l_insert.lquantity :'||l_insert.lquantity);
2414: END IF;
2415: IF l_qty <> l_insert.lquantity THEN -- IF the Quantity has changed on the Line THEN
2416: l_Line_Adj_rec.UPDATED_FLAG := 'Y';
2417: l_Line_Adj_rec.db_flag := FND_API.G_TRUE;
2418: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
2419: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2420: p_line_adj_rec =>l_line_adj_rec,
2421: p_line_adj_id => l_line_adj_rec.price_adjustment_id,

Line 2489: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;

2485:
2486: l_Header_Adj_rec.ADJUSTED_AMOUNT_PER_PQTY := l_insert.adjustment_amount;
2487:
2488: --l_Header_Adj_rec.line_index := l_insert.line_index;
2489: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
2490: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
2491: l_Header_Adj_rec.db_flag := FND_API.G_FALSE;
2492: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2493: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,

Line 2491: l_Header_Adj_rec.db_flag := FND_API.G_FALSE;

2487:
2488: --l_Header_Adj_rec.line_index := l_insert.line_index;
2489: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
2490: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
2491: l_Header_Adj_rec.db_flag := FND_API.G_FALSE;
2492: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2493: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2494: p_old_hdr_adj_rec => NULL,
2495: p_hdr_adj_rec =>l_header_adj_rec,

Line 2500: l_Header_Adj_rec.db_flag := FND_API.G_TRUE;

2496: p_hdr_adj_id => l_header_adj_rec.price_adjustment_id,
2497: x_index => l_index,
2498: x_return_status => l_return_status);
2499: ELSIF l_insert.process_code = QP_PREQ_GRP.G_STATUS_UPDATED Then
2500: l_Header_Adj_rec.db_flag := FND_API.G_TRUE;
2501: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
2502:
2503: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2504: p_hdr_adj_rec =>l_header_adj_rec,

Line 2519: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2515:
2516: IF l_debug_level > 0 THEN
2517: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY IS: ' || L_RETURN_STATUS ) ;
2518: END IF;
2519: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2520: IF l_debug_level > 0 THEN
2521: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2522: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY');
2523: END IF;

Line 2524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2520: IF l_debug_level > 0 THEN
2521: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2522: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY');
2523: END IF;
2524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2525: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2526: IF l_debug_level > 0 THEN
2527: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' ) ;
2528: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' , 1 ) ;

Line 2525: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2521: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2522: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY');
2523: END IF;
2524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2525: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2526: IF l_debug_level > 0 THEN
2527: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' ) ;
2528: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' , 1 ) ;
2529: END IF;

Line 2530: RAISE FND_API.G_EXC_ERROR;

2526: IF l_debug_level > 0 THEN
2527: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' ) ;
2528: oe_debug_pub.add( 'EXITING OE_ADV_PRICE_PVT.NEW_AND_UPDATE_NOTIFY' , 1 ) ;
2529: END IF;
2530: RAISE FND_API.G_EXC_ERROR;
2531: END IF;
2532:
2533: end loop;
2534:

Line 2606: x_return_status := FND_API.G_RET_STS_SUCCESS;

2602: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2603: --
2604: BEGIN
2605: NULL;
2606: x_return_status := FND_API.G_RET_STS_SUCCESS;
2607: If OE_DEBUG_PUB.G_DEBUG = FND_API.G_TRUE Then
2608: G_DEBUG := TRUE;
2609: IF l_debug_level > 0 THEN
2610: oe_debug_pub.add( 'BCT G_DEBUG IS:'||OE_DEBUG_PUB.G_DEBUG ) ;

Line 2607: If OE_DEBUG_PUB.G_DEBUG = FND_API.G_TRUE Then

2603: --
2604: BEGIN
2605: NULL;
2606: x_return_status := FND_API.G_RET_STS_SUCCESS;
2607: If OE_DEBUG_PUB.G_DEBUG = FND_API.G_TRUE Then
2608: G_DEBUG := TRUE;
2609: IF l_debug_level > 0 THEN
2610: oe_debug_pub.add( 'BCT G_DEBUG IS:'||OE_DEBUG_PUB.G_DEBUG ) ;
2611: END IF;

Line 2987: Raise FND_API.G_EXC_ERROR;

2983: WHEN OTHERS THEN
2984: IF l_debug_level > 0 THEN
2985: oe_debug_pub.add('ERROR in inserting adjustments and associations'||sqlerrm);
2986: END IF;
2987: Raise FND_API.G_EXC_ERROR;
2988: END Insert_Adj;
2989:
2990: end OE_ADV_PRICE_PVT;