DBA Data[Home] [Help]

APPS.OZF_SPLIT_CLAIM_PVT dependencies on FND_MSG_PUB

Line 38: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

34:
35: ----------- Define session related variables --------------------
36: g_history_created boolean := false;
37:
38: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
39: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
40:
41: ---------------------------------------------------------------------
42: -- PROCEDURE

Line 39: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);

35: ----------- Define session related variables --------------------
36: g_history_created boolean := false;
37:
38: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
39: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
40:
41: ---------------------------------------------------------------------
42: -- PROCEDURE
43: -- create_child_claim

Line 112: FND_MSG_PUB.Add;

108: -- Debug Message
109: IF OZF_DEBUG_LOW_ON THEN
110: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
111: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
112: FND_MSG_PUB.Add;
113: END IF;
114:
115: -- Initialize API return status to sucess
116: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 345: FND_MSG_PUB.Add;

341: -- Debug Message
342: IF OZF_DEBUG_LOW_ON THEN
343: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
344: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
345: FND_MSG_PUB.Add;
346: END IF;
347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;

Line 356: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353:
354: WHEN OTHERS THEN
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
356: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
357: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
358: END IF;
359: END create_child_claim;
360:

Line 357: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

353:
354: WHEN OTHERS THEN
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
356: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
357: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
358: END IF;
359: END create_child_claim;
360:
361: ---------------------------------------------------------------------

Line 420: FND_MSG_PUB.Add;

416: -- Debug Message
417: IF OZF_DEBUG_LOW_ON THEN
418: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
419: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
420: FND_MSG_PUB.Add;
421: END IF;
422: -- Initialize API return status to sucess
423: x_return_status := FND_API.G_RET_STS_SUCCESS;
424:

Line 503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

499: RAISE FND_API.g_exc_unexpected_error;
500: END IF;
501: END LOOP;
502: ELSE
503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
504: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
505: FND_MSG_PUB.ADD;
506: END IF;
507: RAISE FND_API.g_exc_unexpected_error;

Line 505: FND_MSG_PUB.ADD;

501: END LOOP;
502: ELSE
503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
504: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
505: FND_MSG_PUB.ADD;
506: END IF;
507: RAISE FND_API.g_exc_unexpected_error;
508: END IF;
509:

Line 512: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

508: END IF;
509:
510: EXCEPTION
511: WHEN OTHERS THEN
512: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
513: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
514: FND_MSG_PUB.add;
515: END IF;
516: RAISE FND_API.g_exc_error;

Line 514: FND_MSG_PUB.add;

510: EXCEPTION
511: WHEN OTHERS THEN
512: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
513: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
514: FND_MSG_PUB.add;
515: END IF;
516: RAISE FND_API.g_exc_error;
517: END;
518: ELSE

Line 519: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

515: END IF;
516: RAISE FND_API.g_exc_error;
517: END;
518: ELSE
519: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
520: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
521: FND_MSG_PUB.add;
522: END IF;
523: RAISE FND_API.g_exc_error;

Line 521: FND_MSG_PUB.add;

517: END;
518: ELSE
519: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
520: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
521: FND_MSG_PUB.add;
522: END IF;
523: RAISE FND_API.g_exc_error;
524: END IF;
525: -- Debug Message

Line 529: FND_MSG_PUB.Add;

525: -- Debug Message
526: IF OZF_DEBUG_LOW_ON THEN
527: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
528: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
529: FND_MSG_PUB.Add;
530: END IF;
531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: x_return_status := FND_API.G_RET_STS_ERROR;

Line 538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
540: END IF;
541: END update_child_claim;
542:

Line 539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
540: END IF;
541: END update_child_claim;
542:
543: ---------------------------------------------------------------------

Line 592: FND_MSG_PUB.Add;

588: -- Debug Message
589: IF OZF_DEBUG_LOW_ON THEN
590: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
591: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
592: FND_MSG_PUB.Add;
593: END IF;
594: IF OZF_DEBUG_HIGH_ON THEN
595: ozf_utility_pvt.debug_message('start update parent');
596: END IF;

Line 631: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

627: END IF;
628:
629: IF ((l_amount_remaining > 0) and
630: (l_amount_remaining -OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code)< 0)) THEN
631: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
632: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLT_NG_NOPM');
633: FND_MSG_PUB.Add;
634: END IF;
635: RAISE FND_API.G_EXC_ERROR;

Line 633: FND_MSG_PUB.Add;

629: IF ((l_amount_remaining > 0) and
630: (l_amount_remaining -OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code)< 0)) THEN
631: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
632: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLT_NG_NOPM');
633: FND_MSG_PUB.Add;
634: END IF;
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:

Line 640: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

636: END IF;
637:
638: IF ((l_amount_remaining < 0) and
639: (l_amount_remaining - OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code) > 0)) THEN
640: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
641: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLIT_PO_OPM');
642: FND_MSG_PUB.Add;
643: END IF;
644: RAISE FND_API.G_EXC_ERROR;

Line 642: FND_MSG_PUB.Add;

638: IF ((l_amount_remaining < 0) and
639: (l_amount_remaining - OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code) > 0)) THEN
640: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
641: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLIT_PO_OPM');
642: FND_MSG_PUB.Add;
643: END IF;
644: RAISE FND_API.G_EXC_ERROR;
645: END IF;
646:

Line 667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
664: RAISE FND_API.g_exc_unexpected_error;
665: END IF;
666: ELSE
667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
668: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
669: FND_MSG_PUB.ADD;
670: END IF;
671: RAISE FND_API.g_exc_unexpected_error;

Line 669: FND_MSG_PUB.ADD;

665: END IF;
666: ELSE
667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
668: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
669: FND_MSG_PUB.ADD;
670: END IF;
671: RAISE FND_API.g_exc_unexpected_error;
672: END IF;
673: ELSE

Line 674: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

670: END IF;
671: RAISE FND_API.g_exc_unexpected_error;
672: END IF;
673: ELSE
674: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
675: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
676: FND_MSG_PUB.add;
677: END IF;
678: RAISE FND_API.g_exc_error;

Line 676: FND_MSG_PUB.add;

672: END IF;
673: ELSE
674: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
675: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
676: FND_MSG_PUB.add;
677: END IF;
678: RAISE FND_API.g_exc_error;
679: END IF;
680:

Line 685: FND_MSG_PUB.Add;

681: -- Debug Message
682: IF OZF_DEBUG_LOW_ON THEN
683: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
684: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
685: FND_MSG_PUB.Add;
686: END IF;
687: EXCEPTION
688: WHEN FND_API.G_EXC_ERROR THEN
689: x_return_status := FND_API.G_RET_STS_ERROR;

Line 694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: END update_parent_claim;
698:

Line 695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: END update_parent_claim;
698:
699: ---------------------------------------------------------------------

Line 763: FND_MSG_PUB.Add;

759: -- Debug Message
760: IF OZF_DEBUG_LOW_ON THEN
761: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
762: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
763: FND_MSG_PUB.Add;
764: END IF;
765:
766:
767: OPEN amount_csr (p_claim_id);

Line 799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

795: /* BEGIN FIX BUG -- by mchang 07/13/2001 */
796: --IF (l_child_amount_sum - l_child_line_total) >= (l_parent_amount_remaining - l_parent_line_sum) THEN
797: IF (l_child_amount_sum - l_child_line_total) > (l_parent_amount_remaining - l_parent_line_sum) THEN
798: /* END FIG BUG */
799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
800: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_SPLIT_TOO_BIG');
801: FND_MSG_PUB.ADD;
802: END IF;
803: RAISE FND_API.g_exc_error;

Line 801: FND_MSG_PUB.ADD;

797: IF (l_child_amount_sum - l_child_line_total) > (l_parent_amount_remaining - l_parent_line_sum) THEN
798: /* END FIG BUG */
799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
800: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_SPLIT_TOO_BIG');
801: FND_MSG_PUB.ADD;
802: END IF;
803: RAISE FND_API.g_exc_error;
804: END IF;
805:

Line 810: FND_MSG_PUB.Add;

806: -- Debug Message
807: IF OZF_DEBUG_LOW_ON THEN
808: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
809: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
810: FND_MSG_PUB.Add;
811: END IF;
812:
813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN

Line 820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
822: END IF;
823: END Check_Split_Condition;
824:

Line 821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
822: END IF;
823: END Check_Split_Condition;
824:
825: ---------------------------------------------------------------------

Line 873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

869:
870: -- Get the last pair
871: l_temp_index := INSTR(l_line_string, ',',1,1);
872: IF l_temp_index = 0 THEN
873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
874: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_STR_WRG');
875: FND_MSG_PUB.add;
876: END IF;
877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 875: FND_MSG_PUB.add;

871: l_temp_index := INSTR(l_line_string, ',',1,1);
872: IF l_temp_index = 0 THEN
873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
874: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_STR_WRG');
875: FND_MSG_PUB.add;
876: END IF;
877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
878: ELSE
879: x_line_table(i).claim_line_id := TO_NUMBER(SUBSTR(l_line_string,1, l_temp_index -1));

Line 888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
886: WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
889: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');
890: FND_MSG_PUB.add;
891: END IF;
892: END get_line_table;

Line 890: FND_MSG_PUB.add;

886: WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
889: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');
890: FND_MSG_PUB.add;
891: END IF;
892: END get_line_table;
893:
894: ---------------------------------------------------------------------

Line 1176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1172: x_child_claim_tbl := l_child_claim_tbl;
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1177: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1178: FND_MSG_PUB.add;
1179: END IF;
1180: WHEN OTHERS THEN

Line 1178: FND_MSG_PUB.add;

1174: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1177: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1178: FND_MSG_PUB.add;
1179: END IF;
1180: WHEN OTHERS THEN
1181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1178: FND_MSG_PUB.add;
1179: END IF;
1180: WHEN OTHERS THEN
1181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1183: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1184: FND_MSG_PUB.add;
1185: END IF;
1186: END autosplit_line;

Line 1184: FND_MSG_PUB.add;

1180: WHEN OTHERS THEN
1181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1183: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1184: FND_MSG_PUB.add;
1185: END IF;
1186: END autosplit_line;
1187:
1188: ---------------------------------------------------------------------

Line 1257: FND_MSG_PUB.Add;

1253: -- Debug Message
1254: IF OZF_DEBUG_LOW_ON THEN
1255: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1256: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1257: FND_MSG_PUB.Add;
1258: END IF;
1259: --Initialize message list if p_init_msg_list is TRUE.
1260: IF FND_API.To_Boolean (p_init_msg_list) THEN
1261: FND_MSG_PUB.initialize;

Line 1261: FND_MSG_PUB.initialize;

1257: FND_MSG_PUB.Add;
1258: END IF;
1259: --Initialize message list if p_init_msg_list is TRUE.
1260: IF FND_API.To_Boolean (p_init_msg_list) THEN
1261: FND_MSG_PUB.initialize;
1262: END IF;
1263:
1264:
1265: -- Initialize API return status to sucess

Line 1282: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1278: X_Msg_Data => l_msg_data,
1279: X_access => l_access);
1280:
1281: IF l_access = 'N' THEN
1282: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1283: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1284: FND_MSG_PUB.Add;
1285: END IF;
1286: RAISE FND_API.G_EXC_ERROR;

Line 1284: FND_MSG_PUB.Add;

1280:
1281: IF l_access = 'N' THEN
1282: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1283: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1284: FND_MSG_PUB.Add;
1285: END IF;
1286: RAISE FND_API.G_EXC_ERROR;
1287: END IF;
1288: END IF;

Line 1304: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)

1300: OR l_claim_class = 'DEDUCTION'
1301: THEN
1302: IF l_child_claim_tbl(i).amount <= 0
1303: THEN
1304: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1305: THEN
1306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_POS_AMT_ERR');
1307: FND_MSG_PUB.add;
1308: END IF;

Line 1307: FND_MSG_PUB.add;

1303: THEN
1304: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1305: THEN
1306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_POS_AMT_ERR');
1307: FND_MSG_PUB.add;
1308: END IF;
1309: RAISE FND_API.g_exc_error;
1310: END IF;
1311: ELSIF l_claim_class = 'CHARGE'

Line 1316: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)

1312: OR l_claim_class = 'OVERPAYMENT'
1313: THEN
1314: IF l_child_claim_tbl(i).amount >= 0
1315: THEN
1316: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1317: THEN
1318: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_NEG_AMT_ERR');
1319: FND_MSG_PUB.add;
1320: END IF;

Line 1319: FND_MSG_PUB.add;

1315: THEN
1316: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1317: THEN
1318: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_NEG_AMT_ERR');
1319: FND_MSG_PUB.add;
1320: END IF;
1321: RAISE FND_API.g_exc_error;
1322: END IF;
1323: END IF;

Line 1435: FND_MSG_PUB.Add;

1431: -- Debug Message
1432: IF OZF_DEBUG_LOW_ON THEN
1433: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1434: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
1435: FND_MSG_PUB.Add;
1436: END IF;
1437:
1438: --Standard call to get message count and if count=1, get the message
1439: FND_MSG_PUB.Count_And_Get (

Line 1439: FND_MSG_PUB.Count_And_Get (

1435: FND_MSG_PUB.Add;
1436: END IF;
1437:
1438: --Standard call to get message count and if count=1, get the message
1439: FND_MSG_PUB.Count_And_Get (
1440: p_encoded => FND_API.G_FALSE,
1441: p_count => x_msg_count,
1442: p_data => x_msg_data
1443: );

Line 1449: FND_MSG_PUB.Count_And_Get (

1445: WHEN FND_API.G_EXC_ERROR THEN
1446: ROLLBACK TO Create_Child_Tbl_PVT;
1447: x_return_status := FND_API.G_RET_STS_ERROR;
1448: -- Standard call to get message count and if count=1, get the message
1449: FND_MSG_PUB.Count_And_Get (
1450: p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data
1453: );

Line 1458: FND_MSG_PUB.Count_And_Get (

1454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1455: ROLLBACK TO Create_Child_Tbl_PVT;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: -- Standard call to get message count and if count=1, get the message
1458: FND_MSG_PUB.Count_And_Get (
1459: p_encoded => FND_API.G_FALSE,
1460: p_count => x_msg_count,
1461: p_data => x_msg_data
1462: );

Line 1466: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1462: );
1463: WHEN OTHERS THEN
1464: ROLLBACK TO Create_Child_Tbl_PVT;
1465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1466: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1468: END IF;
1469: -- Standard call to get message count and if count=1, get the message
1470: FND_MSG_PUB.Count_And_Get (

Line 1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1463: WHEN OTHERS THEN
1464: ROLLBACK TO Create_Child_Tbl_PVT;
1465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1466: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1468: END IF;
1469: -- Standard call to get message count and if count=1, get the message
1470: FND_MSG_PUB.Count_And_Get (
1471: p_encoded => FND_API.G_FALSE,

Line 1470: FND_MSG_PUB.Count_And_Get (

1466: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1468: END IF;
1469: -- Standard call to get message count and if count=1, get the message
1470: FND_MSG_PUB.Count_And_Get (
1471: p_encoded => FND_API.G_FALSE,
1472: p_count => x_msg_count,
1473: p_data => x_msg_data
1474: );

Line 1538: FND_MSG_PUB.Add;

1534: -- Debug Message
1535: IF OZF_DEBUG_LOW_ON THEN
1536: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1537: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1538: FND_MSG_PUB.Add;
1539: END IF;
1540: --Initialize message list if p_init_msg_list is TRUE.
1541: IF FND_API.To_Boolean (p_init_msg_list) THEN
1542: FND_MSG_PUB.initialize;

Line 1542: FND_MSG_PUB.initialize;

1538: FND_MSG_PUB.Add;
1539: END IF;
1540: --Initialize message list if p_init_msg_list is TRUE.
1541: IF FND_API.To_Boolean (p_init_msg_list) THEN
1542: FND_MSG_PUB.initialize;
1543: END IF;
1544:
1545: -- Initialize API return status to sucess
1546: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1563: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1559: X_Msg_Data => l_msg_data,
1560: X_access => l_access);
1561:
1562: IF l_access = 'N' THEN
1563: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1564: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1565: FND_MSG_PUB.Add;
1566: END IF;
1567: RAISE FND_API.G_EXC_ERROR;

Line 1565: FND_MSG_PUB.Add;

1561:
1562: IF l_access = 'N' THEN
1563: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1564: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1565: FND_MSG_PUB.Add;
1566: END IF;
1567: RAISE FND_API.G_EXC_ERROR;
1568: END IF;
1569: END IF;

Line 1661: FND_MSG_PUB.Add;

1657: -- Debug Message
1658: IF OZF_DEBUG_LOW_ON THEN
1659: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1660: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
1661: FND_MSG_PUB.Add;
1662: END IF;
1663:
1664: --Standard call to get message count and if count=1, get the message
1665: FND_MSG_PUB.Count_And_Get (

Line 1665: FND_MSG_PUB.Count_And_Get (

1661: FND_MSG_PUB.Add;
1662: END IF;
1663:
1664: --Standard call to get message count and if count=1, get the message
1665: FND_MSG_PUB.Count_And_Get (
1666: p_encoded => FND_API.G_FALSE,
1667: p_count => x_msg_count,
1668: p_data => x_msg_data
1669: );

Line 1675: FND_MSG_PUB.Count_And_Get (

1671: WHEN FND_API.G_EXC_ERROR THEN
1672: ROLLBACK TO Update_Child_Tbl_PVT;
1673: x_return_status := FND_API.G_RET_STS_ERROR;
1674: -- Standard call to get message count and if count=1, get the message
1675: FND_MSG_PUB.Count_And_Get (
1676: p_encoded => FND_API.G_FALSE,
1677: p_count => x_msg_count,
1678: p_data => x_msg_data
1679: );

Line 1684: FND_MSG_PUB.Count_And_Get (

1680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1681: ROLLBACK TO Update_Child_Tbl_PVT;
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: -- Standard call to get message count and if count=1, get the message
1684: FND_MSG_PUB.Count_And_Get (
1685: p_encoded => FND_API.G_FALSE,
1686: p_count => x_msg_count,
1687: p_data => x_msg_data
1688: );

Line 1692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1688: );
1689: WHEN OTHERS THEN
1690: ROLLBACK TO Update_Child_Tbl_PVT;
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1694: END IF;
1695: -- Standard call to get message count and if count=1, get the message
1696: FND_MSG_PUB.Count_And_Get (

Line 1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1689: WHEN OTHERS THEN
1690: ROLLBACK TO Update_Child_Tbl_PVT;
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1694: END IF;
1695: -- Standard call to get message count and if count=1, get the message
1696: FND_MSG_PUB.Count_And_Get (
1697: p_encoded => FND_API.G_FALSE,

Line 1696: FND_MSG_PUB.Count_And_Get (

1692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1694: END IF;
1695: -- Standard call to get message count and if count=1, get the message
1696: FND_MSG_PUB.Count_And_Get (
1697: p_encoded => FND_API.G_FALSE,
1698: p_count => x_msg_count,
1699: p_data => x_msg_data
1700: );