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:
416: OZF_Utility_PVT.debug_message(l_full_name||' : start');
417: END IF;
418:
419: -- Initialize API return status to sucess
420: x_return_status := FND_API.g_ret_sts_success;
421:
422: i := p_x_inv_line_tbl.FIRST;
423: IF i IS NOT NULL THEN
424: LOOP
436: IF OZF_DEBUG_HIGH_ON THEN
437: OZF_Utility_PVT.debug_message(l_full_name||' : end');
438: END IF;
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444: WHEN OTHERS THEN
437: OZF_Utility_PVT.debug_message(l_full_name||' : end');
438: END IF;
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444: WHEN OTHERS THEN
445: IF OZF_DEBUG_LOW_ON THEN
438: END IF;
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444: WHEN OTHERS THEN
445: IF OZF_DEBUG_LOW_ON THEN
446: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444: WHEN OTHERS THEN
445: IF OZF_DEBUG_LOW_ON THEN
446: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
447: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
446: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
447: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
448: FND_MSG_PUB.Add;
449: END IF;
450: x_return_status := FND_API.g_ret_sts_unexp_error;
451:
452: END Price_Invoice_Line;
453:
454:
488: OZF_Utility_PVT.debug_message(l_full_name||' : start');
489: END IF;
490:
491: -- Initialize API return status to sucess
492: x_return_status := FND_API.g_ret_sts_success;
493:
494: i := p_x_ord_line_tbl.FIRST;
495: IF i IS NOT NULL THEN
496: LOOP
508: IF OZF_DEBUG_HIGH_ON THEN
509: OZF_Utility_PVT.debug_message(l_full_name||' : end');
510: END IF;
511: EXCEPTION
512: WHEN FND_API.G_EXC_ERROR THEN
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516: WHEN OTHERS THEN
509: OZF_Utility_PVT.debug_message(l_full_name||' : end');
510: END IF;
511: EXCEPTION
512: WHEN FND_API.G_EXC_ERROR THEN
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516: WHEN OTHERS THEN
517: IF OZF_DEBUG_LOW_ON THEN
510: END IF;
511: EXCEPTION
512: WHEN FND_API.G_EXC_ERROR THEN
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516: WHEN OTHERS THEN
517: IF OZF_DEBUG_LOW_ON THEN
518: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
511: EXCEPTION
512: WHEN FND_API.G_EXC_ERROR THEN
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516: WHEN OTHERS THEN
517: IF OZF_DEBUG_LOW_ON THEN
518: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
519: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
518: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
519: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
520: FND_MSG_PUB.Add;
521: END IF;
522: x_return_status := FND_API.g_ret_sts_unexp_error;
523:
524: END Price_Order_Line;
525:
526:
600: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
601: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISSING_RMA_TRX_TYPE');
602: FND_MSG_PUB.add;
603: END IF;
604: RAISE FND_API.G_EXC_ERROR;
605: END IF;
606:
607: IF OZF_DEBUG_HIGH_ON THEN
608: OZF_Utility_PVT.debug_message(l_full_name||' : end');
607: IF OZF_DEBUG_HIGH_ON THEN
608: OZF_Utility_PVT.debug_message(l_full_name||' : end');
609: END IF;
610: EXCEPTION
611: WHEN FND_API.G_EXC_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: WHEN OTHERS THEN
608: OZF_Utility_PVT.debug_message(l_full_name||' : end');
609: END IF;
610: EXCEPTION
611: WHEN FND_API.G_EXC_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: WHEN OTHERS THEN
616: IF OZF_DEBUG_LOW_ON THEN
609: END IF;
610: EXCEPTION
611: WHEN FND_API.G_EXC_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: WHEN OTHERS THEN
616: IF OZF_DEBUG_LOW_ON THEN
617: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
610: EXCEPTION
611: WHEN FND_API.G_EXC_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: WHEN OTHERS THEN
616: IF OZF_DEBUG_LOW_ON THEN
617: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
618: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
617: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
618: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
619: FND_MSG_PUB.Add;
620: END IF;
621: x_return_status := FND_API.g_ret_sts_unexp_error;
622:
623: END Get_Default_Order_Type;
624:
625:
668: OZF_Utility_PVT.debug_message(l_full_name||' : start');
669: END IF;
670:
671: -- Initialize API return status to sucess
672: x_return_status := FND_API.g_ret_sts_success;
673:
674: l_claim_line_tbl(1) := p_x_claim_line_rec;
675:
676: Default_Claim_Line_Tbl(
674: l_claim_line_tbl(1) := p_x_claim_line_rec;
675:
676: Default_Claim_Line_Tbl(
677: p_api_version => l_api_version
678: ,p_init_msg_list => FND_API.g_false
679: ,p_validation_level => FND_API.g_valid_level_full
680: ,x_return_status => l_return_status
681: ,x_msg_data => x_msg_data
682: ,x_msg_count => x_msg_count
675:
676: Default_Claim_Line_Tbl(
677: p_api_version => l_api_version
678: ,p_init_msg_list => FND_API.g_false
679: ,p_validation_level => FND_API.g_valid_level_full
680: ,x_return_status => l_return_status
681: ,x_msg_data => x_msg_data
682: ,x_msg_count => x_msg_count
683: ,p_x_claim_line_tbl => l_claim_line_tbl
681: ,x_msg_data => x_msg_data
682: ,x_msg_count => x_msg_count
683: ,p_x_claim_line_tbl => l_claim_line_tbl
684: );
685: IF l_return_status = FND_API.g_ret_sts_error THEN
686: RAISE FND_API.g_exc_error;
687: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
688: RAISE FND_API.g_exc_unexpected_error;
689: END IF;
682: ,x_msg_count => x_msg_count
683: ,p_x_claim_line_tbl => l_claim_line_tbl
684: );
685: IF l_return_status = FND_API.g_ret_sts_error THEN
686: RAISE FND_API.g_exc_error;
687: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
688: RAISE FND_API.g_exc_unexpected_error;
689: END IF;
690:
683: ,p_x_claim_line_tbl => l_claim_line_tbl
684: );
685: IF l_return_status = FND_API.g_ret_sts_error THEN
686: RAISE FND_API.g_exc_error;
687: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
688: RAISE FND_API.g_exc_unexpected_error;
689: END IF;
690:
691: /*
684: );
685: IF l_return_status = FND_API.g_ret_sts_error THEN
686: RAISE FND_API.g_exc_error;
687: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
688: RAISE FND_API.g_exc_unexpected_error;
689: END IF;
690:
691: /*
692: IF p_x_claim_line_rec.source_object_line_id IS NOT NULL AND
700: ,x_msg_data => x_msg_data
701: ,x_msg_count => x_msg_count
702: ,p_x_inv_line_tbl => l_line_item_tbl
703: );
704: IF l_return_status = FND_API.g_ret_sts_error THEN
705: RAISE FND_API.g_exc_error;
706: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
707: RAISE FND_API.g_exc_unexpected_error;
708: END IF;
701: ,x_msg_count => x_msg_count
702: ,p_x_inv_line_tbl => l_line_item_tbl
703: );
704: IF l_return_status = FND_API.g_ret_sts_error THEN
705: RAISE FND_API.g_exc_error;
706: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
707: RAISE FND_API.g_exc_unexpected_error;
708: END IF;
709:
702: ,p_x_inv_line_tbl => l_line_item_tbl
703: );
704: IF l_return_status = FND_API.g_ret_sts_error THEN
705: RAISE FND_API.g_exc_error;
706: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
707: RAISE FND_API.g_exc_unexpected_error;
708: END IF;
709:
710: ELSIF p_x_claim_line_rec.item_id IS NOT NULL THEN
703: );
704: IF l_return_status = FND_API.g_ret_sts_error THEN
705: RAISE FND_API.g_exc_error;
706: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
707: RAISE FND_API.g_exc_unexpected_error;
708: END IF;
709:
710: ELSIF p_x_claim_line_rec.item_id IS NOT NULL THEN
711: l_line_item_tbl(1).claim_line_index := 1;
727: ,x_msg_count => x_msg_count
728:
729: ,p_x_item_tbl => l_line_item_tbl
730: );
731: IF l_return_status = FND_API.g_ret_sts_error THEN
732: RAISE FND_API.g_exc_error;
733: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
734: RAISE FND_API.g_exc_unexpected_error;
735: END IF;
728:
729: ,p_x_item_tbl => l_line_item_tbl
730: );
731: IF l_return_status = FND_API.g_ret_sts_error THEN
732: RAISE FND_API.g_exc_error;
733: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
734: RAISE FND_API.g_exc_unexpected_error;
735: END IF;
736:
729: ,p_x_item_tbl => l_line_item_tbl
730: );
731: IF l_return_status = FND_API.g_ret_sts_error THEN
732: RAISE FND_API.g_exc_error;
733: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
734: RAISE FND_API.g_exc_unexpected_error;
735: END IF;
736:
737: END IF;
730: );
731: IF l_return_status = FND_API.g_ret_sts_error THEN
732: RAISE FND_API.g_exc_error;
733: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
734: RAISE FND_API.g_exc_unexpected_error;
735: END IF;
736:
737: END IF;
738: */
743: IF OZF_DEBUG_HIGH_ON THEN
744: OZF_Utility_PVT.debug_message(l_full_name||' : end');
745: END IF;
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: WHEN OTHERS THEN
744: OZF_Utility_PVT.debug_message(l_full_name||' : end');
745: END IF;
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: WHEN OTHERS THEN
752: IF OZF_DEBUG_LOW_ON THEN
745: END IF;
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: WHEN OTHERS THEN
752: IF OZF_DEBUG_LOW_ON THEN
753: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: WHEN OTHERS THEN
752: IF OZF_DEBUG_LOW_ON THEN
753: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
754: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
753: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
754: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
755: FND_MSG_PUB.Add;
756: END IF;
757: x_return_status := FND_API.g_ret_sts_unexp_error;
758:
759: END Default_Claim_Line;
760:
761:
824: OZF_Utility_PVT.debug_message(l_full_name||' : start');
825: END IF;
826:
827: -- Initialize API return status to sucess
828: x_return_status := FND_API.g_ret_sts_success;
829:
830: --l_org_id := TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10));
831:
832: ----------------------------
853: OZF_Utility_PVT.debug_message(l_full_name||' : p_x_claim_line_tbl('||i||').item_type='||p_x_claim_line_tbl(i).item_type);
854: OZF_Utility_PVT.debug_message(l_full_name||' : p_x_claim_line_tbl('||i||').item_id='||p_x_claim_line_tbl(i).item_id);
855: END IF;
856: IF ( p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
857: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num
858: ) OR
859: ( p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
860: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
861: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
857: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num
858: ) OR
859: ( p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
860: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
861: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
862: p_x_claim_line_tbl(i).rate IS NULL
863: ) THEN
864: -- Quantity is required for pricing item
865: IF p_x_claim_line_tbl(i).quantity IS NULL THEN
866: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
867: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_QUANTITY_REQ');
868: FND_MSG_PUB.add;
869: END IF;
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: IF p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
874: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num AND
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: IF p_x_claim_line_tbl(i).source_object_line_id IS NOT NULL AND
874: p_x_claim_line_tbl(i).source_object_line_id <> FND_API.g_miss_num AND
875: p_x_claim_line_tbl(i).rate IS NOT NULL THEN
876: IF p_x_claim_line_tbl(i).source_object_class = 'INVOICE' THEN
877: l_inv_line_tbl(idx_inv_line).claim_line_index := i;
878: l_inv_line_tbl(idx_inv_line).source_object_class := p_x_claim_line_tbl(i).source_object_class;
887: idx_ord_line := idx_ord_line + 1;
888: END IF;
889: ELSIF p_x_claim_line_tbl(i).item_type = 'PRODUCT' AND
890: p_x_claim_line_tbl(i).item_id IS NOT NULL AND
891: p_x_claim_line_tbl(i).item_id <> FND_API.g_miss_num AND
892: p_x_claim_line_tbl(i).rate IS NULL THEN
893: l_item_tbl(idx_item).claim_line_index := i;
894: l_item_tbl(idx_item).item_id := p_x_claim_line_tbl(i).item_id;
895: l_item_tbl(idx_item).quantity := p_x_claim_line_tbl(i).quantity;
904: FND_MESSAGE.set_name('OZF', 'OZF_SETL_OM_UOM_REQ');
905: FND_MESSAGE.set_token('ITEM', l_csr_product_name.description);
906: FND_MSG_PUB.add;
907: END IF;
908: RAISE FND_API.G_EXC_ERROR;
909: ELSE
910: l_item_tbl(idx_item).quantity_uom := p_x_claim_line_tbl(i).quantity_uom;
911: END IF;
912: l_item_tbl(idx_item).currency_code := l_claim_currency;
912: l_item_tbl(idx_item).currency_code := l_claim_currency;
913: idx_item := idx_item + 1;
914: END IF;
915: ELSIF p_x_claim_line_tbl(i).rate IS NOT NULL AND
916: p_x_claim_line_tbl(i).rate <> FND_API.g_miss_num THEN
917: -- create mode
918: IF p_x_claim_line_tbl(i).claim_line_id IS NULL OR
919: p_x_claim_line_tbl(i).claim_line_id = FND_API.g_miss_num THEN
920: p_x_claim_line_tbl(i).payment_status := 'N'; --set calculate_price_flag
915: ELSIF p_x_claim_line_tbl(i).rate IS NOT NULL AND
916: p_x_claim_line_tbl(i).rate <> FND_API.g_miss_num THEN
917: -- create mode
918: IF p_x_claim_line_tbl(i).claim_line_id IS NULL OR
919: p_x_claim_line_tbl(i).claim_line_id = FND_API.g_miss_num THEN
920: p_x_claim_line_tbl(i).payment_status := 'N'; --set calculate_price_flag
921:
922: -- update mode
923: ELSE
956: ,x_msg_count => x_msg_count
957:
958: ,p_x_item_tbl => l_item_tbl
959: );
960: IF l_return_status = FND_API.g_ret_sts_error THEN
961: RAISE FND_API.g_exc_error;
962: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
963: RAISE FND_API.g_exc_unexpected_error;
964: END IF;
957:
958: ,p_x_item_tbl => l_item_tbl
959: );
960: IF l_return_status = FND_API.g_ret_sts_error THEN
961: RAISE FND_API.g_exc_error;
962: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
963: RAISE FND_API.g_exc_unexpected_error;
964: END IF;
965:
958: ,p_x_item_tbl => l_item_tbl
959: );
960: IF l_return_status = FND_API.g_ret_sts_error THEN
961: RAISE FND_API.g_exc_error;
962: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
963: RAISE FND_API.g_exc_unexpected_error;
964: END IF;
965:
966: LOOP
959: );
960: IF l_return_status = FND_API.g_ret_sts_error THEN
961: RAISE FND_API.g_exc_error;
962: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
963: RAISE FND_API.g_exc_unexpected_error;
964: END IF;
965:
966: LOOP
967: p_x_claim_line_tbl(l_item_tbl(i).claim_line_index).rate := l_item_tbl(i).rate;
979: ,x_msg_data => x_msg_data
980: ,x_msg_count => x_msg_count
981: ,p_x_inv_line_tbl => l_inv_line_tbl
982: );
983: IF l_return_status = FND_API.g_ret_sts_error THEN
984: RAISE FND_API.g_exc_error;
985: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
986: RAISE FND_API.g_exc_unexpected_error;
987: END IF;
980: ,x_msg_count => x_msg_count
981: ,p_x_inv_line_tbl => l_inv_line_tbl
982: );
983: IF l_return_status = FND_API.g_ret_sts_error THEN
984: RAISE FND_API.g_exc_error;
985: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
986: RAISE FND_API.g_exc_unexpected_error;
987: END IF;
988:
981: ,p_x_inv_line_tbl => l_inv_line_tbl
982: );
983: IF l_return_status = FND_API.g_ret_sts_error THEN
984: RAISE FND_API.g_exc_error;
985: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
986: RAISE FND_API.g_exc_unexpected_error;
987: END IF;
988:
989: LOOP
982: );
983: IF l_return_status = FND_API.g_ret_sts_error THEN
984: RAISE FND_API.g_exc_error;
985: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
986: RAISE FND_API.g_exc_unexpected_error;
987: END IF;
988:
989: LOOP
990: p_x_claim_line_tbl(l_inv_line_tbl(i).claim_line_index).item_id := l_inv_line_tbl(i).item_id;
1004: ,x_msg_data => x_msg_data
1005: ,x_msg_count => x_msg_count
1006: ,p_x_ord_line_tbl => l_ord_line_tbl
1007: );
1008: IF l_return_status = FND_API.g_ret_sts_error THEN
1009: RAISE FND_API.g_exc_error;
1010: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1011: RAISE FND_API.g_exc_unexpected_error;
1012: END IF;
1005: ,x_msg_count => x_msg_count
1006: ,p_x_ord_line_tbl => l_ord_line_tbl
1007: );
1008: IF l_return_status = FND_API.g_ret_sts_error THEN
1009: RAISE FND_API.g_exc_error;
1010: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1011: RAISE FND_API.g_exc_unexpected_error;
1012: END IF;
1013:
1006: ,p_x_ord_line_tbl => l_ord_line_tbl
1007: );
1008: IF l_return_status = FND_API.g_ret_sts_error THEN
1009: RAISE FND_API.g_exc_error;
1010: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1011: RAISE FND_API.g_exc_unexpected_error;
1012: END IF;
1013:
1014: LOOP
1007: );
1008: IF l_return_status = FND_API.g_ret_sts_error THEN
1009: RAISE FND_API.g_exc_error;
1010: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1011: RAISE FND_API.g_exc_unexpected_error;
1012: END IF;
1013:
1014: LOOP
1015: p_x_claim_line_tbl(l_ord_line_tbl(i).claim_line_index).item_id := l_ord_line_tbl(i).item_id;
1024: IF OZF_DEBUG_HIGH_ON THEN
1025: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1026: END IF;
1027: EXCEPTION
1028: WHEN FND_API.G_EXC_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_ERROR;
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032: WHEN OTHERS THEN
1025: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1026: END IF;
1027: EXCEPTION
1028: WHEN FND_API.G_EXC_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_ERROR;
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032: WHEN OTHERS THEN
1033: IF OZF_DEBUG_LOW_ON THEN
1026: END IF;
1027: EXCEPTION
1028: WHEN FND_API.G_EXC_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_ERROR;
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032: WHEN OTHERS THEN
1033: IF OZF_DEBUG_LOW_ON THEN
1034: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1027: EXCEPTION
1028: WHEN FND_API.G_EXC_ERROR THEN
1029: x_return_status := FND_API.G_RET_STS_ERROR;
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032: WHEN OTHERS THEN
1033: IF OZF_DEBUG_LOW_ON THEN
1034: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1035: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1034: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1035: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1036: FND_MSG_PUB.Add;
1037: END IF;
1038: x_return_status := FND_API.g_ret_sts_unexp_error;
1039:
1040: END Default_Claim_Line_Tbl;
1041:
1042:
1074: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1075: END IF;
1076:
1077: -- Initialize API return status to sucess
1078: x_return_status := FND_API.g_ret_sts_success;
1079:
1080: IF OZF_DEBUG_HIGH_ON THEN
1081: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1082: END IF;
1080: IF OZF_DEBUG_HIGH_ON THEN
1081: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1082: END IF;
1083: EXCEPTION
1084: WHEN FND_API.G_EXC_ERROR THEN
1085: x_return_status := FND_API.G_RET_STS_ERROR;
1086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1087: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1088: WHEN OTHERS THEN
1081: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1082: END IF;
1083: EXCEPTION
1084: WHEN FND_API.G_EXC_ERROR THEN
1085: x_return_status := FND_API.G_RET_STS_ERROR;
1086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1087: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1088: WHEN OTHERS THEN
1089: IF OZF_DEBUG_LOW_ON THEN
1082: END IF;
1083: EXCEPTION
1084: WHEN FND_API.G_EXC_ERROR THEN
1085: x_return_status := FND_API.G_RET_STS_ERROR;
1086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1087: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1088: WHEN OTHERS THEN
1089: IF OZF_DEBUG_LOW_ON THEN
1090: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1083: EXCEPTION
1084: WHEN FND_API.G_EXC_ERROR THEN
1085: x_return_status := FND_API.G_RET_STS_ERROR;
1086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1087: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1088: WHEN OTHERS THEN
1089: IF OZF_DEBUG_LOW_ON THEN
1090: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1091: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1090: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1091: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1092: FND_MSG_PUB.Add;
1093: END IF;
1094: x_return_status := FND_API.g_ret_sts_unexp_error;
1095:
1096: END Validate_Claim_Line;
1097:
1098:
1131: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1132: END IF;
1133:
1134: -- Initialize API return status to sucess
1135: x_return_status := FND_API.g_ret_sts_success;
1136:
1137: ----------------------- Start -----------------------
1138: i := p_claim_line_tbl.FIRST;
1139: IF i IS NOT NULL THEN
1140: LOOP
1141: IF p_claim_line_tbl(i).claim_line_id IS NOT NULL THEN
1142: Validate_Claim_Line(
1143: p_api_version => l_api_version
1144: ,p_init_msg_list => FND_API.g_false
1145: ,p_validation_level => FND_API.g_valid_level_full
1146: ,x_return_status => l_return_status
1147: ,x_msg_data => x_msg_data
1148: ,x_msg_count => x_msg_count
1141: IF p_claim_line_tbl(i).claim_line_id IS NOT NULL THEN
1142: Validate_Claim_Line(
1143: p_api_version => l_api_version
1144: ,p_init_msg_list => FND_API.g_false
1145: ,p_validation_level => FND_API.g_valid_level_full
1146: ,x_return_status => l_return_status
1147: ,x_msg_data => x_msg_data
1148: ,x_msg_count => x_msg_count
1149: ,p_claim_line_rec => p_claim_line_tbl(i)
1147: ,x_msg_data => x_msg_data
1148: ,x_msg_count => x_msg_count
1149: ,p_claim_line_rec => p_claim_line_tbl(i)
1150: );
1151: IF l_return_status = FND_API.g_ret_sts_error THEN
1152: RAISE FND_API.g_exc_error;
1153: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1154: RAISE FND_API.g_exc_unexpected_error;
1155: END IF;
1148: ,x_msg_count => x_msg_count
1149: ,p_claim_line_rec => p_claim_line_tbl(i)
1150: );
1151: IF l_return_status = FND_API.g_ret_sts_error THEN
1152: RAISE FND_API.g_exc_error;
1153: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1154: RAISE FND_API.g_exc_unexpected_error;
1155: END IF;
1156: END IF;
1149: ,p_claim_line_rec => p_claim_line_tbl(i)
1150: );
1151: IF l_return_status = FND_API.g_ret_sts_error THEN
1152: RAISE FND_API.g_exc_error;
1153: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1154: RAISE FND_API.g_exc_unexpected_error;
1155: END IF;
1156: END IF;
1157: EXIT WHEN i = p_claim_line_tbl.LAST;
1150: );
1151: IF l_return_status = FND_API.g_ret_sts_error THEN
1152: RAISE FND_API.g_exc_error;
1153: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1154: RAISE FND_API.g_exc_unexpected_error;
1155: END IF;
1156: END IF;
1157: EXIT WHEN i = p_claim_line_tbl.LAST;
1158: i := p_claim_line_tbl.NEXT(i);
1159: END LOOP;
1160: END IF;
1161:
1162: IF l_error THEN
1163: RAISE FND_API.G_EXC_ERROR;
1164: END IF;
1165:
1166:
1167: IF OZF_DEBUG_HIGH_ON THEN
1167: IF OZF_DEBUG_HIGH_ON THEN
1168: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1169: END IF;
1170: EXCEPTION
1171: WHEN FND_API.G_EXC_ERROR THEN
1172: x_return_status := FND_API.G_RET_STS_ERROR;
1173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1175: WHEN OTHERS THEN
1168: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1169: END IF;
1170: EXCEPTION
1171: WHEN FND_API.G_EXC_ERROR THEN
1172: x_return_status := FND_API.G_RET_STS_ERROR;
1173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1175: WHEN OTHERS THEN
1176: IF OZF_DEBUG_LOW_ON THEN
1169: END IF;
1170: EXCEPTION
1171: WHEN FND_API.G_EXC_ERROR THEN
1172: x_return_status := FND_API.G_RET_STS_ERROR;
1173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1175: WHEN OTHERS THEN
1176: IF OZF_DEBUG_LOW_ON THEN
1177: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1170: EXCEPTION
1171: WHEN FND_API.G_EXC_ERROR THEN
1172: x_return_status := FND_API.G_RET_STS_ERROR;
1173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1175: WHEN OTHERS THEN
1176: IF OZF_DEBUG_LOW_ON THEN
1177: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1178: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1177: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1178: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1179: FND_MSG_PUB.Add;
1180: END IF;
1181: x_return_status := FND_API.g_ret_sts_unexp_error;
1182:
1183: END Validate_Claim_Line_Tbl;
1184:
1185: -- kishore
1266: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1267: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_INVOICE_ORDER_ERROR');
1268: FND_MSG_PUB.Add;
1269: END IF;
1270: RAISE FND_API.G_EXC_ERROR;
1271: END IF;
1272: END IF;
1273:
1274:
1288: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1289: FND_MESSAGE.Set_Name('OZF','OZF_RETURN_INVALID_QUANTITY');
1290: FND_MSG_PUB.Add;
1291: END IF;
1292: RAISE FND_API.G_EXC_ERROR;
1293: END IF;
1294: END IF;
1295: END IF;
1296:
1330: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1331: FND_MESSAGE.Set_Name('OZF','OZF_RETURN_INVALID_QUANTITY');
1332: FND_MSG_PUB.Add;
1333: END IF;
1334: RAISE FND_API.G_EXC_ERROR;
1335: END IF;
1336: END IF;
1337:
1338: END IF;
1340: -- BUG 4565507 END
1341:
1342:
1343: EXCEPTION
1344: WHEN FND_API.G_EXC_ERROR THEN
1345: x_return_status := FND_API.G_RET_STS_ERROR;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: WHEN OTHERS THEN
1341:
1342:
1343: EXCEPTION
1344: WHEN FND_API.G_EXC_ERROR THEN
1345: x_return_status := FND_API.G_RET_STS_ERROR;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: WHEN OTHERS THEN
1349: IF OZF_DEBUG_LOW_ON THEN
1342:
1343: EXCEPTION
1344: WHEN FND_API.G_EXC_ERROR THEN
1345: x_return_status := FND_API.G_RET_STS_ERROR;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: WHEN OTHERS THEN
1349: IF OZF_DEBUG_LOW_ON THEN
1350: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1343: EXCEPTION
1344: WHEN FND_API.G_EXC_ERROR THEN
1345: x_return_status := FND_API.G_RET_STS_ERROR;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: WHEN OTHERS THEN
1349: IF OZF_DEBUG_LOW_ON THEN
1350: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1351: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1350: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1351: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1352: FND_MSG_PUB.Add;
1353: END IF;
1354: x_return_status := FND_API.g_ret_sts_unexp_error;
1355: END Validate_reference_information;
1356:
1357:
1358: /*=======================================================================*
1409: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1410: END IF;
1411:
1412: -- Initialize API return status to sucess
1413: x_return_status := FND_API.g_ret_sts_success;
1414:
1415: -- Checking Reference information -----
1416: -- kishore.
1417:
1428: ,p_source_object_class => p_claim_line_rec.source_object_class
1429: ,p_quantity => p_claim_line_rec.quantity
1430: );
1431:
1432: IF l_return_status = FND_API.g_ret_sts_error THEN
1433: RAISE FND_API.g_exc_error;
1434: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1435: RAISE FND_API.g_exc_unexpected_error;
1436: END IF;
1429: ,p_quantity => p_claim_line_rec.quantity
1430: );
1431:
1432: IF l_return_status = FND_API.g_ret_sts_error THEN
1433: RAISE FND_API.g_exc_error;
1434: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1435: RAISE FND_API.g_exc_unexpected_error;
1436: END IF;
1437:
1430: );
1431:
1432: IF l_return_status = FND_API.g_ret_sts_error THEN
1433: RAISE FND_API.g_exc_error;
1434: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1435: RAISE FND_API.g_exc_unexpected_error;
1436: END IF;
1437:
1438: END IF;
1431:
1432: IF l_return_status = FND_API.g_ret_sts_error THEN
1433: RAISE FND_API.g_exc_error;
1434: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1435: RAISE FND_API.g_exc_unexpected_error;
1436: END IF;
1437:
1438: END IF;
1439:
1479: END IF;
1480: END IF;
1481:
1482: IF l_error THEN
1483: RAISE FND_API.G_EXC_ERROR;
1484: END IF;
1485:
1486: IF OZF_DEBUG_HIGH_ON THEN
1487: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1486: IF OZF_DEBUG_HIGH_ON THEN
1487: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1488: END IF;
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1494: WHEN OTHERS THEN
1487: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1488: END IF;
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1494: WHEN OTHERS THEN
1495: IF OZF_DEBUG_LOW_ON THEN
1488: END IF;
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1494: WHEN OTHERS THEN
1495: IF OZF_DEBUG_LOW_ON THEN
1496: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1494: WHEN OTHERS THEN
1495: IF OZF_DEBUG_LOW_ON THEN
1496: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1497: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1496: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1497: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1498: FND_MSG_PUB.Add;
1499: END IF;
1500: x_return_status := FND_API.g_ret_sts_unexp_error;
1501:
1502: END Validate_Return_Quantity;
1503:
1504: /*=======================================================================*
1542: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1543: END IF;
1544:
1545: -- Initialize API return status to sucess
1546: x_return_status := FND_API.g_ret_sts_success;
1547:
1548: -- l_org_id := TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10));
1549: l_org_id := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
1550:
1571: l_error := TRUE;
1572: END IF;
1573:
1574: IF l_error THEN
1575: RAISE FND_API.G_EXC_ERROR;
1576: END IF;
1577:
1578: IF OZF_DEBUG_HIGH_ON THEN
1579: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1578: IF OZF_DEBUG_HIGH_ON THEN
1579: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1580: END IF;
1581: EXCEPTION
1582: WHEN FND_API.G_EXC_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_ERROR;
1584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1586: WHEN OTHERS THEN
1579: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1580: END IF;
1581: EXCEPTION
1582: WHEN FND_API.G_EXC_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_ERROR;
1584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1586: WHEN OTHERS THEN
1587: IF OZF_DEBUG_LOW_ON THEN
1580: END IF;
1581: EXCEPTION
1582: WHEN FND_API.G_EXC_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_ERROR;
1584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1586: WHEN OTHERS THEN
1587: IF OZF_DEBUG_LOW_ON THEN
1588: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1581: EXCEPTION
1582: WHEN FND_API.G_EXC_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_ERROR;
1584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1586: WHEN OTHERS THEN
1587: IF OZF_DEBUG_LOW_ON THEN
1588: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1589: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1588: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1589: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1590: FND_MSG_PUB.Add;
1591: END IF;
1592: x_return_status := FND_API.g_ret_sts_unexp_error;
1593:
1594: END Check_RMA_Item_Attribute;
1595:
1596:
1625: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1626: END IF;
1627:
1628: -- Initialize API return status to sucess
1629: x_return_status := FND_API.g_ret_sts_success;
1630:
1631: -- 1. invoice line or product is required
1632: IF (p_claim_line_rec.item_id IS NULL OR p_claim_line_rec.item_type <> 'PRODUCT') AND
1633: p_claim_line_rec.source_object_line_id IS NULL THEN
1676: l_error := TRUE;
1677: END IF;
1678:
1679: IF l_error THEN
1680: RAISE FND_API.G_EXC_ERROR;
1681: END IF;
1682:
1683: IF OZF_DEBUG_HIGH_ON THEN
1684: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1683: IF OZF_DEBUG_HIGH_ON THEN
1684: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1685: END IF;
1686: EXCEPTION
1687: WHEN FND_API.G_EXC_ERROR THEN
1688: x_return_status := FND_API.G_RET_STS_ERROR;
1689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: WHEN OTHERS THEN
1684: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1685: END IF;
1686: EXCEPTION
1687: WHEN FND_API.G_EXC_ERROR THEN
1688: x_return_status := FND_API.G_RET_STS_ERROR;
1689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: WHEN OTHERS THEN
1692: IF OZF_DEBUG_LOW_ON THEN
1685: END IF;
1686: EXCEPTION
1687: WHEN FND_API.G_EXC_ERROR THEN
1688: x_return_status := FND_API.G_RET_STS_ERROR;
1689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: WHEN OTHERS THEN
1692: IF OZF_DEBUG_LOW_ON THEN
1693: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1686: EXCEPTION
1687: WHEN FND_API.G_EXC_ERROR THEN
1688: x_return_status := FND_API.G_RET_STS_ERROR;
1689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: WHEN OTHERS THEN
1692: IF OZF_DEBUG_LOW_ON THEN
1693: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1694: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1693: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1694: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1695: FND_MSG_PUB.Add;
1696: END IF;
1697: x_return_status := FND_API.g_ret_sts_unexp_error;
1698:
1699: END Check_RMA_Line_Items;
1700:
1701:
1737: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1738: END IF;
1739:
1740: -- Initialize API return status to sucess
1741: x_return_status := FND_API.g_ret_sts_success;
1742:
1743: x_claim_rec := p_claim_rec;
1744:
1745: ----------------------- Start -----------------------
1747: p_claim_id => p_claim_rec.claim_id
1748: ,x_claim_line_tbl => l_claim_line_tbl
1749: ,x_return_status => l_return_status
1750: );
1751: IF l_return_status = FND_API.g_ret_sts_error THEN
1752: RAISE FND_API.g_exc_error;
1753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1754: RAISE FND_API.g_exc_unexpected_error;
1755: END IF;
1748: ,x_claim_line_tbl => l_claim_line_tbl
1749: ,x_return_status => l_return_status
1750: );
1751: IF l_return_status = FND_API.g_ret_sts_error THEN
1752: RAISE FND_API.g_exc_error;
1753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1754: RAISE FND_API.g_exc_unexpected_error;
1755: END IF;
1756:
1749: ,x_return_status => l_return_status
1750: );
1751: IF l_return_status = FND_API.g_ret_sts_error THEN
1752: RAISE FND_API.g_exc_error;
1753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1754: RAISE FND_API.g_exc_unexpected_error;
1755: END IF;
1756:
1757: i := l_claim_line_tbl.FIRST;
1750: );
1751: IF l_return_status = FND_API.g_ret_sts_error THEN
1752: RAISE FND_API.g_exc_error;
1753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1754: RAISE FND_API.g_exc_unexpected_error;
1755: END IF;
1756:
1757: i := l_claim_line_tbl.FIRST;
1758: IF i IS NOT NULL THEN
1769: ,x_msg_count => x_msg_count
1770: ,p_claim_rec => p_claim_rec
1771: ,p_claim_line_rec => l_claim_line_rec
1772: );
1773: IF l_return_status = FND_API.g_ret_sts_error THEN
1774: RAISE FND_API.g_exc_error;
1775: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1776: RAISE FND_API.g_exc_unexpected_error;
1777: END IF;
1770: ,p_claim_rec => p_claim_rec
1771: ,p_claim_line_rec => l_claim_line_rec
1772: );
1773: IF l_return_status = FND_API.g_ret_sts_error THEN
1774: RAISE FND_API.g_exc_error;
1775: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1776: RAISE FND_API.g_exc_unexpected_error;
1777: END IF;
1778:
1771: ,p_claim_line_rec => l_claim_line_rec
1772: );
1773: IF l_return_status = FND_API.g_ret_sts_error THEN
1774: RAISE FND_API.g_exc_error;
1775: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1776: RAISE FND_API.g_exc_unexpected_error;
1777: END IF;
1778:
1779: -------------------------------------
1772: );
1773: IF l_return_status = FND_API.g_ret_sts_error THEN
1774: RAISE FND_API.g_exc_error;
1775: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1776: RAISE FND_API.g_exc_unexpected_error;
1777: END IF;
1778:
1779: -------------------------------------
1780: -- RMA Items Attributes Validation --
1784: ,x_msg_data => x_msg_data
1785: ,x_msg_count => x_msg_count
1786: ,p_item_id => l_claim_line_rec.item_id
1787: );
1788: IF l_return_status = FND_API.g_ret_sts_error THEN
1789: RAISE FND_API.g_exc_error;
1790: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1791: RAISE FND_API.g_exc_unexpected_error;
1792: END IF;
1785: ,x_msg_count => x_msg_count
1786: ,p_item_id => l_claim_line_rec.item_id
1787: );
1788: IF l_return_status = FND_API.g_ret_sts_error THEN
1789: RAISE FND_API.g_exc_error;
1790: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1791: RAISE FND_API.g_exc_unexpected_error;
1792: END IF;
1793:
1786: ,p_item_id => l_claim_line_rec.item_id
1787: );
1788: IF l_return_status = FND_API.g_ret_sts_error THEN
1789: RAISE FND_API.g_exc_error;
1790: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1791: RAISE FND_API.g_exc_unexpected_error;
1792: END IF;
1793:
1794: --------------------------------
1787: );
1788: IF l_return_status = FND_API.g_ret_sts_error THEN
1789: RAISE FND_API.g_exc_error;
1790: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1791: RAISE FND_API.g_exc_unexpected_error;
1792: END IF;
1793:
1794: --------------------------------
1795: -- Return Quantity Validation --
1799: ,x_msg_data => x_msg_data
1800: ,x_msg_count => x_msg_count
1801: ,p_claim_line_rec => l_claim_line_rec
1802: );
1803: IF l_return_status = FND_API.g_ret_sts_error THEN
1804: RAISE FND_API.g_exc_error;
1805: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1806: RAISE FND_API.g_exc_unexpected_error;
1807: END IF;
1800: ,x_msg_count => x_msg_count
1801: ,p_claim_line_rec => l_claim_line_rec
1802: );
1803: IF l_return_status = FND_API.g_ret_sts_error THEN
1804: RAISE FND_API.g_exc_error;
1805: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1806: RAISE FND_API.g_exc_unexpected_error;
1807: END IF;
1808:
1801: ,p_claim_line_rec => l_claim_line_rec
1802: );
1803: IF l_return_status = FND_API.g_ret_sts_error THEN
1804: RAISE FND_API.g_exc_error;
1805: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1806: RAISE FND_API.g_exc_unexpected_error;
1807: END IF;
1808:
1809: END IF;
1802: );
1803: IF l_return_status = FND_API.g_ret_sts_error THEN
1804: RAISE FND_API.g_exc_error;
1805: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1806: RAISE FND_API.g_exc_unexpected_error;
1807: END IF;
1808:
1809: END IF;
1810: EXIT WHEN i = l_claim_line_tbl.LAST;
1816: IF OZF_DEBUG_HIGH_ON THEN
1817: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1818: END IF;
1819: EXCEPTION
1820: WHEN FND_API.G_EXC_ERROR THEN
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: WHEN OTHERS THEN
1817: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1818: END IF;
1819: EXCEPTION
1820: WHEN FND_API.G_EXC_ERROR THEN
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: WHEN OTHERS THEN
1825: IF OZF_DEBUG_LOW_ON THEN
1818: END IF;
1819: EXCEPTION
1820: WHEN FND_API.G_EXC_ERROR THEN
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: WHEN OTHERS THEN
1825: IF OZF_DEBUG_LOW_ON THEN
1826: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1819: EXCEPTION
1820: WHEN FND_API.G_EXC_ERROR THEN
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: WHEN OTHERS THEN
1825: IF OZF_DEBUG_LOW_ON THEN
1826: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1827: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1826: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1827: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
1828: FND_MSG_PUB.Add;
1829: END IF;
1830: x_return_status := FND_API.g_ret_sts_unexp_error;
1831:
1832: END Complete_RMA_Validation;
1833:
1834: