72: OZF_Utility_PVT.debug_message(l_full_name||' : start');
73: END IF;
74:
75: -- Initialize API return status to sucess
76: x_return_status := FND_API.g_ret_sts_success;
77:
78: OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table(
79: p_api_version => l_api_version
80: ,p_init_msg_list => FND_API.g_false
76: x_return_status := FND_API.g_ret_sts_success;
77:
78: OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table(
79: p_api_version => l_api_version
80: ,p_init_msg_list => FND_API.g_false
81: ,p_commit => FND_API.g_false
82: ,p_validation_level => FND_API.g_valid_level_full
83: ,x_return_status => l_return_status
84: ,x_msg_data => x_msg_data
77:
78: OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table(
79: p_api_version => l_api_version
80: ,p_init_msg_list => FND_API.g_false
81: ,p_commit => FND_API.g_false
82: ,p_validation_level => FND_API.g_valid_level_full
83: ,x_return_status => l_return_status
84: ,x_msg_data => x_msg_data
85: ,x_msg_count => x_msg_count
78: OZF_ORDER_PRICE_PVT.Purge_Pricing_Temp_table(
79: p_api_version => l_api_version
80: ,p_init_msg_list => FND_API.g_false
81: ,p_commit => FND_API.g_false
82: ,p_validation_level => FND_API.g_valid_level_full
83: ,x_return_status => l_return_status
84: ,x_msg_data => x_msg_data
85: ,x_msg_count => x_msg_count
86: );
83: ,x_return_status => l_return_status
84: ,x_msg_data => x_msg_data
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;
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
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().');
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
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;
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;
102:
103: l_price_list_id := FND_PROFILE.value('OZF_CLAIM_PRICE_LIST_ID');
104:
163: END IF;
164:
165: OZF_ORDER_PRICE_PVT.Get_Order_Price(
166: p_api_version => l_api_version
167: ,p_init_msg_list => FND_API.g_false
168: ,p_commit => FND_API.g_false
169: ,p_validation_level => FND_API.g_valid_level_full
170: ,x_return_status => l_return_status
171: ,x_msg_data => x_msg_data
164:
165: OZF_ORDER_PRICE_PVT.Get_Order_Price(
166: p_api_version => l_api_version
167: ,p_init_msg_list => FND_API.g_false
168: ,p_commit => FND_API.g_false
169: ,p_validation_level => FND_API.g_valid_level_full
170: ,x_return_status => l_return_status
171: ,x_msg_data => x_msg_data
172: ,x_msg_count => x_msg_count
165: OZF_ORDER_PRICE_PVT.Get_Order_Price(
166: p_api_version => l_api_version
167: ,p_init_msg_list => FND_API.g_false
168: ,p_commit => FND_API.g_false
169: ,p_validation_level => FND_API.g_valid_level_full
170: ,x_return_status => l_return_status
171: ,x_msg_data => x_msg_data
172: ,x_msg_count => x_msg_count
173: ,p_control_rec => l_p_control_rec
174: ,xp_line_tbl => l_p_x_line_tbl
175: ,x_ldets_tbl => l_x_ldets_tbl
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;
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
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().');
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
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;
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;
193:
194: i := l_p_x_line_tbl.FIRST;
195: IF i IS NOT NULL THEN
267: END LOOP;
268: END IF;
269:
270: IF l_error THEN
271: RAISE FND_API.G_EXC_ERROR;
272: END IF;
273:
274: /*
275: -- Setting up the control record variables
344: l_x_related_lines_tbl,
345: l_return_status,
346: l_return_status_text
347: );
348: IF l_return_status = FND_API.g_ret_sts_error THEN
349: RAISE FND_API.g_exc_error;
350: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
351: RAISE FND_API.g_exc_unexpected_error;
352: END IF;
345: l_return_status,
346: l_return_status_text
347: );
348: IF l_return_status = FND_API.g_ret_sts_error THEN
349: RAISE FND_API.g_exc_error;
350: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
351: RAISE FND_API.g_exc_unexpected_error;
352: END IF;
353:
346: l_return_status_text
347: );
348: IF l_return_status = FND_API.g_ret_sts_error THEN
349: RAISE FND_API.g_exc_error;
350: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
351: RAISE FND_API.g_exc_unexpected_error;
352: END IF;
353:
354: i := l_x_line_tbl.FIRST;
347: );
348: IF l_return_status = FND_API.g_ret_sts_error THEN
349: RAISE FND_API.g_exc_error;
350: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
351: RAISE FND_API.g_exc_unexpected_error;
352: END IF;
353:
354: i := l_x_line_tbl.FIRST;
355: IF i IS NOT NULL THEN
364: IF OZF_DEBUG_HIGH_ON THEN
365: OZF_Utility_PVT.debug_message(l_full_name||' : end');
366: END IF;
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: x_return_status := FND_API.G_RET_STS_ERROR;
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: WHEN OTHERS THEN
365: OZF_Utility_PVT.debug_message(l_full_name||' : end');
366: END IF;
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: x_return_status := FND_API.G_RET_STS_ERROR;
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
366: END IF;
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: x_return_status := FND_API.G_RET_STS_ERROR;
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');
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
380: END Price_Item;
381:
382:
436: OZF_Utility_PVT.debug_message(l_full_name||' : start');
437: END IF;
438:
439: -- Initialize API return status to sucess
440: x_return_status := FND_API.g_ret_sts_success;
441:
442: i := p_x_inv_line_tbl.FIRST;
443: IF i IS NOT NULL THEN
444: LOOP
495: IF OZF_DEBUG_HIGH_ON THEN
496: OZF_Utility_PVT.debug_message(l_full_name||' : end');
497: END IF;
498: EXCEPTION
499: WHEN FND_API.G_EXC_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_ERROR;
501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
503: WHEN OTHERS THEN
496: OZF_Utility_PVT.debug_message(l_full_name||' : end');
497: END IF;
498: EXCEPTION
499: WHEN FND_API.G_EXC_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_ERROR;
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
497: END IF;
498: EXCEPTION
499: WHEN FND_API.G_EXC_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_ERROR;
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');
498: EXCEPTION
499: WHEN FND_API.G_EXC_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
511: END Price_Invoice_Line;
512:
513:
547: OZF_Utility_PVT.debug_message(l_full_name||' : start');
548: END IF;
549:
550: -- Initialize API return status to sucess
551: x_return_status := FND_API.g_ret_sts_success;
552:
553: i := p_x_ord_line_tbl.FIRST;
554: IF i IS NOT NULL THEN
555: LOOP
567: IF OZF_DEBUG_HIGH_ON THEN
568: OZF_Utility_PVT.debug_message(l_full_name||' : end');
569: END IF;
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR;
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
568: OZF_Utility_PVT.debug_message(l_full_name||' : end');
569: END IF;
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR;
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
569: END IF;
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR;
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');
570: EXCEPTION
571: WHEN FND_API.G_EXC_ERROR THEN
572: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
583: END Price_Order_Line;
584:
585:
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;
665:
666: IF OZF_DEBUG_HIGH_ON THEN
667: OZF_Utility_PVT.debug_message(l_full_name||' : end');
666: IF OZF_DEBUG_HIGH_ON THEN
667: OZF_Utility_PVT.debug_message(l_full_name||' : end');
668: END IF;
669: EXCEPTION
670: WHEN FND_API.G_EXC_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_ERROR;
672: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
674: WHEN OTHERS THEN
667: OZF_Utility_PVT.debug_message(l_full_name||' : end');
668: END IF;
669: EXCEPTION
670: WHEN FND_API.G_EXC_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_ERROR;
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
668: END IF;
669: EXCEPTION
670: WHEN FND_API.G_EXC_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_ERROR;
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');
669: EXCEPTION
670: WHEN FND_API.G_EXC_ERROR THEN
671: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
682: END Get_Default_Order_Type;
683:
684:
727: OZF_Utility_PVT.debug_message(l_full_name||' : start');
728: END IF;
729:
730: -- Initialize API return status to sucess
731: x_return_status := FND_API.g_ret_sts_success;
732:
733: l_claim_line_tbl(1) := p_x_claim_line_rec;
734:
735: Default_Claim_Line_Tbl(
733: l_claim_line_tbl(1) := p_x_claim_line_rec;
734:
735: Default_Claim_Line_Tbl(
736: p_api_version => l_api_version
737: ,p_init_msg_list => FND_API.g_false
738: ,p_validation_level => FND_API.g_valid_level_full
739: ,x_return_status => l_return_status
740: ,x_msg_data => x_msg_data
741: ,x_msg_count => x_msg_count
734:
735: Default_Claim_Line_Tbl(
736: p_api_version => l_api_version
737: ,p_init_msg_list => FND_API.g_false
738: ,p_validation_level => FND_API.g_valid_level_full
739: ,x_return_status => l_return_status
740: ,x_msg_data => x_msg_data
741: ,x_msg_count => x_msg_count
742: ,p_x_claim_line_tbl => l_claim_line_tbl
740: ,x_msg_data => x_msg_data
741: ,x_msg_count => x_msg_count
742: ,p_x_claim_line_tbl => l_claim_line_tbl
743: );
744: IF l_return_status = FND_API.g_ret_sts_error THEN
745: RAISE FND_API.g_exc_error;
746: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
747: RAISE FND_API.g_exc_unexpected_error;
748: END IF;
741: ,x_msg_count => x_msg_count
742: ,p_x_claim_line_tbl => l_claim_line_tbl
743: );
744: IF l_return_status = FND_API.g_ret_sts_error THEN
745: RAISE FND_API.g_exc_error;
746: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
747: RAISE FND_API.g_exc_unexpected_error;
748: END IF;
749:
742: ,p_x_claim_line_tbl => l_claim_line_tbl
743: );
744: IF l_return_status = FND_API.g_ret_sts_error THEN
745: RAISE FND_API.g_exc_error;
746: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
747: RAISE FND_API.g_exc_unexpected_error;
748: END IF;
749:
750: /*
743: );
744: IF l_return_status = FND_API.g_ret_sts_error THEN
745: RAISE FND_API.g_exc_error;
746: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
747: RAISE FND_API.g_exc_unexpected_error;
748: END IF;
749:
750: /*
751: IF p_x_claim_line_rec.source_object_line_id IS NOT NULL AND
759: ,x_msg_data => x_msg_data
760: ,x_msg_count => x_msg_count
761: ,p_x_inv_line_tbl => l_line_item_tbl
762: );
763: IF l_return_status = FND_API.g_ret_sts_error THEN
764: RAISE FND_API.g_exc_error;
765: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
766: RAISE FND_API.g_exc_unexpected_error;
767: END IF;
760: ,x_msg_count => x_msg_count
761: ,p_x_inv_line_tbl => l_line_item_tbl
762: );
763: IF l_return_status = FND_API.g_ret_sts_error THEN
764: RAISE FND_API.g_exc_error;
765: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
766: RAISE FND_API.g_exc_unexpected_error;
767: END IF;
768:
761: ,p_x_inv_line_tbl => l_line_item_tbl
762: );
763: IF l_return_status = FND_API.g_ret_sts_error THEN
764: RAISE FND_API.g_exc_error;
765: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
766: RAISE FND_API.g_exc_unexpected_error;
767: END IF;
768:
769: ELSIF p_x_claim_line_rec.item_id IS NOT NULL THEN
762: );
763: IF l_return_status = FND_API.g_ret_sts_error THEN
764: RAISE FND_API.g_exc_error;
765: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
766: RAISE FND_API.g_exc_unexpected_error;
767: END IF;
768:
769: ELSIF p_x_claim_line_rec.item_id IS NOT NULL THEN
770: l_line_item_tbl(1).claim_line_index := 1;
786: ,x_msg_count => x_msg_count
787:
788: ,p_x_item_tbl => l_line_item_tbl
789: );
790: IF l_return_status = FND_API.g_ret_sts_error THEN
791: RAISE FND_API.g_exc_error;
792: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
793: RAISE FND_API.g_exc_unexpected_error;
794: END IF;
787:
788: ,p_x_item_tbl => l_line_item_tbl
789: );
790: IF l_return_status = FND_API.g_ret_sts_error THEN
791: RAISE FND_API.g_exc_error;
792: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
793: RAISE FND_API.g_exc_unexpected_error;
794: END IF;
795:
788: ,p_x_item_tbl => l_line_item_tbl
789: );
790: IF l_return_status = FND_API.g_ret_sts_error THEN
791: RAISE FND_API.g_exc_error;
792: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
793: RAISE FND_API.g_exc_unexpected_error;
794: END IF;
795:
796: END IF;
789: );
790: IF l_return_status = FND_API.g_ret_sts_error THEN
791: RAISE FND_API.g_exc_error;
792: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
793: RAISE FND_API.g_exc_unexpected_error;
794: END IF;
795:
796: END IF;
797: */
802: IF OZF_DEBUG_HIGH_ON THEN
803: OZF_Utility_PVT.debug_message(l_full_name||' : end');
804: END IF;
805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
808: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: WHEN OTHERS THEN
803: OZF_Utility_PVT.debug_message(l_full_name||' : end');
804: END IF;
805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
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
804: END IF;
805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
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');
805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
818: END Default_Claim_Line;
819:
820:
883: OZF_Utility_PVT.debug_message(l_full_name||' : start');
884: END IF;
885:
886: -- Initialize API return status to sucess
887: x_return_status := FND_API.g_ret_sts_success;
888:
889: --l_org_id := TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10));
890:
891: ----------------------------
912: OZF_Utility_PVT.debug_message(l_full_name||' : p_x_claim_line_tbl('||i||').item_type='||p_x_claim_line_tbl(i).item_type);
913: OZF_Utility_PVT.debug_message(l_full_name||' : p_x_claim_line_tbl('||i||').item_id='||p_x_claim_line_tbl(i).item_id);
914: END IF;
915: IF ( p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
916: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num
917: ) OR
918: ( p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
919: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
920: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
916: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num
917: ) OR
918: ( p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
919: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
920: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
921: p_x_claim_line_tbl(i).rate IS NULL
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;
931:
932: IF p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
933: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num AND
929: RAISE FND_API.G_EXC_ERROR;
930: END IF;
931:
932: IF p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
933: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num AND
934: p_x_claim_line_tbl(i).rate IS NOT NULL THEN
935: IF p_x_claim_line_tbl(i).source_object_class = 'INVOICE' THEN
936: l_inv_line_tbl(idx_inv_line).claim_line_index := i;
937: l_inv_line_tbl(idx_inv_line).source_object_class := p_x_claim_line_tbl(i).source_object_class;
946: idx_ord_line := idx_ord_line + 1;
947: END IF;
948: ELSIF p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
949: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
950: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
951: p_x_claim_line_tbl(i).rate IS NULL THEN
952: l_item_tbl(idx_item).claim_line_index := i;
953: l_item_tbl(idx_item).item_id := p_x_claim_line_tbl(i).item_id;
954: l_item_tbl(idx_item).quantity := p_x_claim_line_tbl(i).quantity;
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
969: l_item_tbl(idx_item).quantity_uom := p_x_claim_line_tbl(i).quantity_uom;
970: END IF;
971: l_item_tbl(idx_item).currency_code := l_claim_currency;
971: l_item_tbl(idx_item).currency_code := l_claim_currency;
972: idx_item := idx_item + 1;
973: END IF;
974: ELSIF p_x_claim_line_tbl(i).rate IS NOT NULL AND
975: p_x_claim_line_tbl(i).rate <> FND_API.g_miss_num THEN
976: -- create mode
977: IF p_x_claim_line_tbl(i).claim_line_id IS NULL OR
978: p_x_claim_line_tbl(i).claim_line_id = FND_API.g_miss_num THEN
979: p_x_claim_line_tbl(i).payment_status := 'N'; --set calculate_price_flag
974: ELSIF p_x_claim_line_tbl(i).rate IS NOT NULL AND
975: p_x_claim_line_tbl(i).rate <> FND_API.g_miss_num THEN
976: -- create mode
977: IF p_x_claim_line_tbl(i).claim_line_id IS NULL OR
978: p_x_claim_line_tbl(i).claim_line_id = FND_API.g_miss_num THEN
979: p_x_claim_line_tbl(i).payment_status := 'N'; --set calculate_price_flag
980:
981: -- update mode
982: ELSE
1015: ,x_msg_count => x_msg_count
1016:
1017: ,p_x_item_tbl => l_item_tbl
1018: );
1019: IF l_return_status = FND_API.g_ret_sts_error THEN
1020: RAISE FND_API.g_exc_error;
1021: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1022: RAISE FND_API.g_exc_unexpected_error;
1023: END IF;
1016:
1017: ,p_x_item_tbl => l_item_tbl
1018: );
1019: IF l_return_status = FND_API.g_ret_sts_error THEN
1020: RAISE FND_API.g_exc_error;
1021: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1022: RAISE FND_API.g_exc_unexpected_error;
1023: END IF;
1024:
1017: ,p_x_item_tbl => l_item_tbl
1018: );
1019: IF l_return_status = FND_API.g_ret_sts_error THEN
1020: RAISE FND_API.g_exc_error;
1021: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1022: RAISE FND_API.g_exc_unexpected_error;
1023: END IF;
1024:
1025: LOOP
1018: );
1019: IF l_return_status = FND_API.g_ret_sts_error THEN
1020: RAISE FND_API.g_exc_error;
1021: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1022: RAISE FND_API.g_exc_unexpected_error;
1023: END IF;
1024:
1025: LOOP
1026: p_x_claim_line_tbl(l_item_tbl(i).claim_line_index).rate := l_item_tbl(i).rate;
1041: ,x_msg_data => x_msg_data
1042: ,x_msg_count => x_msg_count
1043: ,p_x_inv_line_tbl => l_inv_line_tbl
1044: );
1045: IF l_return_status = FND_API.g_ret_sts_error THEN
1046: RAISE FND_API.g_exc_error;
1047: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1048: RAISE FND_API.g_exc_unexpected_error;
1049: END IF;
1042: ,x_msg_count => x_msg_count
1043: ,p_x_inv_line_tbl => l_inv_line_tbl
1044: );
1045: IF l_return_status = FND_API.g_ret_sts_error THEN
1046: RAISE FND_API.g_exc_error;
1047: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1048: RAISE FND_API.g_exc_unexpected_error;
1049: END IF;
1050:
1043: ,p_x_inv_line_tbl => l_inv_line_tbl
1044: );
1045: IF l_return_status = FND_API.g_ret_sts_error THEN
1046: RAISE FND_API.g_exc_error;
1047: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1048: RAISE FND_API.g_exc_unexpected_error;
1049: END IF;
1050:
1051: LOOP
1044: );
1045: IF l_return_status = FND_API.g_ret_sts_error THEN
1046: RAISE FND_API.g_exc_error;
1047: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1048: RAISE FND_API.g_exc_unexpected_error;
1049: END IF;
1050:
1051: LOOP
1052: p_x_claim_line_tbl(l_inv_line_tbl(i).claim_line_index).item_id := l_inv_line_tbl(i).item_id;
1066: ,x_msg_data => x_msg_data
1067: ,x_msg_count => x_msg_count
1068: ,p_x_ord_line_tbl => l_ord_line_tbl
1069: );
1070: IF l_return_status = FND_API.g_ret_sts_error THEN
1071: RAISE FND_API.g_exc_error;
1072: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1073: RAISE FND_API.g_exc_unexpected_error;
1074: END IF;
1067: ,x_msg_count => x_msg_count
1068: ,p_x_ord_line_tbl => l_ord_line_tbl
1069: );
1070: IF l_return_status = FND_API.g_ret_sts_error THEN
1071: RAISE FND_API.g_exc_error;
1072: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1073: RAISE FND_API.g_exc_unexpected_error;
1074: END IF;
1075:
1068: ,p_x_ord_line_tbl => l_ord_line_tbl
1069: );
1070: IF l_return_status = FND_API.g_ret_sts_error THEN
1071: RAISE FND_API.g_exc_error;
1072: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1073: RAISE FND_API.g_exc_unexpected_error;
1074: END IF;
1075:
1076: LOOP
1069: );
1070: IF l_return_status = FND_API.g_ret_sts_error THEN
1071: RAISE FND_API.g_exc_error;
1072: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1073: RAISE FND_API.g_exc_unexpected_error;
1074: END IF;
1075:
1076: LOOP
1077: p_x_claim_line_tbl(l_ord_line_tbl(i).claim_line_index).item_id := l_ord_line_tbl(i).item_id;
1086: IF OZF_DEBUG_HIGH_ON THEN
1087: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1088: END IF;
1089: EXCEPTION
1090: WHEN FND_API.G_EXC_ERROR THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1094: WHEN OTHERS THEN
1087: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1088: END IF;
1089: EXCEPTION
1090: WHEN FND_API.G_EXC_ERROR THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
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
1088: END IF;
1089: EXCEPTION
1090: WHEN FND_API.G_EXC_ERROR THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1089: EXCEPTION
1090: WHEN FND_API.G_EXC_ERROR THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1102: END Default_Claim_Line_Tbl;
1103:
1104:
1136: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1137: END IF;
1138:
1139: -- Initialize API return status to sucess
1140: x_return_status := FND_API.g_ret_sts_success;
1141:
1142: IF OZF_DEBUG_HIGH_ON THEN
1143: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1144: END IF;
1142: IF OZF_DEBUG_HIGH_ON THEN
1143: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1144: END IF;
1145: EXCEPTION
1146: WHEN FND_API.G_EXC_ERROR THEN
1147: x_return_status := FND_API.G_RET_STS_ERROR;
1148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1150: WHEN OTHERS THEN
1143: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1144: END IF;
1145: EXCEPTION
1146: WHEN FND_API.G_EXC_ERROR THEN
1147: x_return_status := FND_API.G_RET_STS_ERROR;
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
1144: END IF;
1145: EXCEPTION
1146: WHEN FND_API.G_EXC_ERROR THEN
1147: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1145: EXCEPTION
1146: WHEN FND_API.G_EXC_ERROR THEN
1147: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1158: END Validate_Claim_Line;
1159:
1160:
1193: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1194: END IF;
1195:
1196: -- Initialize API return status to sucess
1197: x_return_status := FND_API.g_ret_sts_success;
1198:
1199: ----------------------- Start -----------------------
1200: i := p_claim_line_tbl.FIRST;
1201: IF i IS NOT NULL THEN
1202: LOOP
1203: IF p_claim_line_tbl(i).claim_line_id IS NOT NULL THEN
1204: Validate_Claim_Line(
1205: p_api_version => l_api_version
1206: ,p_init_msg_list => FND_API.g_false
1207: ,p_validation_level => FND_API.g_valid_level_full
1208: ,x_return_status => l_return_status
1209: ,x_msg_data => x_msg_data
1210: ,x_msg_count => x_msg_count
1203: IF p_claim_line_tbl(i).claim_line_id IS NOT NULL THEN
1204: Validate_Claim_Line(
1205: p_api_version => l_api_version
1206: ,p_init_msg_list => FND_API.g_false
1207: ,p_validation_level => FND_API.g_valid_level_full
1208: ,x_return_status => l_return_status
1209: ,x_msg_data => x_msg_data
1210: ,x_msg_count => x_msg_count
1211: ,p_claim_line_rec => p_claim_line_tbl(i)
1209: ,x_msg_data => x_msg_data
1210: ,x_msg_count => x_msg_count
1211: ,p_claim_line_rec => p_claim_line_tbl(i)
1212: );
1213: IF l_return_status = FND_API.g_ret_sts_error THEN
1214: RAISE FND_API.g_exc_error;
1215: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1216: RAISE FND_API.g_exc_unexpected_error;
1217: END IF;
1210: ,x_msg_count => x_msg_count
1211: ,p_claim_line_rec => p_claim_line_tbl(i)
1212: );
1213: IF l_return_status = FND_API.g_ret_sts_error THEN
1214: RAISE FND_API.g_exc_error;
1215: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1216: RAISE FND_API.g_exc_unexpected_error;
1217: END IF;
1218: END IF;
1211: ,p_claim_line_rec => p_claim_line_tbl(i)
1212: );
1213: IF l_return_status = FND_API.g_ret_sts_error THEN
1214: RAISE FND_API.g_exc_error;
1215: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1216: RAISE FND_API.g_exc_unexpected_error;
1217: END IF;
1218: END IF;
1219: EXIT WHEN i = p_claim_line_tbl.LAST;
1212: );
1213: IF l_return_status = FND_API.g_ret_sts_error THEN
1214: RAISE FND_API.g_exc_error;
1215: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1216: RAISE FND_API.g_exc_unexpected_error;
1217: END IF;
1218: END IF;
1219: EXIT WHEN i = p_claim_line_tbl.LAST;
1220: i := p_claim_line_tbl.NEXT(i);
1221: END LOOP;
1222: END IF;
1223:
1224: IF l_error THEN
1225: RAISE FND_API.G_EXC_ERROR;
1226: END IF;
1227:
1228:
1229: IF OZF_DEBUG_HIGH_ON THEN
1229: IF OZF_DEBUG_HIGH_ON THEN
1230: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1231: END IF;
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: x_return_status := FND_API.G_RET_STS_ERROR;
1235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1237: WHEN OTHERS THEN
1230: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1231: END IF;
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: x_return_status := FND_API.G_RET_STS_ERROR;
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
1231: END IF;
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1245: END Validate_Claim_Line_Tbl;
1246:
1247: -- kishore
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;
1334: END IF;
1335:
1336:
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;
1356: END IF;
1357: END IF;
1358:
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;
1398: END IF;
1399:
1400: END IF;
1402: -- BUG 4565507 END
1403:
1404:
1405: EXCEPTION
1406: WHEN FND_API.G_EXC_ERROR THEN
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1410: WHEN OTHERS THEN
1403:
1404:
1405: EXCEPTION
1406: WHEN FND_API.G_EXC_ERROR THEN
1407: x_return_status := FND_API.G_RET_STS_ERROR;
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
1404:
1405: EXCEPTION
1406: WHEN FND_API.G_EXC_ERROR THEN
1407: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1405: EXCEPTION
1406: WHEN FND_API.G_EXC_ERROR THEN
1407: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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;
1418:
1419:
1420: /*=======================================================================*
1471: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1472: END IF;
1473:
1474: -- Initialize API return status to sucess
1475: x_return_status := FND_API.g_ret_sts_success;
1476:
1477: -- Checking Reference information -----
1478: -- kishore.
1479:
1490: ,p_source_object_class => p_claim_line_rec.source_object_class
1491: ,p_quantity => p_claim_line_rec.quantity
1492: );
1493:
1494: IF l_return_status = FND_API.g_ret_sts_error THEN
1495: RAISE FND_API.g_exc_error;
1496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1497: RAISE FND_API.g_exc_unexpected_error;
1498: END IF;
1491: ,p_quantity => p_claim_line_rec.quantity
1492: );
1493:
1494: IF l_return_status = FND_API.g_ret_sts_error THEN
1495: RAISE FND_API.g_exc_error;
1496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1497: RAISE FND_API.g_exc_unexpected_error;
1498: END IF;
1499:
1492: );
1493:
1494: IF l_return_status = FND_API.g_ret_sts_error THEN
1495: RAISE FND_API.g_exc_error;
1496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1497: RAISE FND_API.g_exc_unexpected_error;
1498: END IF;
1499:
1500: END IF;
1493:
1494: IF l_return_status = FND_API.g_ret_sts_error THEN
1495: RAISE FND_API.g_exc_error;
1496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1497: RAISE FND_API.g_exc_unexpected_error;
1498: END IF;
1499:
1500: END IF;
1501:
1541: END IF;
1542: END IF;
1543:
1544: IF l_error THEN
1545: RAISE FND_API.G_EXC_ERROR;
1546: END IF;
1547:
1548: IF OZF_DEBUG_HIGH_ON THEN
1549: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1548: IF OZF_DEBUG_HIGH_ON THEN
1549: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1550: END IF;
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
1554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1556: WHEN OTHERS THEN
1549: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1550: END IF;
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
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
1550: END IF;
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1564: END Validate_Return_Quantity;
1565:
1566: /*=======================================================================*
1604: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1605: END IF;
1606:
1607: -- Initialize API return status to sucess
1608: x_return_status := FND_API.g_ret_sts_success;
1609:
1610: -- l_org_id := TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10));
1611: l_org_id := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
1612:
1633: l_error := TRUE;
1634: END IF;
1635:
1636: IF l_error THEN
1637: RAISE FND_API.G_EXC_ERROR;
1638: END IF;
1639:
1640: IF OZF_DEBUG_HIGH_ON THEN
1641: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1640: IF OZF_DEBUG_HIGH_ON THEN
1641: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1642: END IF;
1643: EXCEPTION
1644: WHEN FND_API.G_EXC_ERROR THEN
1645: x_return_status := FND_API.G_RET_STS_ERROR;
1646: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1648: WHEN OTHERS THEN
1641: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1642: END IF;
1643: EXCEPTION
1644: WHEN FND_API.G_EXC_ERROR THEN
1645: x_return_status := FND_API.G_RET_STS_ERROR;
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
1642: END IF;
1643: EXCEPTION
1644: WHEN FND_API.G_EXC_ERROR THEN
1645: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1643: EXCEPTION
1644: WHEN FND_API.G_EXC_ERROR THEN
1645: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1656: END Check_RMA_Item_Attribute;
1657:
1658:
1687: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1688: END IF;
1689:
1690: -- Initialize API return status to sucess
1691: x_return_status := FND_API.g_ret_sts_success;
1692:
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
1738: l_error := TRUE;
1739: END IF;
1740:
1741: IF l_error THEN
1742: RAISE FND_API.G_EXC_ERROR;
1743: END IF;
1744:
1745: IF OZF_DEBUG_HIGH_ON THEN
1746: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1745: IF OZF_DEBUG_HIGH_ON THEN
1746: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1747: END IF;
1748: EXCEPTION
1749: WHEN FND_API.G_EXC_ERROR THEN
1750: x_return_status := FND_API.G_RET_STS_ERROR;
1751: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1753: WHEN OTHERS THEN
1746: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1747: END IF;
1748: EXCEPTION
1749: WHEN FND_API.G_EXC_ERROR THEN
1750: x_return_status := FND_API.G_RET_STS_ERROR;
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
1747: END IF;
1748: EXCEPTION
1749: WHEN FND_API.G_EXC_ERROR THEN
1750: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1748: EXCEPTION
1749: WHEN FND_API.G_EXC_ERROR THEN
1750: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1761: END Check_RMA_Line_Items;
1762:
1763:
1799: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1800: END IF;
1801:
1802: -- Initialize API return status to sucess
1803: x_return_status := FND_API.g_ret_sts_success;
1804:
1805: x_claim_rec := p_claim_rec;
1806:
1807: ----------------------- Start -----------------------
1809: p_claim_id => p_claim_rec.claim_id
1810: ,x_claim_line_tbl => l_claim_line_tbl
1811: ,x_return_status => l_return_status
1812: );
1813: IF l_return_status = FND_API.g_ret_sts_error THEN
1814: RAISE FND_API.g_exc_error;
1815: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1816: RAISE FND_API.g_exc_unexpected_error;
1817: END IF;
1810: ,x_claim_line_tbl => l_claim_line_tbl
1811: ,x_return_status => l_return_status
1812: );
1813: IF l_return_status = FND_API.g_ret_sts_error THEN
1814: RAISE FND_API.g_exc_error;
1815: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1816: RAISE FND_API.g_exc_unexpected_error;
1817: END IF;
1818:
1811: ,x_return_status => l_return_status
1812: );
1813: IF l_return_status = FND_API.g_ret_sts_error THEN
1814: RAISE FND_API.g_exc_error;
1815: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1816: RAISE FND_API.g_exc_unexpected_error;
1817: END IF;
1818:
1819: i := l_claim_line_tbl.FIRST;
1812: );
1813: IF l_return_status = FND_API.g_ret_sts_error THEN
1814: RAISE FND_API.g_exc_error;
1815: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1816: RAISE FND_API.g_exc_unexpected_error;
1817: END IF;
1818:
1819: i := l_claim_line_tbl.FIRST;
1820: IF i IS NOT NULL THEN
1831: ,x_msg_count => x_msg_count
1832: ,p_claim_rec => p_claim_rec
1833: ,p_claim_line_rec => l_claim_line_rec
1834: );
1835: IF l_return_status = FND_API.g_ret_sts_error THEN
1836: RAISE FND_API.g_exc_error;
1837: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1838: RAISE FND_API.g_exc_unexpected_error;
1839: END IF;
1832: ,p_claim_rec => p_claim_rec
1833: ,p_claim_line_rec => l_claim_line_rec
1834: );
1835: IF l_return_status = FND_API.g_ret_sts_error THEN
1836: RAISE FND_API.g_exc_error;
1837: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1838: RAISE FND_API.g_exc_unexpected_error;
1839: END IF;
1840:
1833: ,p_claim_line_rec => l_claim_line_rec
1834: );
1835: IF l_return_status = FND_API.g_ret_sts_error THEN
1836: RAISE FND_API.g_exc_error;
1837: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1838: RAISE FND_API.g_exc_unexpected_error;
1839: END IF;
1840:
1841: -------------------------------------
1834: );
1835: IF l_return_status = FND_API.g_ret_sts_error THEN
1836: RAISE FND_API.g_exc_error;
1837: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1838: RAISE FND_API.g_exc_unexpected_error;
1839: END IF;
1840:
1841: -------------------------------------
1842: -- RMA Items Attributes Validation --
1846: ,x_msg_data => x_msg_data
1847: ,x_msg_count => x_msg_count
1848: ,p_item_id => l_claim_line_rec.item_id
1849: );
1850: IF l_return_status = FND_API.g_ret_sts_error THEN
1851: RAISE FND_API.g_exc_error;
1852: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1853: RAISE FND_API.g_exc_unexpected_error;
1854: END IF;
1847: ,x_msg_count => x_msg_count
1848: ,p_item_id => l_claim_line_rec.item_id
1849: );
1850: IF l_return_status = FND_API.g_ret_sts_error THEN
1851: RAISE FND_API.g_exc_error;
1852: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1853: RAISE FND_API.g_exc_unexpected_error;
1854: END IF;
1855:
1848: ,p_item_id => l_claim_line_rec.item_id
1849: );
1850: IF l_return_status = FND_API.g_ret_sts_error THEN
1851: RAISE FND_API.g_exc_error;
1852: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1853: RAISE FND_API.g_exc_unexpected_error;
1854: END IF;
1855:
1856: --------------------------------
1849: );
1850: IF l_return_status = FND_API.g_ret_sts_error THEN
1851: RAISE FND_API.g_exc_error;
1852: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1853: RAISE FND_API.g_exc_unexpected_error;
1854: END IF;
1855:
1856: --------------------------------
1857: -- Return Quantity Validation --
1861: ,x_msg_data => x_msg_data
1862: ,x_msg_count => x_msg_count
1863: ,p_claim_line_rec => l_claim_line_rec
1864: );
1865: IF l_return_status = FND_API.g_ret_sts_error THEN
1866: RAISE FND_API.g_exc_error;
1867: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1868: RAISE FND_API.g_exc_unexpected_error;
1869: END IF;
1862: ,x_msg_count => x_msg_count
1863: ,p_claim_line_rec => l_claim_line_rec
1864: );
1865: IF l_return_status = FND_API.g_ret_sts_error THEN
1866: RAISE FND_API.g_exc_error;
1867: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1868: RAISE FND_API.g_exc_unexpected_error;
1869: END IF;
1870:
1863: ,p_claim_line_rec => l_claim_line_rec
1864: );
1865: IF l_return_status = FND_API.g_ret_sts_error THEN
1866: RAISE FND_API.g_exc_error;
1867: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1868: RAISE FND_API.g_exc_unexpected_error;
1869: END IF;
1870:
1871: END IF;
1864: );
1865: IF l_return_status = FND_API.g_ret_sts_error THEN
1866: RAISE FND_API.g_exc_error;
1867: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1868: RAISE FND_API.g_exc_unexpected_error;
1869: END IF;
1870:
1871: END IF;
1872: EXIT WHEN i = l_claim_line_tbl.LAST;
1878: IF OZF_DEBUG_HIGH_ON THEN
1879: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1880: END IF;
1881: EXCEPTION
1882: WHEN FND_API.G_EXC_ERROR THEN
1883: x_return_status := FND_API.G_RET_STS_ERROR;
1884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1886: WHEN OTHERS THEN
1879: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1880: END IF;
1881: EXCEPTION
1882: WHEN FND_API.G_EXC_ERROR THEN
1883: x_return_status := FND_API.G_RET_STS_ERROR;
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
1880: END IF;
1881: EXCEPTION
1882: WHEN FND_API.G_EXC_ERROR THEN
1883: x_return_status := FND_API.G_RET_STS_ERROR;
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');
1881: EXCEPTION
1882: WHEN FND_API.G_EXC_ERROR THEN
1883: x_return_status := FND_API.G_RET_STS_ERROR;
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');
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:
1894: END Complete_RMA_Validation;
1895:
1896: