[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:
1121: END IF;
1122:
1123: -- Debug Message
1124: IF l_debug THEN
1125: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1126: 'Calling Create_SalesTeam');
1127: END IF;
1128:
1129: AS_ACCESS_PUB.Create_SalesTeam (
1144: );
1145:
1146: -- Debug Message
1147: IF l_debug THEN
1148: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1149: 'Create_SalesTeam:l_access_id = ' || l_access_id);
1150: END IF;
1151:
1152:
1177: l_is_owner := 'Y';
1178:
1179: -- Debug Message
1180: IF l_debug THEN
1181: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1182: 'Calling Create_SalesTeam for owner');
1183: END IF;
1184:
1185: AS_ACCESS_PUB.Create_SalesTeam (
1200: );
1201:
1202: -- Debug Message
1203: IF l_debug THEN
1204: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Create_Owner_ST:l_access_id = ' || l_access_id);
1205: END IF;
1206:
1207:
1208:
1218:
1219: -- Assign/Reassign the territory resources for the opportunity
1220: -- Debug Message
1221: IF l_debug THEN
1222: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Opportunity Real Time API');
1223: END IF;
1224:
1225:
1226: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1234: );
1235:
1236: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1237: IF l_debug THEN
1238: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Opportunity Real Time API fail');
1239: END IF;
1240: RAISE FND_API.G_EXC_ERROR;
1241: END IF;
1242:
1242:
1243:
1244: -- Debug Message
1245: IF l_debug THEN
1246: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Recreate_tasks');
1247: END IF;
1248:
1249: Recreate_tasks(
1250: p_LEAD_ID => l_lead_id,
1259: X_Warning_Message => l_warning_msg );
1260:
1261: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1262: IF l_debug THEN
1263: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Recreate_tasks fail');
1264: END IF;
1265:
1266: RAISE FND_API.G_EXC_ERROR;
1267: END IF;
1290: X_Msg_Data => x_msg_data);
1291:
1292: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1293: IF l_debug THEN
1294: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Create lead competitor fail');
1295: END IF;
1296:
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;
1310: x_return_status => x_return_status);
1311:
1312: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1313: IF l_debug THEN
1314: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Update competitor Products fail');
1315: END IF;
1316: RAISE FND_API.G_EXC_ERROR;
1317: END IF;
1318:
1331:
1332:
1333: -- Debug Message
1334: IF l_debug THEN
1335: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: ' || l_api_name || ' end');
1336: END IF;
1337:
1338:
1339:
1370: END IF;
1371: */
1372: EXCEPTION
1373: WHEN FND_API.G_EXC_ERROR THEN
1374: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1375: P_MODULE => l_module
1376: ,P_API_NAME => L_API_NAME
1377: ,P_PKG_NAME => G_PKG_NAME
1378: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1375: P_MODULE => l_module
1376: ,P_API_NAME => L_API_NAME
1377: ,P_PKG_NAME => G_PKG_NAME
1378: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1379: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1380: ,X_MSG_COUNT => X_MSG_COUNT
1381: ,X_MSG_DATA => X_MSG_DATA
1382: ,X_RETURN_STATUS => X_RETURN_STATUS);
1383:
1381: ,X_MSG_DATA => X_MSG_DATA
1382: ,X_RETURN_STATUS => X_RETURN_STATUS);
1383:
1384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1385: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1386: P_MODULE => l_module
1387: ,P_API_NAME => L_API_NAME
1388: ,P_PKG_NAME => G_PKG_NAME
1389: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1386: P_MODULE => l_module
1387: ,P_API_NAME => L_API_NAME
1388: ,P_PKG_NAME => G_PKG_NAME
1389: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1390: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1391: ,X_MSG_COUNT => X_MSG_COUNT
1392: ,X_MSG_DATA => X_MSG_DATA
1393: ,X_RETURN_STATUS => X_RETURN_STATUS);
1394:
1392: ,X_MSG_DATA => X_MSG_DATA
1393: ,X_RETURN_STATUS => X_RETURN_STATUS);
1394:
1395: WHEN OTHERS THEN
1396: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1397: P_MODULE => l_module
1398: ,P_API_NAME => L_API_NAME
1399: ,P_PKG_NAME => G_PKG_NAME
1400: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1396: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1397: P_MODULE => l_module
1398: ,P_API_NAME => L_API_NAME
1399: ,P_PKG_NAME => G_PKG_NAME
1400: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1401: ,P_SQLCODE => SQLCODE
1402: ,P_SQLERRM => SQLERRM
1403: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1404: ,X_MSG_COUNT => X_MSG_COUNT
1399: ,P_PKG_NAME => G_PKG_NAME
1400: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1401: ,P_SQLCODE => SQLCODE
1402: ,P_SQLERRM => SQLERRM
1403: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1404: ,X_MSG_COUNT => X_MSG_COUNT
1405: ,X_MSG_DATA => X_MSG_DATA
1406: ,X_RETURN_STATUS => X_RETURN_STATUS);
1407: End Create_opp_header;
1552:
1553:
1554: -- Debug Message
1555: IF l_debug THEN
1556: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: ' || l_api_name || ' start');
1557: END IF;
1558:
1559:
1560: -- Initialize API return status to SUCCESS
1602: END IF;
1603:
1604: -- Debug Message
1605: IF l_debug THEN
1606: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
1607: END IF;
1608:
1609:
1610: Open C_Get_opp_header( l_Header_rec.LEAD_ID);
1621:
1622: -- If deleted_flag is 'Y', this opportunity header has been soft deleted.
1623: IF (UPPER(l_deleted_flag) = 'Y')
1624: THEN
1625: AS_UTILITY_PVT.Set_Message(
1626: p_module => l_module,
1627: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1628: p_msg_name => 'API_DELETED_OPP_HEADER');
1629:
1635: IF l_freeze_flag = 'Y'
1636: THEN
1637: l_allow_flag := NVL(FND_PROFILE.VALUE('AS_ALLOW_UPDATE_FROZEN_OPP'),'Y');
1638: IF l_allow_flag <> 'Y' THEN
1639: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
1640: 'API_OPP_FROZEN');
1641: RAISE FND_API.G_EXC_ERROR;
1642: END IF;
1643: END IF;
1650: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
1651: -- FND_MESSAGE.Set_Token ('INFO', 'opp_header', FALSE);
1652: -- FND_MSG_PUB.Add;
1653:
1654: AS_UTILITY_PVT.Set_Message(
1655: p_module => l_module,
1656: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1657: p_msg_name => 'API_MISSING_OPP_HEADER_UPDATE');
1658:
1661: END IF;
1662:
1663: -- Debug Message
1664: IF l_debug THEN
1665: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
1666: END IF;
1667: close C_Get_opp_header;
1668:
1669: If (l_Header_rec.last_update_date is NULL or
1673: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1674: -- FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
1675: -- FND_MSG_PUB.ADD;
1676:
1677: AS_UTILITY_PVT.Set_Message(
1678: p_module => l_module,
1679: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1680: p_msg_name => 'API_MISSING_LAST_UPDATE_DATE');
1681:
1689: -- FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1690: -- FND_MESSAGE.Set_Token('INFO', 'opp_header', FALSE);
1691: -- FND_MSG_PUB.ADD;
1692:
1693: AS_UTILITY_PVT.Set_Message(
1694: p_module => l_module,
1695: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1696: p_msg_name => 'API_OPP_HEADER_CHANGED');
1697:
1712: (l_Header_Rec.auto_assignment_type IS NULL) or --ffang 091500 for B1407007
1713: (l_Header_Rec.prm_assignment_type IS NULL) --ffang 091500 for B1407007
1714: THEN
1715: IF l_debug THEN
1716: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Set_opp_default_values');
1717: END IF;
1718:
1719: l_header_rec1 := l_header_rec;
1720: Set_opp_default_values(
1717: END IF;
1718:
1719: l_header_rec1 := l_header_rec;
1720: Set_opp_default_values(
1721: p_mode => AS_UTILITY_PVT.G_UPDATE,
1722: p_opp_rec => l_Header_Rec1,
1723: x_opp_rec => l_Header_Rec );
1724:
1725: End If;
1735: END IF;
1736:
1737: -- Debug message
1738: IF l_debug THEN
1739: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_opp_header');
1740: END IF;
1741:
1742:
1743: -- Invoke validation procedures
1743: -- Invoke validation procedures
1744: Validate_opp_header(
1745: p_init_msg_list => FND_API.G_FALSE,
1746: p_validation_level => p_validation_level,
1747: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
1748: P_Header_Rec => l_Header_Rec,
1749: x_return_status => x_return_status,
1750: x_msg_count => x_msg_count,
1751: x_msg_data => x_msg_data);
1779:
1780: IF nvl(l_comp_required, 'N') = 'Y' THEN
1781: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1782: THEN
1783: AS_UTILITY_PVT.Set_Message(
1784: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1785: p_msg_name => 'API_CLOSE_COMPETITOR_REQUIRED');
1786: END IF;
1787: raise FND_API.G_EXC_ERROR;
1818: x_msg_data => x_msg_data,
1819: x_update_access_flag => l_access_flag);
1820:
1821: IF l_access_flag <> 'Y' THEN
1822: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
1823: 'API_NO_UPDATE_PRIVILEGE');
1824: RAISE FND_API.G_EXC_ERROR;
1825: END IF;
1826:
1858: (l_header_rec.win_probability <> l_win_prob)
1859: THEN
1860: -- Debug message
1861: IF l_debug THEN
1862: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Create notes');
1863: END IF;
1864:
1865: IF (l_header_rec.lead_number is NOT NULL) and
1866: (l_header_rec.lead_number <> FND_API.G_MISS_CHAR)
1885: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1886: RAISE FND_API.G_EXC_ERROR;
1887: ELSE
1888: IF l_debug THEN
1889: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Notes created. note_id=' || l_note_id);
1890: END IF;
1891: END IF;
1892: END IF;
1893: END IF;
1927: END IF;
1928:
1929: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1930: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1931: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_oppOwnerAccess fail');
1932: END IF;
1933: RAISE FND_API.G_EXC_ERROR;
1934: END IF;
1935: END IF;
1939: -- Hint: Add corresponding Master-Detail business logic here if necessary.
1940:
1941: -- Debug Message
1942: IF l_debug THEN
1943: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1944: 'Private API: Calling update table handler');
1945:
1946: END IF;
1947:
2151:
2152: -- Reset the owner in the sales team
2153: -- Debug Message
2154: IF l_debug THEN
2155: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2156: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2157: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2158: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2159:
2153: -- Debug Message
2154: IF l_debug THEN
2155: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2156: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2157: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2158: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2159:
2160: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2161: 'l_owner_sf_id: '||l_owner_salesforce_id );
2156: 'owner_sf_id: '||l_header_rec.owner_salesforce_id );
2157: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2158: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2159:
2160: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2161: 'l_owner_sf_id: '||l_owner_salesforce_id );
2162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2163: 'l_owner_sg_id: '||l_owner_sales_group_id );
2164: END IF;
2158: 'owner_sg_id: '||l_header_rec.owner_sales_group_id );
2159:
2160: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2161: 'l_owner_sf_id: '||l_owner_salesforce_id );
2162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2163: 'l_owner_sg_id: '||l_owner_sales_group_id );
2164: END IF;
2165:
2166:
2214: CLOSE get_person_id_csr;
2215:
2216: -- Debug Message
2217: IF l_debug THEN
2218: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2219: 'Calling Create_SalesTeam');
2220:
2221: END IF;
2222:
2238: );
2239:
2240: -- Debug Message
2241: IF l_debug THEN
2242: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2243: 'Create_owner_ST :l_access_id = ' || l_access_id);
2244: END IF;
2245:
2246:
2269: -- Assign/Reassign the territory resources for the opportunity
2270:
2271: -- Debug Message
2272: IF l_debug THEN
2273: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Opportunity Real Time API');
2274: END IF;
2275:
2276: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
2277: P_Api_Version_Number => 1.0,
2284: );
2285:
2286: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2287: IF l_debug THEN
2288: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Opportunity Real Time API fail');
2289: END IF;
2290: RAISE FND_API.G_EXC_ERROR;
2291: END IF;
2292:
2292:
2293:
2294: -- Debug Message
2295: IF l_debug THEN
2296: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Calling Recreate_tasks');
2297: END IF;
2298:
2299:
2300: l_new_SALES_METHODOLOGY_ID := l_header_rec.SALES_METHODOLOGY_ID;
2310: IF l_old_sales_methodology_id IS NOT NULL AND
2311: nvl(l_new_SALES_METHODOLOGY_ID, -99) <> l_old_sales_methodology_id THEN
2312:
2313: IF l_debug THEN
2314: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2315: 'Should not change Sales methodology');
2316: END IF;
2317:
2318: AS_UTILITY_PVT.Set_Message(
2314: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2315: 'Should not change Sales methodology');
2316: END IF;
2317:
2318: AS_UTILITY_PVT.Set_Message(
2319: p_module => l_module,
2320: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2321: p_msg_name => 'API_NO_UPDATE_SALES_METHODOLOGY');
2322:
2337: X_Warning_Message => l_warning_msg );
2338:
2339: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2340: IF l_debug THEN
2341: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2342: 'Recreate_tasks fail');
2343: END IF;
2344:
2345: RAISE FND_API.G_EXC_ERROR;
2367: X_Msg_Data => x_msg_data);
2368:
2369: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2370: IF l_debug THEN
2371: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2372: 'Create lead competitor fail');
2373: END IF;
2374:
2375: RAISE FND_API.G_EXC_ERROR;
2389: x_return_status => x_return_status);
2390:
2391: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2392: IF l_debug THEN
2393: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2394: 'Update competitor Products fail');
2395: END IF;
2396: RAISE FND_API.G_EXC_ERROR;
2397: END IF;
2411:
2412:
2413: -- Debug Message
2414: IF l_debug THEN
2415: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2416: 'Private API: ' || l_api_name || ' end');
2417: END IF;
2418:
2419:
2449: END IF;
2450: */
2451: EXCEPTION
2452: WHEN FND_API.G_EXC_ERROR THEN
2453: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2454: P_MODULE => l_module
2455: ,P_API_NAME => L_API_NAME
2456: ,P_PKG_NAME => G_PKG_NAME
2457: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2454: P_MODULE => l_module
2455: ,P_API_NAME => L_API_NAME
2456: ,P_PKG_NAME => G_PKG_NAME
2457: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2458: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2459: ,X_MSG_COUNT => X_MSG_COUNT
2460: ,X_MSG_DATA => X_MSG_DATA
2461: ,X_RETURN_STATUS => X_RETURN_STATUS);
2462:
2460: ,X_MSG_DATA => X_MSG_DATA
2461: ,X_RETURN_STATUS => X_RETURN_STATUS);
2462:
2463: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2464: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2465: P_MODULE => l_module
2466: ,P_API_NAME => L_API_NAME
2467: ,P_PKG_NAME => G_PKG_NAME
2468: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2465: P_MODULE => l_module
2466: ,P_API_NAME => L_API_NAME
2467: ,P_PKG_NAME => G_PKG_NAME
2468: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2469: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2470: ,X_MSG_COUNT => X_MSG_COUNT
2471: ,X_MSG_DATA => X_MSG_DATA
2472: ,X_RETURN_STATUS => X_RETURN_STATUS);
2473:
2471: ,X_MSG_DATA => X_MSG_DATA
2472: ,X_RETURN_STATUS => X_RETURN_STATUS);
2473:
2474: WHEN OTHERS THEN
2475: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2476: P_MODULE => l_module
2477: ,P_API_NAME => L_API_NAME
2478: ,P_PKG_NAME => G_PKG_NAME
2479: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2475: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2476: P_MODULE => l_module
2477: ,P_API_NAME => L_API_NAME
2478: ,P_PKG_NAME => G_PKG_NAME
2479: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2480: ,P_SQLCODE => SQLCODE
2481: ,P_SQLERRM => SQLERRM
2482: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2483: ,X_MSG_COUNT => X_MSG_COUNT
2478: ,P_PKG_NAME => G_PKG_NAME
2479: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2480: ,P_SQLCODE => SQLCODE
2481: ,P_SQLERRM => SQLERRM
2482: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2483: ,X_MSG_COUNT => X_MSG_COUNT
2484: ,X_MSG_DATA => X_MSG_DATA
2485: ,X_RETURN_STATUS => X_RETURN_STATUS);
2486: End Update_opp_header;
2545:
2546:
2547: -- Debug Message
2548: IF l_debug THEN
2549: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2550: 'Private API: ' || l_api_name || ' start');
2551: END IF;
2552:
2553:
2592: END IF;
2593:
2594: -- Debug Message
2595: IF l_debug THEN
2596: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
2597: END IF;
2598:
2599: Open C_Get_opp_header( p_LEAD_ID);
2600: Fetch C_Get_opp_header into l_last_update_date, l_freeze_flag;
2605: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
2606: -- FND_MESSAGE.Set_Token ('INFO', 'opp_header', FALSE);
2607: -- FND_MSG_PUB.Add;
2608:
2609: AS_UTILITY_PVT.Set_Message(
2610: p_module => l_module,
2611: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2612: p_msg_name => 'API_MISSING_OPP_HEADER_UPDATE');
2613:
2616: END IF;
2617:
2618: -- Debug Message
2619: IF l_debug THEN
2620: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
2621: END IF;
2622: close C_Get_opp_header;
2623:
2624: /*
2629: -- FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
2630: -- FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2631: -- FND_MSG_PUB.ADD;
2632:
2633: AS_UTILITY_PVT.Set_Message(
2634: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2635: p_msg_name => 'API_MISSING_LAST_UPDATE_DATE');
2636:
2637: END IF;
2644: -- FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
2645: -- FND_MESSAGE.Set_Token('INFO', 'opp_header', FALSE);
2646: -- FND_MSG_PUB.ADD;
2647:
2648: AS_UTILITY_PVT.Set_Message(
2649: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2650: p_msg_name => 'API_OPP_HEADER_CHANGED');
2651:
2652: END IF;
2657:
2658: /*
2659: -- Debug message
2660: IF l_debug THEN
2661: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_opp_header');
2662: END IF;
2663:
2664: -- Invoke validation procedures
2665: Validate_opp_header(
2664: -- Invoke validation procedures
2665: Validate_opp_header(
2666: p_init_msg_list => FND_API.G_FALSE,
2667: p_validation_level => p_validation_level,
2668: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
2669: P_Header_Rec => p_Header_Rec,
2670: x_return_status => x_return_status,
2671: x_msg_count => x_msg_count,
2672: x_msg_data => x_msg_data);
2705: x_msg_data => x_msg_data,
2706: x_update_access_flag => l_access_flag);
2707:
2708: IF l_access_flag <> 'Y' THEN
2709: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
2710: 'API_NO_UPDATE_PRIVILEGE');
2711: RAISE FND_API.G_EXC_ERROR;
2712: END IF;
2713:
2721: IF l_freeze_flag = 'Y'
2722: THEN
2723: l_allow_flag := NVL(FND_PROFILE.VALUE('AS_ALLOW_UPDATE_FROZEN_OPP'),'Y');
2724: IF l_allow_flag <> 'Y' THEN
2725: AS_UTILITY_PVT.Set_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
2726: 'API_OPP_FROZEN');
2727: RAISE FND_API.G_EXC_ERROR;
2728: END IF;
2729: END IF;
2733: -- Hint: Add corresponding Master-Detail business logic here if necessary.
2734:
2735: -- Debug Message
2736: IF l_debug THEN
2737: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2738: 'Private API: Calling update table handler');
2739:
2740: END IF;
2741:
2832:
2833:
2834: -- Debug Message
2835: IF l_debug THEN
2836: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2837: 'Private API: ' || l_api_name || ' end');
2838: END IF;
2839:
2840:
2866: END IF;
2867: */
2868: EXCEPTION
2869: WHEN FND_API.G_EXC_ERROR THEN
2870: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2871: P_MODULE => l_module
2872: ,P_API_NAME => L_API_NAME
2873: ,P_PKG_NAME => G_PKG_NAME
2874: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2871: P_MODULE => l_module
2872: ,P_API_NAME => L_API_NAME
2873: ,P_PKG_NAME => G_PKG_NAME
2874: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2875: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2876: ,X_MSG_COUNT => X_MSG_COUNT
2877: ,X_MSG_DATA => X_MSG_DATA
2878: ,X_RETURN_STATUS => X_RETURN_STATUS);
2879:
2877: ,X_MSG_DATA => X_MSG_DATA
2878: ,X_RETURN_STATUS => X_RETURN_STATUS);
2879:
2880: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2881: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2882: P_MODULE => l_module
2883: ,P_API_NAME => L_API_NAME
2884: ,P_PKG_NAME => G_PKG_NAME
2885: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2882: P_MODULE => l_module
2883: ,P_API_NAME => L_API_NAME
2884: ,P_PKG_NAME => G_PKG_NAME
2885: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2886: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2887: ,X_MSG_COUNT => X_MSG_COUNT
2888: ,X_MSG_DATA => X_MSG_DATA
2889: ,X_RETURN_STATUS => X_RETURN_STATUS);
2890:
2888: ,X_MSG_DATA => X_MSG_DATA
2889: ,X_RETURN_STATUS => X_RETURN_STATUS);
2890:
2891: WHEN OTHERS THEN
2892: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2893: P_MODULE => l_module
2894: ,P_API_NAME => L_API_NAME
2895: ,P_PKG_NAME => G_PKG_NAME
2896: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2892: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2893: P_MODULE => l_module
2894: ,P_API_NAME => L_API_NAME
2895: ,P_PKG_NAME => G_PKG_NAME
2896: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2897: ,P_SQLCODE => SQLCODE
2898: ,P_SQLERRM => SQLERRM
2899: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2900: ,X_MSG_COUNT => X_MSG_COUNT
2895: ,P_PKG_NAME => G_PKG_NAME
2896: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
2897: ,P_SQLCODE => SQLCODE
2898: ,P_SQLERRM => SQLERRM
2899: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
2900: ,X_MSG_COUNT => X_MSG_COUNT
2901: ,X_MSG_DATA => X_MSG_DATA
2902: ,X_RETURN_STATUS => X_RETURN_STATUS);
2903: End Delete_opp_header;
2936: -- Initialize API return status to SUCCESS
2937: x_return_status := FND_API.G_RET_STS_SUCCESS;
2938:
2939: -- Calling from Create API
2940: IF(p_validation_mode = AS_UTILITY_PVT.G_CREATE)
2941: THEN
2942: IF (p_LEAD_ID is NOT NULL) and (p_LEAD_ID <> FND_API.G_MISS_NUM)
2943: THEN
2944: OPEN C_Lead_Id_Exists (p_Lead_Id);
2944: OPEN C_Lead_Id_Exists (p_Lead_Id);
2945: FETCH C_Lead_Id_Exists into l_val;
2946:
2947: IF C_Lead_Id_Exists%FOUND THEN
2948: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2949: -- 'Private API: LEAD_ID exist');
2950:
2951: AS_UTILITY_PVT.Set_Message(
2952: p_module => l_module,
2947: IF C_Lead_Id_Exists%FOUND THEN
2948: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2949: -- 'Private API: LEAD_ID exist');
2950:
2951: AS_UTILITY_PVT.Set_Message(
2952: p_module => l_module,
2953: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2954: p_msg_name => 'API_DUPLICATE_LEAD_ID',
2955: p_token1 => 'VALUE',
2961: CLOSE C_Lead_Id_Exists;
2962: END IF;
2963:
2964: -- Calling from Update API
2965: ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
2966: THEN
2967: -- validate NOT NULL column
2968: IF (p_LEAD_ID is NULL) or (p_LEAD_ID = FND_API.G_MISS_NUM)
2969: THEN
2966: THEN
2967: -- validate NOT NULL column
2968: IF (p_LEAD_ID is NULL) or (p_LEAD_ID = FND_API.G_MISS_NUM)
2969: THEN
2970: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2971: -- 'Private API: Violate NOT NULL constraint(LEAD_ID)');
2972:
2973: AS_UTILITY_PVT.Set_Message(
2974: p_module => l_module,
2969: THEN
2970: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2971: -- 'Private API: Violate NOT NULL constraint(LEAD_ID)');
2972:
2973: AS_UTILITY_PVT.Set_Message(
2974: p_module => l_module,
2975: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2976: p_msg_name => 'API_MISSING_LEAD_ID');
2977:
2981: FETCH C_Lead_Id_Exists into l_val;
2982:
2983: IF C_Lead_Id_Exists%NOTFOUND
2984: THEN
2985: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2986: -- 'Private API: LEAD_ID is not valid');
2987:
2988: AS_UTILITY_PVT.Set_Message(
2989: p_module => l_module,
2984: THEN
2985: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
2986: -- 'Private API: LEAD_ID is not valid');
2987:
2988: AS_UTILITY_PVT.Set_Message(
2989: p_module => l_module,
2990: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2991: p_msg_name => 'API_INVALID_LEAD_ID',
2992: p_token1 => 'VALUE',
3041:
3042: IF(p_LEAD_NUMBER is NULL)
3043: THEN
3044: -- validate NOT NULL column
3045: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3046: -- 'Private API: Violate NOT NULL constraint(LEAD_NUMBER)');
3047:
3048: AS_UTILITY_PVT.Set_Message(
3049: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3044: -- validate NOT NULL column
3045: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3046: -- 'Private API: Violate NOT NULL constraint(LEAD_NUMBER)');
3047:
3048: AS_UTILITY_PVT.Set_Message(
3049: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3050: p_msg_name => 'API_MISSING_LEAD_NUMBER');
3051:
3052: x_return_status := FND_API.G_RET_STS_ERROR;
3051:
3052: x_return_status := FND_API.G_RET_STS_ERROR;
3053: ELSE
3054: -- Calling from Create API, LEAD_NUMBER can not be G_MISS_CHAR
3055: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3056: (p_LEAD_NUMBER = FND_API.G_MISS_CHAR)
3057: THEN
3058: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3059: -- 'Private API: missing LEAD_NUMBER');
3054: -- Calling from Create API, LEAD_NUMBER can not be G_MISS_CHAR
3055: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3056: (p_LEAD_NUMBER = FND_API.G_MISS_CHAR)
3057: THEN
3058: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3059: -- 'Private API: missing LEAD_NUMBER');
3060:
3061: AS_UTILITY_PVT.Set_Message(
3062: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3057: THEN
3058: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3059: -- 'Private API: missing LEAD_NUMBER');
3060:
3061: AS_UTILITY_PVT.Set_Message(
3062: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3063: p_msg_name => 'API_MISSING_LEAD_NUMBER');
3064:
3065: END IF;
3070: OPEN C_LEAD_NUMBER_Exists (p_LEAD_NUMBER);
3071: FETCH C_LEAD_NUMBER_Exists into l_val;
3072:
3073: IF C_LEAD_NUMBER_Exists%FOUND THEN
3074: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3075: -- 'Private API: LEAD_NUMBER exist');
3076:
3077: AS_UTILITY_PVT.Set_Message(
3078: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3073: IF C_LEAD_NUMBER_Exists%FOUND THEN
3074: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3075: -- 'Private API: LEAD_NUMBER exist');
3076:
3077: AS_UTILITY_PVT.Set_Message(
3078: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3079: p_msg_name => 'API_DUPLICATE_LEAD_NUMBER',
3080: p_token1 => 'VALUE',
3081: p_token1_value => p_LEAD_NUMBER );
3132:
3133: -- validate NOT NULL column
3134: IF(p_STATUS is NULL)
3135: THEN
3136: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3137: -- 'Private API: Violate NOT NULL constraint(STATUS)');
3138:
3139: AS_UTILITY_PVT.Set_Message(
3140: p_module => l_module,
3135: THEN
3136: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3137: -- 'Private API: Violate NOT NULL constraint(STATUS)');
3138:
3139: AS_UTILITY_PVT.Set_Message(
3140: p_module => l_module,
3141: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3142: p_msg_name => 'API_MISSING_STATUS');
3143:
3143:
3144: x_return_status := FND_API.G_RET_STS_ERROR;
3145: ELSE
3146: -- Calling from Create API, STATUS can not be G_MISS_CHAR
3147: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3148: (p_STATUS = FND_API.G_MISS_CHAR)
3149: THEN
3150: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3151: -- 'Private API: STATUS is missing');
3146: -- Calling from Create API, STATUS can not be G_MISS_CHAR
3147: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
3148: (p_STATUS = FND_API.G_MISS_CHAR)
3149: THEN
3150: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3151: -- 'Private API: STATUS is missing');
3152:
3153: AS_UTILITY_PVT.Set_Message(
3154: p_module => l_module,
3149: THEN
3150: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3151: -- 'Private API: STATUS is missing');
3152:
3153: AS_UTILITY_PVT.Set_Message(
3154: p_module => l_module,
3155: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3156: p_msg_name => 'API_MISSING_STATUS');
3157:
3163: OPEN C_STATUS_Exists (p_STATUS);
3164: FETCH C_STATUS_Exists into l_val;
3165:
3166: IF C_STATUS_Exists%NOTFOUND THEN
3167: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3168: -- 'Private API: STATUS is invalid');
3169:
3170: AS_UTILITY_PVT.Set_Message(
3171: p_module => l_module,
3166: IF C_STATUS_Exists%NOTFOUND THEN
3167: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3168: -- 'Private API: STATUS is invalid');
3169:
3170: AS_UTILITY_PVT.Set_Message(
3171: p_module => l_module,
3172: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3173: p_msg_name => 'API_INVALID_OPP_STATUS',
3174: p_token1 => 'VALUE',
3220:
3221: -- Initialize API return status to SUCCESS
3222: x_return_status := FND_API.G_RET_STS_SUCCESS;
3223:
3224: IF p_validation_mode = AS_UTILITY_PVT.G_CREATE THEN
3225: OPEN C_ORG_ID_Exists (p_ORG_ID);
3226: FETCH C_ORG_ID_Exists into l_val;
3227:
3228: IF C_ORG_ID_Exists%NOTFOUND THEN
3226: FETCH C_ORG_ID_Exists into l_val;
3227:
3228: IF C_ORG_ID_Exists%NOTFOUND THEN
3229:
3230: AS_UTILITY_PVT.Set_Message(
3231: p_module => l_module,
3232: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3233: p_msg_name => 'AS_ORG_NULL_OR_INVALID');
3234:
3290: OPEN C_SALES_STAGE_ID_Exists (p_SALES_STAGE_ID);
3291: FETCH C_SALES_STAGE_ID_Exists into l_val;
3292:
3293: IF C_SALES_STAGE_ID_Exists%NOTFOUND THEN
3294: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3295: -- 'Private API: SALES_STAGE_ID is invalid');
3296:
3297: AS_UTILITY_PVT.Set_Message(
3298: p_module => l_module,
3293: IF C_SALES_STAGE_ID_Exists%NOTFOUND THEN
3294: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3295: -- 'Private API: SALES_STAGE_ID is invalid');
3296:
3297: AS_UTILITY_PVT.Set_Message(
3298: p_module => l_module,
3299: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3300: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
3301: p_token1 => 'VALUE',
3358: OPEN C_CHANNEL_CODE_Exists (p_CHANNEL_CODE);
3359: FETCH C_CHANNEL_CODE_Exists into l_val;
3360:
3361: IF C_CHANNEL_CODE_Exists%NOTFOUND THEN
3362: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3363: -- 'Private API: CHANNEL_CODE is invalid');
3364:
3365: AS_UTILITY_PVT.Set_Message(
3366: p_module => l_module,
3361: IF C_CHANNEL_CODE_Exists%NOTFOUND THEN
3362: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3363: -- 'Private API: CHANNEL_CODE is invalid');
3364:
3365: AS_UTILITY_PVT.Set_Message(
3366: p_module => l_module,
3367: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3368: p_msg_name => 'API_INVALID_CHANNEL_CODE',
3369: p_token1 => 'VALUE',
3427: OPEN C_Currency_Exists (p_CURRENCY_CODE);
3428: FETCH C_Currency_Exists into l_val;
3429:
3430: IF C_Currency_Exists%NOTFOUND THEN
3431: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3432: -- 'Private API: CURRENCY_CODE is invalid');
3433:
3434: AS_UTILITY_PVT.Set_Message(
3435: p_module => l_module,
3430: IF C_Currency_Exists%NOTFOUND THEN
3431: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3432: -- 'Private API: CURRENCY_CODE is invalid');
3433:
3434: AS_UTILITY_PVT.Set_Message(
3435: p_module => l_module,
3436: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3437: p_msg_name => 'API_INVALID_CURRENCY_CODE',
3438: p_token1 => 'VALUE',
3496: OPEN C_Win_Prob_Exists (p_WIN_PROBABILITY);
3497: FETCH C_Win_Prob_Exists into l_val;
3498:
3499: IF C_Win_Prob_Exists%NOTFOUND THEN
3500: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3501: -- 'Private API: WIN_PROBABILITY is invalid');
3502:
3503: AS_UTILITY_PVT.Set_Message(
3504: p_module => l_module,
3499: IF C_Win_Prob_Exists%NOTFOUND THEN
3500: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3501: -- 'Private API: WIN_PROBABILITY is invalid');
3502:
3503: AS_UTILITY_PVT.Set_Message(
3504: p_module => l_module,
3505: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3506: p_msg_name => 'API_INVALID_WIN_PROB',
3507: p_token1 => 'VALUE',
3562: OPEN C_CLOSE_REASON_Exists ('CLOSE_REASON', p_CLOSE_REASON);
3563: FETCH C_CLOSE_REASON_Exists into l_val;
3564:
3565: IF C_CLOSE_REASON_Exists%NOTFOUND THEN
3566: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3567: -- 'Private API: CLOSE_REASON is invalid');
3568:
3569: AS_UTILITY_PVT.Set_Message(
3570: p_module => l_module,
3565: IF C_CLOSE_REASON_Exists%NOTFOUND THEN
3566: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3567: -- 'Private API: CLOSE_REASON is invalid');
3568:
3569: AS_UTILITY_PVT.Set_Message(
3570: p_module => l_module,
3571: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3572: p_msg_name => 'API_INVALID_CLOSE_REASON',
3573: p_token1 => 'VALUE',
3624: -- Initialize API return status to SUCCESS
3625: x_return_status := FND_API.G_RET_STS_SUCCESS;
3626:
3627: IF ( p_SOURCE_PROMOTION_ID is NULL OR
3628: ( p_validation_mode = AS_UTILITY_PVT.G_CREATE AND
3629: p_SOURCE_PROMOTION_ID = FND_API.G_MISS_NUM ) ) AND
3630: nvl(l_source_code_required, 'N') = 'Y' THEN
3631: AS_UTILITY_PVT.Set_Message(
3632: p_module => l_module,
3627: IF ( p_SOURCE_PROMOTION_ID is NULL OR
3628: ( p_validation_mode = AS_UTILITY_PVT.G_CREATE AND
3629: p_SOURCE_PROMOTION_ID = FND_API.G_MISS_NUM ) ) AND
3630: nvl(l_source_code_required, 'N') = 'Y' THEN
3631: AS_UTILITY_PVT.Set_Message(
3632: p_module => l_module,
3633: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3634: p_msg_name => 'API_MISSING_SOURCE_PROM_ID');
3635:
3643: OPEN C_SOURCE_PROMOTION_ID_Exists (p_SOURCE_PROMOTION_ID);
3644: FETCH C_SOURCE_PROMOTION_ID_Exists into l_val;
3645:
3646: IF C_SOURCE_PROMOTION_ID_Exists%NOTFOUND THEN
3647: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3648: -- 'Private API: SOURCE_PROMOTION_ID is invalid');
3649:
3650: AS_UTILITY_PVT.Set_Message(
3651: p_module => l_module,
3646: IF C_SOURCE_PROMOTION_ID_Exists%NOTFOUND THEN
3647: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3648: -- 'Private API: SOURCE_PROMOTION_ID is invalid');
3649:
3650: AS_UTILITY_PVT.Set_Message(
3651: p_module => l_module,
3652: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3653: p_msg_name => 'API_INVALID_SOURCE_PROM_ID',
3654: p_token1 => 'VALUE',
3699: THEN
3700: IF (UPPER(p_NO_OPP_ALLOWED_FLAG) <> 'Y') and
3701: (UPPER(p_NO_OPP_ALLOWED_FLAG) <> 'N')
3702: THEN
3703: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3704: -- 'Private API: NO_OPP_ALLOWED_FLAG is invalid');
3705:
3706: AS_UTILITY_PVT.Set_Message(
3707: p_module => l_module,
3702: THEN
3703: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3704: -- 'Private API: NO_OPP_ALLOWED_FLAG is invalid');
3705:
3706: AS_UTILITY_PVT.Set_Message(
3707: p_module => l_module,
3708: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3709: p_msg_name => 'API_INVALID_NO_OPP_ALLOWED_FLG',
3710: p_token1 => 'VALUE',
3750: THEN
3751: IF (UPPER(p_DELETE_ALLOWED_FLAG) <> 'Y') and
3752: (UPPER(p_DELETE_ALLOWED_FLAG) <> 'N')
3753: THEN
3754: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3755: -- 'Private API: DELETE_ALLOWED_FLAG is invalid');
3756:
3757: AS_UTILITY_PVT.Set_Message(
3758: p_module => l_module,
3753: THEN
3754: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3755: -- 'Private API: DELETE_ALLOWED_FLAG is invalid');
3756:
3757: AS_UTILITY_PVT.Set_Message(
3758: p_module => l_module,
3759: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3760: p_msg_name => 'API_INVALID_DEL_ALLOWED_FLAG',
3761: p_token1 => 'VALUE',
3812: OPEN C_LEAD_SOURCE_CODE_Exists ('LEAD_SOURCE', p_LEAD_SOURCE_CODE);
3813: FETCH C_LEAD_SOURCE_CODE_Exists into l_val;
3814:
3815: IF C_LEAD_SOURCE_CODE_Exists%NOTFOUND THEN
3816: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3817: -- 'Private API: LEAD_SOURCE_CODE is invalid');
3818:
3819: AS_UTILITY_PVT.Set_Message(
3820: p_module => l_module,
3815: IF C_LEAD_SOURCE_CODE_Exists%NOTFOUND THEN
3816: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3817: -- 'Private API: LEAD_SOURCE_CODE is invalid');
3818:
3819: AS_UTILITY_PVT.Set_Message(
3820: p_module => l_module,
3821: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3822: p_msg_name => 'API_INVALID_LEAD_SOURCE_CODE',
3823: p_token1 => 'VALUE',
3878: OPEN C_Price_List_Exists (p_PRICE_LIST_ID, p_CURRENCY_CODE);
3879: FETCH C_Price_List_Exists into l_val;
3880:
3881: IF C_Price_List_Exists%NOTFOUND THEN
3882: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3883: -- 'Private API: PRICE_LIST_ID is invalid');
3884:
3885: AS_UTILITY_PVT.Set_Message(
3886: p_module => l_module,
3881: IF C_Price_List_Exists%NOTFOUND THEN
3882: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3883: -- 'Private API: PRICE_LIST_ID is invalid');
3884:
3885: AS_UTILITY_PVT.Set_Message(
3886: p_module => l_module,
3887: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3888: p_msg_name => 'API_INVALID_PRICE_LIST_ID',
3889: p_token1 => 'VALUE',
3933: (p_DELETED_FLAG <> FND_API.G_MISS_CHAR)
3934: THEN
3935: IF (p_DELETED_FLAG <> 'Y') and (p_DELETED_FLAG <> 'N')
3936: THEN
3937: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3938: -- 'Private API: DELETED_FLAG is invalid');
3939:
3940: AS_UTILITY_PVT.Set_Message(
3941: p_module => l_module,
3936: THEN
3937: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
3938: -- 'Private API: DELETED_FLAG is invalid');
3939:
3940: AS_UTILITY_PVT.Set_Message(
3941: p_module => l_module,
3942: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
3943: p_msg_name => 'API_INVALID_DELETED_FLAG',
3944: p_token1 => 'VALUE',
3999: p_METHODOLOGY_CODE);
4000: FETCH C_METHODOLOGY_CODE_Exists into l_val;
4001:
4002: IF C_METHODOLOGY_CODE_Exists%NOTFOUND THEN
4003: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4004: -- 'Private API: METHODOLOGY_CODE is invalid');
4005:
4006: AS_UTILITY_PVT.Set_Message(
4007: p_module => l_module,
4002: IF C_METHODOLOGY_CODE_Exists%NOTFOUND THEN
4003: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4004: -- 'Private API: METHODOLOGY_CODE is invalid');
4005:
4006: AS_UTILITY_PVT.Set_Message(
4007: p_module => l_module,
4008: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4009: p_msg_name => 'API_INVALID_METHODOLOGY_CODE',
4010: p_token1 => 'VALUE',
4063: OPEN C_ORIGINAL_LEAD_ID_Exists (p_ORIGINAL_LEAD_ID);
4064: FETCH C_ORIGINAL_LEAD_ID_Exists into l_val;
4065:
4066: IF C_ORIGINAL_LEAD_ID_Exists%NOTFOUND THEN
4067: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4068: -- 'Private API: ORIGINAL_LEAD_ID is invalid');
4069:
4070: AS_UTILITY_PVT.Set_Message(
4071: p_module => l_module,
4066: IF C_ORIGINAL_LEAD_ID_Exists%NOTFOUND THEN
4067: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4068: -- 'Private API: ORIGINAL_LEAD_ID is invalid');
4069:
4070: AS_UTILITY_PVT.Set_Message(
4071: p_module => l_module,
4072: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4073: p_msg_name => 'API_INVALID_ORIG_LEAD_ID',
4074: p_token1 => 'VALUE',
4130: p_DECISION_TIMEFRAME_CODE);
4131: FETCH C_DECN_TIMEFRAME_Exists into l_val;
4132:
4133: IF C_DECN_TIMEFRAME_Exists%NOTFOUND THEN
4134: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4135: -- 'Private API: DECISION_TIMEFRAME_CODE is invalid');
4136:
4137: AS_UTILITY_PVT.Set_Message(
4138: p_module => l_module,
4133: IF C_DECN_TIMEFRAME_Exists%NOTFOUND THEN
4134: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4135: -- 'Private API: DECISION_TIMEFRAME_CODE is invalid');
4136:
4137: AS_UTILITY_PVT.Set_Message(
4138: p_module => l_module,
4139: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4140: p_msg_name => 'API_INVALID_DCN_TIMEFRAME_CODE',
4141: p_token1 => 'VALUE',
4199: -- Initialize API return status to SUCCESS
4200: x_return_status := FND_API.G_RET_STS_SUCCESS;
4201:
4202: -- Debug Message
4203: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4204: -- 'Validate offer id');
4205:
4206: IF (p_OFFER_ID is NOT NULL) and (p_OFFER_ID <> FND_API.G_MISS_NUM)
4207: THEN
4210: FETCH C_OFFER_ID_Exists into l_val;
4211:
4212: IF C_OFFER_ID_Exists%NOTFOUND THEN
4213: IF l_debug THEN
4214: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4215: 'Private API: OFFER_ID is invalid');
4216: END IF;
4217: AS_UTILITY_PVT.Set_Message(
4218: p_module => l_module,
4213: IF l_debug THEN
4214: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4215: 'Private API: OFFER_ID is invalid');
4216: END IF;
4217: AS_UTILITY_PVT.Set_Message(
4218: p_module => l_module,
4219: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4220: p_msg_name => 'API_INVALID_ID',
4221: p_token1 => 'COLUMN',
4279: p_VEHICLE_RESPONSE_CODE);
4280: FETCH C_VEHICLE_RESPONSE_Exists into l_val;
4281:
4282: IF C_VEHICLE_RESPONSE_Exists%NOTFOUND THEN
4283: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4284: -- 'Private API: VEHICLE_RESPONSE_CODE is invalid');
4285:
4286: AS_UTILITY_PVT.Set_Message(
4287: p_module => l_module,
4282: IF C_VEHICLE_RESPONSE_Exists%NOTFOUND THEN
4283: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4284: -- 'Private API: VEHICLE_RESPONSE_CODE is invalid');
4285:
4286: AS_UTILITY_PVT.Set_Message(
4287: p_module => l_module,
4288: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4289: p_msg_name => 'API_INVALID_VEHICLE_RESP_CODE',
4290: p_token1 => 'VALUE',
4344: OPEN C_BUDGET_STATUS_Exists ('BUDGET_STATUS', p_BUDGET_STATUS_CODE);
4345: FETCH C_BUDGET_STATUS_Exists into l_val;
4346:
4347: IF C_BUDGET_STATUS_Exists%NOTFOUND THEN
4348: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4349: -- 'Private API: BUDGET_STATUS_CODE is invalid');
4350:
4351: AS_UTILITY_PVT.Set_Message(
4352: p_module => l_module,
4347: IF C_BUDGET_STATUS_Exists%NOTFOUND THEN
4348: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4349: -- 'Private API: BUDGET_STATUS_CODE is invalid');
4350:
4351: AS_UTILITY_PVT.Set_Message(
4352: p_module => l_module,
4353: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4354: p_msg_name => 'API_INVALID_BUDGET_STATUS_CODE',
4355: p_token1 => 'VALUE',
4408: OPEN C_PRM_LEAD_TYPE_Exists ('PRM_LEAD_TYPE', p_PRM_LEAD_TYPE);
4409: FETCH C_PRM_LEAD_TYPE_Exists into l_val;
4410:
4411: IF C_PRM_LEAD_TYPE_Exists%NOTFOUND THEN
4412: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4413: -- 'Private API: PRM_LEAD_TYPE is invalid');
4414:
4415: AS_UTILITY_PVT.Set_Message(
4416: p_module => l_module,
4411: IF C_PRM_LEAD_TYPE_Exists%NOTFOUND THEN
4412: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4413: -- 'Private API: PRM_LEAD_TYPE is invalid');
4414:
4415: AS_UTILITY_PVT.Set_Message(
4416: p_module => l_module,
4417: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4418: p_msg_name => 'API_INVALID_PRM_LEAD_TYPE',
4419: p_token1 => 'VALUE',
4464:
4465: -- validate NOT NULL column
4466: IF(p_CUSTOMER_ID is NULL)
4467: THEN
4468: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4469: -- 'Private API: Violate NOT NULL constraint(CUSTOMER_ID)');
4470:
4471: AS_UTILITY_PVT.Set_Message(
4472: p_module => l_module,
4467: THEN
4468: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4469: -- 'Private API: Violate NOT NULL constraint(CUSTOMER_ID)');
4470:
4471: AS_UTILITY_PVT.Set_Message(
4472: p_module => l_module,
4473: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4474: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4475:
4475:
4476: x_return_status := FND_API.G_RET_STS_ERROR;
4477: ELSE
4478: -- Check customer status in creation mode
4479: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4480: (p_CUSTOMER_ID <> FND_API.G_MISS_NUM)
4481: THEN
4482: OPEN c_customer_status(P_CUSTOMER_ID);
4483: FETCH c_customer_status into l_status;
4484: CLOSE c_customer_status;
4485: IF l_status = 'I' THEN
4486: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4487: THEN
4488: AS_UTILITY_PVT.Set_Message(
4489: p_module => l_module,
4490: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4491: p_msg_name => 'WARN_INACTIVE_CUSTOMER');
4492:
4496: END IF;
4497: END IF;
4498:
4499: -- Calling from Create APIs, customer_id can not be G_MISS_NUM
4500: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4501: (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4502: THEN
4503: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4504: -- 'Private API: CUSTOMER_ID is missing');
4499: -- Calling from Create APIs, customer_id can not be G_MISS_NUM
4500: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
4501: (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4502: THEN
4503: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4504: -- 'Private API: CUSTOMER_ID is missing');
4505:
4506: AS_UTILITY_PVT.Set_Message(
4507: p_module => l_module,
4502: THEN
4503: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4504: -- 'Private API: CUSTOMER_ID is missing');
4505:
4506: AS_UTILITY_PVT.Set_Message(
4507: p_module => l_module,
4508: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4509: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4510:
4520: x_msg_count => x_msg_count,
4521: x_msg_data => x_msg_data);
4522:
4523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4524: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4525: -- 'Private API: CUSTOMER_ID is invalid');
4526:
4527: AS_UTILITY_PVT.Set_Message(
4528: p_module => l_module,
4523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4524: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4525: -- 'Private API: CUSTOMER_ID is invalid');
4526:
4527: AS_UTILITY_PVT.Set_Message(
4528: p_module => l_module,
4529: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4530: p_msg_name => 'API_INVALID_CUSTOMER_ID',
4531: p_token1 => 'VALUE',
4586: -- x_msg_count => x_msg_count,
4587: -- x_msg_data => x_msg_data);
4588:
4589: -- IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4590: -- -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4591: -- -- 'Private API: INC_PARTNER_PARTY_ID is invalid');
4592:
4593:
4594: OPEN C_INC_PRTN_PARTY_ID_Exist (P_INC_PARTNER_PARTY_ID);
4595: FETCH C_INC_PRTN_PARTY_ID_Exist into l_val;
4596:
4597: IF C_INC_PRTN_PARTY_ID_Exist%NOTFOUND THEN
4598:
4599: AS_UTILITY_PVT.Set_Message(
4600: p_module => l_module,
4601: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4602: p_msg_name => 'API_INVALID_INC_PTNR_PARTY_ID',
4603: p_token1 => 'VALUE',
4648: x_msg_count => x_msg_count,
4649: x_msg_data => x_msg_data);
4650:
4651: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4652: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4653: -- 'Private API: CLOSE_COMPETITOR_ID is invalid');
4654:
4655: AS_UTILITY_PVT.Set_Message(
4656: p_module => l_module,
4651: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4652: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4653: -- 'Private API: CLOSE_COMPETITOR_ID is invalid');
4654:
4655: AS_UTILITY_PVT.Set_Message(
4656: p_module => l_module,
4657: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4658: p_msg_name => 'API_INVALID_CLOSE_COMP_ID',
4659: p_token1 => 'VALUE',
4704: x_msg_count => x_msg_count,
4705: x_msg_data => x_msg_data);
4706:
4707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4708: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4709: -- 'Private API: END_USER_CUSTOMER_ID is invalid');
4710:
4711: AS_UTILITY_PVT.Set_Message(
4712: p_module => l_module,
4707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4708: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4709: -- 'Private API: END_USER_CUSTOMER_ID is invalid');
4710:
4711: AS_UTILITY_PVT.Set_Message(
4712: p_module => l_module,
4713: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4714: p_msg_name => 'API_INVALID_END_USER_CUST_ID',
4715: p_token1 => 'VALUE',
4756: IF (p_ADDRESS_ID is not NULL) and (p_ADDRESS_ID <> FND_API.G_MISS_NUM)
4757: THEN
4758: IF (p_CUSTOMER_ID is NULL) or (p_CUSTOMER_ID = FND_API.G_MISS_NUM)
4759: THEN
4760: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4761: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4762:
4763: AS_UTILITY_PVT.Set_Message(
4764: p_module => l_module,
4759: THEN
4760: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4761: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4762:
4763: AS_UTILITY_PVT.Set_Message(
4764: p_module => l_module,
4765: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4766: p_msg_name => 'API_MISSING_CUSTOMER_ID');
4767:
4776: x_msg_count => x_msg_count,
4777: x_msg_data => x_msg_data);
4778:
4779: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4780: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4781: -- 'Private API: ADDRESS_ID is invalid');
4782: FND_MSG_PUB.initialize;
4783: AS_UTILITY_PVT.Set_Message(
4784: p_module => l_module,
4779: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4780: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4781: -- 'Private API: ADDRESS_ID is invalid');
4782: FND_MSG_PUB.initialize;
4783: AS_UTILITY_PVT.Set_Message(
4784: p_module => l_module,
4785: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4786: p_msg_name => 'AS_INVALID_ADDRESS_ID');
4787:
4788: END IF;
4789: END IF;
4790:
4791: ELSIF p_ADDRESS_ID = FND_API.G_MISS_NUM AND
4792: p_validation_mode = AS_UTILITY_PVT.G_UPDATE THEN
4793: NULL;
4794:
4795: ELSE -- address_id is NULL or g_miss_num in creation mode
4796: IF l_debug THEN
4793: NULL;
4794:
4795: ELSE -- address_id is NULL or g_miss_num in creation mode
4796: IF l_debug THEN
4797: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4798: 'ADDRESS_ID is not entered');
4799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4800: FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'));
4801:
4795: ELSE -- address_id is NULL or g_miss_num in creation mode
4796: IF l_debug THEN
4797: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4798: 'ADDRESS_ID is not entered');
4799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
4800: FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'));
4801:
4802: END IF;
4803:
4804: l_check_address :=
4805: nvl(FND_PROFILE.Value('AS_OPP_ADDRESS_REQUIRED'),'Y');
4806: IF (l_check_address = 'Y')
4807: THEN
4808: AS_UTILITY_PVT.Set_Message(
4809: p_module => l_module,
4810: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4811: p_msg_name => 'API_MISSING_ADDRESS_ID');
4812:
4852: THEN
4853: IF (p_END_USER_CUSTOMER_ID is NULL) or
4854: (p_END_USER_CUSTOMER_ID = FND_API.G_MISS_NUM)
4855: THEN
4856: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4857: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4858:
4859: AS_UTILITY_PVT.Set_Message(
4860: p_module => l_module,
4855: THEN
4856: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4857: -- 'Private API: need CUSTOMER_ID to validate ADDRESS_ID');
4858:
4859: AS_UTILITY_PVT.Set_Message(
4860: p_module => l_module,
4861: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4862: p_msg_name => 'API_MISSING_END_USER_CUST_ID');
4863:
4872: x_msg_count => x_msg_count,
4873: x_msg_data => x_msg_data);
4874:
4875: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4876: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4877: -- 'Private API: END_USER_ADDRESS_ID is invalid');
4878:
4879: AS_UTILITY_PVT.Set_Message(
4880: p_module => l_module,
4875: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4876: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
4877: -- 'Private API: END_USER_ADDRESS_ID is invalid');
4878:
4879: AS_UTILITY_PVT.Set_Message(
4880: p_module => l_module,
4881: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4882: p_msg_name => 'API_INVALID_END_USER_ADDR_ID',
4883: p_token1 => 'VALUE',
4965: OPEN VALIDATE_SALESREP (p_owner_salesforce_id);
4966: FETCH VALIDATE_SALESREP into l_val;
4967: IF VALIDATE_SALESREP%NOTFOUND THEN
4968: IF l_debug THEN
4969: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4970: 'Private API: OWNER_SALESFORCE_ID is not valid');
4971: END IF;
4972: AS_UTILITY_PVT.Set_Message(
4973: p_module => l_module,
4968: IF l_debug THEN
4969: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4970: 'Private API: OWNER_SALESFORCE_ID is not valid');
4971: END IF;
4972: AS_UTILITY_PVT.Set_Message(
4973: p_module => l_module,
4974: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4975: p_msg_name => 'API_INVALID_ID',
4976: p_token1 => 'COLUMN',
4984: OPEN VALIDATE_SALESGROUP (p_owner_sales_group_id);
4985: FETCH VALIDATE_SALESGROUP into l_val;
4986: IF VALIDATE_SALESGROUP%NOTFOUND THEN
4987: IF l_debug THEN
4988: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4989: 'Private API: OWNER_SALES_GROUP_ID is not valid');
4990: END IF;
4991: AS_UTILITY_PVT.Set_Message(
4992: p_module => l_module,
4987: IF l_debug THEN
4988: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
4989: 'Private API: OWNER_SALES_GROUP_ID is not valid');
4990: END IF;
4991: AS_UTILITY_PVT.Set_Message(
4992: p_module => l_module,
4993: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
4994: p_msg_name => 'API_INVALID_ID',
4995: p_token1 => 'COLUMN',
5003: OPEN VALIDATE_COMBINATION (p_owner_salesforce_id,p_owner_sales_group_id);
5004: FETCH VALIDATE_COMBINATION into l_val;
5005: IF VALIDATE_COMBINATION%NOTFOUND THEN
5006: IF l_debug THEN
5007: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
5008: 'Private API: OWNER_SALES_GROUP_ID is not valid');
5009: END IF;
5010: AS_UTILITY_PVT.Set_Message(
5011: p_module => l_module,
5006: IF l_debug THEN
5007: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_ERROR,
5008: 'Private API: OWNER_SALES_GROUP_ID is not valid');
5009: END IF;
5010: AS_UTILITY_PVT.Set_Message(
5011: p_module => l_module,
5012: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5013: p_msg_name => 'API_INVALID_ID',
5014: p_token1 => 'COLUMN',
5066: p_AUTO_ASSIGNMENT_TYPE);
5067: FETCH C_AUTO_ASGN_TYPE_Exists into l_val;
5068:
5069: IF C_AUTO_ASGN_TYPE_Exists%NOTFOUND THEN
5070: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5071: -- 'Private API: AUTO_ASSIGNMENT_TYPE is invalid');
5072:
5073: AS_UTILITY_PVT.Set_Message(
5074: p_module => l_module,
5069: IF C_AUTO_ASGN_TYPE_Exists%NOTFOUND THEN
5070: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5071: -- 'Private API: AUTO_ASSIGNMENT_TYPE is invalid');
5072:
5073: AS_UTILITY_PVT.Set_Message(
5074: p_module => l_module,
5075: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5076: p_msg_name => 'API_INVALID_AUTO_ASGN_TYPE',
5077: p_token1 => 'VALUE',
5129: p_PRM_ASSIGNMENT_TYPE);
5130: FETCH C_PRM_ASGN_TYPE_Exists into l_val;
5131:
5132: IF C_PRM_ASGN_TYPE_Exists%NOTFOUND THEN
5133: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5134: -- 'Private API: PRM_ASSIGNMENT_TYPE is invalid');
5135:
5136: AS_UTILITY_PVT.Set_Message(
5137: p_module => l_module,
5132: IF C_PRM_ASGN_TYPE_Exists%NOTFOUND THEN
5133: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5134: -- 'Private API: PRM_ASSIGNMENT_TYPE is invalid');
5135:
5136: AS_UTILITY_PVT.Set_Message(
5137: p_module => l_module,
5138: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5139: p_msg_name => 'API_INVALID_PRM_ASGN_TYPE',
5140: p_token1 => 'VALUE',
5191: OPEN C_RESOURCE_ID_Exists (p_INC_PARTNER_RESOURCE_ID);
5192: FETCH C_RESOURCE_ID_Exists into l_val;
5193:
5194: IF C_RESOURCE_ID_Exists%NOTFOUND THEN
5195: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5196: -- 'Private API: INC_PARTNER_RESOURCE_ID is invalid');
5197:
5198: AS_UTILITY_PVT.Set_Message(
5199: p_module => l_module,
5194: IF C_RESOURCE_ID_Exists%NOTFOUND THEN
5195: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5196: -- 'Private API: INC_PARTNER_RESOURCE_ID is invalid');
5197:
5198: AS_UTILITY_PVT.Set_Message(
5199: p_module => l_module,
5200: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5201: p_msg_name => 'API_INVALID_INC_PRTN_RS_ID',
5202: p_token1 => 'VALUE',
5256: p_PRM_IND_CLASSIFICATION_CODE);
5257: FETCH C_PRM_IND_CLS_CODE_Exists into l_val;
5258:
5259: IF C_PRM_IND_CLS_CODE_Exists%NOTFOUND THEN
5260: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5261: -- 'Private API: PRM_IND_CLASSIFICATION_CODE is invalid');
5262:
5263: AS_UTILITY_PVT.Set_Message(
5264: p_module => l_module,
5259: IF C_PRM_IND_CLS_CODE_Exists%NOTFOUND THEN
5260: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5261: -- 'Private API: PRM_IND_CLASSIFICATION_CODE is invalid');
5262:
5263: AS_UTILITY_PVT.Set_Message(
5264: p_module => l_module,
5265: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5266: p_msg_name => 'API_INVALID_PRM_IND_CLS_CODE',
5267: p_token1 => 'VALUE',
5308: THEN
5309: IF (UPPER(p_PRM_EXEC_SPONSOR_FLAG) <> 'Y') and
5310: (UPPER(p_PRM_EXEC_SPONSOR_FLAG) <> 'N')
5311: THEN
5312: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5313: -- 'Private API: PRM_EXEC_SPONSOR_FLAG is invalid');
5314:
5315: AS_UTILITY_PVT.Set_Message(
5316: p_module => l_module,
5311: THEN
5312: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5313: -- 'Private API: PRM_EXEC_SPONSOR_FLAG is invalid');
5314:
5315: AS_UTILITY_PVT.Set_Message(
5316: p_module => l_module,
5317: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5318: p_msg_name => 'API_INVALID_PRM_EXEC_SPNR_FLAG',
5319: p_token1 => 'VALUE',
5358: THEN
5359: IF (UPPER(p_PRM_PRJ_LEAD_IN_PLACE_FLAG) <> 'Y') and
5360: (UPPER(p_PRM_PRJ_LEAD_IN_PLACE_FLAG) <> 'N')
5361: THEN
5362: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5363: -- 'Private API: PRM_PRJ_LEAD_IN_PLACE_FLAG is invalid');
5364:
5365: AS_UTILITY_PVT.Set_Message(
5366: p_module => l_module,
5361: THEN
5362: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5363: -- 'Private API: PRM_PRJ_LEAD_IN_PLACE_FLAG is invalid');
5364:
5365: AS_UTILITY_PVT.Set_Message(
5366: p_module => l_module,
5367: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5368: p_msg_name => 'API_INVALID_PRM_PRJ_LDINPL_FLG',
5369: p_token1 => 'VALUE',
5408:
5409: -- validate NOT NULL column
5410: IF(p_Description is NULL)
5411: THEN
5412: AS_UTILITY_PVT.Set_Message(
5413: p_module => l_module,
5414: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5415: p_msg_name => 'API_MISSING_DESCRIPTION');
5416:
5447: IF (UPPER(p_FREEZE_FLAG) <> 'Y') and
5448: (UPPER(p_FREEZE_FLAG) <> 'N')
5449: THEN
5450:
5451: AS_UTILITY_PVT.Set_Message(
5452: p_module => l_module,
5453: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5454: p_msg_name => 'API_INVALID_FREEZE_FLAG',
5455: p_token1 => 'VALUE',
5530: OPEN c_Win_Prob_Limit (p_SALES_METHODOLOGY_ID, p_SALES_STAGE_ID);
5531: FETCH c_Win_Prob_Limit into l_min_winprob, l_max_winprob;
5532:
5533: IF c_Win_Prob_Limit%NOTFOUND THEN
5534: AS_UTILITY_PVT.Set_Message(
5535: p_module => l_module,
5536: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5537: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
5538: p_token1 => 'VALUE',
5553: --FND_MESSAGE.Set_Name('AS', 'API_WARN_PROB_SS_LINK');
5554: --FND_MSG_PUB.ADD;
5555: --FND_MSG_PUB.G_MSG_LVL_ERROR
5556:
5557: --AS_UTILITY_PVT.Set_Message(
5558: --p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5559: --p_msg_name => 'API_WARN_PROB_SS_LINK');
5560:
5561: l_warning_msg := FND_MESSAGE.GET_STRING('AS','API_WARN_PROB_SS_LINK');
5570: THEN
5571: -- FND_MESSAGE.Set_Name('AS', 'API_ERROR_PROB_SS_LINK');
5572: -- FND_MSG_PUB.ADD;
5573:
5574: AS_UTILITY_PVT.Set_Message(
5575: p_module => l_module,
5576: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5577: p_msg_name => 'API_ERROR_PROB_SS_LINK');
5578:
5597: OPEN C_Get_Stage_Info (p_SALES_STAGE_ID);
5598: FETCH C_Get_Stage_Info into l_min_winprob, l_max_winprob;
5599:
5600: IF C_Get_Stage_Info%NOTFOUND THEN
5601: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5602: -- 'Private API: SALES_STAGE_ID is invalid');
5603:
5604: AS_UTILITY_PVT.Set_Message(
5605: p_module => l_module,
5600: IF C_Get_Stage_Info%NOTFOUND THEN
5601: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5602: -- 'Private API: SALES_STAGE_ID is invalid');
5603:
5604: AS_UTILITY_PVT.Set_Message(
5605: p_module => l_module,
5606: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5607: p_msg_name => 'API_INVALID_SALES_STAGE_ID',
5608: p_token1 => 'VALUE',
5620: THEN
5621: --FND_MESSAGE.Set_Name('AS', 'API_WARN_PROB_SS_LINK');
5622: --FND_MSG_PUB.ADD;
5623:
5624: --AS_UTILITY_PVT.Set_Message(
5625: --p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5626: --p_msg_name => 'API_WARN_PROB_SS_LINK');
5627: l_warning_msg := FND_MESSAGE.GET_STRING('AS','API_WARN_PROB_SS_LINK');
5628: -- x_return_status := FND_API.G_RET_STS_ERROR;
5636: THEN
5637: -- FND_MESSAGE.Set_Name('AS', 'API_ERROR_PROB_SS_LINK');
5638: -- FND_MSG_PUB.ADD;
5639:
5640: AS_UTILITY_PVT.Set_Message(
5641: p_module => l_module,
5642: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5643: p_msg_name => 'API_ERROR_PROB_SS_LINK');
5644:
5707: OPEN C_Get_OppOpenStatusFlag (p_STATUS);
5708: FETCH C_Get_OppOpenStatusFlag into l_val;
5709:
5710: IF C_Get_OppOpenStatusFlag%NOTFOUND THEN
5711: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5712: -- 'Private API: STATUS is invalid');
5713:
5714: AS_UTILITY_PVT.Set_Message(
5715: p_module => l_module,
5710: IF C_Get_OppOpenStatusFlag%NOTFOUND THEN
5711: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5712: -- 'Private API: STATUS is invalid');
5713:
5714: AS_UTILITY_PVT.Set_Message(
5715: p_module => l_module,
5716: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5717: p_msg_name => 'API_INVALID_OPP_STATUS',
5718: p_token1 => 'VALUE',
5723: -- If opp_open_status_flag = 'N' (closed status),
5724: -- then close_reason should exist
5725: ELSIF l_val = 'N'
5726: THEN
5727: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5728: -- 'Private API: CLOSE_REASON is missing');
5729:
5730: AS_UTILITY_PVT.Set_Message(
5731: p_module => l_module,
5726: THEN
5727: -- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
5728: -- 'Private API: CLOSE_REASON is missing');
5729:
5730: AS_UTILITY_PVT.Set_Message(
5731: p_module => l_module,
5732: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5733: p_msg_name => 'API_MISSING_CLOSE_REASON');
5734:
5782: l_max_date := TRUNC(SYSDATE)+ to_number(FND_PROFILE.value('AS_MAX_DAY_CLOSE_OPPORTUNITY'));
5783: IF TRUNC(P_DECISION_DATE) > l_max_date THEN
5784: --DBMS_OUTPUT.PUT_LINE('rAISE ERROR');
5785: x_return_status := FND_API.G_RET_STS_ERROR;
5786: AS_UTILITY_PVT.Set_Message(
5787: p_module => l_module,
5788: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5789: p_msg_name => 'AS_CLOSE_DATE_VALIDATION',
5790: p_token1 => 'DATE',
5802: EXCEPTION
5803: WHEN VALUE_ERROR THEN
5804: --DBMS_OUTPUT.PUT_LINE('In VALUE_ERROR exception');
5805: x_return_status := FND_API.G_RET_STS_ERROR;
5806: AS_UTILITY_PVT.Set_Message(
5807: p_module => l_module,
5808: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5809: p_msg_name => 'AS_MAX_DAY_ERROR');
5810:
5843: THEN
5844: IF (p_CURRENCY_CODE is NULL) or
5845: (p_CURRENCY_CODE = FND_API.G_MISS_CHAR)
5846: THEN
5847: AS_UTILITY_PVT.Set_Message(
5848: p_module => l_module,
5849: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
5850: p_msg_name => 'API_MISSING_CURRENCY_CODE');
5851:
5883: BEGIN
5884:
5885: -- Debug Message
5886: IF l_debug THEN
5887: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5888: 'Private API: ' || l_api_name || ' start');
5889: END IF;
5890:
5891:
5907: -- Calling item level validation procedures
5908: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
5909: THEN
5910: IF l_debug THEN
5911: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5912: 'Validate_LEAD_ID');
5913: END IF;
5914:
5915: Validate_LEAD_ID(
5926:
5927:
5928:
5929: IF l_debug THEN
5930: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5931: 'Validate_STATUS');
5932: END IF;
5933:
5934: Validate_STATUS(
5943: raise FND_API.G_EXC_ERROR;
5944: END IF;
5945:
5946: IF l_debug THEN
5947: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5948: 'Validate_SALES_STAGE_ID');
5949: END IF;
5950:
5951: Validate_SALES_STAGE_ID(
5960: raise FND_API.G_EXC_ERROR;
5961: END IF;
5962:
5963: IF l_debug THEN
5964: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Validate_CHANNEL_CODE');
5965: END IF;
5966:
5967: Validate_CHANNEL_CODE(
5968: p_init_msg_list => FND_API.G_FALSE,
5976: raise FND_API.G_EXC_ERROR;
5977: END IF;
5978:
5979: IF l_debug THEN
5980: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Validate_CURRENCY_CODE');
5981: END IF;
5982:
5983: Validate_CURRENCY_CODE(
5984: p_init_msg_list => FND_API.G_FALSE,
5992: raise FND_API.G_EXC_ERROR;
5993: END IF;
5994:
5995: IF l_debug THEN
5996: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5997: 'Validate_DecisionDate');
5998: END IF;
5999: Validate_DecisionDate(
6000: p_init_msg_list => FND_API.G_FALSE,
6008: raise FND_API.G_EXC_ERROR;
6009: END IF;
6010:
6011: IF l_debug THEN
6012: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6013: 'Validate_BudgetAmt_Currency');
6014:
6015: END IF;
6016:
6014:
6015: END IF;
6016:
6017: IF l_debug THEN
6018: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6019: 'Validate_WIN_PROBABILITY');
6020:
6021: END IF;
6022:
6032: raise FND_API.G_EXC_ERROR;
6033: END IF;
6034:
6035: IF l_debug THEN
6036: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6037: 'Validate_CLOSE_REASON');
6038: END IF;
6039:
6040: Validate_CLOSE_REASON(
6049: raise FND_API.G_EXC_ERROR;
6050: END IF;
6051:
6052: IF l_debug THEN
6053: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6054: 'Validate_SOURCE_PROMOTION_ID');
6055: END IF;
6056:
6057: Validate_SOURCE_PROMOTION_ID(
6066: raise FND_API.G_EXC_ERROR;
6067: END IF;
6068:
6069: IF l_debug THEN
6070: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6071: 'Validate_NO_OPP_ALLOWED_FLAG');
6072: END IF;
6073:
6074: Validate_NO_OPP_ALLOWED_FLAG(
6083: raise FND_API.G_EXC_ERROR;
6084: END IF;
6085:
6086: IF l_debug THEN
6087: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6088: 'Validate_DELETE_ALLOWED_FLAG');
6089: END IF;
6090:
6091: Validate_DELETE_ALLOWED_FLAG(
6100: raise FND_API.G_EXC_ERROR;
6101: END IF;
6102:
6103: IF l_debug THEN
6104: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6105: 'Validate_LEAD_SOURCE_CODE');
6106: END IF;
6107:
6108: Validate_LEAD_SOURCE_CODE(
6117: raise FND_API.G_EXC_ERROR;
6118: END IF;
6119:
6120: IF l_debug THEN
6121: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6122: 'Validate_PRICE_LIST_ID');
6123: END IF;
6124:
6125: Validate_PRICE_LIST_ID(
6135: raise FND_API.G_EXC_ERROR;
6136: END IF;
6137:
6138: IF l_debug THEN
6139: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6140: 'Validate_DELETED_FLAG');
6141: END IF;
6142:
6143: Validate_DELETED_FLAG(
6152: raise FND_API.G_EXC_ERROR;
6153: END IF;
6154:
6155: IF l_debug THEN
6156: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6157: 'Validate_METHODOLOGY_CODE');
6158: END IF;
6159:
6160: Validate_METHODOLOGY_CODE(
6169: raise FND_API.G_EXC_ERROR;
6170: END IF;
6171:
6172: IF l_debug THEN
6173: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6174: 'Validate_ORIGINAL_LEAD_ID');
6175: END IF;
6176:
6177: Validate_ORIGINAL_LEAD_ID(
6186: raise FND_API.G_EXC_ERROR;
6187: END IF;
6188:
6189: IF l_debug THEN
6190: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6191: 'Validate_DECN_TIMEFRAME_CODE');
6192: END IF;
6193:
6194: Validate_DECN_TIMEFRAME_CODE(
6204: raise FND_API.G_EXC_ERROR;
6205: END IF;
6206:
6207: IF l_debug THEN
6208: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6209: 'Validate_OFFER_ID');
6210: END IF;
6211:
6212: Validate_OFFER_ID(
6222: raise FND_API.G_EXC_ERROR;
6223: END IF;
6224:
6225: IF l_debug THEN
6226: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6227: 'Validate_VEHICLE_RESPONSE_CODE');
6228: END IF;
6229:
6230: Validate_VEHICLE_RESPONSE_CODE(
6239: raise FND_API.G_EXC_ERROR;
6240: END IF;
6241:
6242: IF l_debug THEN
6243: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6244: 'Validate_BUDGET_STATUS_CODE');
6245: END IF;
6246:
6247: Validate_BUDGET_STATUS_CODE(
6256: raise FND_API.G_EXC_ERROR;
6257: END IF;
6258:
6259: IF l_debug THEN
6260: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6261: 'Validate_PRM_LEAD_TYPE');
6262: END IF;
6263:
6264: Validate_PRM_LEAD_TYPE(
6273: raise FND_API.G_EXC_ERROR;
6274: END IF;
6275:
6276: IF l_debug THEN
6277: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6278: 'Validate_CUSTOMER_ID');
6279: END IF;
6280:
6281: Validate_CUSTOMER_ID(
6290: raise FND_API.G_EXC_ERROR;
6291: END IF;
6292:
6293: IF l_debug THEN
6294: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6295: 'Validate_INC_PARTNER_PARTY_ID');
6296: END IF;
6297:
6298: Validate_INC_PARTNER_PARTY_ID(
6308: raise FND_API.G_EXC_ERROR;
6309: END IF;
6310:
6311: IF l_debug THEN
6312: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6313: 'Validate_CLOSE_COMPETITOR_ID');
6314: END IF;
6315:
6316: Validate_CLOSE_COMPETITOR_ID(
6325: raise FND_API.G_EXC_ERROR;
6326: END IF;
6327:
6328: IF l_debug THEN
6329: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6330: 'Validate_END_USER_CUSTOMER_ID');
6331: END IF;
6332:
6333: Validate_END_USER_CUSTOMER_ID(
6342: raise FND_API.G_EXC_ERROR;
6343: END IF;
6344:
6345: IF l_debug THEN
6346: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6347: 'Validate_ADDRESS_ID');
6348: END IF;
6349:
6350: Validate_ADDRESS_ID(
6360: raise FND_API.G_EXC_ERROR;
6361: END IF;
6362:
6363: IF l_debug THEN
6364: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6365: 'Validate_END_USER_ADDRESS_ID');
6366: END IF;
6367:
6368: Validate_END_USER_ADDRESS_ID(
6378: raise FND_API.G_EXC_ERROR;
6379: END IF;
6380:
6381: IF l_debug THEN
6382: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6383: 'Validate_AUTO_ASGN_TYPE');
6384: END IF;
6385:
6386: Validate_AUTO_ASGN_TYPE(
6395: raise FND_API.G_EXC_ERROR;
6396: END IF;
6397:
6398: IF l_debug THEN
6399: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6400: 'Validate_PRM_ASGN_TYPE');
6401: END IF;
6402:
6403: Validate_PRM_ASGN_TYPE(
6412: raise FND_API.G_EXC_ERROR;
6413: END IF;
6414:
6415: IF l_debug THEN
6416: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6417: 'Validate_INC_PRTNR_RESOURCE_ID');
6418: END IF;
6419:
6420: Validate_INC_PRTNR_RESOURCE_ID(
6430: raise FND_API.G_EXC_ERROR;
6431: END IF;
6432:
6433: IF l_debug THEN
6434: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6435: 'Validate_PRM_IND_CLS_CODE');
6436: END IF;
6437:
6438: Validate_PRM_IND_CLS_CODE(
6448: raise FND_API.G_EXC_ERROR;
6449: END IF;
6450:
6451: IF l_debug THEN
6452: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6453: 'Validate_PRM_EXEC_SPONSOR_FLAG');
6454: END IF;
6455:
6456: Validate_PRM_EXEC_SPONSOR_FLAG(
6465: raise FND_API.G_EXC_ERROR;
6466: END IF;
6467:
6468: IF l_debug THEN
6469: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6470: 'Validate_PRM_PRJ_LDINPLE_FLAG');
6471: END IF;
6472:
6473: Validate_PRM_PRJ_LDINPLE_FLAG(
6484: END IF;
6485:
6486: -- 091200 ffang, for bug 1402449
6487: IF l_debug THEN
6488: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6489: 'Validate_DESCRIPTION');
6490: END IF;
6491:
6492: Validate_DESCRIPTION(
6503: -- end 091200 ffang
6504:
6505: -- solin, for bug 1554330
6506: IF l_debug THEN
6507: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6508: 'Validate_FREEZE_FLAG');
6509: END IF;
6510:
6511: Validate_FREEZE_FLAG(
6545: -- Calling record level validation procedures
6546: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_RECORD)
6547: THEN
6548: IF l_debug THEN
6549: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6550: 'Validate_WinPorb_StageID');
6551: END IF;
6552:
6553: Validate_WinPorb_StageID(
6568: l_Win_prob_warning_msg := x_msg_data;
6569: END IF;
6570:
6571: IF l_debug THEN
6572: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6573: 'Validate_Status_CloseReason');
6574: END IF;
6575:
6576: Validate_Status_CloseReason(
6615:
6616:
6617: -- Debug Message
6618: IF l_debug THEN
6619: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
6620: 'Private API: ' || l_api_name || ' end');
6621:
6622: END IF;
6623: