85: ,x_msg_count => x_msg_count
86: );
87: IF l_return_status = FND_API.g_ret_sts_error THEN
88: IF OZF_DEBUG_LOW_ON THEN
89: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
90: FND_MESSAGE.Set_Token('TEXT','Expected error happened when calling OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table().');
91: FND_MSG_PUB.Add;
92: END IF;
93: RAISE FND_API.g_exc_error;
86: );
87: IF l_return_status = FND_API.g_ret_sts_error THEN
88: IF OZF_DEBUG_LOW_ON THEN
89: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
90: FND_MESSAGE.Set_Token('TEXT','Expected error happened when calling OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table().');
91: FND_MSG_PUB.Add;
92: END IF;
93: RAISE FND_API.g_exc_error;
94: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
92: END IF;
93: RAISE FND_API.g_exc_error;
94: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
95: IF OZF_DEBUG_LOW_ON THEN
96: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
97: FND_MESSAGE.Set_Token('TEXT','Unexpected error happened when calling OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table().');
98: FND_MSG_PUB.Add;
99: END IF;
100: RAISE FND_API.g_exc_unexpected_error;
93: RAISE FND_API.g_exc_error;
94: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
95: IF OZF_DEBUG_LOW_ON THEN
96: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
97: FND_MESSAGE.Set_Token('TEXT','Unexpected error happened when calling OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table().');
98: FND_MSG_PUB.Add;
99: END IF;
100: RAISE FND_API.g_exc_unexpected_error;
101: END IF;
176: ,x_related_lines_tbl => l_x_related_lines_tbl
177: );
178: IF l_return_status = FND_API.g_ret_sts_error THEN
179: IF OZF_DEBUG_LOW_ON THEN
180: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
181: FND_MESSAGE.Set_Token('TEXT','Expected error happened when calling OZF_ORDER_PRICE_PVT.Get_Order_Price().');
182: FND_MSG_PUB.Add;
183: END IF;
184: RAISE FND_API.g_exc_error;
177: );
178: IF l_return_status = FND_API.g_ret_sts_error THEN
179: IF OZF_DEBUG_LOW_ON THEN
180: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
181: FND_MESSAGE.Set_Token('TEXT','Expected error happened when calling OZF_ORDER_PRICE_PVT.Get_Order_Price().');
182: FND_MSG_PUB.Add;
183: END IF;
184: RAISE FND_API.g_exc_error;
185: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
183: END IF;
184: RAISE FND_API.g_exc_error;
185: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
186: IF OZF_DEBUG_LOW_ON THEN
187: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
188: FND_MESSAGE.Set_Token('TEXT','Unexpected error happened when calling OZF_ORDER_PRICE_PVT.Get_Order_Price().');
189: FND_MSG_PUB.Add;
190: END IF;
191: RAISE FND_API.g_exc_unexpected_error;
184: RAISE FND_API.g_exc_error;
185: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
186: IF OZF_DEBUG_LOW_ON THEN
187: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
188: FND_MESSAGE.Set_Token('TEXT','Unexpected error happened when calling OZF_ORDER_PRICE_PVT.Get_Order_Price().');
189: FND_MSG_PUB.Add;
190: END IF;
191: RAISE FND_API.g_exc_unexpected_error;
192: END IF;
205:
206: );
207: /*
208: IF l_p_x_line_tbl(i).pricing_status_code = 'IPL' THEN
209: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
210: FND_MESSAGE.Set_Token('TEXT','Invalid price list for pricing product '||l_prod_name);
211: FND_MSG_PUB.Add;
212: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'GSA' THEN
213: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
206: );
207: /*
208: IF l_p_x_line_tbl(i).pricing_status_code = 'IPL' THEN
209: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
210: FND_MESSAGE.Set_Token('TEXT','Invalid price list for pricing product '||l_prod_name);
211: FND_MSG_PUB.Add;
212: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'GSA' THEN
213: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
214: FND_MESSAGE.Set_Token('TEXT','GSA violation for pricing product '||l_prod_name);
209: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
210: FND_MESSAGE.Set_Token('TEXT','Invalid price list for pricing product '||l_prod_name);
211: FND_MSG_PUB.Add;
212: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'GSA' THEN
213: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
214: FND_MESSAGE.Set_Token('TEXT','GSA violation for pricing product '||l_prod_name);
215: FND_MSG_PUB.Add;
216: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'FER' THEN
217: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
210: FND_MESSAGE.Set_Token('TEXT','Invalid price list for pricing product '||l_prod_name);
211: FND_MSG_PUB.Add;
212: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'GSA' THEN
213: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
214: FND_MESSAGE.Set_Token('TEXT','GSA violation for pricing product '||l_prod_name);
215: FND_MSG_PUB.Add;
216: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'FER' THEN
217: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
218: FND_MESSAGE.Set_Token('TEXT','Error processing formula for pricing product '||l_prod_name);
213: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
214: FND_MESSAGE.Set_Token('TEXT','GSA violation for pricing product '||l_prod_name);
215: FND_MSG_PUB.Add;
216: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'FER' THEN
217: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
218: FND_MESSAGE.Set_Token('TEXT','Error processing formula for pricing product '||l_prod_name);
219: FND_MSG_PUB.Add;
220: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'CALC' THEN
221: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
214: FND_MESSAGE.Set_Token('TEXT','GSA violation for pricing product '||l_prod_name);
215: FND_MSG_PUB.Add;
216: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'FER' THEN
217: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
218: FND_MESSAGE.Set_Token('TEXT','Error processing formula for pricing product '||l_prod_name);
219: FND_MSG_PUB.Add;
220: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'CALC' THEN
221: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
222: FND_MESSAGE.Set_Token('TEXT','Error in calculation engine for pricing product '||l_prod_name);
217: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
218: FND_MESSAGE.Set_Token('TEXT','Error processing formula for pricing product '||l_prod_name);
219: FND_MSG_PUB.Add;
220: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'CALC' THEN
221: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
222: FND_MESSAGE.Set_Token('TEXT','Error in calculation engine for pricing product '||l_prod_name);
223: FND_MSG_PUB.Add;
224: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'UOM' THEN
225: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
218: FND_MESSAGE.Set_Token('TEXT','Error processing formula for pricing product '||l_prod_name);
219: FND_MSG_PUB.Add;
220: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'CALC' THEN
221: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
222: FND_MESSAGE.Set_Token('TEXT','Error in calculation engine for pricing product '||l_prod_name);
223: FND_MSG_PUB.Add;
224: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'UOM' THEN
225: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
226: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
222: FND_MESSAGE.Set_Token('TEXT','Error in calculation engine for pricing product '||l_prod_name);
223: FND_MSG_PUB.Add;
224: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'UOM' THEN
225: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
226: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
227: FND_MESSAGE.Set_Token('TEXT','Failed to price using unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
228: FND_MSG_PUB.Add;
229: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM' THEN
230: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
223: FND_MSG_PUB.Add;
224: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'UOM' THEN
225: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
226: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
227: FND_MESSAGE.Set_Token('TEXT','Failed to price using unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
228: FND_MSG_PUB.Add;
229: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM' THEN
230: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
231: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
227: FND_MESSAGE.Set_Token('TEXT','Failed to price using unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
228: FND_MSG_PUB.Add;
229: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM' THEN
230: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
231: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
232: FND_MESSAGE.Set_Token('TEXT','Invalid unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
233: FND_MSG_PUB.Add;
234: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'DUPLICATE_PRICE_LIST' THEN
235: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
228: FND_MSG_PUB.Add;
229: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM' THEN
230: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
231: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
232: FND_MESSAGE.Set_Token('TEXT','Invalid unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
233: FND_MSG_PUB.Add;
234: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'DUPLICATE_PRICE_LIST' THEN
235: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
236: FND_MESSAGE.Set_Token('TEXT','Duplicate price list for pricing product '||l_prod_name);
231: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
232: FND_MESSAGE.Set_Token('TEXT','Invalid unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
233: FND_MSG_PUB.Add;
234: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'DUPLICATE_PRICE_LIST' THEN
235: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
236: FND_MESSAGE.Set_Token('TEXT','Duplicate price list for pricing product '||l_prod_name);
237: FND_MSG_PUB.Add;
238: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM_CONV' THEN
239: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
232: FND_MESSAGE.Set_Token('TEXT','Invalid unit of measure('||l_uom_name||') for pricing product '||l_prod_name);
233: FND_MSG_PUB.Add;
234: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'DUPLICATE_PRICE_LIST' THEN
235: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
236: FND_MESSAGE.Set_Token('TEXT','Duplicate price list for pricing product '||l_prod_name);
237: FND_MSG_PUB.Add;
238: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM_CONV' THEN
239: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
240: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
236: FND_MESSAGE.Set_Token('TEXT','Duplicate price list for pricing product '||l_prod_name);
237: FND_MSG_PUB.Add;
238: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM_CONV' THEN
239: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
240: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
241: FND_MESSAGE.Set_Token('TEXT','Unit of measure('||l_uom_name||') conversion is not found for pricing product '||l_prod_name);
242: FND_MSG_PUB.Add;
243: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_INCOMP' THEN
244: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
237: FND_MSG_PUB.Add;
238: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_UOM_CONV' THEN
239: l_uom_name := OZF_UTILITY_PVT.get_uom_name(p_uom_code => l_p_x_line_tbl(i).LINE_UOM_CODE);
240: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
241: FND_MESSAGE.Set_Token('TEXT','Unit of measure('||l_uom_name||') conversion is not found for pricing product '||l_prod_name);
242: FND_MSG_PUB.Add;
243: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_INCOMP' THEN
244: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
245: FND_MESSAGE.Set_Token('TEXT','Could not resolve incompatibility for pricing product '||l_prod_name);
240: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
241: FND_MESSAGE.Set_Token('TEXT','Unit of measure('||l_uom_name||') conversion is not found for pricing product '||l_prod_name);
242: FND_MSG_PUB.Add;
243: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_INCOMP' THEN
244: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
245: FND_MESSAGE.Set_Token('TEXT','Could not resolve incompatibility for pricing product '||l_prod_name);
246: FND_MSG_PUB.Add;
247: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_BEST_PRICE' THEN
248: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
241: FND_MESSAGE.Set_Token('TEXT','Unit of measure('||l_uom_name||') conversion is not found for pricing product '||l_prod_name);
242: FND_MSG_PUB.Add;
243: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_INCOMP' THEN
244: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
245: FND_MESSAGE.Set_Token('TEXT','Could not resolve incompatibility for pricing product '||l_prod_name);
246: FND_MSG_PUB.Add;
247: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_BEST_PRICE' THEN
248: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
249: FND_MESSAGE.Set_Token('TEXT','Could not resolve best price for product '||l_prod_name);
244: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
245: FND_MESSAGE.Set_Token('TEXT','Could not resolve incompatibility for pricing product '||l_prod_name);
246: FND_MSG_PUB.Add;
247: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_BEST_PRICE' THEN
248: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
249: FND_MESSAGE.Set_Token('TEXT','Could not resolve best price for product '||l_prod_name);
250: FND_MSG_PUB.Add;
251: END IF;
252: */
245: FND_MESSAGE.Set_Token('TEXT','Could not resolve incompatibility for pricing product '||l_prod_name);
246: FND_MSG_PUB.Add;
247: ELSIF l_p_x_line_tbl(i).pricing_status_code = 'INVALID_BEST_PRICE' THEN
248: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
249: FND_MESSAGE.Set_Token('TEXT','Could not resolve best price for product '||l_prod_name);
250: FND_MSG_PUB.Add;
251: END IF;
252: */
253: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
249: FND_MESSAGE.Set_Token('TEXT','Could not resolve best price for product '||l_prod_name);
250: FND_MSG_PUB.Add;
251: END IF;
252: */
253: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
254: FND_MESSAGE.Set_Token('TEXT',l_p_x_line_tbl(i).pricing_status_text);
255: FND_MSG_PUB.Add;
256:
257: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DEF_PROD_PRICE_ERR');
250: FND_MSG_PUB.Add;
251: END IF;
252: */
253: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
254: FND_MESSAGE.Set_Token('TEXT',l_p_x_line_tbl(i).pricing_status_text);
255: FND_MSG_PUB.Add;
256:
257: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DEF_PROD_PRICE_ERR');
258: FND_MESSAGE.set_token('PROD', l_prod_name);
253: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
254: FND_MESSAGE.Set_Token('TEXT',l_p_x_line_tbl(i).pricing_status_text);
255: FND_MSG_PUB.Add;
256:
257: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DEF_PROD_PRICE_ERR');
258: FND_MESSAGE.set_token('PROD', l_prod_name);
259: FND_MSG_PUB.add;
260: END IF;
261: l_error := TRUE;
254: FND_MESSAGE.Set_Token('TEXT',l_p_x_line_tbl(i).pricing_status_text);
255: FND_MSG_PUB.Add;
256:
257: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DEF_PROD_PRICE_ERR');
258: FND_MESSAGE.set_token('PROD', l_prod_name);
259: FND_MSG_PUB.add;
260: END IF;
261: l_error := TRUE;
262: ELSE
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: WHEN OTHERS THEN
373: IF OZF_DEBUG_LOW_ON THEN
374: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
375: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
376: FND_MSG_PUB.Add;
377: END IF;
378: x_return_status := FND_API.g_ret_sts_unexp_error;
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: WHEN OTHERS THEN
373: IF OZF_DEBUG_LOW_ON THEN
374: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
375: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
376: FND_MSG_PUB.Add;
377: END IF;
378: x_return_status := FND_API.g_ret_sts_unexp_error;
379:
501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
503: WHEN OTHERS THEN
504: IF OZF_DEBUG_LOW_ON THEN
505: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
506: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
507: FND_MSG_PUB.Add;
508: END IF;
509: x_return_status := FND_API.g_ret_sts_unexp_error;
502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
503: WHEN OTHERS THEN
504: IF OZF_DEBUG_LOW_ON THEN
505: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
506: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
507: FND_MSG_PUB.Add;
508: END IF;
509: x_return_status := FND_API.g_ret_sts_unexp_error;
510:
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
576: IF OZF_DEBUG_LOW_ON THEN
577: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
578: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
579: FND_MSG_PUB.Add;
580: END IF;
581: x_return_status := FND_API.g_ret_sts_unexp_error;
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
576: IF OZF_DEBUG_LOW_ON THEN
577: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
578: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
579: FND_MSG_PUB.Add;
580: END IF;
581: x_return_status := FND_API.g_ret_sts_unexp_error;
582:
656: END IF;
657:
658: IF x_order_type_id IS NULL THEN
659: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
660: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISSING_RMA_TRX_TYPE');
661: FND_MSG_PUB.add;
662: END IF;
663: RAISE FND_API.G_EXC_ERROR;
664: END IF;
672: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
674: WHEN OTHERS THEN
675: IF OZF_DEBUG_LOW_ON THEN
676: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
677: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
678: FND_MSG_PUB.Add;
679: END IF;
680: x_return_status := FND_API.g_ret_sts_unexp_error;
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
674: WHEN OTHERS THEN
675: IF OZF_DEBUG_LOW_ON THEN
676: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
677: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
678: FND_MSG_PUB.Add;
679: END IF;
680: x_return_status := FND_API.g_ret_sts_unexp_error;
681:
808: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: WHEN OTHERS THEN
811: IF OZF_DEBUG_LOW_ON THEN
812: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
813: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
814: FND_MSG_PUB.Add;
815: END IF;
816: x_return_status := FND_API.g_ret_sts_unexp_error;
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: WHEN OTHERS THEN
811: IF OZF_DEBUG_LOW_ON THEN
812: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
813: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
814: FND_MSG_PUB.Add;
815: END IF;
816: x_return_status := FND_API.g_ret_sts_unexp_error;
817:
922: ) THEN
923: -- Quantity is required for pricing item
924: IF p_x_claim_line_tbl(i).quantity IS NULL THEN
925: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
926: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_QUANTITY_REQ');
927: FND_MSG_PUB.add;
928: END IF;
929: RAISE FND_API.G_EXC_ERROR;
930: END IF;
959: OPEN csr_product_name(p_x_claim_line_tbl(i).item_id, l_org_id);
960: --OPEN csr_product_name(p_x_claim_line_tbl(i).item_id, l_org_id);
961: FETCH csr_product_name INTO l_csr_product_name;
962: CLOSE csr_product_name;
963: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_UOM_REQ');
964: FND_MESSAGE.set_token('ITEM', l_csr_product_name.description);
965: FND_MSG_PUB.add;
966: END IF;
967: RAISE FND_API.G_EXC_ERROR;
960: --OPEN csr_product_name(p_x_claim_line_tbl(i).item_id, l_org_id);
961: FETCH csr_product_name INTO l_csr_product_name;
962: CLOSE csr_product_name;
963: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_UOM_REQ');
964: FND_MESSAGE.set_token('ITEM', l_csr_product_name.description);
965: FND_MSG_PUB.add;
966: END IF;
967: RAISE FND_API.G_EXC_ERROR;
968: ELSE
1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1094: WHEN OTHERS THEN
1095: IF OZF_DEBUG_LOW_ON THEN
1096: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1097: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1098: FND_MSG_PUB.Add;
1099: END IF;
1100: x_return_status := FND_API.g_ret_sts_unexp_error;
1093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1094: WHEN OTHERS THEN
1095: IF OZF_DEBUG_LOW_ON THEN
1096: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1097: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1098: FND_MSG_PUB.Add;
1099: END IF;
1100: x_return_status := FND_API.g_ret_sts_unexp_error;
1101:
1148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1150: WHEN OTHERS THEN
1151: IF OZF_DEBUG_LOW_ON THEN
1152: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1153: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1154: FND_MSG_PUB.Add;
1155: END IF;
1156: x_return_status := FND_API.g_ret_sts_unexp_error;
1149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1150: WHEN OTHERS THEN
1151: IF OZF_DEBUG_LOW_ON THEN
1152: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1153: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1154: FND_MSG_PUB.Add;
1155: END IF;
1156: x_return_status := FND_API.g_ret_sts_unexp_error;
1157:
1235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1237: WHEN OTHERS THEN
1238: IF OZF_DEBUG_LOW_ON THEN
1239: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1240: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1241: FND_MSG_PUB.Add;
1242: END IF;
1243: x_return_status := FND_API.g_ret_sts_unexp_error;
1236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1237: WHEN OTHERS THEN
1238: IF OZF_DEBUG_LOW_ON THEN
1239: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1240: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1241: FND_MSG_PUB.Add;
1242: END IF;
1243: x_return_status := FND_API.g_ret_sts_unexp_error;
1244:
1325: FETCH csr_order_reference INTO l_reference_header;
1326: CLOSE csr_order_reference;
1327: IF nvl(l_reference_header, 'OZF_DUMMY') <> 'ORDER ENTRY' THEN
1328: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1329: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_INVOICE_ORDER_ERROR');
1330: FND_MSG_PUB.Add;
1331: END IF;
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1347:
1348: IF l_return_order_quantity IS NOT NULL THEN
1349: IF ( (p_quantity + l_return_order_quantity ) > l_total_order_quantity ) THEN
1350: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1351: FND_MESSAGE.Set_Name('OZF','OZF_RETURN_INVALID_QUANTITY');
1352: FND_MSG_PUB.Add;
1353: END IF;
1354: RAISE FND_API.G_EXC_ERROR;
1355: END IF;
1389:
1390: IF l_return_order_quantity IS NOT NULL THEN
1391: IF ( (p_quantity + l_return_order_quantity ) > l_total_order_quantity ) THEN
1392: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1393: FND_MESSAGE.Set_Name('OZF','OZF_RETURN_INVALID_QUANTITY');
1394: FND_MSG_PUB.Add;
1395: END IF;
1396: RAISE FND_API.G_EXC_ERROR;
1397: END IF;
1408: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1410: WHEN OTHERS THEN
1411: IF OZF_DEBUG_LOW_ON THEN
1412: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1413: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1414: FND_MSG_PUB.Add;
1415: END IF;
1416: x_return_status := FND_API.g_ret_sts_unexp_error;
1409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1410: WHEN OTHERS THEN
1411: IF OZF_DEBUG_LOW_ON THEN
1412: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1413: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1414: FND_MSG_PUB.Add;
1415: END IF;
1416: x_return_status := FND_API.g_ret_sts_unexp_error;
1417: END Validate_reference_information;
1524: OPEN csr_product_name(p_claim_line_rec.item_id, l_org_id);
1525: -- OPEN csr_product_name(p_claim_line_rec.item_id, l_org_id);
1526: FETCH csr_product_name INTO l_csr_product_name;
1527: CLOSE csr_product_name;
1528: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_PROD_ERR');
1529: FND_MESSAGE.set_token('PROD', l_csr_product_name.description);
1530: FND_MSG_PUB.add;
1531: END IF;
1532: l_error := TRUE;
1525: -- OPEN csr_product_name(p_claim_line_rec.item_id, l_org_id);
1526: FETCH csr_product_name INTO l_csr_product_name;
1527: CLOSE csr_product_name;
1528: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_PROD_ERR');
1529: FND_MESSAGE.set_token('PROD', l_csr_product_name.description);
1530: FND_MSG_PUB.add;
1531: END IF;
1532: l_error := TRUE;
1533: END IF;
1533: END IF;
1534:
1535: IF p_claim_line_rec.quantity > l_most_quantity THEN
1536: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1537: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_RMA_QUTY_ERR');
1538: FND_MSG_PUB.add;
1539: END IF;
1540: l_error := TRUE;
1541: END IF;
1554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1556: WHEN OTHERS THEN
1557: IF OZF_DEBUG_LOW_ON THEN
1558: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1559: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1560: FND_MSG_PUB.Add;
1561: END IF;
1562: x_return_status := FND_API.g_ret_sts_unexp_error;
1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1556: WHEN OTHERS THEN
1557: IF OZF_DEBUG_LOW_ON THEN
1558: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1559: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1560: FND_MSG_PUB.Add;
1561: END IF;
1562: x_return_status := FND_API.g_ret_sts_unexp_error;
1563:
1616:
1617: IF l_csr_item_attr.invoice_enabled_flag = 'N' OR
1618: l_csr_item_attr.invoiceable_item_flag = 'N' THEN
1619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1620: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_RMA_INV_ERR');
1621: FND_MESSAGE.set_token('PROD', l_csr_item_attr.description);
1622: FND_MSG_PUB.add;
1623: END IF;
1624: l_error := TRUE;
1617: IF l_csr_item_attr.invoice_enabled_flag = 'N' OR
1618: l_csr_item_attr.invoiceable_item_flag = 'N' THEN
1619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1620: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_RMA_INV_ERR');
1621: FND_MESSAGE.set_token('PROD', l_csr_item_attr.description);
1622: FND_MSG_PUB.add;
1623: END IF;
1624: l_error := TRUE;
1625: END IF;
1625: END IF;
1626:
1627: IF l_csr_item_attr.returnable_flag <> 'Y' THEN
1628: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1629: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_ITEM_RMA_ERR');
1630: FND_MESSAGE.set_token('PROD', l_csr_item_attr.description);
1631: FND_MSG_PUB.add;
1632: END IF;
1633: l_error := TRUE;
1626:
1627: IF l_csr_item_attr.returnable_flag <> 'Y' THEN
1628: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1629: FND_MESSAGE.set_name('OZF', 'OZF_SETL_VAL_ITEM_RMA_ERR');
1630: FND_MESSAGE.set_token('PROD', l_csr_item_attr.description);
1631: FND_MSG_PUB.add;
1632: END IF;
1633: l_error := TRUE;
1634: END IF;
1646: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1648: WHEN OTHERS THEN
1649: IF OZF_DEBUG_LOW_ON THEN
1650: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1651: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1652: FND_MSG_PUB.Add;
1653: END IF;
1654: x_return_status := FND_API.g_ret_sts_unexp_error;
1647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1648: WHEN OTHERS THEN
1649: IF OZF_DEBUG_LOW_ON THEN
1650: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1651: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1652: FND_MSG_PUB.Add;
1653: END IF;
1654: x_return_status := FND_API.g_ret_sts_unexp_error;
1655:
1693: -- 1. invoice line or product is required
1694: IF (p_claim_line_rec.item_id IS NULL OR p_claim_line_rec.item_type <> 'PRODUCT') AND
1695: p_claim_line_rec.source_object_line_id IS NULL THEN
1696: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1697: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_PROD_ERR');
1698: FND_MSG_PUB.add;
1699: END IF;
1700: l_error := TRUE;
1701: END IF;
1702:
1703: -- 2. quantity is required
1704: IF p_claim_line_rec.quantity IS NULL THEN
1705: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1706: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_QUANTITY_ERR');
1707: FND_MSG_PUB.add;
1708: END IF;
1709: l_error := TRUE;
1710: END IF;
1711:
1712: -- 3. uom is required
1713: IF p_claim_line_rec.quantity_uom IS NULL THEN
1714: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1715: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_UOM_ERR');
1716: FND_MSG_PUB.add;
1717: END IF;
1718: l_error := TRUE;
1719: END IF;
1720:
1721: -- 4. price is required
1722: IF p_claim_line_rec.rate IS NULL THEN
1723: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1724: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_RATE_ERR');
1725: FND_MSG_PUB.add;
1726: END IF;
1727: l_error := TRUE;
1728: END IF;
1731: IF p_claim_line_rec.source_object_class IN ('INVOICE', 'ORDER') AND
1732: p_claim_line_rec.source_object_line_id IS NOT NULL AND
1733: p_claim_rec.pay_related_account_flag = 'T' THEN
1734: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1735: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RMA_REL_CUST_NA');
1736: FND_MSG_PUB.add;
1737: END IF;
1738: l_error := TRUE;
1739: END IF;
1751: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1753: WHEN OTHERS THEN
1754: IF OZF_DEBUG_LOW_ON THEN
1755: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1756: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1757: FND_MSG_PUB.Add;
1758: END IF;
1759: x_return_status := FND_API.g_ret_sts_unexp_error;
1752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1753: WHEN OTHERS THEN
1754: IF OZF_DEBUG_LOW_ON THEN
1755: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1756: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1757: FND_MSG_PUB.Add;
1758: END IF;
1759: x_return_status := FND_API.g_ret_sts_unexp_error;
1760:
1884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1886: WHEN OTHERS THEN
1887: IF OZF_DEBUG_LOW_ON THEN
1888: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1889: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1890: FND_MSG_PUB.Add;
1891: END IF;
1892: x_return_status := FND_API.g_ret_sts_unexp_error;
1885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1886: WHEN OTHERS THEN
1887: IF OZF_DEBUG_LOW_ON THEN
1888: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1889: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1890: FND_MSG_PUB.Add;
1891: END IF;
1892: x_return_status := FND_API.g_ret_sts_unexp_error;
1893: