DBA Data[Home] [Help]

APPS.AS_INTEREST_PVT dependencies on FND_MSG_PUB

Line 228: FND_MSG_PUB.initialize;

224:
225: -- initialize message list if p_init_msg_list is set to TRUE;
226:
227: IF FND_API.to_Boolean(p_init_msg_list) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: l_return_status := FND_API.G_RET_STS_SUCCESS;
232: open C_Party_Exists(p_party_id);

Line 236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

232: open C_Party_Exists(p_party_id);
233: fetch C_Party_Exists into l_val;
234: IF (C_Party_Exists%NOTFOUND) THEN
235: x_return_status := FND_API.G_RET_STS_ERROR;
236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
237: THEN
238: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
239: FND_MESSAGE.Set_Token('COLUMN', 'PARTY_ID', FALSE);
240: FND_MSG_PUB.ADD;

Line 240: FND_MSG_PUB.ADD;

236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
237: THEN
238: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
239: FND_MESSAGE.Set_Token('COLUMN', 'PARTY_ID', FALSE);
240: FND_MSG_PUB.ADD;
241: END IF;
242: END IF;
243: close C_Party_Exists;
244:

Line 245: FND_MSG_PUB.Count_And_Get

241: END IF;
242: END IF;
243: close C_Party_Exists;
244:
245: FND_MSG_PUB.Count_And_Get
246: ( p_count => x_msg_count,
247: p_data => x_msg_data
248: );
249:

Line 304: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

300: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
301: THEN
302: l_return_status := FND_API.G_RET_STS_ERROR;
303:
304: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
305: THEN
306: FND_MESSAGE.Set_Name('AS', 'API_ROW_NOT_PROCESSED');
307: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
308: FND_MSG_PUB.ADD;

Line 308: FND_MSG_PUB.ADD;

304: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
305: THEN
306: FND_MESSAGE.Set_Name('AS', 'API_ROW_NOT_PROCESSED');
307: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
308: FND_MSG_PUB.ADD;
309: END IF;
310: END IF;
311:
312: p_return_status := l_return_status;

Line 361: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);

357:
358: -- Local status table
359: TYPE l_interest_status_tbl IS TABLE OF VARCHAR2(1) INDEX BY BINARY_INTEGER;
360: l_return_status_tbl l_interest_status_tbl;
361: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
362: x_lead_id NUMBER;
363:
364: CURSOR duplicate_cat_cur(p_customer_id IN NUMBER,
365: p_product_category_id IN NUMBER,

Line 394: FND_MSG_PUB.initialize;

390:
391: -- Initialize message list if p_init_msg_list is set to TRUE.
392: IF FND_API.to_Boolean( p_init_msg_list )
393: THEN
394: FND_MSG_PUB.initialize;
395: END IF;
396:
397: -- Debug Message
398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

394: FND_MSG_PUB.initialize;
395: END IF;
396:
397: -- Debug Message
398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
399: THEN
400: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: Start');
401: FND_MSG_PUB.Add;
402: END IF;

Line 401: FND_MSG_PUB.Add;

397: -- Debug Message
398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
399: THEN
400: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: Start');
401: FND_MSG_PUB.Add;
402: END IF;
403:
404: -- Initialize API return status to success
405: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

413: -- Validate Environment
414: -- ******************************************************************
415: IF FND_GLOBAL.User_Id IS NULL
416: THEN
417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
418: THEN
419: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
420: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
421: FND_MSG_PUB.ADD;

Line 421: FND_MSG_PUB.ADD;

417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
418: THEN
419: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
420: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
421: FND_MSG_PUB.ADD;
422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425: -- ******************************************************************

Line 439: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

435: ,x_msg_data => l_msg_data
436: ,x_sales_member_rec => l_identity_sales_member_rec);
437:
438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
439: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
440: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
441: END IF;
442: RAISE FND_API.G_EXC_ERROR;
443: END IF;

Line 440: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');

436: ,x_sales_member_rec => l_identity_sales_member_rec);
437:
438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
439: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
440: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
441: END IF;
442: RAISE FND_API.G_EXC_ERROR;
443: END IF;
444: END IF;

Line 456: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

452: IF (p_customer_id is NULL or p_customer_id = FND_API.G_MISS_NUM)
453: THEN
454: p_return_status := FND_API.G_RET_STS_ERROR;
455:
456: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
457: THEN
458: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
459: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
460: FND_MSG_PUB.ADD;

Line 460: FND_MSG_PUB.ADD;

456: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
457: THEN
458: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
459: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
460: FND_MSG_PUB.ADD;
461: END IF;
462: RAISE FND_API.G_EXC_ERROR;
463:
464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)

Line 468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)
465: THEN
466: p_return_status := FND_API.G_RET_STS_ERROR;
467:
468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
469: THEN
470: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
471: FND_MESSAGE.Set_Token('COLUMN', 'ADDRESS_ID', FALSE);
472: FND_MSG_PUB.ADD;

Line 472: FND_MSG_PUB.ADD;

468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
469: THEN
470: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
471: FND_MESSAGE.Set_Token('COLUMN', 'ADDRESS_ID', FALSE);
472: FND_MSG_PUB.ADD;
473: END IF;
474: RAISE FND_API.G_EXC_ERROR; */
475:
476: END IF;

Line 532: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

528: p_contact_id, p_lead_id)
529: THEN
530: p_return_status := FND_API.G_RET_STS_ERROR;
531:
532: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
533: THEN
534: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
535: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
536: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);

Line 537: FND_MSG_PUB.ADD;

533: THEN
534: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
535: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
536: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);
537: FND_MSG_PUB.ADD;
538: END IF;
539: RAISE FND_API.G_EXC_ERROR;
540: END IF;
541:

Line 567: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

563: ,x_update_access_flag => l_update_access_flag
564: );
565:
566: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
567: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
568: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
569: END IF;
570: RAISE FND_API.G_EXC_ERROR;
571: END IF;

Line 568: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');

564: );
565:
566: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
567: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
568: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
569: END IF;
570: RAISE FND_API.G_EXC_ERROR;
571: END IF;
572:

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

570: RAISE FND_API.G_EXC_ERROR;
571: END IF;
572:
573: IF (l_update_access_flag <> 'Y') THEN
574: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
575: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
576: FND_MSG_PUB.ADD;
577: END IF;
578: RAISE FND_API.G_EXC_ERROR;

Line 576: FND_MSG_PUB.ADD;

572:
573: IF (l_update_access_flag <> 'Y') THEN
574: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
575: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
576: FND_MSG_PUB.ADD;
577: END IF;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580: ELSE

Line 600: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

596: ,x_update_access_flag => l_update_access_flag
597: );
598:
599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
600: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
601: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
602: END IF;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;

Line 601: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');

597: );
598:
599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
600: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
601: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
602: END IF;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605:

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

603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605:
606: IF (l_update_access_flag <> 'Y') THEN
607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
608: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
609: FND_MSG_PUB.ADD;
610: END IF;
611: p_return_status := FND_API.G_RET_STS_ERROR;

Line 609: FND_MSG_PUB.ADD;

605:
606: IF (l_update_access_flag <> 'Y') THEN
607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
608: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
609: FND_MSG_PUB.ADD;
610: END IF;
611: p_return_status := FND_API.G_RET_STS_ERROR;
612: RAISE FND_API.G_EXC_ERROR;
613: END IF;

Line 628: /* IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

624: ----------------- Start of Processing Interest Record -----------------------
625: BEGIN
626: -- Progress Message
627: --
628: /* IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
629: THEN
630: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
631: FND_MESSAGE.Set_Token ('ROW', 'AS_INTEREST', TRUE);
632: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);

Line 633: FND_MSG_PUB.Add;

629: THEN
630: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
631: FND_MESSAGE.Set_Token ('ROW', 'AS_INTEREST', TRUE);
632: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
633: FND_MSG_PUB.Add;
634: END IF;
635: */
636: -- Row savepoint
637: SAVEPOINT CREATE_INTEREST_PVT_ROW;

Line 647: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

643: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)
644: THEN
645:
646: -- Debug Message
647: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
648: THEN
649: FND_MESSAGE.Set_Name('AS', 'Validating Record');
650: FND_MSG_PUB.Add;
651: END IF;

Line 650: FND_MSG_PUB.Add;

646: -- Debug Message
647: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
648: THEN
649: FND_MESSAGE.Set_Name('AS', 'Validating Record');
650: FND_MSG_PUB.Add;
651: END IF;
652:
653: Validate_Interest ( p_interest_use_code, p_interest_tbl(l_curr_row), l_return_status );
654:

Line 669: FND_MSG_PUB.Add;

665: FETCH duplicate_cat_cur INTO l_count;
666: IF (duplicate_cat_cur%FOUND)
667: THEN
668: FND_MESSAGE.Set_Name('AS', 'AS_DUPLICATE_MAPPING');
669: FND_MSG_PUB.Add;
670: Close duplicate_cat_cur;
671: RAISE FND_API.G_EXC_ERROR;
672: END IF;
673: Close duplicate_cat_cur;

Line 679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

675: -- remarked by ACNG, 07/06/2000
676: convert_miss_interest_rec(p_interest_tbl(l_curr_row), l_interest_tbl(l_curr_row));
677:
678: -- Debug Message
679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
680: THEN
681: FND_MESSAGE.Set_Name('AS', 'Inserting Record');
682: FND_MSG_PUB.Add;
683: END IF;

Line 682: FND_MSG_PUB.Add;

678: -- Debug Message
679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
680: THEN
681: FND_MESSAGE.Set_Name('AS', 'Inserting Record');
682: FND_MSG_PUB.Add;
683: END IF;
684:
685: -- Clear values for next insert
686: l_rowid := NULL;

Line 744: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

740: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
741: P_MODULE => l_module
742: ,P_API_NAME => L_API_NAME
743: ,P_PKG_NAME => G_PKG_NAME
744: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
745: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
746: ,X_MSG_COUNT => P_MSG_COUNT
747: ,X_MSG_DATA => P_MSG_DATA
748: ,X_RETURN_STATUS => l_RETURN_STATUS);

Line 756: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

752: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
753: P_MODULE => l_module
754: ,P_API_NAME => L_API_NAME
755: ,P_PKG_NAME => G_PKG_NAME
756: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
757: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
758: ,X_MSG_COUNT => P_MSG_COUNT
759: ,X_MSG_DATA => P_MSG_DATA
760: ,X_RETURN_STATUS => l_RETURN_STATUS);

Line 784: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

780:
781: -- Fix bug 2304022
782: IF (p_lead_id is not NULL AND p_lead_id <> FND_API.G_MISS_NUM) THEN
783: IF l_debug THEN
784: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
785: 'Calling Opportunity Real Time API ');
786: END IF;
787: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
788: P_Api_Version_Number => 1.0,

Line 799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

795: );
796:
797: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
798: IF l_debug THEN
799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
800: 'Opportunity Real Time API fail');
801: END IF;
802: RAISE FND_API.G_EXC_ERROR;
803: END IF;

Line 831: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and

827: -- End of API body.
828: --
829:
830: -- Success Message
831: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and
832: l_interests_inserted > 0
833: THEN
834: FND_MESSAGE.Set_Name('AS', 'API_ROWS_INSERTED');
835: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);

Line 837: FND_MSG_PUB.Add;

833: THEN
834: FND_MESSAGE.Set_Name('AS', 'API_ROWS_INSERTED');
835: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
836: FND_MESSAGE.Set_Token('NUMBER', to_char(l_interests_inserted), FALSE);
837: FND_MSG_PUB.Add;
838: END IF;
839:
840:
841: -- Success Message

Line 842: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and

838: END IF;
839:
840:
841: -- Success Message
842: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and
843: l_return_status = FND_API.G_RET_STS_SUCCESS
844: THEN
845: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
846: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);

Line 847: FND_MSG_PUB.Add;

843: l_return_status = FND_API.G_RET_STS_SUCCESS
844: THEN
845: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
846: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
847: FND_MSG_PUB.Add;
848: END IF;
849:
850: -- Standard check of p_commit.
851: IF FND_API.To_Boolean ( p_commit )

Line 857: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

853: COMMIT WORK;
854: END IF;
855:
856: -- Debug Message
857: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
858: THEN
859: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: End');
860: FND_MSG_PUB.Add;
861: END IF;

Line 860: FND_MSG_PUB.Add;

856: -- Debug Message
857: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
858: THEN
859: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: End');
860: FND_MSG_PUB.Add;
861: END IF;
862:
863: -- Standard call to get message count and if count is 1, get message info.
864: FND_MSG_PUB.Count_And_Get( p_count => p_msg_count,

Line 864: FND_MSG_PUB.Count_And_Get( p_count => p_msg_count,

860: FND_MSG_PUB.Add;
861: END IF;
862:
863: -- Standard call to get message count and if count is 1, get message info.
864: FND_MSG_PUB.Count_And_Get( p_count => p_msg_count,
865: p_data => p_msg_data
866: );
867:
868: --

Line 879: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

875: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
876: P_MODULE => l_module
877: ,P_API_NAME => L_API_NAME
878: ,P_PKG_NAME => G_PKG_NAME
879: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
880: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
881: ,X_MSG_COUNT => P_MSG_COUNT
882: ,X_MSG_DATA => P_MSG_DATA
883: ,X_RETURN_STATUS => l_RETURN_STATUS);

Line 891: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

887: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
888: P_MODULE => l_module
889: ,P_API_NAME => L_API_NAME
890: ,P_PKG_NAME => G_PKG_NAME
891: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
892: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
893: ,X_MSG_COUNT => P_MSG_COUNT
894: ,X_MSG_DATA => P_MSG_DATA
895: ,X_RETURN_STATUS => l_RETURN_STATUS);

Line 1006: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);

1002: and product_category_id = p_product_category_id
1003: and product_cat_set_id = p_product_cat_set_id
1004: and interest_id <> p_interest_id;
1005:
1006: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
1007: l_module CONSTANT VARCHAR2(255) := 'as.plsql.intpv.Update_Interest';
1008: BEGIN
1009:
1010: -- Standard Start of API savepoint

Line 1026: FND_MSG_PUB.initialize;

1022:
1023: -- Initialize message list if p_init_msg_list is set to TRUE.
1024: IF FND_API.to_Boolean( p_init_msg_list )
1025: THEN
1026: FND_MSG_PUB.initialize;
1027: END IF;
1028:
1029: -- Debug Message
1030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1026: FND_MSG_PUB.initialize;
1027: END IF;
1028:
1029: -- Debug Message
1030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1031: THEN
1032: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: Start');
1033: FND_MSG_PUB.Add;
1034: END IF;

Line 1033: FND_MSG_PUB.Add;

1029: -- Debug Message
1030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1031: THEN
1032: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: Start');
1033: FND_MSG_PUB.Add;
1034: END IF;
1035:
1036: -- Initialize API return status to success
1037: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1061: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');

1057: ,x_sales_member_rec => l_identity_sales_member_rec);
1058:
1059: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1060: IF l_debug THEN
1061: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
1062: END IF;
1063: RAISE FND_API.G_EXC_ERROR;
1064: END IF;
1065: END IF;

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

1071: --
1072: IF (p_interest_rec.customer_id is NULL or p_interest_rec.customer_id = FND_API.G_MISS_NUM) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074:
1075: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1076: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1077: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
1078: FND_MSG_PUB.ADD;
1079: END IF;

Line 1078: FND_MSG_PUB.ADD;

1074:
1075: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1076: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1077: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
1078: FND_MSG_PUB.ADD;
1079: END IF;
1080: RAISE FND_API.G_EXC_ERROR;
1081: END IF;
1082:

Line 1126: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1122: p_interest_rec.contact_id, p_interest_rec.lead_id)
1123: THEN
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125:
1126: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1127: THEN
1128: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1129: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
1130: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);

Line 1131: FND_MSG_PUB.ADD;

1127: THEN
1128: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1129: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
1130: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);
1131: FND_MSG_PUB.ADD;
1132: END IF;
1133: RAISE FND_API.G_EXC_ERROR;
1134: END IF;
1135:

Line 1162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');

1158: );
1159:
1160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1161: IF l_debug THEN
1162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
1163: END IF;
1164: RAISE FND_API.G_EXC_ERROR;
1165: END IF;
1166:

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

1164: RAISE FND_API.G_EXC_ERROR;
1165: END IF;
1166:
1167: IF (l_update_access_flag <> 'Y') THEN
1168: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1169: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1170: FND_MSG_PUB.ADD;
1171: END IF;
1172: RAISE FND_API.G_EXC_ERROR;

Line 1170: FND_MSG_PUB.ADD;

1166:
1167: IF (l_update_access_flag <> 'Y') THEN
1168: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1169: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1170: FND_MSG_PUB.ADD;
1171: END IF;
1172: RAISE FND_API.G_EXC_ERROR;
1173: END IF;
1174: ELSE

Line 1195: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');

1191: );
1192:
1193: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1194: IF l_debug THEN
1195: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1196: END IF;
1197: RAISE FND_API.G_EXC_ERROR;
1198: END IF;
1199:

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

1197: RAISE FND_API.G_EXC_ERROR;
1198: END IF;
1199:
1200: IF (l_update_access_flag <> 'Y') THEN
1201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1202: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1203: FND_MSG_PUB.ADD;
1204: END IF;
1205: RAISE FND_API.G_EXC_ERROR;

Line 1203: FND_MSG_PUB.ADD;

1199:
1200: IF (l_update_access_flag <> 'Y') THEN
1201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1202: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1203: FND_MSG_PUB.ADD;
1204: END IF;
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207: END IF;

Line 1216: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1212: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)
1213: THEN
1214:
1215: -- Debug Message
1216: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1217: THEN
1218: FND_MESSAGE.Set_Name('AS', 'Validating Record');
1219: FND_MSG_PUB.Add;
1220: END IF;

Line 1219: FND_MSG_PUB.Add;

1215: -- Debug Message
1216: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1217: THEN
1218: FND_MESSAGE.Set_Name('AS', 'Validating Record');
1219: FND_MSG_PUB.Add;
1220: END IF;
1221:
1222: Validate_Interest ( p_interest_use_code, p_interest_rec, l_return_status );
1223:

Line 1239: FND_MSG_PUB.Add;

1235: FETCH duplicate_cat_cur INTO l_count;
1236: IF (duplicate_cat_cur%FOUND)
1237: THEN
1238: FND_MESSAGE.Set_Name('AS', 'AS_DUPLICATE_MAPPING');
1239: FND_MSG_PUB.Add;
1240: Close duplicate_cat_cur;
1241: RAISE FND_API.G_EXC_ERROR;
1242: END IF;
1243: Close duplicate_cat_cur;

Line 1246: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1242: END IF;
1243: Close duplicate_cat_cur;
1244:
1245: -- Debug Message
1246: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1247: THEN
1248: FND_MESSAGE.Set_Name('AS', 'Updating Record');
1249: FND_MSG_PUB.Add;
1250: END IF;

Line 1249: FND_MSG_PUB.Add;

1245: -- Debug Message
1246: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1247: THEN
1248: FND_MESSAGE.Set_Name('AS', 'Updating Record');
1249: FND_MSG_PUB.Add;
1250: END IF;
1251:
1252: -- lock rows before update
1253:

Line 1261: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1257:
1258: if (p_interest_rec.last_update_date is NULL
1259: or p_interest_rec.last_update_date = FND_API.G_MISS_DATE)
1260: then
1261: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1262: THEN
1263: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1264: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
1265: FND_MSG_PUB.ADD;

Line 1265: FND_MSG_PUB.ADD;

1261: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1262: THEN
1263: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1264: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
1265: FND_MSG_PUB.ADD;
1266: END IF;
1267: RAISE FND_API.G_EXC_ERROR;
1268: end if;
1269:

Line 1272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1268: end if;
1269:
1270: if (l_last_update_date <> p_interest_rec.last_update_date)
1271: then
1272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1273: THEN
1274: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1275: FND_MESSAGE.Set_Token('INFO', 'AS_INTERESTS', FALSE);
1276: FND_MSG_PUB.ADD;

Line 1276: FND_MSG_PUB.ADD;

1272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1273: THEN
1274: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1275: FND_MESSAGE.Set_Token('INFO', 'AS_INTERESTS', FALSE);
1276: FND_MSG_PUB.ADD;
1277: END IF;
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: else
1280:

Line 1326: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

1322: -- Fix bug 2304022
1323: IF (p_interest_rec.lead_id is not NULL AND
1324: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN
1325: IF l_debug THEN
1326: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1327: 'Calling Opportunity Real Time API');
1328: END IF;
1329: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1330: P_Api_Version_Number => 1.0,

Line 1341: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

1337: );
1338:
1339: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1340: IF l_debug THEN
1341: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1342: 'Opportunity Real Time API fail');
1343: END IF;
1344: RAISE FND_API.G_EXC_ERROR;
1345:

Line 1351: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and

1347: END IF;
1348:
1349:
1350: -- Success Message
1351: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and
1352: l_return_status = FND_API.G_RET_STS_SUCCESS
1353: THEN
1354: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1355: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);

Line 1356: FND_MSG_PUB.Add;

1352: l_return_status = FND_API.G_RET_STS_SUCCESS
1353: THEN
1354: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1355: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
1356: FND_MSG_PUB.Add;
1357: END IF;
1358:
1359: -- Standard check of p_commit.
1360: IF FND_API.To_Boolean ( p_commit )

Line 1366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1362: COMMIT WORK;
1363: END IF;
1364:
1365: -- Debug Message
1366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1367: THEN
1368: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: End');
1369: FND_MSG_PUB.Add;
1370: END IF;

Line 1369: FND_MSG_PUB.Add;

1365: -- Debug Message
1366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1367: THEN
1368: FND_MESSAGE.Set_Name('AS', 'Pvt Interest API: End');
1369: FND_MSG_PUB.Add;
1370: END IF;
1371:
1372: -- Standard call to get message count and if count is 1, get message info.
1373: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 1373: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

1369: FND_MSG_PUB.Add;
1370: END IF;
1371:
1372: -- Standard call to get message count and if count is 1, get message info.
1373: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1374: p_data => x_msg_data
1375: );
1376:
1377: EXCEPTION

Line 1383: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1379: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
1380: ROLLBACK TO UPDATE_INTEREST_PVT;
1381: x_return_status := FND_API.G_RET_STS_ERROR ;
1382:
1383: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1384: THEN
1385: FND_MESSAGE.Set_Name('AS', 'API_CANNOT_RESERVE_RECORD');
1386: FND_MESSAGE.Set_Token('INFO', 'UPDATE_INTEREST', FALSE);
1387: FND_MSG_PUB.Add;

Line 1387: FND_MSG_PUB.Add;

1383: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1384: THEN
1385: FND_MESSAGE.Set_Name('AS', 'API_CANNOT_RESERVE_RECORD');
1386: FND_MESSAGE.Set_Token('INFO', 'UPDATE_INTEREST', FALSE);
1387: FND_MSG_PUB.Add;
1388: END IF;
1389:
1390: WHEN FND_API.G_EXC_ERROR THEN
1391: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(

Line 1395: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

1391: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1392: P_MODULE => l_module
1393: ,P_API_NAME => L_API_NAME
1394: ,P_PKG_NAME => G_PKG_NAME
1395: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1396: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1397: ,X_MSG_COUNT => X_MSG_COUNT
1398: ,X_MSG_DATA => X_MSG_DATA
1399: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 1406: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

1402: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1403: P_MODULE => l_module
1404: ,P_API_NAME => L_API_NAME
1405: ,P_PKG_NAME => G_PKG_NAME
1406: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1407: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1408: ,X_MSG_COUNT => X_MSG_COUNT
1409: ,X_MSG_DATA => X_MSG_DATA
1410: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 1457: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);

1453: l_val NUMBER;
1454: l_identity_sales_member_rec AS_SALES_MEMBER_PUB.Sales_member_rec_Type;
1455: l_update_access_flag varchar2(1);
1456: x_lead_id NUMBER;
1457: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
1458: l_module CONSTANT VARCHAR2(255) := 'as.plsql.intpv.Delete_Interest';
1459: begin
1460: -- Standard Start of API savepoint
1461: SAVEPOINT DELETE_INTEREST_PVT;

Line 1476: FND_MSG_PUB.initialize;

1472:
1473: -- Initialize message list if p_init_msg_list is set to TRUE.
1474: IF FND_API.to_Boolean( p_init_msg_list )
1475: THEN
1476: FND_MSG_PUB.initialize;
1477: END IF;
1478:
1479: -- Initialize API return status to success
1480: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1491: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1487: -- Validate Environment
1488: -- ******************************************************************
1489: IF FND_GLOBAL.User_Id IS NULL
1490: THEN
1491: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1492: THEN
1493: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
1494: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
1495: FND_MSG_PUB.ADD;

Line 1495: FND_MSG_PUB.ADD;

1491: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1492: THEN
1493: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
1494: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
1495: FND_MSG_PUB.ADD;
1496: END IF;
1497: RAISE FND_API.G_EXC_ERROR;
1498: END IF;
1499:

Line 1522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1518: -- ******************************************************************
1519:
1520: if (p_interest_rec.interest_id is NULL)
1521: then
1522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1523: THEN
1524: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1525: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_ID', FALSE);
1526: FND_MSG_PUB.ADD;

Line 1526: FND_MSG_PUB.ADD;

1522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1523: THEN
1524: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1525: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_ID', FALSE);
1526: FND_MSG_PUB.ADD;
1527: END IF;
1528: end if;
1529:
1530: open get_interest_info_csr(p_interest_rec.interest_id);

Line 1535: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1531: fetch get_interest_info_csr into l_val;
1532:
1533: if (get_interest_info_csr%NOTFOUND)
1534: then
1535: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1536: THEN
1537: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1538: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_ID', FALSE);
1539: fnd_message.set_token('VALUE', p_interest_rec.interest_id, FALSE);

Line 1540: FND_MSG_PUB.ADD;

1536: THEN
1537: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1538: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_ID', FALSE);
1539: fnd_message.set_token('VALUE', p_interest_rec.interest_id, FALSE);
1540: FND_MSG_PUB.ADD;
1541: END IF;
1542: close get_interest_info_csr;
1543: raise FND_API.G_EXC_ERROR;
1544: End if;

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

1568: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1569: END IF;
1570:
1571: IF (l_update_access_flag <> 'Y') THEN
1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1573: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1574: FND_MSG_PUB.ADD;
1575: END IF;
1576: RAISE FND_API.G_EXC_ERROR;

Line 1574: FND_MSG_PUB.ADD;

1570:
1571: IF (l_update_access_flag <> 'Y') THEN
1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1573: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1574: FND_MSG_PUB.ADD;
1575: END IF;
1576: RAISE FND_API.G_EXC_ERROR;
1577: END IF;
1578: ELSE

Line 1598: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1594: ,x_update_access_flag => l_update_access_flag
1595: );
1596:
1597: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1599: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1600: END IF;
1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1602: END IF;

Line 1599: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');

1595: );
1596:
1597: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1599: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1600: END IF;
1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1602: END IF;
1603:

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

1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1602: END IF;
1603:
1604: IF (l_update_access_flag <> 'Y') THEN
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1606: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1607: FND_MESSAGE.Set_Token('INFO', 'CUSTOMER_ID,OPPORTUNITY_ID,SALESFORCE_ID', FALSE);
1608: FND_MSG_PUB.ADD;
1609: END IF;

Line 1608: FND_MSG_PUB.ADD;

1604: IF (l_update_access_flag <> 'Y') THEN
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1606: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1607: FND_MESSAGE.Set_Token('INFO', 'CUSTOMER_ID,OPPORTUNITY_ID,SALESFORCE_ID', FALSE);
1608: FND_MSG_PUB.ADD;
1609: END IF;
1610: RAISE FND_API.G_EXC_ERROR;
1611: END IF;
1612: END IF;

Line 1622: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

1618: -- Fix bug 2304022
1619: IF (p_interest_rec.lead_id is not NULL AND
1620: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN
1621: IF l_debug THEN
1622: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1623: 'Calling Opportunity Real Time API');
1624: END IF;
1625: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1626: P_Api_Version_Number => 1.0,

Line 1637: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,

1633: );
1634:
1635: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1636: IF l_debug THEN
1637: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1638: 'Opportunity Real Time API fail');
1639: END IF;
1640:
1641: RAISE FND_API.G_EXC_ERROR;

Line 1658: FND_MSG_PUB.Count_And_Get

1654: COMMIT WORK;
1655: END IF;
1656:
1657: -- Standard call to get message count and if count is 1, get message info.
1658: FND_MSG_PUB.Count_And_Get
1659: ( p_count => x_msg_count,
1660: p_data => x_msg_data
1661: );
1662:

Line 1669: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

1665: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1666: P_MODULE => l_module
1667: ,P_API_NAME => L_API_NAME
1668: ,P_PKG_NAME => G_PKG_NAME
1669: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1670: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1671: ,X_MSG_COUNT => X_MSG_COUNT
1672: ,X_MSG_DATA => X_MSG_DATA
1673: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 1680: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

1676: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1677: P_MODULE => l_module
1678: ,P_API_NAME => L_API_NAME
1679: ,P_PKG_NAME => G_PKG_NAME
1680: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1681: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1682: ,X_MSG_COUNT => X_MSG_COUNT
1683: ,X_MSG_DATA => X_MSG_DATA
1684: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1726: or (p_product_category_id = FND_API.G_MISS_NUM))
1727: THEN
1728: l_return_status := FND_API.G_RET_STS_ERROR;
1729:
1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1731: THEN
1732: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1733: FND_MESSAGE.Set_Token('COLUMN', 'PRODUCT_CATEGORY_ID', FALSE);
1734: FND_MSG_PUB.ADD;

Line 1734: FND_MSG_PUB.ADD;

1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1731: THEN
1732: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1733: FND_MESSAGE.Set_Token('COLUMN', 'PRODUCT_CATEGORY_ID', FALSE);
1734: FND_MSG_PUB.ADD;
1735: END IF;
1736: ELSIF ((p_product_cat_set_id is NULL)
1737: or (p_product_cat_set_id = FND_API.G_MISS_NUM))
1738: THEN

Line 1741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1737: or (p_product_cat_set_id = FND_API.G_MISS_NUM))
1738: THEN
1739: l_return_status := FND_API.G_RET_STS_ERROR;
1740:
1741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1742: THEN
1743: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1744: FND_MESSAGE.Set_Token('COLUMN', 'PRODUCT_CAT_SET_ID', FALSE);
1745: FND_MSG_PUB.ADD;

Line 1745: FND_MSG_PUB.ADD;

1741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1742: THEN
1743: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1744: FND_MESSAGE.Set_Token('COLUMN', 'PRODUCT_CAT_SET_ID', FALSE);
1745: FND_MSG_PUB.ADD;
1746: END IF;
1747: ELSE
1748: -- Insure that all ids are valid
1749: --

