[Home] [Help]
90: BEGIN
91: IF nvl(fnd_profile.value('AS_ACTIVATE_SALES_INTEROP'), 'N') <> 'Y' THEN -- Added for ASNB
92: If (l_opp_rec.sales_stage_id IS NULL) or
93: (l_opp_rec.sales_stage_id = FND_API.G_MISS_NUM
94: and p_mode = AS_UTILITY_PVT.G_CREATE)
95: THEN
96: l_opp_rec.sales_stage_id :=
97: to_number(FND_PROFILE.VALUE ('AS_OPP_SALES_STAGE'));
98: End If;
99: END IF;
100:
101: If (l_opp_rec.win_probability IS NULL) or
102: (l_opp_rec.win_probability = FND_API.G_MISS_NUM
103: and p_mode = AS_UTILITY_PVT.G_CREATE)
104: THEN
105: l_opp_rec.win_probability :=
106: to_number(FND_PROFILE.VALUE ('AS_OPP_WIN_PROBABILITY'));
107: End If;
107: End If;
108:
109: If (l_opp_rec.channel_code IS NULL) or
110: (l_opp_rec.channel_code = FND_API.G_MISS_CHAR
111: and p_mode = AS_UTILITY_PVT.G_CREATE)
112: THEN
113: l_opp_rec.channel_code := FND_PROFILE.VALUE ('AS_OPP_SALES_CHANNEL');
114: End If;
115:
114: End If;
115:
116: If (l_opp_rec.status_code IS NULL) or
117: (l_opp_rec.status_code = FND_API.G_MISS_CHAR
118: and p_mode = AS_UTILITY_PVT.G_CREATE)
119: THEN
120: l_opp_rec.status_code := FND_PROFILE.VALUE ('AS_OPP_STATUS');
121: End If;
122:
121: End If;
122:
123: If (l_opp_rec.decision_date IS NULL) or
124: (l_opp_rec.decision_date = FND_API.G_MISS_DATE
125: and p_mode = AS_UTILITY_PVT.G_CREATE)
126: THEN
127: l_opp_rec.decision_date :=
128: trunc(sysdate) + to_number(FND_PROFILE.VALUE('AS_OPP_CLOSING_DATE_DAYS'));
129: End If;
129: End If;
130:
131: If (l_opp_rec.currency_code IS NULL) or
132: (l_opp_rec.currency_code = FND_API.G_MISS_CHAR
133: and p_mode = AS_UTILITY_PVT.G_CREATE)
134: THEN
135: l_opp_rec.currency_code :=
136: FND_PROFILE.VALUE('JTF_PROFILE_DEFAULT_CURRENCY');
137: End If;
138:
139: -- ffang 091400 for bug 1407007
140: If (l_opp_rec.auto_assignment_type IS NULL) or
141: (l_opp_rec.auto_assignment_type = FND_API.G_MISS_CHAR
142: and p_mode = AS_UTILITY_PVT.G_CREATE)
143: THEN
144: l_opp_rec.auto_assignment_type := 'TAP';
145: End If;
146: -- end ffang 091400
146: -- end ffang 091400
147:
148: If (l_opp_rec.prm_assignment_type IS NULL) or
149: (l_opp_rec.prm_assignment_type = FND_API.G_MISS_CHAR
150: and p_mode = AS_UTILITY_PVT.G_CREATE)
151: THEN
152: l_opp_rec.prm_assignment_type := 'UNASSIGNED';
153: End If;
154:
154:
155: -- Default delete_flag bug 1512162
156: If (l_opp_rec.deleted_flag IS NULL or
157: l_opp_rec.deleted_flag = FND_API.G_MISS_CHAR ) AND
158: p_mode = AS_UTILITY_PVT.G_CREATE
159: then
160: l_opp_rec.deleted_flag := 'N';
161: end if;
162:
162:
163: -- solin, default freeze_flag for bug 1554330
164: IF (l_opp_rec.freeze_flag IS NULL) or
165: (l_opp_rec.freeze_flag = FND_API.G_MISS_CHAR AND
166: p_mode = AS_UTILITY_PVT.G_CREATE)
167: THEN
168: l_opp_rec.freeze_flag := 'N';
169: END IF;
170: -- solin
231: FND_MESSAGE.Set_Token('LEAD_NUM', p_lead_number, FALSE);
232: Note_Message := FND_MESSAGE.Get;
233:
234: IF l_debug THEN
235: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
236: Note_Message);
237: END IF;
238:
239: JTF_NOTES_PUB.Create_note (
280: FND_MESSAGE.Set_Token('LEAD_NUM', p_lead_number, FALSE);
281: Note_Message := FND_MESSAGE.Get;
282:
283: IF l_debug THEN
284: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
285: Note_Message);
286: END IF;
287:
288: JTF_NOTES_PUB.Create_note (
321: FND_MESSAGE.Set_Token('LEAD_NUM', p_lead_number, FALSE);
322: Note_Message := FND_MESSAGE.Get;
323:
324: IF l_debug THEN
325: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
326: Note_Message);
327: END IF;
328:
329:
362: FND_MESSAGE.Set_Token('LEAD_NUM', p_lead_number, FALSE);
363: Note_Message := FND_MESSAGE.Get;
364:
365: IF l_debug THEN
366: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
367: Note_Message);
368: END IF;
369:
370: JTF_NOTES_PUB.Create_note (
424: x_return_status := FND_API.G_RET_STS_SUCCESS;
425: X_Warning_Message := NULL;
426:
427: IF l_debug THEN
428: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
429: 'LEAD_ID/RS_ID: '||p_LEAD_ID || ',' ||p_RESOURCE_ID );
430: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
431: 'OLD_SM/SS_ID: '|| p_OLD_SALES_METHODOLOGY_ID||',' || p_OLD_SALES_STAGE_ID);
432: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
426:
427: IF l_debug THEN
428: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
429: 'LEAD_ID/RS_ID: '||p_LEAD_ID || ',' ||p_RESOURCE_ID );
430: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
431: 'OLD_SM/SS_ID: '|| p_OLD_SALES_METHODOLOGY_ID||',' || p_OLD_SALES_STAGE_ID);
432: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
433: 'SM/SS_ID: ' || p_SALES_METHODOLOGY_ID ||',' || p_SALES_STAGE_ID );
434: END IF;
428: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
429: 'LEAD_ID/RS_ID: '||p_LEAD_ID || ',' ||p_RESOURCE_ID );
430: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
431: 'OLD_SM/SS_ID: '|| p_OLD_SALES_METHODOLOGY_ID||',' || p_OLD_SALES_STAGE_ID);
432: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
433: 'SM/SS_ID: ' || p_SALES_METHODOLOGY_ID ||',' || p_SALES_STAGE_ID );
434: END IF;
435:
436: IF (p_SALES_METHODOLOGY_ID IS NOT NULL) AND
445: close template;
446:
447: IF(l_tmplate_group_id IS NOT NULL) THEN
448: IF l_debug THEN
449: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
450: 'Lunching workflow for autotask creation');
451: END IF;
452: -- lunch workflow
453: as_sales_meth_wf.start_methodology(
476: x_return_status := substr(l_return_status, 1, 1);
477: end if;
478:
479: IF l_debug THEN
480: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'x_return_status: ' || x_return_status );
481: END IF;
482:
483: EXCEPTION
484: WHEN OTHERS
720:
721:
722: -- Debug Message
723: IF l_debug THEN
724: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
725: 'Private API: ' || l_api_name || ' start');
726: END IF;
727:
728:
764: -- 'UT_CANNOT_GET_PROFILE_VALUE');
765: -- FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
766: -- FND_MSG_PUB.ADD;
767:
768: AS_UTILITY_PVT.Set_Message(
769: p_module => l_module,
770: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
771: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
772: p_token1 => 'PROFILE',
776: RAISE FND_API.G_EXC_ERROR;
777: END IF;
778:
779: IF l_debug THEN
780: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
781: 'Before Get_CurrentUser '|| x_return_status);
782: END IF;
783:
784: IF (p_validation_level = fnd_api.g_valid_level_full)
798: RAISE FND_API.G_EXC_ERROR;
799: END IF;
800:
801: IF l_debug THEN
802: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'After Get_CurrentUser '|| x_return_status);
803: END IF;
804:
805: -- Set default value to decision_date, channel_code, status_code,
806: -- sales_stage_id, win_probability, freeze_flag, and currency_code
826: (l_Header_Rec.freeze_flag IS NULL) or -- solin, bug 1554330
827: (l_Header_Rec.freeze_flag = FND_API.G_MISS_CHAR) -- solin, bug 1554330
828: THEN
829: IF l_debug THEN
830: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
831: 'Calling Set_opp_default_values');
832: END IF;
833:
834: l_header_rec1 := l_header_rec;
832: END IF;
833:
834: l_header_rec1 := l_header_rec;
835: Set_opp_default_values(
836: p_mode => AS_UTILITY_PVT.G_CREATE,
837: p_opp_rec => l_Header_Rec1,
838: x_opp_rec => l_Header_Rec );
839:
840: End If;
851: If (l_Header_Rec.address_id IS NULL OR
852: l_Header_Rec.address_id = FND_API.G_MISS_NUM )
853: THEN
854: IF l_debug THEN
855: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
856: 'No primary address for customer');
857: END IF;
858:
859: END IF;
863: l_Header_Rec.decision_date := trunc(l_Header_Rec.decision_date);
864:
865: -- Debug message
866: IF l_debug THEN
867: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
868: 'Private API: Validate_opp_header');
869: END IF;
870:
871:
872: -- Invoke validation procedures
873: Validate_opp_header(
874: p_init_msg_list => FND_API.G_FALSE,
875: p_validation_level => p_validation_level,
876: p_validation_mode => AS_UTILITY_PVT.G_CREATE,
877: P_Header_Rec => l_Header_Rec,
878: x_return_status => x_return_status,
879: x_msg_count => x_msg_count,
880: x_msg_data => x_msg_data);
894: IF p_check_access_flag = 'Y'
895: THEN
896: -- Call Get_Access_Profiles to get access_profile_rec
897: IF l_debug THEN
898: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
899: 'Calling Get_Access_Profiles');
900: END IF;
901:
902: AS_OPPORTUNITY_PUB.Get_Access_Profiles(
903: p_profile_tbl => p_profile_tbl,
904: x_access_profile_rec => l_access_profile_rec);
905:
906: IF l_debug THEN
907: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
908: 'Calling Has_viewCustomerAccess');
909: END IF;
910:
911: AS_ACCESS_PUB.Has_viewCustomerAccess(
926: x_msg_data => x_msg_data,
927: x_view_access_flag => l_access_flag);
928:
929: IF l_access_flag <> 'Y' THEN
930: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
931: 'API_NO_CREATE_PRIVILEGE');
932: END IF;
933:
934: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
943: -- Hint: Add corresponding Master-Detail business logic here if necessary.
944:
945: -- Debug Message
946: IF l_debug THEN
947: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
948: 'Private API: Calling create table handler');
949: END IF;
950:
951:
951:
952: l_LEAD_ID := l_Header_Rec.LEAD_ID;
953:
954: IF l_debug THEN
955: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'OFFER_ID: ' || p_header_rec.OFFER_ID);
956: END IF;
957:
958: -- Hardcoding to NULL for R12 since it will be filled in when
959: -- Lines are created
1085: CLOSE get_person_id_csr;
1086:
1087: -- Debug Message
1088: IF l_debug THEN
1089: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1090: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
1091: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1092: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
1093: END IF;
1087: -- Debug Message
1088: IF l_debug THEN
1089: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1090: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
1091: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1092: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
1093: END IF;
1094:
1095:
1120: END IF;
1121:
1122: -- Debug Message
1123: IF l_debug THEN
1124: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1125: 'Calling Create_SalesTeam');
1126: END IF;
1127:
1128: AS_ACCESS_PUB.Create_SalesTeam (
1143: );
1144:
1145: -- Debug Message
1146: IF l_debug THEN
1147: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1148: 'Create_SalesTeam:l_access_id = ' || l_access_id);
1149: END IF;
1150:
1151:
1176: l_is_owner := 'Y';
1177:
1178: -- Debug Message
1179: IF l_debug THEN
1180: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1181: 'Calling Create_SalesTeam for owner');
1182: END IF;
1183:
1184: AS_ACCESS_PUB.Create_SalesTeam (
1199: );
1200:
1201: -- Debug Message
1202: IF l_debug THEN
1203: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Create_Owner_ST:l_access_id = ' || l_access_id);
1204: END IF;
1205:
1206:
1207:
1217:
1218: -- Assign/Reassign the territory resources for the opportunity
1219: -- Debug Message
1220: IF l_debug THEN
1221: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Opportunity Real Time API');
1222: END IF;
1223:
1224:
1225: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1233: );
1234:
1235: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1236: IF l_debug THEN
1237: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Opportunity Real Time API fail');
1238: END IF;
1239: RAISE FND_API.G_EXC_ERROR;
1240: END IF;
1241:
1241:
1242:
1243: -- Debug Message
1244: IF l_debug THEN
1245: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Recreate_tasks');
1246: END IF;
1247:
1248: Recreate_tasks(
1249: p_LEAD_ID => l_lead_id,
1258: X_Warning_Message => l_warning_msg );
1259:
1260: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1261: IF l_debug THEN
1262: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Recreate_tasks fail');
1263: END IF;
1264:
1265: RAISE FND_API.G_EXC_ERROR;
1266: END IF;
1289: X_Msg_Data => x_msg_data);
1290:
1291: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1292: IF l_debug THEN
1293: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Create lead competitor fail');
1294: END IF;
1295:
1296: RAISE FND_API.G_EXC_ERROR;
1297: END IF;
1309: x_return_status => x_return_status);
1310:
1311: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1312: IF l_debug THEN
1313: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Update competitor Products fail');
1314: END IF;
1315: RAISE FND_API.G_EXC_ERROR;
1316: END IF;
1317:
1330:
1331:
1332: -- Debug Message
1333: IF l_debug THEN
1334: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: ' || l_api_name || ' end');
1335: END IF;
1336:
1337:
1338:
1369: END IF;
1370: */
1371: EXCEPTION
1372: WHEN FND_API.G_EXC_ERROR THEN
1373: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1374: P_MODULE => l_module
1375: ,P_API_NAME => L_API_NAME
1376: ,P_PKG_NAME => G_PKG_NAME
1377: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1374: P_MODULE => l_module
1375: ,P_API_NAME => L_API_NAME
1376: ,P_PKG_NAME => G_PKG_NAME
1377: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1378: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1379: ,X_MSG_COUNT => X_MSG_COUNT
1380: ,X_MSG_DATA => X_MSG_DATA
1381: ,X_RETURN_STATUS => X_RETURN_STATUS);
1382:
1380: ,X_MSG_DATA => X_MSG_DATA
1381: ,X_RETURN_STATUS => X_RETURN_STATUS);
1382:
1383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1384: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1385: P_MODULE => l_module
1386: ,P_API_NAME => L_API_NAME
1387: ,P_PKG_NAME => G_PKG_NAME
1388: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1385: P_MODULE => l_module
1386: ,P_API_NAME => L_API_NAME
1387: ,P_PKG_NAME => G_PKG_NAME
1388: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1389: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1390: ,X_MSG_COUNT => X_MSG_COUNT
1391: ,X_MSG_DATA => X_MSG_DATA
1392: ,X_RETURN_STATUS => X_RETURN_STATUS);
1393:
1391: ,X_MSG_DATA => X_MSG_DATA
1392: ,X_RETURN_STATUS => X_RETURN_STATUS);
1393:
1394: WHEN OTHERS THEN
1395: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1396: P_MODULE => l_module
1397: ,P_API_NAME => L_API_NAME
1398: ,P_PKG_NAME => G_PKG_NAME
1399: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1395: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1396: P_MODULE => l_module
1397: ,P_API_NAME => L_API_NAME
1398: ,P_PKG_NAME => G_PKG_NAME
1399: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1400: ,P_SQLCODE => SQLCODE
1401: ,P_SQLERRM => SQLERRM
1402: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1403: ,X_MSG_COUNT => X_MSG_COUNT
1398: ,P_PKG_NAME => G_PKG_NAME
1399: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1400: ,P_SQLCODE => SQLCODE
1401: ,P_SQLERRM => SQLERRM
1402: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1403: ,X_MSG_COUNT => X_MSG_COUNT
1404: ,X_MSG_DATA => X_MSG_DATA
1405: ,X_RETURN_STATUS => X_RETURN_STATUS);
1406: End Create_opp_header;
1551:
1552:
1553: -- Debug Message
1554: IF l_debug THEN
1555: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: ' || l_api_name || ' start');
1556: END IF;
1557:
1558:
1559: -- Initialize API return status to SUCCESS
1601: END IF;
1602:
1603: -- Debug Message
1604: IF l_debug THEN
1605: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
1606: END IF;
1607:
1608:
1609: Open C_Get_opp_header( l_Header_rec.LEAD_ID);
1620:
1621: -- If deleted_flag is 'Y', this opportunity header has been soft deleted.
1622: IF (UPPER(l_deleted_flag) = 'Y')
1623: THEN
1624: AS_UTILITY_PVT.Set_Message(
1625: p_module => l_module,
1626: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1627: p_msg_name => 'API_DELETED_OPP_HEADER');
1628:
1634: IF l_freeze_flag = 'Y'
1635: THEN
1636: l_allow_flag := NVL(FND_PROFILE.VALUE('AS_ALLOW_UPDATE_FROZEN_OPP'),'Y');
1637: IF l_allow_flag <> 'Y' THEN
1638: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
1639: 'API_OPP_FROZEN');
1640: RAISE FND_API.G_EXC_ERROR;
1641: END IF;
1642: END IF;
1649: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
1650: -- FND_MESSAGE.Set_Token ('INFO', 'opp_header', FALSE);
1651: -- FND_MSG_PUB.Add;
1652:
1653: AS_UTILITY_PVT.Set_Message(
1654: p_module => l_module,
1655: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1656: p_msg_name => 'API_MISSING_OPP_HEADER_UPDATE');
1657:
1660: END IF;
1661:
1662: -- Debug Message
1663: IF l_debug THEN
1664: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
1665: END IF;
1666: close C_Get_opp_header;
1667:
1668: If (l_Header_rec.last_update_date is NULL or
1672: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1673: -- FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
1674: -- FND_MSG_PUB.ADD;
1675:
1676: AS_UTILITY_PVT.Set_Message(
1677: p_module => l_module,
1678: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1679: p_msg_name => 'API_MISSING_LAST_UPDATE_DATE');
1680:
1688: -- FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1689: -- FND_MESSAGE.Set_Token('INFO', 'opp_header', FALSE);
1690: -- FND_MSG_PUB.ADD;
1691:
1692: AS_UTILITY_PVT.Set_Message(
1693: p_module => l_module,
1694: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1695: p_msg_name => 'API_OPP_HEADER_CHANGED');
1696:
1711: (l_Header_Rec.auto_assignment_type IS NULL) or --ffang 091500 for B1407007
1712: (l_Header_Rec.prm_assignment_type IS NULL) --ffang 091500 for B1407007
1713: THEN
1714: IF l_debug THEN
1715: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Set_opp_default_values');
1716: END IF;
1717:
1718: l_header_rec1 := l_header_rec;
1719: Set_opp_default_values(
1716: END IF;
1717:
1718: l_header_rec1 := l_header_rec;
1719: Set_opp_default_values(
1720: p_mode => AS_UTILITY_PVT.G_UPDATE,
1721: p_opp_rec => l_Header_Rec1,
1722: x_opp_rec => l_Header_Rec );
1723:
1724: End If;
1734: END IF;
1735:
1736: -- Debug message
1737: IF l_debug THEN
1738: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_opp_header');
1739: END IF;
1740:
1741:
1742: -- Invoke validation procedures
1742: -- Invoke validation procedures
1743: Validate_opp_header(
1744: p_init_msg_list => FND_API.G_FALSE,
1745: p_validation_level => p_validation_level,
1746: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
1747: P_Header_Rec => l_Header_Rec,
1748: x_return_status => x_return_status,
1749: x_msg_count => x_msg_count,
1750: x_msg_data => x_msg_data);
1778:
1779: IF nvl(l_comp_required, 'N') = 'Y' THEN
1780: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1781: THEN
1782: AS_UTILITY_PVT.Set_Message(
1783: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1784: p_msg_name => 'API_CLOSE_COMPETITOR_REQUIRED');
1785: END IF;
1786: raise FND_API.G_EXC_ERROR;
1817: x_msg_data => x_msg_data,
1818: x_update_access_flag => l_access_flag);
1819:
1820: IF l_access_flag <> 'Y' THEN
1821: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
1822: 'API_NO_UPDATE_PRIVILEGE');
1823: RAISE FND_API.G_EXC_ERROR;
1824: END IF;
1825:
1857: (l_header_rec.win_probability <> l_win_prob)
1858: THEN
1859: -- Debug message
1860: IF l_debug THEN
1861: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Create notes');
1862: END IF;
1863:
1864: IF (l_header_rec.lead_number is NOT NULL) and
1865: (l_header_rec.lead_number <> FND_API.G_MISS_CHAR)
1884: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1885: RAISE FND_API.G_EXC_ERROR;
1886: ELSE
1887: IF l_debug THEN
1888: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Notes created. note_id=' || l_note_id);
1889: END IF;
1890: END IF;
1891: END IF;
1892: END IF;
1926: END IF;
1927:
1928: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1929: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1930: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_oppOwnerAccess fail');
1931: END IF;
1932: RAISE FND_API.G_EXC_ERROR;
1933: END IF;
1934: END IF;
1938: -- Hint: Add corresponding Master-Detail business logic here if necessary.
1939:
1940: -- Debug Message
1941: IF l_debug THEN
1942: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1943: 'Private API: Calling update table handler');
1944:
1945: END IF;
1946:
2150:
2151: -- Reset the owner in the sales team
2152: -- Debug Message
2153: IF l_debug THEN
2154: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2155: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2156: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2157: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2158:
2152: -- Debug Message
2153: IF l_debug THEN
2154: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2155: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2156: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2157: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2158:
2159: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2160: 'l_owner_sf_id: '||l_owner_salesforce_id );
2155: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2156: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2157: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2158:
2159: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2160: 'l_owner_sf_id: '||l_owner_salesforce_id );
2161: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2162: 'l_owner_sg_id: '||l_owner_sales_group_id );
2163: END IF;
2157: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2158:
2159: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2160: 'l_owner_sf_id: '||l_owner_salesforce_id );
2161: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2162: 'l_owner_sg_id: '||l_owner_sales_group_id );
2163: END IF;
2164:
2165:
2213: CLOSE get_person_id_csr;
2214:
2215: -- Debug Message
2216: IF l_debug THEN
2217: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2218: 'Calling Create_SalesTeam');
2219:
2220: END IF;
2221:
2237: );
2238:
2239: -- Debug Message
2240: IF l_debug THEN
2241: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2242: 'Create_owner_ST :l_access_id = ' || l_access_id);
2243: END IF;
2244:
2245:
2268: -- Assign/Reassign the territory resources for the opportunity
2269:
2270: -- Debug Message
2271: IF l_debug THEN
2272: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Opportunity Real Time API');
2273: END IF;
2274:
2275: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
2276: P_Api_Version_Number => 1.0,
2283: );
2284:
2285: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2286: IF l_debug THEN
2287: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Opportunity Real Time API fail');
2288: END IF;
2289: RAISE FND_API.G_EXC_ERROR;
2290: END IF;
2291:
2291:
2292:
2293: -- Debug Message
2294: IF l_debug THEN
2295: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Recreate_tasks');
2296: END IF;
2297:
2298:
2299: l_new_SALES_METHODOLOGY_ID := l_header_rec.SALES_METHODOLOGY_ID;
2309: IF l_old_sales_methodology_id IS NOT NULL AND
2310: nvl(l_new_SALES_METHODOLOGY_ID, -99) <> l_old_sales_methodology_id THEN
2311:
2312: IF l_debug THEN
2313: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2314: 'Should not change Sales methodology');
2315: END IF;
2316:
2317: AS_UTILITY_PVT.Set_Message(
2313: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2314: 'Should not change Sales methodology');
2315: END IF;
2316:
2317: AS_UTILITY_PVT.Set_Message(
2318: p_module => l_module,
2319: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2320: p_msg_name => 'API_NO_UPDATE_SALES_METHODOLOGY');
2321:
2336: X_Warning_Message => l_warning_msg );
2337:
2338: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2339: IF l_debug THEN
2340: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2341: 'Recreate_tasks fail');
2342: END IF;
2343:
2344: RAISE FND_API.G_EXC_ERROR;
2366: X_Msg_Data => x_msg_data);
2367:
2368: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2369: IF l_debug THEN
2370: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2371: 'Create lead competitor fail');
2372: END IF;
2373:
2374: RAISE FND_API.G_EXC_ERROR;
2388: x_return_status => x_return_status);
2389:
2390: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2391: IF l_debug THEN
2392: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2393: 'Update competitor Products fail');
2394: END IF;
2395: RAISE FND_API.G_EXC_ERROR;
2396: END IF;
2410:
2411:
2412: -- Debug Message
2413: IF l_debug THEN
2414: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2415: 'Private API: ' || l_api_name || ' end');
2416: END IF;
2417:
2418:
2448: END IF;
2449: */
2450: EXCEPTION
2451: WHEN FND_API.G_EXC_ERROR THEN
2452: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2453: P_MODULE => l_module
2454: ,P_API_NAME => L_API_NAME
2455: ,P_PKG_NAME => G_PKG_NAME
2456: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2453: P_MODULE => l_module
2454: ,P_API_NAME => L_API_NAME
2455: ,P_PKG_NAME => G_PKG_NAME
2456: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2457: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2458: ,X_MSG_COUNT => X_MSG_COUNT
2459: ,X_MSG_DATA => X_MSG_DATA
2460: ,X_RETURN_STATUS => X_RETURN_STATUS);
2461:
2459: ,X_MSG_DATA => X_MSG_DATA
2460: ,X_RETURN_STATUS => X_RETURN_STATUS);
2461:
2462: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2463: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2464: P_MODULE => l_module
2465: ,P_API_NAME => L_API_NAME
2466: ,P_PKG_NAME => G_PKG_NAME
2467: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2464: P_MODULE => l_module
2465: ,P_API_NAME => L_API_NAME
2466: ,P_PKG_NAME => G_PKG_NAME
2467: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2468: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2469: ,X_MSG_COUNT => X_MSG_COUNT
2470: ,X_MSG_DATA => X_MSG_DATA
2471: ,X_RETURN_STATUS => X_RETURN_STATUS);
2472:
2470: ,X_MSG_DATA => X_MSG_DATA
2471: ,X_RETURN_STATUS => X_RETURN_STATUS);
2472:
2473: WHEN OTHERS THEN
2474: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2475: P_MODULE => l_module
2476: ,P_API_NAME => L_API_NAME
2477: ,P_PKG_NAME => G_PKG_NAME
2478: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2474: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2475: P_MODULE => l_module
2476: ,P_API_NAME => L_API_NAME
2477: ,P_PKG_NAME => G_PKG_NAME
2478: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2479: ,P_SQLCODE => SQLCODE
2480: ,P_SQLERRM => SQLERRM
2481: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2482: ,X_MSG_COUNT => X_MSG_COUNT
2477: ,P_PKG_NAME => G_PKG_NAME
2478: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2479: ,P_SQLCODE => SQLCODE
2480: ,P_SQLERRM => SQLERRM
2481: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2482: ,X_MSG_COUNT => X_MSG_COUNT
2483: ,X_MSG_DATA => X_MSG_DATA
2484: ,X_RETURN_STATUS => X_RETURN_STATUS);
2485: End Update_opp_header;
2544:
2545:
2546: -- Debug Message
2547: IF l_debug THEN
2548: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2549: 'Private API: ' || l_api_name || ' start');
2550: END IF;
2551:
2552:
2591: END IF;
2592:
2593: -- Debug Message
2594: IF l_debug THEN
2595: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
2596: END IF;
2597:
2598: Open C_Get_opp_header( p_LEAD_ID);
2599: Fetch C_Get_opp_header into l_last_update_date, l_freeze_flag;
2604: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
2605: -- FND_MESSAGE.Set_Token ('INFO', 'opp_header', FALSE);
2606: -- FND_MSG_PUB.Add;
2607:
2608: AS_UTILITY_PVT.Set_Message(
2609: p_module => l_module,
2610: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2611: p_msg_name => 'API_MISSING_OPP_HEADER_UPDATE');
2612:
2615: END IF;
2616:
2617: -- Debug Message
2618: IF l_debug THEN
2619: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
2620: END IF;
2621: close C_Get_opp_header;
2622:
2623: /*
2628: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
2629: -- FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2630: -- FND_MSG_PUB.ADD;
2631:
2632: AS_UTILITY_PVT.Set_Message(
2633: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2634: p_msg_name => 'API_MISSING_LAST_UPDATE_DATE');
2635:
2636: END IF;
2643: -- FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
2644: -- FND_MESSAGE.Set_Token('INFO', 'opp_header', FALSE);
2645: -- FND_MSG_PUB.ADD;
2646:
2647: AS_UTILITY_PVT.Set_Message(
2648: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2649: p_msg_name => 'API_OPP_HEADER_CHANGED');
2650:
2651: END IF;
2656:
2657: /*
2658: -- Debug message
2659: IF l_debug THEN
2660: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_opp_header');
2661: END IF;
2662:
2663: -- Invoke validation procedures
2664: Validate_opp_header(
2663: -- Invoke validation procedures
2664: Validate_opp_header(
2665: p_init_msg_list => FND_API.G_FALSE,
2666: p_validation_level => p_validation_level,
2667: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
2668: P_Header_Rec => p_Header_Rec,
2669: x_return_status => x_return_status,
2670: x_msg_count => x_msg_count,
2671: x_msg_data => x_msg_data);
2704: x_msg_data => x_msg_data,
2705: x_update_access_flag => l_access_flag);
2706:
2707: IF l_access_flag <> 'Y' THEN
2708: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
2709: 'API_NO_UPDATE_PRIVILEGE');
2710: RAISE FND_API.G_EXC_ERROR;
2711: END IF;
2712:
2720: IF l_freeze_flag = 'Y'
2721: THEN
2722: l_allow_flag := NVL(FND_PROFILE.VALUE('AS_ALLOW_UPDATE_FROZEN_OPP'),'Y');
2723: IF l_allow_flag <> 'Y' THEN
2724: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
2725: 'API_OPP_FROZEN');
2726: RAISE FND_API.G_EXC_ERROR;
2727: END IF;
2728: END IF;
2732: -- Hint: Add corresponding Master-Detail business logic here if necessary.
2733:
2734: -- Debug Message
2735: IF l_debug THEN
2736: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2737: 'Private API: Calling update table handler');
2738:
2739: END IF;
2740:
2831:
2832:
2833: -- Debug Message
2834: IF l_debug THEN
2835: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2836: 'Private API: ' || l_api_name || ' end');
2837: END IF;
2838:
2839:
2865: END IF;
2866: */
2867: EXCEPTION
2868: WHEN FND_API.G_EXC_ERROR THEN
2869: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2870: P_MODULE => l_module
2871: ,P_API_NAME => L_API_NAME
2872: ,P_PKG_NAME => G_PKG_NAME
2873: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2870: P_MODULE => l_module
2871: ,P_API_NAME => L_API_NAME
2872: ,P_PKG_NAME => G_PKG_NAME
2873: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2874: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2875: ,X_MSG_COUNT => X_MSG_COUNT
2876: ,X_MSG_DATA => X_MSG_DATA
2877: ,X_RETURN_STATUS => X_RETURN_STATUS);
2878:
2876: ,X_MSG_DATA => X_MSG_DATA
2877: ,X_RETURN_STATUS => X_RETURN_STATUS);
2878:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2881: P_MODULE => l_module
2882: ,P_API_NAME => L_API_NAME
2883: ,P_PKG_NAME => G_PKG_NAME
2884: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2881: P_MODULE => l_module
2882: ,P_API_NAME => L_API_NAME
2883: ,P_PKG_NAME => G_PKG_NAME
2884: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2885: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2886: ,X_MSG_COUNT => X_MSG_COUNT
2887: ,X_MSG_DATA => X_MSG_DATA
2888: ,X_RETURN_STATUS => X_RETURN_STATUS);
2889:
2887: ,X_MSG_DATA => X_MSG_DATA
2888: ,X_RETURN_STATUS => X_RETURN_STATUS);
2889:
2890: WHEN OTHERS THEN
2891: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2892: P_MODULE => l_module
2893: ,P_API_NAME => L_API_NAME
2894: ,P_PKG_NAME => G_PKG_NAME
2895: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2891: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2892: P_MODULE => l_module
2893: ,P_API_NAME => L_API_NAME
2894: ,P_PKG_NAME => G_PKG_NAME
2895: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2896: ,P_SQLCODE => SQLCODE
2897: ,P_SQLERRM => SQLERRM
2898: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2899: ,X_MSG_COUNT => X_MSG_COUNT
2894: ,P_PKG_NAME => G_PKG_NAME
2895: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2896: ,P_SQLCODE => SQLCODE
2897: ,P_SQLERRM => SQLERRM
2898: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2899: ,X_MSG_COUNT => X_MSG_COUNT
2900: ,X_MSG_DATA => X_MSG_DATA
2901: ,X_RETURN_STATUS => X_RETURN_STATUS);
2902: End Delete_opp_header;
2935: -- Initialize API return status to SUCCESS
2936: x_return_status := FND_API.G_RET_STS_SUCCESS;
2937:
2938: -- Calling from Create API
2939: IF(p_validation_mode = AS_UTILITY_PVT.G_CREATE)
2940: THEN
2941: IF (p_LEAD_ID is NOT NULL) and (p_LEAD_ID <> FND_API.G_MISS_NUM)
2942: THEN
2943: OPEN C_Lead_Id_Exists (p_Lead_Id);
2943: OPEN C_Lead_Id_Exists (p_Lead_Id);
2944: FETCH C_Lead_Id_Exists into l_val;
2945:
2946: IF C_Lead_Id_Exists%FOUND THEN
2947: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2948: -- 'Private API: LEAD_ID exist');
2949:
2950: AS_UTILITY_PVT.Set_Message(
2951: p_module => l_module,
2946: IF C_Lead_Id_Exists%FOUND THEN
2947: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2948: -- 'Private API: LEAD_ID exist');
2949:
2950: AS_UTILITY_PVT.Set_Message(
2951: p_module => l_module,
2952: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2953: p_msg_name => 'API_DUPLICATE_LEAD_ID',
2954: p_token1 => 'VALUE',
2960: CLOSE C_Lead_Id_Exists;
2961: END IF;
2962:
2963: -- Calling from Update API
2964: ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
2965: THEN
2966: -- validate NOT NULL column
2967: IF (p_LEAD_ID is NULL) or (p_LEAD_ID = FND_API.G_MISS_NUM)
2968: THEN
2965: THEN
2966: -- validate NOT NULL column
2967: IF (p_LEAD_ID is NULL) or (p_LEAD_ID = FND_API.G_MISS_NUM)
2968: THEN
2969: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2970: -- 'Private API: Violate NOT NULL constraint(LEAD_ID)');
2971:
2972: AS_UTILITY_PVT.Set_Message(
2973: p_module => l_module,
2968: THEN
2969: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2970: -- 'Private API: Violate NOT NULL constraint(LEAD_ID)');
2971:
2972: AS_UTILITY_PVT.Set_Message(
2973: p_module => l_module,
2974: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2975: p_msg_name => 'API_MISSING_LEAD_ID');
2976:
2980: FETCH C_Lead_Id_Exists into l_val;
2981:
2982: IF C_Lead_Id_Exists%NOTFOUND
2983: THEN
2984: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2985: -- 'Private API: LEAD_ID is not valid');
2986:
2987: AS_UTILITY_PVT.Set_Message(
2988: p_module => l_module,
2983: THEN
2984: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2985: -- 'Private API: LEAD_ID is not valid');
2986:
2987: AS_UTILITY_PVT.Set_Message(
2988: p_module => l_module,
2989: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2990: p_msg_name => 'API_INVALID_LEAD_ID',
2991: p_token1 => 'VALUE',
3040:
3041: IF(p_LEAD_NUMBER is NULL)
3042: THEN
3043: -- validate NOT NULL column
3044: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3045: -- 'Private API: Violate NOT NULL constraint(LEAD_NUMBER)');
3046:
3047: AS_UTILITY_PVT.Set_Message(
3048: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3043: -- validate NOT NULL column
3044: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3045: -- 'Private API: Violate NOT NULL constraint(LEAD_NUMBER)');
3046:
3047: AS_UTILITY_PVT.Set_Message(
3048: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3049: p_msg_name => 'API_MISSING_LEAD_NUMBER');
3050:
3051: x_return_status := FND_API.G_RET_STS_ERROR;
3050:
3051: x_return_status := FND_API.G_RET_STS_ERROR;
3052: ELSE
3053: -- Calling from Create API, LEAD_NUMBER can not be G_MISS_CHAR
3054: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3055: (p_LEAD_NUMBER = FND_API.G_MISS_CHAR)
3056: THEN
3057: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3058: -- 'Private API: missing LEAD_NUMBER');
3053: -- Calling from Create API, LEAD_NUMBER can not be G_MISS_CHAR
3054: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3055: (p_LEAD_NUMBER = FND_API.G_MISS_CHAR)
3056: THEN
3057: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3058: -- 'Private API: missing LEAD_NUMBER');
3059:
3060: AS_UTILITY_PVT.Set_Message(
3061: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3056: THEN
3057: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3058: -- 'Private API: missing LEAD_NUMBER');
3059:
3060: AS_UTILITY_PVT.Set_Message(
3061: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3062: p_msg_name => 'API_MISSING_LEAD_NUMBER');
3063:
3064: END IF;
3069: OPEN C_LEAD_NUMBER_Exists (p_LEAD_NUMBER);
3070: FETCH C_LEAD_NUMBER_Exists into l_val;
3071:
3072: IF C_LEAD_NUMBER_Exists%FOUND THEN
3073: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3074: -- 'Private API: LEAD_NUMBER exist');
3075:
3076: AS_UTILITY_PVT.Set_Message(
3077: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3072: IF C_LEAD_NUMBER_Exists%FOUND THEN
3073: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3074: -- 'Private API: LEAD_NUMBER exist');
3075:
3076: AS_UTILITY_PVT.Set_Message(
3077: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3078: p_msg_name => 'API_DUPLICATE_LEAD_NUMBER',
3079: p_token1 => 'VALUE',
3080: p_token1_value => p_LEAD_NUMBER );
3131:
3132: -- validate NOT NULL column
3133: IF(p_STATUS is NULL)
3134: THEN
3135: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3136: -- 'Private API: Violate NOT NULL constraint(STATUS)');
3137:
3138: AS_UTILITY_PVT.Set_Message(
3139: p_module => l_module,
3134: THEN
3135: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3136: -- 'Private API: Violate NOT NULL constraint(STATUS)');
3137:
3138: AS_UTILITY_PVT.Set_Message(
3139: p_module => l_module,
3140: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3141: p_msg_name => 'API_MISSING_STATUS');
3142:
3142:
3143: x_return_status := FND_API.G_RET_STS_ERROR;
3144: ELSE
3145: -- Calling from Create API, STATUS can not be G_MISS_CHAR
3146: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3147: (p_STATUS = FND_API.G_MISS_CHAR)
3148: THEN
3149: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3150: -- 'Private API: STATUS is missing');
3145: -- Calling from Create API, STATUS can not be G_MISS_CHAR
3146: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3147: (p_STATUS = FND_API.G_MISS_CHAR)
3148: THEN
3149: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3150: -- 'Private API: STATUS is missing');
3151:
3152: AS_UTILITY_PVT.Set_Message(
3153: p_module => l_module,
3148: THEN
3149: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3150: -- 'Private API: STATUS is missing');
3151:
3152: AS_UTILITY_PVT.Set_Message(
3153: p_module => l_module,
3154: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3155: p_msg_name => 'API_MISSING_STATUS');
3156:
3162: OPEN C_STATUS_Exists (p_STATUS);
3163: FETCH C_STATUS_Exists into l_val;
3164:
3165: IF C_STATUS_Exists%NOTFOUND THEN
3166: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3167: -- 'Private API: STATUS is invalid');
3168:
3169: AS_UTILITY_PVT.Set_Message(
3170: p_module => l_module,
3165: IF C_STATUS_Exists%NOTFOUND THEN
3166: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3167: -- 'Private API: STATUS is invalid');
3168:
3169: AS_UTILITY_PVT.Set_Message(
3170: p_module => l_module,
3171: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3172: p_msg_name => 'API_INVALID_OPP_STATUS',
3173: p_token1 => 'VALUE',
3219:
3220: -- Initialize API return status to SUCCESS
3221: x_return_status := FND_API.G_RET_STS_SUCCESS;
3222:
3223: IF p_validation_mode = AS_UTILITY_PVT.G_CREATE THEN
3224: OPEN C_ORG_ID_Exists (p_ORG_ID);
3225: FETCH C_ORG_ID_Exists into l_val;
3226:
3227: IF C_ORG_ID_Exists%NOTFOUND THEN
3225: FETCH C_ORG_ID_Exists into l_val;
3226:
3227: IF C_ORG_ID_Exists%NOTFOUND THEN
3228:
3229: AS_UTILITY_PVT.Set_Message(
3230: p_module => l_module,
3231: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3232: p_msg_name => 'AS_ORG_NULL_OR_INVALID');
3233:
3289: OPEN C_SALES_STAGE_ID_Exists (p_SALES_STAGE_ID);
3290: FETCH C_SALES_STAGE_ID_Exists into l_val;
3291:
3292: IF C_SALES_STAGE_ID_Exists%NOTFOUND THEN
3293: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3294: -- 'Private API: SALES_STAGE_ID is invalid');
3295:
3296: AS_UTILITY_PVT.Set_Message(
3297: p_module => l_module,
3292: IF C_SALES_STAGE_ID_Exists%NOTFOUND THEN
3293: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3294: -- 'Private API: SALES_STAGE_ID is invalid');
3295:
3296: AS_UTILITY_PVT.Set_Message(
3297: p_module => l_module,
3298: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3299: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
3300: p_token1 => 'VALUE',
3357: OPEN C_CHANNEL_CODE_Exists (p_CHANNEL_CODE);
3358: FETCH C_CHANNEL_CODE_Exists into l_val;
3359:
3360: IF C_CHANNEL_CODE_Exists%NOTFOUND THEN
3361: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3362: -- 'Private API: CHANNEL_CODE is invalid');
3363:
3364: AS_UTILITY_PVT.Set_Message(
3365: p_module => l_module,
3360: IF C_CHANNEL_CODE_Exists%NOTFOUND THEN
3361: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3362: -- 'Private API: CHANNEL_CODE is invalid');
3363:
3364: AS_UTILITY_PVT.Set_Message(
3365: p_module => l_module,
3366: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3367: p_msg_name => 'API_INVALID_CHANNEL_CODE',
3368: p_token1 => 'VALUE',
3426: OPEN C_Currency_Exists (p_CURRENCY_CODE);
3427: FETCH C_Currency_Exists into l_val;
3428:
3429: IF C_Currency_Exists%NOTFOUND THEN
3430: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3431: -- 'Private API: CURRENCY_CODE is invalid');
3432:
3433: AS_UTILITY_PVT.Set_Message(
3434: p_module => l_module,
3429: IF C_Currency_Exists%NOTFOUND THEN
3430: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3431: -- 'Private API: CURRENCY_CODE is invalid');
3432:
3433: AS_UTILITY_PVT.Set_Message(
3434: p_module => l_module,
3435: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3436: p_msg_name => 'API_INVALID_CURRENCY_CODE',
3437: p_token1 => 'VALUE',
3495: OPEN C_Win_Prob_Exists (p_WIN_PROBABILITY);
3496: FETCH C_Win_Prob_Exists into l_val;
3497:
3498: IF C_Win_Prob_Exists%NOTFOUND THEN
3499: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3500: -- 'Private API: WIN_PROBABILITY is invalid');
3501:
3502: AS_UTILITY_PVT.Set_Message(
3503: p_module => l_module,
3498: IF C_Win_Prob_Exists%NOTFOUND THEN
3499: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3500: -- 'Private API: WIN_PROBABILITY is invalid');
3501:
3502: AS_UTILITY_PVT.Set_Message(
3503: p_module => l_module,
3504: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3505: p_msg_name => 'API_INVALID_WIN_PROB',
3506: p_token1 => 'VALUE',
3561: OPEN C_CLOSE_REASON_Exists ('CLOSE_REASON', p_CLOSE_REASON);
3562: FETCH C_CLOSE_REASON_Exists into l_val;
3563:
3564: IF C_CLOSE_REASON_Exists%NOTFOUND THEN
3565: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3566: -- 'Private API: CLOSE_REASON is invalid');
3567:
3568: AS_UTILITY_PVT.Set_Message(
3569: p_module => l_module,
3564: IF C_CLOSE_REASON_Exists%NOTFOUND THEN
3565: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3566: -- 'Private API: CLOSE_REASON is invalid');
3567:
3568: AS_UTILITY_PVT.Set_Message(
3569: p_module => l_module,
3570: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3571: p_msg_name => 'API_INVALID_CLOSE_REASON',
3572: p_token1 => 'VALUE',
3623: -- Initialize API return status to SUCCESS
3624: x_return_status := FND_API.G_RET_STS_SUCCESS;
3625:
3626: IF ( p_SOURCE_PROMOTION_ID is NULL OR
3627: ( p_validation_mode = AS_UTILITY_PVT.G_CREATE AND
3628: p_SOURCE_PROMOTION_ID = FND_API.G_MISS_NUM ) ) AND
3629: nvl(l_source_code_required, 'N') = 'Y' THEN
3630: AS_UTILITY_PVT.Set_Message(
3631: p_module => l_module,
3626: IF ( p_SOURCE_PROMOTION_ID is NULL OR
3627: ( p_validation_mode = AS_UTILITY_PVT.G_CREATE AND
3628: p_SOURCE_PROMOTION_ID = FND_API.G_MISS_NUM ) ) AND
3629: nvl(l_source_code_required, 'N') = 'Y' THEN
3630: AS_UTILITY_PVT.Set_Message(
3631: p_module => l_module,
3632: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3633: p_msg_name => 'API_MISSING_SOURCE_PROM_ID');
3634:
3642: OPEN C_SOURCE_PROMOTION_ID_Exists (p_SOURCE_PROMOTION_ID);
3643: FETCH C_SOURCE_PROMOTION_ID_Exists into l_val;
3644:
3645: IF C_SOURCE_PROMOTION_ID_Exists%NOTFOUND THEN
3646: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3647: -- 'Private API: SOURCE_PROMOTION_ID is invalid');
3648:
3649: AS_UTILITY_PVT.Set_Message(
3650: p_module => l_module,
3645: IF C_SOURCE_PROMOTION_ID_Exists%NOTFOUND THEN
3646: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3647: -- 'Private API: SOURCE_PROMOTION_ID is invalid');
3648:
3649: AS_UTILITY_PVT.Set_Message(
3650: p_module => l_module,
3651: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3652: p_msg_name => 'API_INVALID_SOURCE_PROM_ID',
3653: p_token1 => 'VALUE',
3698: THEN
3699: IF (UPPER(p_NO_OPP_ALLOWED_FLAG) <> 'Y') and
3700: (UPPER(p_NO_OPP_ALLOWED_FLAG) <> 'N')
3701: THEN
3702: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3703: -- 'Private API: NO_OPP_ALLOWED_FLAG is invalid');
3704:
3705: AS_UTILITY_PVT.Set_Message(
3706: p_module => l_module,
3701: THEN
3702: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3703: -- 'Private API: NO_OPP_ALLOWED_FLAG is invalid');
3704:
3705: AS_UTILITY_PVT.Set_Message(
3706: p_module => l_module,
3707: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3708: p_msg_name => 'API_INVALID_NO_OPP_ALLOWED_FLG',
3709: p_token1 => 'VALUE',
3749: THEN
3750: IF (UPPER(p_DELETE_ALLOWED_FLAG) <> 'Y') and
3751: (UPPER(p_DELETE_ALLOWED_FLAG) <> 'N')
3752: THEN
3753: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3754: -- 'Private API: DELETE_ALLOWED_FLAG is invalid');
3755:
3756: AS_UTILITY_PVT.Set_Message(
3757: p_module => l_module,
3752: THEN
3753: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3754: -- 'Private API: DELETE_ALLOWED_FLAG is invalid');
3755:
3756: AS_UTILITY_PVT.Set_Message(
3757: p_module => l_module,
3758: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3759: p_msg_name => 'API_INVALID_DEL_ALLOWED_FLAG',
3760: p_token1 => 'VALUE',
3811: OPEN C_LEAD_SOURCE_CODE_Exists ('LEAD_SOURCE', p_LEAD_SOURCE_CODE);
3812: FETCH C_LEAD_SOURCE_CODE_Exists into l_val;
3813:
3814: IF C_LEAD_SOURCE_CODE_Exists%NOTFOUND THEN
3815: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3816: -- 'Private API: LEAD_SOURCE_CODE is invalid');
3817:
3818: AS_UTILITY_PVT.Set_Message(
3819: p_module => l_module,
3814: IF C_LEAD_SOURCE_CODE_Exists%NOTFOUND THEN
3815: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3816: -- 'Private API: LEAD_SOURCE_CODE is invalid');
3817:
3818: AS_UTILITY_PVT.Set_Message(
3819: p_module => l_module,
3820: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3821: p_msg_name => 'API_INVALID_LEAD_SOURCE_CODE',
3822: p_token1 => 'VALUE',
3877: OPEN C_Price_List_Exists (p_PRICE_LIST_ID, p_CURRENCY_CODE);
3878: FETCH C_Price_List_Exists into l_val;
3879:
3880: IF C_Price_List_Exists%NOTFOUND THEN
3881: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3882: -- 'Private API: PRICE_LIST_ID is invalid');
3883:
3884: AS_UTILITY_PVT.Set_Message(
3885: p_module => l_module,
3880: IF C_Price_List_Exists%NOTFOUND THEN
3881: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3882: -- 'Private API: PRICE_LIST_ID is invalid');
3883:
3884: AS_UTILITY_PVT.Set_Message(
3885: p_module => l_module,
3886: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3887: p_msg_name => 'API_INVALID_PRICE_LIST_ID',
3888: p_token1 => 'VALUE',
3932: (p_DELETED_FLAG <> FND_API.G_MISS_CHAR)
3933: THEN
3934: IF (p_DELETED_FLAG <> 'Y') and (p_DELETED_FLAG <> 'N')
3935: THEN
3936: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3937: -- 'Private API: DELETED_FLAG is invalid');
3938:
3939: AS_UTILITY_PVT.Set_Message(
3940: p_module => l_module,
3935: THEN
3936: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3937: -- 'Private API: DELETED_FLAG is invalid');
3938:
3939: AS_UTILITY_PVT.Set_Message(
3940: p_module => l_module,
3941: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3942: p_msg_name => 'API_INVALID_DELETED_FLAG',
3943: p_token1 => 'VALUE',
3998: p_METHODOLOGY_CODE);
3999: FETCH C_METHODOLOGY_CODE_Exists into l_val;
4000:
4001: IF C_METHODOLOGY_CODE_Exists%NOTFOUND THEN
4002: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4003: -- 'Private API: METHODOLOGY_CODE is invalid');
4004:
4005: AS_UTILITY_PVT.Set_Message(
4006: p_module => l_module,
4001: IF C_METHODOLOGY_CODE_Exists%NOTFOUND THEN
4002: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4003: -- 'Private API: METHODOLOGY_CODE is invalid');
4004:
4005: AS_UTILITY_PVT.Set_Message(
4006: p_module => l_module,
4007: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4008: p_msg_name => 'API_INVALID_METHODOLOGY_CODE',
4009: p_token1 => 'VALUE',
4062: OPEN C_ORIGINAL_LEAD_ID_Exists (p_ORIGINAL_LEAD_ID);
4063: FETCH C_ORIGINAL_LEAD_ID_Exists into l_val;
4064:
4065: IF C_ORIGINAL_LEAD_ID_Exists%NOTFOUND THEN
4066: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4067: -- 'Private API: ORIGINAL_LEAD_ID is invalid');
4068:
4069: AS_UTILITY_PVT.Set_Message(
4070: p_module => l_module,
4065: IF C_ORIGINAL_LEAD_ID_Exists%NOTFOUND THEN
4066: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4067: -- 'Private API: ORIGINAL_LEAD_ID is invalid');
4068:
4069: AS_UTILITY_PVT.Set_Message(
4070: p_module => l_module,
4071: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4072: p_msg_name => 'API_INVALID_ORIG_LEAD_ID',
4073: p_token1 => 'VALUE',
4129: p_DECISION_TIMEFRAME_CODE);
4130: FETCH C_DECN_TIMEFRAME_Exists into l_val;
4131:
4132: IF C_DECN_TIMEFRAME_Exists%NOTFOUND THEN
4133: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4134: -- 'Private API: DECISION_TIMEFRAME_CODE is invalid');
4135:
4136: AS_UTILITY_PVT.Set_Message(
4137: p_module => l_module,
4132: IF C_DECN_TIMEFRAME_Exists%NOTFOUND THEN
4133: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4134: -- 'Private API: DECISION_TIMEFRAME_CODE is invalid');
4135:
4136: AS_UTILITY_PVT.Set_Message(
4137: p_module => l_module,
4138: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4139: p_msg_name => 'API_INVALID_DCN_TIMEFRAME_CODE',
4140: p_token1 => 'VALUE',
4198: -- Initialize API return status to SUCCESS
4199: x_return_status := FND_API.G_RET_STS_SUCCESS;
4200:
4201: -- Debug Message
4202: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4203: -- 'Validate offer id');
4204:
4205: IF (p_OFFER_ID is NOT NULL) and (p_OFFER_ID <> FND_API.G_MISS_NUM)
4206: THEN
4209: FETCH C_OFFER_ID_Exists into l_val;
4210:
4211: IF C_OFFER_ID_Exists%NOTFOUND THEN
4212: IF l_debug THEN
4213: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4214: 'Private API: OFFER_ID is invalid');
4215: END IF;
4216: AS_UTILITY_PVT.Set_Message(
4217: p_module => l_module,
4212: IF l_debug THEN
4213: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4214: 'Private API: OFFER_ID is invalid');
4215: END IF;
4216: AS_UTILITY_PVT.Set_Message(
4217: p_module => l_module,
4218: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4219: p_msg_name => 'API_INVALID_ID',
4220: p_token1 => 'COLUMN',
4278: p_VEHICLE_RESPONSE_CODE);
4279: FETCH C_VEHICLE_RESPONSE_Exists into l_val;
4280:
4281: IF C_VEHICLE_RESPONSE_Exists%NOTFOUND THEN
4282: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4283: -- 'Private API: VEHICLE_RESPONSE_CODE is invalid');
4284:
4285: AS_UTILITY_PVT.Set_Message(
4286: p_module => l_module,
4281: IF C_VEHICLE_RESPONSE_Exists%NOTFOUND THEN
4282: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4283: -- 'Private API: VEHICLE_RESPONSE_CODE is invalid');
4284:
4285: AS_UTILITY_PVT.Set_Message(
4286: p_module => l_module,
4287: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4288: p_msg_name => 'API_INVALID_VEHICLE_RESP_CODE',
4289: p_token1 => 'VALUE',
4343: OPEN C_BUDGET_STATUS_Exists ('BUDGET_STATUS', p_BUDGET_STATUS_CODE);
4344: FETCH C_BUDGET_STATUS_Exists into l_val;
4345:
4346: IF C_BUDGET_STATUS_Exists%NOTFOUND THEN
4347: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4348: -- 'Private API: BUDGET_STATUS_CODE is invalid');
4349:
4350: AS_UTILITY_PVT.Set_Message(
4351: p_module => l_module,
4346: IF C_BUDGET_STATUS_Exists%NOTFOUND THEN
4347: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4348: -- 'Private API: BUDGET_STATUS_CODE is invalid');
4349:
4350: AS_UTILITY_PVT.Set_Message(
4351: p_module => l_module,
4352: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4353: p_msg_name => 'API_INVALID_BUDGET_STATUS_CODE',
4354: p_token1 => 'VALUE',
4407: OPEN C_PRM_LEAD_TYPE_Exists ('PRM_LEAD_TYPE', p_PRM_LEAD_TYPE);
4408: FETCH C_PRM_LEAD_TYPE_Exists into l_val;
4409:
4410: IF C_PRM_LEAD_TYPE_Exists%NOTFOUND THEN
4411: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4412: -- 'Private API: PRM_LEAD_TYPE is invalid');
4413:
4414: AS_UTILITY_PVT.Set_Message(
4415: p_module => l_module,
4410: IF C_PRM_LEAD_TYPE_Exists%NOTFOUND THEN
4411: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4412: -- 'Private API: PRM_LEAD_TYPE is invalid');
4413:
4414: AS_UTILITY_PVT.Set_Message(
4415: p_module => l_module,
4416: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4417: p_msg_name => 'API_INVALID_PRM_LEAD_TYPE',
4418: p_token1 => 'VALUE',
4463:
4464: -- validate NOT NULL column
4465: IF(p_CUSTOMER_ID is NULL)
4466: THEN
4467: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4468: -- 'Private API: Violate NOT NULL constraint(CUSTOMER_ID)');
4469:
4470: AS_UTILITY_PVT.Set_Message(
4471: p_module => l_module,
4466: THEN
4467: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4468: -- 'Private API: Violate NOT NULL constraint(CUSTOMER_ID)');
4469:
4470: AS_UTILITY_PVT.Set_Message(
4471: p_module => l_module,
4472: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4473: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4474:
4474:
4475: x_return_status := FND_API.G_RET_STS_ERROR;
4476: ELSE
4477: -- Check customer status in creation mode
4478: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4479: (p_CUSTOMER_ID <> FND_API.G_MISS_NUM)
4480: THEN
4481: OPEN c_customer_status(P_CUSTOMER_ID);
4482: FETCH c_customer_status into l_status;
4483: CLOSE c_customer_status;
4484: IF l_status = 'I' THEN
4485: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4486: THEN
4487: AS_UTILITY_PVT.Set_Message(
4488: p_module => l_module,
4489: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4490: p_msg_name => 'WARN_INACTIVE_CUSTOMER');
4491:
4495: END IF;
4496: END IF;
4497:
4498: -- Calling from Create APIs, customer_id can not be G_MISS_NUM
4499: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4500: (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4501: THEN
4502: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4503: -- 'Private API: CUSTOMER_ID is missing');
4498: -- Calling from Create APIs, customer_id can not be G_MISS_NUM
4499: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4500: (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4501: THEN
4502: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4503: -- 'Private API: CUSTOMER_ID is missing');
4504:
4505: AS_UTILITY_PVT.Set_Message(
4506: p_module => l_module,
4501: THEN
4502: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4503: -- 'Private API: CUSTOMER_ID is missing');
4504:
4505: AS_UTILITY_PVT.Set_Message(
4506: p_module => l_module,
4507: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4508: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4509:
4519: x_msg_count => x_msg_count,
4520: x_msg_data => x_msg_data);
4521:
4522: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4523: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4524: -- 'Private API: CUSTOMER_ID is invalid');
4525:
4526: AS_UTILITY_PVT.Set_Message(
4527: p_module => l_module,
4522: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4523: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4524: -- 'Private API: CUSTOMER_ID is invalid');
4525:
4526: AS_UTILITY_PVT.Set_Message(
4527: p_module => l_module,
4528: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4529: p_msg_name => 'API_INVALID_CUSTOMER_ID',
4530: p_token1 => 'VALUE',
4585: -- x_msg_count => x_msg_count,
4586: -- x_msg_data => x_msg_data);
4587:
4588: -- IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4589: -- -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4590: -- -- 'Private API: INC_PARTNER_PARTY_ID is invalid');
4591:
4592:
4593: OPEN C_INC_PRTN_PARTY_ID_Exist (P_INC_PARTNER_PARTY_ID);
4594: FETCH C_INC_PRTN_PARTY_ID_Exist into l_val;
4595:
4596: IF C_INC_PRTN_PARTY_ID_Exist%NOTFOUND THEN
4597:
4598: AS_UTILITY_PVT.Set_Message(
4599: p_module => l_module,
4600: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4601: p_msg_name => 'API_INVALID_INC_PTNR_PARTY_ID',
4602: p_token1 => 'VALUE',
4647: x_msg_count => x_msg_count,
4648: x_msg_data => x_msg_data);
4649:
4650: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4651: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4652: -- 'Private API: CLOSE_COMPETITOR_ID is invalid');
4653:
4654: AS_UTILITY_PVT.Set_Message(
4655: p_module => l_module,
4650: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4651: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4652: -- 'Private API: CLOSE_COMPETITOR_ID is invalid');
4653:
4654: AS_UTILITY_PVT.Set_Message(
4655: p_module => l_module,
4656: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4657: p_msg_name => 'API_INVALID_CLOSE_COMP_ID',
4658: p_token1 => 'VALUE',
4703: x_msg_count => x_msg_count,
4704: x_msg_data => x_msg_data);
4705:
4706: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4707: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4708: -- 'Private API: END_USER_CUSTOMER_ID is invalid');
4709:
4710: AS_UTILITY_PVT.Set_Message(
4711: p_module => l_module,
4706: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4707: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4708: -- 'Private API: END_USER_CUSTOMER_ID is invalid');
4709:
4710: AS_UTILITY_PVT.Set_Message(
4711: p_module => l_module,
4712: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4713: p_msg_name => 'API_INVALID_END_USER_CUST_ID',
4714: p_token1 => 'VALUE',
4755: IF (p_ADDRESS_ID is not NULL) and (p_ADDRESS_ID <> FND_API.G_MISS_NUM)
4756: THEN
4757: IF (p_CUSTOMER_ID is NULL) or (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4758: THEN
4759: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4760: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4761:
4762: AS_UTILITY_PVT.Set_Message(
4763: p_module => l_module,
4758: THEN
4759: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4760: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4761:
4762: AS_UTILITY_PVT.Set_Message(
4763: p_module => l_module,
4764: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4765: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4766:
4775: x_msg_count => x_msg_count,
4776: x_msg_data => x_msg_data);
4777:
4778: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4779: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4780: -- 'Private API: ADDRESS_ID is invalid');
4781: FND_MSG_PUB.initialize;
4782: AS_UTILITY_PVT.Set_Message(
4783: p_module => l_module,
4778: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4779: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4780: -- 'Private API: ADDRESS_ID is invalid');
4781: FND_MSG_PUB.initialize;
4782: AS_UTILITY_PVT.Set_Message(
4783: p_module => l_module,
4784: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4785: p_msg_name => 'AS_INVALID_ADDRESS_ID');
4786:
4787: END IF;
4788: END IF;
4789:
4790: ELSIF p_ADDRESS_ID = FND_API.G_MISS_NUM AND
4791: p_validation_mode = AS_UTILITY_PVT.G_UPDATE THEN
4792: NULL;
4793:
4794: ELSE -- address_id is NULL or g_miss_num in creation mode
4795: IF l_debug THEN
4792: NULL;
4793:
4794: ELSE -- address_id is NULL or g_miss_num in creation mode
4795: IF l_debug THEN
4796: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4797: 'ADDRESS_ID is not entered');
4798: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4799: FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'));
4800:
4794: ELSE -- address_id is NULL or g_miss_num in creation mode
4795: IF l_debug THEN
4796: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4797: 'ADDRESS_ID is not entered');
4798: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4799: FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'));
4800:
4801: END IF;
4802:
4803: l_check_address :=
4804: nvl(FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'),'Y');
4805: IF (l_check_address = 'Y')
4806: THEN
4807: AS_UTILITY_PVT.Set_Message(
4808: p_module => l_module,
4809: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4810: p_msg_name => 'API_MISSING_ADDRESS_ID');
4811:
4851: THEN
4852: IF (p_END_USER_CUSTOMER_ID is NULL) or
4853: (p_END_USER_CUSTOMER_ID = FND_API.G_MISS_NUM)
4854: THEN
4855: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4856: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4857:
4858: AS_UTILITY_PVT.Set_Message(
4859: p_module => l_module,
4854: THEN
4855: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4856: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4857:
4858: AS_UTILITY_PVT.Set_Message(
4859: p_module => l_module,
4860: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4861: p_msg_name => 'API_MISSING_END_USER_CUST_ID');
4862:
4871: x_msg_count => x_msg_count,
4872: x_msg_data => x_msg_data);
4873:
4874: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4875: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4876: -- 'Private API: END_USER_ADDRESS_ID is invalid');
4877:
4878: AS_UTILITY_PVT.Set_Message(
4879: p_module => l_module,
4874: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4875: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4876: -- 'Private API: END_USER_ADDRESS_ID is invalid');
4877:
4878: AS_UTILITY_PVT.Set_Message(
4879: p_module => l_module,
4880: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4881: p_msg_name => 'API_INVALID_END_USER_ADDR_ID',
4882: p_token1 => 'VALUE',
4964: OPEN VALIDATE_SALESREP (p_owner_salesforce_id);
4965: FETCH VALIDATE_SALESREP into l_val;
4966: IF VALIDATE_SALESREP%NOTFOUND THEN
4967: IF l_debug THEN
4968: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4969: 'Private API: OWNER_SALESFORCE_ID is not valid');
4970: END IF;
4971: AS_UTILITY_PVT.Set_Message(
4972: p_module => l_module,
4967: IF l_debug THEN
4968: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4969: 'Private API: OWNER_SALESFORCE_ID is not valid');
4970: END IF;
4971: AS_UTILITY_PVT.Set_Message(
4972: p_module => l_module,
4973: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4974: p_msg_name => 'API_INVALID_ID',
4975: p_token1 => 'COLUMN',
4983: OPEN VALIDATE_SALESGROUP (p_owner_sales_group_id);
4984: FETCH VALIDATE_SALESGROUP into l_val;
4985: IF VALIDATE_SALESGROUP%NOTFOUND THEN
4986: IF l_debug THEN
4987: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4988: 'Private API: OWNER_SALES_GROUP_ID is not valid');
4989: END IF;
4990: AS_UTILITY_PVT.Set_Message(
4991: p_module => l_module,
4986: IF l_debug THEN
4987: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4988: 'Private API: OWNER_SALES_GROUP_ID is not valid');
4989: END IF;
4990: AS_UTILITY_PVT.Set_Message(
4991: p_module => l_module,
4992: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4993: p_msg_name => 'API_INVALID_ID',
4994: p_token1 => 'COLUMN',
5002: OPEN VALIDATE_COMBINATION (p_owner_salesforce_id,p_owner_sales_group_id);
5003: FETCH VALIDATE_COMBINATION into l_val;
5004: IF VALIDATE_COMBINATION%NOTFOUND THEN
5005: IF l_debug THEN
5006: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
5007: 'Private API: OWNER_SALES_GROUP_ID is not valid');
5008: END IF;
5009: AS_UTILITY_PVT.Set_Message(
5010: p_module => l_module,
5005: IF l_debug THEN
5006: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
5007: 'Private API: OWNER_SALES_GROUP_ID is not valid');
5008: END IF;
5009: AS_UTILITY_PVT.Set_Message(
5010: p_module => l_module,
5011: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5012: p_msg_name => 'API_INVALID_ID',
5013: p_token1 => 'COLUMN',
5065: p_AUTO_ASSIGNMENT_TYPE);
5066: FETCH C_AUTO_ASGN_TYPE_Exists into l_val;
5067:
5068: IF C_AUTO_ASGN_TYPE_Exists%NOTFOUND THEN
5069: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5070: -- 'Private API: AUTO_ASSIGNMENT_TYPE is invalid');
5071:
5072: AS_UTILITY_PVT.Set_Message(
5073: p_module => l_module,
5068: IF C_AUTO_ASGN_TYPE_Exists%NOTFOUND THEN
5069: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5070: -- 'Private API: AUTO_ASSIGNMENT_TYPE is invalid');
5071:
5072: AS_UTILITY_PVT.Set_Message(
5073: p_module => l_module,
5074: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5075: p_msg_name => 'API_INVALID_AUTO_ASGN_TYPE',
5076: p_token1 => 'VALUE',
5128: p_PRM_ASSIGNMENT_TYPE);
5129: FETCH C_PRM_ASGN_TYPE_Exists into l_val;
5130:
5131: IF C_PRM_ASGN_TYPE_Exists%NOTFOUND THEN
5132: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5133: -- 'Private API: PRM_ASSIGNMENT_TYPE is invalid');
5134:
5135: AS_UTILITY_PVT.Set_Message(
5136: p_module => l_module,
5131: IF C_PRM_ASGN_TYPE_Exists%NOTFOUND THEN
5132: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5133: -- 'Private API: PRM_ASSIGNMENT_TYPE is invalid');
5134:
5135: AS_UTILITY_PVT.Set_Message(
5136: p_module => l_module,
5137: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5138: p_msg_name => 'API_INVALID_PRM_ASGN_TYPE',
5139: p_token1 => 'VALUE',
5190: OPEN C_RESOURCE_ID_Exists (p_INC_PARTNER_RESOURCE_ID);
5191: FETCH C_RESOURCE_ID_Exists into l_val;
5192:
5193: IF C_RESOURCE_ID_Exists%NOTFOUND THEN
5194: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5195: -- 'Private API: INC_PARTNER_RESOURCE_ID is invalid');
5196:
5197: AS_UTILITY_PVT.Set_Message(
5198: p_module => l_module,
5193: IF C_RESOURCE_ID_Exists%NOTFOUND THEN
5194: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5195: -- 'Private API: INC_PARTNER_RESOURCE_ID is invalid');
5196:
5197: AS_UTILITY_PVT.Set_Message(
5198: p_module => l_module,
5199: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5200: p_msg_name => 'API_INVALID_INC_PRTN_RS_ID',
5201: p_token1 => 'VALUE',
5255: p_PRM_IND_CLASSIFICATION_CODE);
5256: FETCH C_PRM_IND_CLS_CODE_Exists into l_val;
5257:
5258: IF C_PRM_IND_CLS_CODE_Exists%NOTFOUND THEN
5259: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5260: -- 'Private API: PRM_IND_CLASSIFICATION_CODE is invalid');
5261:
5262: AS_UTILITY_PVT.Set_Message(
5263: p_module => l_module,
5258: IF C_PRM_IND_CLS_CODE_Exists%NOTFOUND THEN
5259: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5260: -- 'Private API: PRM_IND_CLASSIFICATION_CODE is invalid');
5261:
5262: AS_UTILITY_PVT.Set_Message(
5263: p_module => l_module,
5264: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5265: p_msg_name => 'API_INVALID_PRM_IND_CLS_CODE',
5266: p_token1 => 'VALUE',
5307: THEN
5308: IF (UPPER(p_PRM_EXEC_SPONSOR_FLAG) <> 'Y') and
5309: (UPPER(p_PRM_EXEC_SPONSOR_FLAG) <> 'N')
5310: THEN
5311: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5312: -- 'Private API: PRM_EXEC_SPONSOR_FLAG is invalid');
5313:
5314: AS_UTILITY_PVT.Set_Message(
5315: p_module => l_module,
5310: THEN
5311: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5312: -- 'Private API: PRM_EXEC_SPONSOR_FLAG is invalid');
5313:
5314: AS_UTILITY_PVT.Set_Message(
5315: p_module => l_module,
5316: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5317: p_msg_name => 'API_INVALID_PRM_EXEC_SPNR_FLAG',
5318: p_token1 => 'VALUE',
5357: THEN
5358: IF (UPPER(p_PRM_PRJ_LEAD_IN_PLACE_FLAG) <> 'Y') and
5359: (UPPER(p_PRM_PRJ_LEAD_IN_PLACE_FLAG) <> 'N')
5360: THEN
5361: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5362: -- 'Private API: PRM_PRJ_LEAD_IN_PLACE_FLAG is invalid');
5363:
5364: AS_UTILITY_PVT.Set_Message(
5365: p_module => l_module,
5360: THEN
5361: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5362: -- 'Private API: PRM_PRJ_LEAD_IN_PLACE_FLAG is invalid');
5363:
5364: AS_UTILITY_PVT.Set_Message(
5365: p_module => l_module,
5366: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5367: p_msg_name => 'API_INVALID_PRM_PRJ_LDINPL_FLG',
5368: p_token1 => 'VALUE',
5407:
5408: -- validate NOT NULL column
5409: IF(p_Description is NULL)
5410: THEN
5411: AS_UTILITY_PVT.Set_Message(
5412: p_module => l_module,
5413: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5414: p_msg_name => 'API_MISSING_DESCRIPTION');
5415:
5446: IF (UPPER(p_FREEZE_FLAG) <> 'Y') and
5447: (UPPER(p_FREEZE_FLAG) <> 'N')
5448: THEN
5449:
5450: AS_UTILITY_PVT.Set_Message(
5451: p_module => l_module,
5452: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5453: p_msg_name => 'API_INVALID_FREEZE_FLAG',
5454: p_token1 => 'VALUE',
5529: OPEN c_Win_Prob_Limit (p_SALES_METHODOLOGY_ID, p_SALES_STAGE_ID);
5530: FETCH c_Win_Prob_Limit into l_min_winprob, l_max_winprob;
5531:
5532: IF c_Win_Prob_Limit%NOTFOUND THEN
5533: AS_UTILITY_PVT.Set_Message(
5534: p_module => l_module,
5535: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5536: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
5537: p_token1 => 'VALUE',
5552: --FND_MESSAGE.Set_Name('AS', 'API_WARN_PROB_SS_LINK');
5553: --FND_MSG_PUB.ADD;
5554: --FND_MSG_PUB.G_MSG_LVL_ERROR
5555:
5556: --AS_UTILITY_PVT.Set_Message(
5557: --p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5558: --p_msg_name => 'API_WARN_PROB_SS_LINK');
5559:
5560: l_warning_msg := FND_MESSAGE.GET_STRING('AS','API_WARN_PROB_SS_LINK');
5569: THEN
5570: -- FND_MESSAGE.Set_Name('AS', 'API_ERROR_PROB_SS_LINK');
5571: -- FND_MSG_PUB.ADD;
5572:
5573: AS_UTILITY_PVT.Set_Message(
5574: p_module => l_module,
5575: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5576: p_msg_name => 'API_ERROR_PROB_SS_LINK');
5577:
5596: OPEN C_Get_Stage_Info (p_SALES_STAGE_ID);
5597: FETCH C_Get_Stage_Info into l_min_winprob, l_max_winprob;
5598:
5599: IF C_Get_Stage_Info%NOTFOUND THEN
5600: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5601: -- 'Private API: SALES_STAGE_ID is invalid');
5602:
5603: AS_UTILITY_PVT.Set_Message(
5604: p_module => l_module,
5599: IF C_Get_Stage_Info%NOTFOUND THEN
5600: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5601: -- 'Private API: SALES_STAGE_ID is invalid');
5602:
5603: AS_UTILITY_PVT.Set_Message(
5604: p_module => l_module,
5605: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5606: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
5607: p_token1 => 'VALUE',
5619: THEN
5620: --FND_MESSAGE.Set_Name('AS', 'API_WARN_PROB_SS_LINK');
5621: --FND_MSG_PUB.ADD;
5622:
5623: --AS_UTILITY_PVT.Set_Message(
5624: --p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5625: --p_msg_name => 'API_WARN_PROB_SS_LINK');
5626: l_warning_msg := FND_MESSAGE.GET_STRING('AS','API_WARN_PROB_SS_LINK');
5627: -- x_return_status := FND_API.G_RET_STS_ERROR;
5635: THEN
5636: -- FND_MESSAGE.Set_Name('AS', 'API_ERROR_PROB_SS_LINK');
5637: -- FND_MSG_PUB.ADD;
5638:
5639: AS_UTILITY_PVT.Set_Message(
5640: p_module => l_module,
5641: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5642: p_msg_name => 'API_ERROR_PROB_SS_LINK');
5643:
5706: OPEN C_Get_OppOpenStatusFlag (p_STATUS);
5707: FETCH C_Get_OppOpenStatusFlag into l_val;
5708:
5709: IF C_Get_OppOpenStatusFlag%NOTFOUND THEN
5710: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5711: -- 'Private API: STATUS is invalid');
5712:
5713: AS_UTILITY_PVT.Set_Message(
5714: p_module => l_module,
5709: IF C_Get_OppOpenStatusFlag%NOTFOUND THEN
5710: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5711: -- 'Private API: STATUS is invalid');
5712:
5713: AS_UTILITY_PVT.Set_Message(
5714: p_module => l_module,
5715: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5716: p_msg_name => 'API_INVALID_OPP_STATUS',
5717: p_token1 => 'VALUE',
5722: -- If opp_open_status_flag = 'N' (closed status),
5723: -- then close_reason should exist
5724: ELSIF l_val = 'N'
5725: THEN
5726: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5727: -- 'Private API: CLOSE_REASON is missing');
5728:
5729: AS_UTILITY_PVT.Set_Message(
5730: p_module => l_module,
5725: THEN
5726: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5727: -- 'Private API: CLOSE_REASON is missing');
5728:
5729: AS_UTILITY_PVT.Set_Message(
5730: p_module => l_module,
5731: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5732: p_msg_name => 'API_MISSING_CLOSE_REASON');
5733:
5781: l_max_date := TRUNC(SYSDATE)+ to_number(FND_PROFILE.value('AS_MAX_DAY_CLOSE_OPPORTUNITY'));
5782: IF TRUNC(P_DECISION_DATE) > l_max_date THEN
5783: --DBMS_OUTPUT.PUT_LINE('rAISE ERROR');
5784: x_return_status := FND_API.G_RET_STS_ERROR;
5785: AS_UTILITY_PVT.Set_Message(
5786: p_module => l_module,
5787: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5788: p_msg_name => 'AS_CLOSE_DATE_VALIDATION',
5789: p_token1 => 'DATE',
5801: EXCEPTION
5802: WHEN VALUE_ERROR THEN
5803: --DBMS_OUTPUT.PUT_LINE('In VALUE_ERROR exception');
5804: x_return_status := FND_API.G_RET_STS_ERROR;
5805: AS_UTILITY_PVT.Set_Message(
5806: p_module => l_module,
5807: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5808: p_msg_name => 'AS_MAX_DAY_ERROR');
5809:
5842: THEN
5843: IF (p_CURRENCY_CODE is NULL) or
5844: (p_CURRENCY_CODE = FND_API.G_MISS_CHAR)
5845: THEN
5846: AS_UTILITY_PVT.Set_Message(
5847: p_module => l_module,
5848: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5849: p_msg_name => 'API_MISSING_CURRENCY_CODE');
5850:
5882: BEGIN
5883:
5884: -- Debug Message
5885: IF l_debug THEN
5886: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5887: 'Private API: ' || l_api_name || ' start');
5888: END IF;
5889:
5890:
5906: -- Calling item level validation procedures
5907: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
5908: THEN
5909: IF l_debug THEN
5910: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5911: 'Validate_LEAD_ID');
5912: END IF;
5913:
5914: Validate_LEAD_ID(
5925:
5926:
5927:
5928: IF l_debug THEN
5929: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5930: 'Validate_STATUS');
5931: END IF;
5932:
5933: Validate_STATUS(
5942: raise FND_API.G_EXC_ERROR;
5943: END IF;
5944:
5945: IF l_debug THEN
5946: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5947: 'Validate_SALES_STAGE_ID');
5948: END IF;
5949:
5950: Validate_SALES_STAGE_ID(
5959: raise FND_API.G_EXC_ERROR;
5960: END IF;
5961:
5962: IF l_debug THEN
5963: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Validate_CHANNEL_CODE');
5964: END IF;
5965:
5966: Validate_CHANNEL_CODE(
5967: p_init_msg_list => FND_API.G_FALSE,
5975: raise FND_API.G_EXC_ERROR;
5976: END IF;
5977:
5978: IF l_debug THEN
5979: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Validate_CURRENCY_CODE');
5980: END IF;
5981:
5982: Validate_CURRENCY_CODE(
5983: p_init_msg_list => FND_API.G_FALSE,
5991: raise FND_API.G_EXC_ERROR;
5992: END IF;
5993:
5994: IF l_debug THEN
5995: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5996: 'Validate_DecisionDate');
5997: END IF;
5998: Validate_DecisionDate(
5999: p_init_msg_list => FND_API.G_FALSE,
6007: raise FND_API.G_EXC_ERROR;
6008: END IF;
6009:
6010: IF l_debug THEN
6011: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6012: 'Validate_BudgetAmt_Currency');
6013:
6014: END IF;
6015:
6013:
6014: END IF;
6015:
6016: IF l_debug THEN
6017: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6018: 'Validate_WIN_PROBABILITY');
6019:
6020: END IF;
6021:
6031: raise FND_API.G_EXC_ERROR;
6032: END IF;
6033:
6034: IF l_debug THEN
6035: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6036: 'Validate_CLOSE_REASON');
6037: END IF;
6038:
6039: Validate_CLOSE_REASON(
6048: raise FND_API.G_EXC_ERROR;
6049: END IF;
6050:
6051: IF l_debug THEN
6052: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6053: 'Validate_SOURCE_PROMOTION_ID');
6054: END IF;
6055:
6056: Validate_SOURCE_PROMOTION_ID(
6065: raise FND_API.G_EXC_ERROR;
6066: END IF;
6067:
6068: IF l_debug THEN
6069: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6070: 'Validate_NO_OPP_ALLOWED_FLAG');
6071: END IF;
6072:
6073: Validate_NO_OPP_ALLOWED_FLAG(
6082: raise FND_API.G_EXC_ERROR;
6083: END IF;
6084:
6085: IF l_debug THEN
6086: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6087: 'Validate_DELETE_ALLOWED_FLAG');
6088: END IF;
6089:
6090: Validate_DELETE_ALLOWED_FLAG(
6099: raise FND_API.G_EXC_ERROR;
6100: END IF;
6101:
6102: IF l_debug THEN
6103: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6104: 'Validate_LEAD_SOURCE_CODE');
6105: END IF;
6106:
6107: Validate_LEAD_SOURCE_CODE(
6116: raise FND_API.G_EXC_ERROR;
6117: END IF;
6118:
6119: IF l_debug THEN
6120: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6121: 'Validate_PRICE_LIST_ID');
6122: END IF;
6123:
6124: Validate_PRICE_LIST_ID(
6134: raise FND_API.G_EXC_ERROR;
6135: END IF;
6136:
6137: IF l_debug THEN
6138: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6139: 'Validate_DELETED_FLAG');
6140: END IF;
6141:
6142: Validate_DELETED_FLAG(
6151: raise FND_API.G_EXC_ERROR;
6152: END IF;
6153:
6154: IF l_debug THEN
6155: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6156: 'Validate_METHODOLOGY_CODE');
6157: END IF;
6158:
6159: Validate_METHODOLOGY_CODE(
6168: raise FND_API.G_EXC_ERROR;
6169: END IF;
6170:
6171: IF l_debug THEN
6172: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6173: 'Validate_ORIGINAL_LEAD_ID');
6174: END IF;
6175:
6176: Validate_ORIGINAL_LEAD_ID(
6185: raise FND_API.G_EXC_ERROR;
6186: END IF;
6187:
6188: IF l_debug THEN
6189: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6190: 'Validate_DECN_TIMEFRAME_CODE');
6191: END IF;
6192:
6193: Validate_DECN_TIMEFRAME_CODE(
6203: raise FND_API.G_EXC_ERROR;
6204: END IF;
6205:
6206: IF l_debug THEN
6207: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6208: 'Validate_OFFER_ID');
6209: END IF;
6210:
6211: Validate_OFFER_ID(
6221: raise FND_API.G_EXC_ERROR;
6222: END IF;
6223:
6224: IF l_debug THEN
6225: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6226: 'Validate_VEHICLE_RESPONSE_CODE');
6227: END IF;
6228:
6229: Validate_VEHICLE_RESPONSE_CODE(
6238: raise FND_API.G_EXC_ERROR;
6239: END IF;
6240:
6241: IF l_debug THEN
6242: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6243: 'Validate_BUDGET_STATUS_CODE');
6244: END IF;
6245:
6246: Validate_BUDGET_STATUS_CODE(
6255: raise FND_API.G_EXC_ERROR;
6256: END IF;
6257:
6258: IF l_debug THEN
6259: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6260: 'Validate_PRM_LEAD_TYPE');
6261: END IF;
6262:
6263: Validate_PRM_LEAD_TYPE(
6272: raise FND_API.G_EXC_ERROR;
6273: END IF;
6274:
6275: IF l_debug THEN
6276: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6277: 'Validate_CUSTOMER_ID');
6278: END IF;
6279:
6280: Validate_CUSTOMER_ID(
6289: raise FND_API.G_EXC_ERROR;
6290: END IF;
6291:
6292: IF l_debug THEN
6293: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6294: 'Validate_INC_PARTNER_PARTY_ID');
6295: END IF;
6296:
6297: Validate_INC_PARTNER_PARTY_ID(
6307: raise FND_API.G_EXC_ERROR;
6308: END IF;
6309:
6310: IF l_debug THEN
6311: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6312: 'Validate_CLOSE_COMPETITOR_ID');
6313: END IF;
6314:
6315: Validate_CLOSE_COMPETITOR_ID(
6324: raise FND_API.G_EXC_ERROR;
6325: END IF;
6326:
6327: IF l_debug THEN
6328: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6329: 'Validate_END_USER_CUSTOMER_ID');
6330: END IF;
6331:
6332: Validate_END_USER_CUSTOMER_ID(
6341: raise FND_API.G_EXC_ERROR;
6342: END IF;
6343:
6344: IF l_debug THEN
6345: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6346: 'Validate_ADDRESS_ID');
6347: END IF;
6348:
6349: Validate_ADDRESS_ID(
6359: raise FND_API.G_EXC_ERROR;
6360: END IF;
6361:
6362: IF l_debug THEN
6363: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6364: 'Validate_END_USER_ADDRESS_ID');
6365: END IF;
6366:
6367: Validate_END_USER_ADDRESS_ID(
6377: raise FND_API.G_EXC_ERROR;
6378: END IF;
6379:
6380: IF l_debug THEN
6381: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6382: 'Validate_AUTO_ASGN_TYPE');
6383: END IF;
6384:
6385: Validate_AUTO_ASGN_TYPE(
6394: raise FND_API.G_EXC_ERROR;
6395: END IF;
6396:
6397: IF l_debug THEN
6398: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6399: 'Validate_PRM_ASGN_TYPE');
6400: END IF;
6401:
6402: Validate_PRM_ASGN_TYPE(
6411: raise FND_API.G_EXC_ERROR;
6412: END IF;
6413:
6414: IF l_debug THEN
6415: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6416: 'Validate_INC_PRTNR_RESOURCE_ID');
6417: END IF;
6418:
6419: Validate_INC_PRTNR_RESOURCE_ID(
6429: raise FND_API.G_EXC_ERROR;
6430: END IF;
6431:
6432: IF l_debug THEN
6433: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6434: 'Validate_PRM_IND_CLS_CODE');
6435: END IF;
6436:
6437: Validate_PRM_IND_CLS_CODE(
6447: raise FND_API.G_EXC_ERROR;
6448: END IF;
6449:
6450: IF l_debug THEN
6451: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6452: 'Validate_PRM_EXEC_SPONSOR_FLAG');
6453: END IF;
6454:
6455: Validate_PRM_EXEC_SPONSOR_FLAG(
6464: raise FND_API.G_EXC_ERROR;
6465: END IF;
6466:
6467: IF l_debug THEN
6468: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6469: 'Validate_PRM_PRJ_LDINPLE_FLAG');
6470: END IF;
6471:
6472: Validate_PRM_PRJ_LDINPLE_FLAG(
6483: END IF;
6484:
6485: -- 091200 ffang, for bug 1402449
6486: IF l_debug THEN
6487: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6488: 'Validate_DESCRIPTION');
6489: END IF;
6490:
6491: Validate_DESCRIPTION(
6502: -- end 091200 ffang
6503:
6504: -- solin, for bug 1554330
6505: IF l_debug THEN
6506: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6507: 'Validate_FREEZE_FLAG');
6508: END IF;
6509:
6510: Validate_FREEZE_FLAG(
6544: -- Calling record level validation procedures
6545: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_RECORD)
6546: THEN
6547: IF l_debug THEN
6548: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6549: 'Validate_WinPorb_StageID');
6550: END IF;
6551:
6552: Validate_WinPorb_StageID(
6567: l_Win_prob_warning_msg := x_msg_data;
6568: END IF;
6569:
6570: IF l_debug THEN
6571: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6572: 'Validate_Status_CloseReason');
6573: END IF;
6574:
6575: Validate_Status_CloseReason(
6614:
6615:
6616: -- Debug Message
6617: IF l_debug THEN
6618: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6619: 'Private API: ' || l_api_name || ' end');
6620:
6621: END IF;
6622: