486: END LOOP;
487: CLOSE csr_invoice_credit;
488: ELSE
489: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
490: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
491: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
492: FND_MSG_PUB.add;
493: END IF;
494: RAISE FND_API.g_exc_error;
487: CLOSE csr_invoice_credit;
488: ELSE
489: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
490: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
491: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
492: FND_MSG_PUB.add;
493: END IF;
494: RAISE FND_API.g_exc_error;
495: END IF;
494: RAISE FND_API.g_exc_error;
495: END IF;
496: ELSE
497: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
498: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
499: FND_MSG_PUB.add;
500: END IF;
501: RAISE FND_API.g_exc_error;
502: END IF;
537: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
538:
539: ELSE
540: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
541: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
542: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
543: FND_MSG_PUB.add;
544: END IF;
545: RAISE FND_API.g_exc_error;
538:
539: ELSE
540: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
541: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
542: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
543: FND_MSG_PUB.add;
544: END IF;
545: RAISE FND_API.g_exc_error;
546: END IF;
545: RAISE FND_API.g_exc_error;
546: END IF;
547: ELSE
548: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
549: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
550: FND_MSG_PUB.add;
551: END IF;
552: RAISE FND_API.g_exc_error;
553: END IF;
580: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
581:
582: ELSE
583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
584: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
585: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
586: FND_MSG_PUB.add;
587: END IF;
588: RAISE FND_API.g_exc_error;
581:
582: ELSE
583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
584: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
585: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
586: FND_MSG_PUB.add;
587: END IF;
588: RAISE FND_API.g_exc_error;
589: END IF;
588: RAISE FND_API.g_exc_error;
589: END IF;
590: ELSE
591: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
592: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
593: FND_MSG_PUB.add;
594: END IF;
595: RAISE FND_API.g_exc_error;
596: END IF;
616: --l_settlement_doc_tbl(1).settlement_amount := 10; --Need to pass the claim amount
617:
618: ELSE
619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
620: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
621: FND_MSG_PUB.add;
622: END IF;
623: RAISE FND_API.g_exc_error;
624: END IF;
645: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
646:
647: ELSE
648: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
649: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
650: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
651: FND_MSG_PUB.add;
652: END IF;
653: RAISE FND_API.g_exc_error;
646:
647: ELSE
648: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
649: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
650: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
651: FND_MSG_PUB.add;
652: END IF;
653: RAISE FND_API.g_exc_error;
654: END IF;
653: RAISE FND_API.g_exc_error;
654: END IF;
655: ELSE
656: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
657: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
658: FND_MSG_PUB.add;
659: END IF;
660: RAISE FND_API.g_exc_error;
661: END IF;
684: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
685:
686: ELSE
687: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
688: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
689: FND_MESSAGE.set_token('ID', 'p_adjust_id');
690: FND_MSG_PUB.add;
691: END IF;
692: RAISE FND_API.g_exc_error;
685:
686: ELSE
687: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
688: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
689: FND_MESSAGE.set_token('ID', 'p_adjust_id');
690: FND_MSG_PUB.add;
691: END IF;
692: RAISE FND_API.g_exc_error;
693: END IF;
709: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
710:
711: ELSE
712: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
713: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
714: FND_MESSAGE.set_token('ID', 'p_adjust_id');
715: FND_MSG_PUB.add;
716: END IF;
717: RAISE FND_API.g_exc_error;
710:
711: ELSE
712: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
713: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
714: FND_MESSAGE.set_token('ID', 'p_adjust_id');
715: FND_MSG_PUB.add;
716: END IF;
717: RAISE FND_API.g_exc_error;
718: END IF;
717: RAISE FND_API.g_exc_error;
718: END IF;
719: ELSE
720: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
721: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
722: FND_MSG_PUB.add;
723: END IF;
724: RAISE FND_API.g_exc_error;
725: END IF;
760: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
761:
762: ELSE
763: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
764: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
765: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
766: FND_MSG_PUB.add;
767: END IF;
768: RAISE FND_API.g_exc_error;
761:
762: ELSE
763: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
764: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_ID_MISSING');
765: FND_MESSAGE.set_token('ID', 'p_customer_trx_id');
766: FND_MSG_PUB.add;
767: END IF;
768: RAISE FND_API.g_exc_error;
769: END IF;
782: l_settlement_doc_tbl(1).payment_method := 'DEBIT_MEMO';
783: l_settlement_doc_tbl(1).settlement_date := SYSDATE;
784: ELSE
785: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
786: FND_MESSAGE.set_name('OZF', 'OZF_SETL_UPDPAY_DETL_ERR');
787: FND_MSG_PUB.add;
788: END IF;
789: RAISE FND_API.g_exc_error;
790: END IF;
1066: WHERE claim_id = p_claim_rec.claim_id;
1067: EXCEPTION
1068: WHEN OTHERS THEN
1069: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1070: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_UPD_CLAM_ERR');
1071: FND_MSG_PUB.add;
1072: END IF;
1073: IF OZF_DEBUG_LOW_ON THEN
1074: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1070: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_UPD_CLAM_ERR');
1071: FND_MSG_PUB.add;
1072: END IF;
1073: IF OZF_DEBUG_LOW_ON THEN
1074: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1075: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1076: FND_MSG_PUB.Add;
1077: END IF;
1078: RAISE FND_API.g_exc_unexpected_error;
1071: FND_MSG_PUB.add;
1072: END IF;
1073: IF OZF_DEBUG_LOW_ON THEN
1074: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1075: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1076: FND_MSG_PUB.Add;
1077: END IF;
1078: RAISE FND_API.g_exc_unexpected_error;
1079: END;
1135: WHERE claim_line_id = p_claim_line_id;
1136: EXCEPTION
1137: WHEN OTHERS THEN
1138: IF OZF_DEBUG_LOW_ON THEN
1139: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1140: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1141: FND_MSG_PUB.Add;
1142: END IF;
1143: RAISE FND_API.g_exc_unexpected_error;
1136: EXCEPTION
1137: WHEN OTHERS THEN
1138: IF OZF_DEBUG_LOW_ON THEN
1139: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1140: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1141: FND_MSG_PUB.Add;
1142: END IF;
1143: RAISE FND_API.g_exc_unexpected_error;
1144: END;
1291: OPEN csr_customer_name(l_claim_rec.cust_account_id);
1292: FETCH csr_customer_name INTO l_customer_name;
1293: CLOSE csr_customer_name;
1294:
1295: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_SUB');
1296: fnd_message.set_token('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1292: FETCH csr_customer_name INTO l_customer_name;
1293: CLOSE csr_customer_name;
1294:
1295: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_SUB');
1296: fnd_message.set_token('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1293: CLOSE csr_customer_name;
1294:
1295: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_SUB');
1296: fnd_message.set_token('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1294:
1295: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_SUB');
1296: fnd_message.set_token('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1296: fnd_message.set_token('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1297: fnd_message.set_token('CLAIM_NUMBER', l_claim_rec.claim_number);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1298: l_notif_subject := substrb(fnd_message.get, 1, 400);
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1306:
1299:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1306:
1307:
1300: fnd_message.set_name('OZF', 'OZF_NTF_STLMNTDOC_CANCEL_BODY');
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1306:
1307:
1308: ozf_utility_pvt.send_wf_standalone_message(
1301: fnd_message.set_token ('DOCUMENT_NUMBER', l_claim_rec.payment_reference_number);
1302: fnd_message.set_token('CLAIM_NUMBER',l_claim_rec.claim_number);
1303: fnd_message.set_token('CUSTOMER_NAME',l_customer_name);
1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1306:
1307:
1308: ozf_utility_pvt.send_wf_standalone_message(
1309: p_subject => l_notif_subject
1772: WHEN OTHERS THEN
1773: OZF_Utility_PVT.debug_message('SQLERRM:'|| SQLERRM);
1774: x_return_status := FND_API.g_ret_sts_unexp_error;
1775: IF OZF_DEBUG_LOW_ON THEN
1776: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1777: FND_MESSAGE.Set_Token('TEXT','Get_AR_Rec : Error');
1778: FND_MSG_PUB.Add;
1779: END IF;
1780:
1773: OZF_Utility_PVT.debug_message('SQLERRM:'|| SQLERRM);
1774: x_return_status := FND_API.g_ret_sts_unexp_error;
1775: IF OZF_DEBUG_LOW_ON THEN
1776: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1777: FND_MESSAGE.Set_Token('TEXT','Get_AR_Rec : Error');
1778: FND_MSG_PUB.Add;
1779: END IF;
1780:
1781: END Get_AR_Rec;
1838: EXCEPTION
1839: WHEN OTHERS THEN
1840: x_return_status := FND_API.g_ret_sts_unexp_error;
1841: IF OZF_DEBUG_LOW_ON THEN
1842: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1843: FND_MESSAGE.Set_Token('TEXT','Get_RMA_Setl_Doc_Tbl : Error');
1844: FND_MSG_PUB.Add;
1845: END IF;
1846:
1839: WHEN OTHERS THEN
1840: x_return_status := FND_API.g_ret_sts_unexp_error;
1841: IF OZF_DEBUG_LOW_ON THEN
1842: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1843: FND_MESSAGE.Set_Token('TEXT','Get_RMA_Setl_Doc_Tbl : Error');
1844: FND_MSG_PUB.Add;
1845: END IF;
1846:
1847: END Get_RMA_Setl_Doc_Tbl;
2133: WHERE claim_id = p_claim_id;
2134: EXCEPTION
2135: WHEN OTHERS THEN
2136: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2137: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_UPD_CLAM_ERR');
2138: FND_MSG_PUB.add;
2139: END IF;
2140: IF OZF_DEBUG_LOW_ON THEN
2141: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2137: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_UPD_CLAM_ERR');
2138: FND_MSG_PUB.add;
2139: END IF;
2140: IF OZF_DEBUG_LOW_ON THEN
2141: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2142: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2143: FND_MSG_PUB.Add;
2144: END IF;
2145: RAISE FND_API.g_exc_unexpected_error;
2138: FND_MSG_PUB.add;
2139: END IF;
2140: IF OZF_DEBUG_LOW_ON THEN
2141: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2142: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
2143: FND_MSG_PUB.Add;
2144: END IF;
2145: RAISE FND_API.g_exc_unexpected_error;
2146: END;
2653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2655: WHEN OTHERS THEN
2656: IF OZF_DEBUG_LOW_ON THEN
2657: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2658: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
2659: FND_MSG_PUB.Add;
2660: END IF;
2661: x_return_status := FND_API.g_ret_sts_unexp_error;
2654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2655: WHEN OTHERS THEN
2656: IF OZF_DEBUG_LOW_ON THEN
2657: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2658: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
2659: FND_MSG_PUB.Add;
2660: END IF;
2661: x_return_status := FND_API.g_ret_sts_unexp_error;
2662:
2814: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2816: WHEN OTHERS THEN
2817: IF OZF_DEBUG_LOW_ON THEN
2818: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2819: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
2820: FND_MSG_PUB.Add;
2821: END IF;
2822: x_return_status := FND_API.g_ret_sts_unexp_error;
2815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2816: WHEN OTHERS THEN
2817: IF OZF_DEBUG_LOW_ON THEN
2818: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2819: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
2820: FND_MSG_PUB.Add;
2821: END IF;
2822: x_return_status := FND_API.g_ret_sts_unexp_error;
2823:
3196: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3198: WHEN OTHERS THEN
3199: IF OZF_DEBUG_LOW_ON THEN
3200: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
3201: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
3202: FND_MSG_PUB.Add;
3203: END IF;
3204: x_return_status := FND_API.g_ret_sts_unexp_error;
3197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3198: WHEN OTHERS THEN
3199: IF OZF_DEBUG_LOW_ON THEN
3200: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
3201: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
3202: FND_MSG_PUB.Add;
3203: END IF;
3204: x_return_status := FND_API.g_ret_sts_unexp_error;
3205:
3483: OPEN csr_claim_lock(l_claim_rma_fetch(i).claim_id);
3484: FETCH csr_claim_lock INTO l_claim_lock_rec;
3485: If (csr_claim_lock%NOTFOUND) then
3486: CLOSE csr_claim_lock;
3487: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
3488: APP_EXCEPTION.RAISE_EXCEPTION;
3489: END IF;
3490: CLOSE csr_claim_lock;
3491: EXCEPTION
3695: OPEN csr_claim_lock(l_claim_rma_setl(i).claim_id);
3696: FETCH csr_claim_lock INTO l_claim_lock_rec;
3697: If (csr_claim_lock%NOTFOUND) then
3698: CLOSE csr_claim_lock;
3699: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
3700: APP_EXCEPTION.RAISE_EXCEPTION;
3701: END IF;
3702: CLOSE csr_claim_lock;
3703: EXCEPTION
4010: OPEN csr_claim_lock(l_claim_id_ver(i).claim_id);
4011: FETCH csr_claim_lock INTO l_claim_lock_rec;
4012: If (csr_claim_lock%NOTFOUND) then
4013: CLOSE csr_claim_lock;
4014: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
4015: APP_EXCEPTION.RAISE_EXCEPTION;
4016: END IF;
4017: CLOSE csr_claim_lock;
4018: EXCEPTION
5217: x_msg_data => l_msg_data
5218: );
5219: IF l_return_status = FND_API.g_ret_sts_error THEN
5220: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5221: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_AR_FETCH_ERR');
5222: FND_MSG_PUB.add;
5223: END IF;
5224: RAISE FND_API.g_exc_error;
5225: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5251: x_msg_data => l_msg_data
5252: );
5253: IF l_return_status = FND_API.g_ret_sts_error THEN
5254: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5255: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_AP_FETCH_ERR');
5256: FND_MSG_PUB.add;
5257: END IF;
5258: RAISE FND_API.g_exc_error;
5259: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5284: x_msg_data => l_msg_data
5285: );
5286: IF l_return_status = FND_API.g_ret_sts_error THEN
5287: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5288: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DOC_AR_FETCH_ERR');
5289: FND_MSG_PUB.add;
5290: END IF;
5291: RAISE FND_API.g_exc_error;
5292: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5572: );
5573: EXCEPTION
5574: WHEN OTHERS THEN
5575: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5576: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
5577: FND_MESSAGE.Set_Token('TEXT',SQLERRM);
5578: FND_MSG_PUB.add;
5579: END IF;
5580: RAISE FND_API.g_exc_error;
5573: EXCEPTION
5574: WHEN OTHERS THEN
5575: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5576: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
5577: FND_MESSAGE.Set_Token('TEXT',SQLERRM);
5578: FND_MSG_PUB.add;
5579: END IF;
5580: RAISE FND_API.g_exc_error;
5581: END;
5730: -- Varify object_version_number
5731: IF p_settlement_doc_rec.object_version_number is NULL or
5732: p_settlement_doc_rec.object_version_number = FND_API.G_MISS_NUM THEN
5733: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.g_msg_lvl_error) THEN
5734: FND_MESSAGE.Set_Name('OZF', 'OZF_API_NO_OBJ_VER_NUM');
5735: FND_MSG_PUB.ADD;
5736: END IF;
5737: RAISE FND_API.G_EXC_ERROR;
5738: END IF;
5742: CLOSE csr_settle_obj_ver;
5743:
5744: IF l_object_version_number <> p_settlement_doc_rec.object_version_number THEN
5745: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.g_msg_lvl_error) THEN
5746: FND_MESSAGE.Set_Name('OZF', 'OZF_API_RESOURCE_LOCKED');
5747: FND_MSG_PUB.ADD;
5748: END IF;
5749: RAISE FND_API.G_EXC_ERROR;
5750: END IF;
5876: );
5877: EXCEPTION
5878: WHEN OTHERS THEN
5879: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5880: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
5881: FND_MSG_PUB.add;
5882: END IF;
5883: RAISE FND_API.g_exc_error;
5884: END;
6049: );
6050: EXCEPTION
6051: WHEN OTHERS THEN
6052: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6053: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
6054: FND_MSG_PUB.add;
6055: END IF;
6056: RAISE FND_API.g_exc_error;
6057: END;
6056: RAISE FND_API.g_exc_error;
6057: END;
6058: ELSE
6059: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6060: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
6061: FND_MSG_PUB.add;
6062: END IF;
6063: RAISE FND_API.g_exc_error;
6064: END IF;
6069: AND object_version_number = p_object_version_number;
6070:
6071: IF (SQL%NOTFOUND) THEN
6072: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6073: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
6074: FND_MSG_PUB.add;
6075: END IF;
6076: RAISE FND_API.g_exc_error;
6077: END IF;
6188: FETCH c_Settlement_Doc INTO l_settlement_doc_id;
6189: IF (c_Settlement_Doc%NOTFOUND) THEN
6190: CLOSE c_Settlement_Doc;
6191: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6192: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
6193: FND_MSG_PUB.add;
6194: END IF;
6195: RAISE FND_API.g_exc_error;
6196: END IF;
6210: EXCEPTION
6211: WHEN OZF_Utility_PVT.resource_locked THEN
6212: x_return_status := FND_API.g_ret_sts_error;
6213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6214: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED');
6215: FND_MSG_PUB.add;
6216: END IF;
6217: FND_MSG_PUB.count_and_get(
6218: p_encoded => FND_API.g_false,
7060: END IF;
7061:
7062: -- Debug Message
7063: IF OZF_DEBUG_LOW_ON THEN
7064: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7065: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
7066: FND_MSG_PUB.Add;
7067: END IF;
7068:
7061:
7062: -- Debug Message
7063: IF OZF_DEBUG_LOW_ON THEN
7064: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7065: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
7066: FND_MSG_PUB.Add;
7067: END IF;
7068:
7069: --Initialize message list if p_init_msg_list is TRUE.
7105: END LOOP;
7106:
7107: -- Debug Message
7108: IF OZF_DEBUG_LOW_ON THEN
7109: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7110: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
7111: FND_MSG_PUB.Add;
7112: END IF;
7113: --Standard call to get message count and if count=1, get the message
7106:
7107: -- Debug Message
7108: IF OZF_DEBUG_LOW_ON THEN
7109: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7110: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
7111: FND_MSG_PUB.Add;
7112: END IF;
7113: --Standard call to get message count and if count=1, get the message
7114: FND_MSG_PUB.Count_And_Get (
7181: END IF;
7182:
7183: -- Debug Message
7184: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
7185: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7186: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
7187: FND_MSG_PUB.Add;
7188: END IF;
7189:
7182:
7183: -- Debug Message
7184: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
7185: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7186: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
7187: FND_MSG_PUB.Add;
7188: END IF;
7189:
7190: --Initialize message list if p_init_msg_list is TRUE.
7220: END LOOP;
7221:
7222: -- Debug Message
7223: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
7224: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7225: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
7226: FND_MSG_PUB.Add;
7227: END IF;
7228: --Standard call to get message count and if count=1, get the message
7221:
7222: -- Debug Message
7223: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
7224: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7225: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
7226: FND_MSG_PUB.Add;
7227: END IF;
7228: --Standard call to get message count and if count=1, get the message
7229: FND_MSG_PUB.Count_And_Get (