Line 1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1805: or (p_interest_type_id = FND_API.G_MISS_NUM))
1806: THEN
1807: l_return_status := FND_API.G_RET_STS_ERROR;
1808:
1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1810: THEN
1811: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1812: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_TYPE_ID', FALSE);
1813: FND_MSG_PUB.ADD;

Line 1813: FND_MSG_PUB.ADD;

1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1810: THEN
1811: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1812: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_TYPE_ID', FALSE);
1813: FND_MSG_PUB.ADD;
1814: END IF;
1815:
1816: ELSE
1817: -- Insure that all ids are valid

Line 1887: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)

1883: FETCH C_Int_Type_Exists INTO l_variable;
1884:
1885: IF (C_Int_Type_Exists%NOTFOUND)
1886: THEN
1887: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
1888: THEN
1889: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1890: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_TYPE', FALSE);
1891: FND_MESSAGE.Set_Token('VALUE', p_interest_type_id, FALSE);

Line 1892: FND_MSG_PUB.Add;

1888: THEN
1889: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1890: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_TYPE', FALSE);
1891: FND_MESSAGE.Set_Token('VALUE', p_interest_type_id, FALSE);
1892: FND_MSG_PUB.Add;
1893: END IF;
1894:
1895: l_return_status := FND_API.G_RET_STS_ERROR;
1896: END IF;

Line 1909: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_Msg_Lvl_Error)

1905: FETCH C_Prim_Int_Code_Exists INTO l_variable;
1906:
1907: IF (C_Prim_Int_Code_Exists%NOTFOUND)
1908: THEN
1909: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_Msg_Lvl_Error)
1910: THEN
1911: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1912: FND_MESSAGE.Set_Token('COLUMN', 'PRIMARY_INTEREST_CODE', FALSE);
1913: FND_MESSAGE.Set_Token('VALUE', p_primary_interest_code_id, FALSE);

Line 1914: FND_MSG_PUB.Add;

1910: THEN
1911: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1912: FND_MESSAGE.Set_Token('COLUMN', 'PRIMARY_INTEREST_CODE', FALSE);
1913: FND_MESSAGE.Set_Token('VALUE', p_primary_interest_code_id, FALSE);
1914: FND_MSG_PUB.Add;
1915: END IF;
1916:
1917: l_return_status := FND_API.G_RET_STS_ERROR;
1918: END IF;

Line 1932: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1928: p_interest_type_id);
1929: FETCH C_Sec_Int_Code_Exists INTO l_variable;
1930: IF (C_Sec_Int_Code_Exists%NOTFOUND)
1931: THEN
1932: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1933: THEN
1934: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1935: FND_MESSAGE.Set_Token('COLUMN', 'SECONDARY_INTEREST_CODE', FALSE);
1936: FND_MESSAGE.Set_Token('VALUE', p_secondary_interest_code_id, FALSE);

Line 1937: FND_MSG_PUB.ADD;

1933: THEN
1934: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1935: FND_MESSAGE.Set_Token('COLUMN', 'SECONDARY_INTEREST_CODE', FALSE);
1936: FND_MESSAGE.Set_Token('VALUE', p_secondary_interest_code_id, FALSE);
1937: FND_MSG_PUB.ADD;
1938: END IF;
1939:
1940: l_return_status := FND_API.G_RET_STS_ERROR;
1941: END IF;

Line 1979: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1975: p_interest_type_id);
1976: FETCH C_Int_Status_Exists INTO l_variable;
1977: IF (C_Int_Status_Exists%NOTFOUND)
1978: THEN
1979: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1980: THEN
1981: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1982: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_STATUS', FALSE);
1983: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);

Line 1984: FND_MSG_PUB.ADD;

1980: THEN
1981: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
1982: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_STATUS', FALSE);
1983: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);
1984: FND_MSG_PUB.ADD;
1985: END IF;
1986:
1987: l_return_status := FND_API.G_RET_STS_ERROR;
1988: END IF;

Line 2027: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

2023: p_product_category_id, p_product_cat_set_id);
2024: FETCH C_Int_Status_Exists INTO l_variable;
2025: IF (C_Int_Status_Exists%NOTFOUND)
2026: THEN
2027: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2028: THEN
2029: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
2030: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_STATUS', FALSE);
2031: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);

Line 2032: FND_MSG_PUB.ADD;

2028: THEN
2029: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
2030: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_STATUS', FALSE);
2031: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);
2032: FND_MSG_PUB.ADD;
2033: END IF;
2034:
2035: l_return_status := FND_API.G_RET_STS_ERROR;
2036: END IF;