[Home] [Help]
19: -- End of Comments
20:
21: PROCEDURE Create_Opp_Header
22: ( p_api_version_number IN NUMBER,
23: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
24: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
25: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
26: p_header_rec IN HEADER_REC_TYPE DEFAULT G_MISS_HEADER_REC,
27: p_check_access_flag IN VARCHAR2,
20:
21: PROCEDURE Create_Opp_Header
22: ( p_api_version_number IN NUMBER,
23: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
24: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
25: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
26: p_header_rec IN HEADER_REC_TYPE DEFAULT G_MISS_HEADER_REC,
27: p_check_access_flag IN VARCHAR2,
28: p_admin_flag IN VARCHAR2,
21: PROCEDURE Create_Opp_Header
22: ( p_api_version_number IN NUMBER,
23: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
24: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
25: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
26: p_header_rec IN HEADER_REC_TYPE DEFAULT G_MISS_HEADER_REC,
27: p_check_access_flag IN VARCHAR2,
28: p_admin_flag IN VARCHAR2,
29: p_admin_group_id IN NUMBER,
50: -- Standard Start of API savepoint
51: SAVEPOINT CREATE_OPP_HEADER_PUB;
52:
53: -- Standard call to check for call compatibility.
54: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
55: p_api_version_number,
56: l_api_name,
57: G_PKG_NAME)
58: THEN
55: p_api_version_number,
56: l_api_name,
57: G_PKG_NAME)
58: THEN
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
62:
63: -- Initialize message list if p_init_msg_list is set to TRUE.
60: END IF;
61:
62:
63: -- Initialize message list if p_init_msg_list is set to TRUE.
64: IF FND_API.to_Boolean( p_init_msg_list )
65: THEN
66: FND_MSG_PUB.initialize;
67: END IF;
68:
78: END IF;
79: END IF;
80:
81: -- Initialize API return status to SUCCESS
82: x_return_status := FND_API.G_RET_STS_SUCCESS;
83:
84: --
85: -- API body
86: --
106: -- Calling Private package: Create_OPP_HEADER
107: -- Hint: Primary key needs to be returned
108: AS_OPP_header_PVT.Create_opp_header(
109: P_Api_Version_Number => 2.0,
110: P_Init_Msg_List => FND_API.G_FALSE,
111: P_Commit => p_commit,
112: P_Validation_Level => P_Validation_Level ,
113: P_Check_Access_Flag => p_check_access_flag,
114: P_Admin_Flag => P_Admin_Flag ,
122: X_Return_Status => x_return_status,
123: X_Msg_Count => x_msg_count,
124: X_Msg_Data => x_msg_data);
125:
126: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
127: l_warning_msg := X_Msg_Data;
128: END IF;
129:
130: -- Check return status from the above procedure call
127: l_warning_msg := X_Msg_Data;
128: END IF;
129:
130: -- Check return status from the above procedure call
131: IF x_return_status = FND_API.G_RET_STS_ERROR then
132: raise FND_API.G_EXC_ERROR;
133: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
128: END IF;
129:
130: -- Check return status from the above procedure call
131: IF x_return_status = FND_API.G_RET_STS_ERROR then
132: raise FND_API.G_EXC_ERROR;
133: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
136:
129:
130: -- Check return status from the above procedure call
131: IF x_return_status = FND_API.G_RET_STS_ERROR then
132: raise FND_API.G_EXC_ERROR;
133: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
136:
137: -- USER HOOK standard : vertical industry post-processing section
130: -- Check return status from the above procedure call
131: IF x_return_status = FND_API.G_RET_STS_ERROR then
132: raise FND_API.G_EXC_ERROR;
133: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
136:
137: -- USER HOOK standard : vertical industry post-processing section
138: IF(JTF_USR_HKS.Ok_to_execute('AS_OPPORTUNITY_PUB', 'Create_Opp_Header','A','V'))
141: l_lead_id := x_LEAD_ID;
142:
143: AS_OPPORTUNITY_VUHK.Create_opp_header_Post(
144: P_Api_Version_Number => 2.0,
145: P_Init_Msg_List => FND_API.G_FALSE,
146: P_Commit => p_commit,
147: P_Validation_Level => P_Validation_Level ,
148: P_Check_Access_Flag => p_check_access_flag,
149: P_Admin_Flag => P_Admin_Flag ,
158: X_Msg_Count => x_msg_count,
159: X_Msg_Data => x_msg_data);
160:
161: -- Debug Message
162: IF x_return_status <> FND_API.G_RET_STS_SUCCESS then
163: IF l_debug THEN
164: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
165: 'Create_opp_header_Post fail');
166: END IF;
167:
168: END IF;
169:
170: -- Check return status from the above procedure call
171: IF x_return_status = FND_API.G_RET_STS_ERROR then
172: raise FND_API.G_EXC_ERROR;
173: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
174: raise FND_API.G_EXC_UNEXPECTED_ERROR;
175: END IF;
168: END IF;
169:
170: -- Check return status from the above procedure call
171: IF x_return_status = FND_API.G_RET_STS_ERROR then
172: raise FND_API.G_EXC_ERROR;
173: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
174: raise FND_API.G_EXC_UNEXPECTED_ERROR;
175: END IF;
176: END IF;
169:
170: -- Check return status from the above procedure call
171: IF x_return_status = FND_API.G_RET_STS_ERROR then
172: raise FND_API.G_EXC_ERROR;
173: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
174: raise FND_API.G_EXC_UNEXPECTED_ERROR;
175: END IF;
176: END IF;
177:
170: -- Check return status from the above procedure call
171: IF x_return_status = FND_API.G_RET_STS_ERROR then
172: raise FND_API.G_EXC_ERROR;
173: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
174: raise FND_API.G_EXC_UNEXPECTED_ERROR;
175: END IF;
176: END IF;
177:
178:
180: -- End of API body.
181: --
182:
183: -- Standard check for p_commit
184: IF FND_API.to_Boolean( p_commit )
185: THEN
186: COMMIT WORK;
187: END IF;
188:
204: ( p_count => x_msg_count,
205: p_data => x_msg_data
206: );
207:
208: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
209: X_Msg_Data := l_warning_msg;
210: END IF;
211:
212: EXCEPTION
209: X_Msg_Data := l_warning_msg;
210: END IF;
211:
212: EXCEPTION
213: WHEN FND_API.G_EXC_ERROR THEN
214: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
215: P_MODULE => l_module
216: ,P_API_NAME => L_API_NAME
217: ,P_PKG_NAME => G_PKG_NAME
220: ,X_MSG_COUNT => X_MSG_COUNT
221: ,X_MSG_DATA => X_MSG_DATA
222: ,X_RETURN_STATUS => X_RETURN_STATUS);
223:
224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
225: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
226: P_MODULE => l_module
227: ,P_API_NAME => L_API_NAME
228: ,P_PKG_NAME => G_PKG_NAME
253: --
254:
255: PROCEDURE Update_Opp_header
256: ( p_api_version_number IN NUMBER,
257: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
258: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
259: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
260: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
261: p_check_access_flag IN VARCHAR2,
254:
255: PROCEDURE Update_Opp_header
256: ( p_api_version_number IN NUMBER,
257: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
258: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
259: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
260: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
261: p_check_access_flag IN VARCHAR2,
262: p_admin_flag IN VARCHAR2,
255: PROCEDURE Update_Opp_header
256: ( p_api_version_number IN NUMBER,
257: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
258: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
259: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
260: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
261: p_check_access_flag IN VARCHAR2,
262: p_admin_flag IN VARCHAR2,
263: p_admin_group_id IN NUMBER,
281: -- Standard Start of API savepoint
282: SAVEPOINT UPDATE_OPP_HEADER_PUB;
283:
284: -- Standard call to check for call compatibility.
285: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
286: p_api_version_number,
287: l_api_name,
288: G_PKG_NAME)
289: THEN
286: p_api_version_number,
287: l_api_name,
288: G_PKG_NAME)
289: THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
291: END IF;
292:
293:
294: -- Initialize message list if p_init_msg_list is set to TRUE.
291: END IF;
292:
293:
294: -- Initialize message list if p_init_msg_list is set to TRUE.
295: IF FND_API.to_Boolean( p_init_msg_list )
296: THEN
297: FND_MSG_PUB.initialize;
298: END IF;
299:
308: END IF;
309:
310:
311: -- Initialize API return status to SUCCESS
312: x_return_status := FND_API.G_RET_STS_SUCCESS;
313:
314: --
315: -- API body
316: --
334: IF(JTF_USR_HKS.Ok_to_execute('AS_OPPORTUNITY_PUB', 'Update_Opp_Header','B','V'))
335: THEN
336: AS_OPPORTUNITY_VUHK.Update_opp_header_Pre(
337: P_Api_Version_Number => 2.0,
338: P_Init_Msg_List => FND_API.G_FALSE,
339: P_Commit => FND_API.G_FALSE,
340: P_Validation_Level => P_Validation_Level,
341: P_Check_Access_Flag => p_check_access_flag,
342: P_Admin_Flag => P_Admin_Flag ,
335: THEN
336: AS_OPPORTUNITY_VUHK.Update_opp_header_Pre(
337: P_Api_Version_Number => 2.0,
338: P_Init_Msg_List => FND_API.G_FALSE,
339: P_Commit => FND_API.G_FALSE,
340: P_Validation_Level => P_Validation_Level,
341: P_Check_Access_Flag => p_check_access_flag,
342: P_Admin_Flag => P_Admin_Flag ,
343: P_Admin_Group_Id => P_Admin_Group_Id,
349: X_Msg_Count => x_msg_count,
350: X_Msg_Data => x_msg_data);
351:
352: -- Debug Message
353: IF x_return_status <> FND_API.G_RET_STS_SUCCESS then
354: IF l_debug THEN
355: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
356: 'Update_opp_header_Pre fail');
357: END IF;
358:
359: END IF;
360:
361: -- Check return status from the above procedure call
362: IF x_return_status = FND_API.G_RET_STS_ERROR then
363: raise FND_API.G_EXC_ERROR;
364: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
365: raise FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
359: END IF;
360:
361: -- Check return status from the above procedure call
362: IF x_return_status = FND_API.G_RET_STS_ERROR then
363: raise FND_API.G_EXC_ERROR;
364: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
365: raise FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
367: END IF;
360:
361: -- Check return status from the above procedure call
362: IF x_return_status = FND_API.G_RET_STS_ERROR then
363: raise FND_API.G_EXC_ERROR;
364: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
365: raise FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
367: END IF;
368:
361: -- Check return status from the above procedure call
362: IF x_return_status = FND_API.G_RET_STS_ERROR then
363: raise FND_API.G_EXC_ERROR;
364: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
365: raise FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
367: END IF;
368:
369: -- Opp private API call
368:
369: -- Opp private API call
370: AS_OPP_header_PVT.Update_opp_header(
371: P_Api_Version_Number => 2.0,
372: P_Init_Msg_List => FND_API.G_FALSE,
373: P_Commit => FND_API.G_FALSE,
374: P_Validation_Level => P_Validation_Level,
375: P_Check_Access_Flag => p_check_access_flag,
376: P_Admin_Flag => P_Admin_Flag ,
369: -- Opp private API call
370: AS_OPP_header_PVT.Update_opp_header(
371: P_Api_Version_Number => 2.0,
372: P_Init_Msg_List => FND_API.G_FALSE,
373: P_Commit => FND_API.G_FALSE,
374: P_Validation_Level => P_Validation_Level,
375: P_Check_Access_Flag => p_check_access_flag,
376: P_Admin_Flag => P_Admin_Flag ,
377: P_Admin_Group_Id => P_Admin_Group_Id,
382: X_Return_Status => x_return_status,
383: X_Msg_Count => x_msg_count,
384: X_Msg_Data => x_msg_data);
385:
386: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
387: l_warning_msg := X_Msg_Data;
388: END IF;
389:
390: -- Check return status from the above procedure call
387: l_warning_msg := X_Msg_Data;
388: END IF;
389:
390: -- Check return status from the above procedure call
391: IF x_return_status = FND_API.G_RET_STS_ERROR then
392: raise FND_API.G_EXC_ERROR;
393: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
394: raise FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
388: END IF;
389:
390: -- Check return status from the above procedure call
391: IF x_return_status = FND_API.G_RET_STS_ERROR then
392: raise FND_API.G_EXC_ERROR;
393: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
394: raise FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
389:
390: -- Check return status from the above procedure call
391: IF x_return_status = FND_API.G_RET_STS_ERROR then
392: raise FND_API.G_EXC_ERROR;
393: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
394: raise FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
397:
390: -- Check return status from the above procedure call
391: IF x_return_status = FND_API.G_RET_STS_ERROR then
392: raise FND_API.G_EXC_ERROR;
393: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
394: raise FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
397:
398: -- USER HOOK standard : vertical industry post-processing section
399: IF(JTF_USR_HKS.Ok_to_execute('AS_OPPORTUNITY_PUB', 'Update_Opp_Header','A','V'))
400: THEN
401: AS_OPPORTUNITY_VUHK.Update_opp_header_Post(
402: P_Api_Version_Number => 2.0,
403: P_Init_Msg_List => FND_API.G_FALSE,
404: P_Commit => FND_API.G_FALSE,
405: P_Validation_Level => P_Validation_Level,
406: P_Check_Access_Flag => p_check_access_flag,
407: P_Admin_Flag => P_Admin_Flag ,
400: THEN
401: AS_OPPORTUNITY_VUHK.Update_opp_header_Post(
402: P_Api_Version_Number => 2.0,
403: P_Init_Msg_List => FND_API.G_FALSE,
404: P_Commit => FND_API.G_FALSE,
405: P_Validation_Level => P_Validation_Level,
406: P_Check_Access_Flag => p_check_access_flag,
407: P_Admin_Flag => P_Admin_Flag ,
408: P_Admin_Group_Id => P_Admin_Group_Id,
414: X_Msg_Count => x_msg_count,
415: X_Msg_Data => x_msg_data);
416:
417: -- Debug Message
418: IF x_return_status <> FND_API.G_RET_STS_SUCCESS then
419: IF l_debug THEN
420: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
421: 'Update_opp_header_Post fail');
422: END IF;
422: END IF;
423: END IF;
424:
425: -- Check return status from the above procedure call
426: IF x_return_status = FND_API.G_RET_STS_ERROR then
427: raise FND_API.G_EXC_ERROR;
428: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
430: END IF;
423: END IF;
424:
425: -- Check return status from the above procedure call
426: IF x_return_status = FND_API.G_RET_STS_ERROR then
427: raise FND_API.G_EXC_ERROR;
428: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
430: END IF;
431: END IF;
424:
425: -- Check return status from the above procedure call
426: IF x_return_status = FND_API.G_RET_STS_ERROR then
427: raise FND_API.G_EXC_ERROR;
428: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
430: END IF;
431: END IF;
432:
425: -- Check return status from the above procedure call
426: IF x_return_status = FND_API.G_RET_STS_ERROR then
427: raise FND_API.G_EXC_ERROR;
428: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
430: END IF;
431: END IF;
432:
433:
435: -- End of API body
436: --
437:
438: -- Standard check for p_commit
439: IF FND_API.to_Boolean( p_commit )
440: THEN
441: COMMIT WORK;
442: END IF;
443:
455: ( p_count => x_msg_count,
456: p_data => x_msg_data
457: );
458:
459: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
460: X_Msg_Data := l_warning_msg;
461: END IF;
462:
463: EXCEPTION
460: X_Msg_Data := l_warning_msg;
461: END IF;
462:
463: EXCEPTION
464: WHEN FND_API.G_EXC_ERROR THEN
465: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
466: P_MODULE => l_module
467: ,P_API_NAME => L_API_NAME
468: ,P_PKG_NAME => G_PKG_NAME
471: ,X_MSG_COUNT => X_MSG_COUNT
472: ,X_MSG_DATA => X_MSG_DATA
473: ,X_RETURN_STATUS => X_RETURN_STATUS);
474:
475: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
476: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
477: P_MODULE => l_module
478: ,P_API_NAME => L_API_NAME
479: ,P_PKG_NAME => G_PKG_NAME
504: --
505:
506: PROCEDURE Delete_Opp_Header
507: ( p_api_version_number IN NUMBER,
508: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
509: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
510: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
511: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
512: p_check_access_flag IN VARCHAR2,
505:
506: PROCEDURE Delete_Opp_Header
507: ( p_api_version_number IN NUMBER,
508: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
509: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
510: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
511: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
512: p_check_access_flag IN VARCHAR2,
513: p_admin_flag IN VARCHAR2,
506: PROCEDURE Delete_Opp_Header
507: ( p_api_version_number IN NUMBER,
508: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
509: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
510: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
511: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
512: p_check_access_flag IN VARCHAR2,
513: p_admin_flag IN VARCHAR2,
514: p_admin_group_id IN NUMBER,
530: -- Standard Start of API savepoint
531: SAVEPOINT DELETE_OPP_HEADER_PUB;
532:
533: -- Standard call to check for call compatibility.
534: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
535: p_api_version_number,
536: l_api_name,
537: G_PKG_NAME)
538: THEN
535: p_api_version_number,
536: l_api_name,
537: G_PKG_NAME)
538: THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541:
542:
543: -- Initialize message list if p_init_msg_list is set to TRUE.
540: END IF;
541:
542:
543: -- Initialize message list if p_init_msg_list is set to TRUE.
544: IF FND_API.to_Boolean( p_init_msg_list )
545: THEN
546: FND_MSG_PUB.initialize;
547: END IF;
548:
555: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
556: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
557: END IF;
558: -- Initialize API return status to SUCCESS
559: x_return_status := FND_API.G_RET_STS_SUCCESS;
560:
561: --
562: -- API body
563: --
579: *****/
580:
581: AS_OPP_header_PVT.Delete_opp_header(
582: P_Api_Version_Number => 2.0,
583: P_Init_Msg_List => FND_API.G_FALSE,
584: P_Commit => p_commit,
585: P_Validation_Level => P_Validation_Level,
586: P_Check_Access_Flag => p_check_access_flag,
587: P_Admin_Flag => P_Admin_Flag ,
594: X_Msg_Count => x_msg_count,
595: X_Msg_Data => x_msg_data);
596:
597: -- Check return status from the above procedure call
598: IF x_return_status = FND_API.G_RET_STS_ERROR then
599: raise FND_API.G_EXC_ERROR;
600: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
601: raise FND_API.G_EXC_UNEXPECTED_ERROR;
602: END IF;
595: X_Msg_Data => x_msg_data);
596:
597: -- Check return status from the above procedure call
598: IF x_return_status = FND_API.G_RET_STS_ERROR then
599: raise FND_API.G_EXC_ERROR;
600: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
601: raise FND_API.G_EXC_UNEXPECTED_ERROR;
602: END IF;
603:
596:
597: -- Check return status from the above procedure call
598: IF x_return_status = FND_API.G_RET_STS_ERROR then
599: raise FND_API.G_EXC_ERROR;
600: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
601: raise FND_API.G_EXC_UNEXPECTED_ERROR;
602: END IF;
603:
604: --
597: -- Check return status from the above procedure call
598: IF x_return_status = FND_API.G_RET_STS_ERROR then
599: raise FND_API.G_EXC_ERROR;
600: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
601: raise FND_API.G_EXC_UNEXPECTED_ERROR;
602: END IF;
603:
604: --
605: -- End of API body
605: -- End of API body
606: --
607:
608: -- Standard check for p_commit
609: IF FND_API.to_Boolean( p_commit )
610: THEN
611: COMMIT WORK;
612: END IF;
613:
628: p_data => x_msg_data
629: );
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
633: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
634: P_MODULE => l_module
635: ,P_API_NAME => L_API_NAME
636: ,P_PKG_NAME => G_PKG_NAME
639: ,X_MSG_COUNT => X_MSG_COUNT
640: ,X_MSG_DATA => X_MSG_DATA
641: ,X_RETURN_STATUS => X_RETURN_STATUS);
642:
643: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
644: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
645: P_MODULE => l_module
646: ,P_API_NAME => L_API_NAME
647: ,P_PKG_NAME => G_PKG_NAME
674: --
675:
676: PROCEDURE Create_Opp_Lines
677: ( p_api_version_number IN NUMBER,
678: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
679: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
680: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
681: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
682: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
675:
676: PROCEDURE Create_Opp_Lines
677: ( p_api_version_number IN NUMBER,
678: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
679: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
680: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
681: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
682: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
683: p_check_access_flag IN VARCHAR2,
676: PROCEDURE Create_Opp_Lines
677: ( p_api_version_number IN NUMBER,
678: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
679: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
680: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
681: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
682: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
683: p_check_access_flag IN VARCHAR2,
684: p_admin_flag IN VARCHAR2,
706: -- Standard Start of API savepoint
707: SAVEPOINT CREATE_OPP_LINES_PUB;
708:
709: -- Standard call to check for call compatibility.
710: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
711: p_api_version_number,
712: l_api_name,
713: G_PKG_NAME)
714: THEN
711: p_api_version_number,
712: l_api_name,
713: G_PKG_NAME)
714: THEN
715: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
716: END IF;
717:
718:
719: -- Initialize message list if p_init_msg_list is set to TRUE.
716: END IF;
717:
718:
719: -- Initialize message list if p_init_msg_list is set to TRUE.
720: IF FND_API.to_Boolean( p_init_msg_list )
721: THEN
722: FND_MSG_PUB.initialize;
723: END IF;
724:
732: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
733: END IF;
734:
735: -- Initialize API return status to SUCCESS
736: x_return_status := FND_API.G_RET_STS_SUCCESS;
737:
738: --
739: -- API body
740: --
758: -- Calling Private package: Create_OPP_LINES
759: -- Hint: Primary key needs to be returned
760: AS_OPP_line_PVT.Create_opp_lines(
761: P_Api_Version_Number => 2.0,
762: P_Init_Msg_List => FND_API.G_FALSE,
763: P_Commit => p_commit,
764: P_Validation_Level => P_Validation_Level,
765: P_Check_Access_Flag => p_check_access_flag,
766: P_Admin_Flag => P_Admin_Flag ,
776: X_Msg_Count => x_msg_count,
777: X_Msg_Data => x_msg_data);
778:
779: -- Check return status from the above procedure call
780: IF x_return_status = FND_API.G_RET_STS_ERROR then
781: raise FND_API.G_EXC_ERROR;
782: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
783: raise FND_API.G_EXC_UNEXPECTED_ERROR;
784: END IF;
777: X_Msg_Data => x_msg_data);
778:
779: -- Check return status from the above procedure call
780: IF x_return_status = FND_API.G_RET_STS_ERROR then
781: raise FND_API.G_EXC_ERROR;
782: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
783: raise FND_API.G_EXC_UNEXPECTED_ERROR;
784: END IF;
785:
778:
779: -- Check return status from the above procedure call
780: IF x_return_status = FND_API.G_RET_STS_ERROR then
781: raise FND_API.G_EXC_ERROR;
782: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
783: raise FND_API.G_EXC_UNEXPECTED_ERROR;
784: END IF;
785:
786: --
779: -- Check return status from the above procedure call
780: IF x_return_status = FND_API.G_RET_STS_ERROR then
781: raise FND_API.G_EXC_ERROR;
782: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
783: raise FND_API.G_EXC_UNEXPECTED_ERROR;
784: END IF;
785:
786: --
787: -- End of API body.
787: -- End of API body.
788: --
789:
790: -- Standard check for p_commit
791: IF FND_API.to_Boolean( p_commit )
792: THEN
793: COMMIT WORK;
794: END IF;
795:
810: p_data => x_msg_data
811: );
812:
813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN
815: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
816: P_MODULE => l_module
817: ,P_API_NAME => L_API_NAME
818: ,P_PKG_NAME => G_PKG_NAME
821: ,X_MSG_COUNT => X_MSG_COUNT
822: ,X_MSG_DATA => X_MSG_DATA
823: ,X_RETURN_STATUS => X_RETURN_STATUS);
824:
825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
826: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
827: P_MODULE => l_module
828: ,P_API_NAME => L_API_NAME
829: ,P_PKG_NAME => G_PKG_NAME
856: --
857:
858: PROCEDURE Update_Opp_Lines
859: ( p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
864: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
857:
858: PROCEDURE Update_Opp_Lines
859: ( p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
864: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
865: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
858: PROCEDURE Update_Opp_Lines
859: ( p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
864: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
865: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
866: p_check_access_flag IN VARCHAR2,
884: -- Standard Start of API savepoint
885: SAVEPOINT UPDATE_OPP_LINES_PUB;
886:
887: -- Standard call to check for call compatibility.
888: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
889: p_api_version_number,
890: l_api_name,
891: G_PKG_NAME)
892: THEN
889: p_api_version_number,
890: l_api_name,
891: G_PKG_NAME)
892: THEN
893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
894: END IF;
895:
896:
897: -- Initialize message list if p_init_msg_list is set to TRUE.
894: END IF;
895:
896:
897: -- Initialize message list if p_init_msg_list is set to TRUE.
898: IF FND_API.to_Boolean( p_init_msg_list )
899: THEN
900: FND_MSG_PUB.initialize;
901: END IF;
902:
911:
912: END IF;
913:
914: -- Initialize API return status to SUCCESS
915: x_return_status := FND_API.G_RET_STS_SUCCESS;
916:
917: --
918: -- API body
919: --
936: *****/
937:
938: AS_OPP_line_PVT.Update_opp_lines(
939: P_Api_Version_Number => 2.0,
940: P_Init_Msg_List => FND_API.G_FALSE,
941: P_Commit => p_commit,
942: P_Validation_Level => P_Validation_Level,
943: P_Check_Access_Flag => p_check_access_flag,
944: P_Admin_Flag => P_Admin_Flag ,
953: X_Msg_Count => x_msg_count,
954: X_Msg_Data => x_msg_data);
955:
956: -- Check return status from the above procedure call
957: IF x_return_status = FND_API.G_RET_STS_ERROR then
958: raise FND_API.G_EXC_ERROR;
959: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
960: raise FND_API.G_EXC_UNEXPECTED_ERROR;
961: END IF;
954: X_Msg_Data => x_msg_data);
955:
956: -- Check return status from the above procedure call
957: IF x_return_status = FND_API.G_RET_STS_ERROR then
958: raise FND_API.G_EXC_ERROR;
959: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
960: raise FND_API.G_EXC_UNEXPECTED_ERROR;
961: END IF;
962:
955:
956: -- Check return status from the above procedure call
957: IF x_return_status = FND_API.G_RET_STS_ERROR then
958: raise FND_API.G_EXC_ERROR;
959: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
960: raise FND_API.G_EXC_UNEXPECTED_ERROR;
961: END IF;
962:
963: --
956: -- Check return status from the above procedure call
957: IF x_return_status = FND_API.G_RET_STS_ERROR then
958: raise FND_API.G_EXC_ERROR;
959: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
960: raise FND_API.G_EXC_UNEXPECTED_ERROR;
961: END IF;
962:
963: --
964: -- End of API body
964: -- End of API body
965: --
966:
967: -- Standard check for p_commit
968: IF FND_API.to_Boolean( p_commit )
969: THEN
970: COMMIT WORK;
971: END IF;
972:
987: p_data => x_msg_data
988: );
989:
990: EXCEPTION
991: WHEN FND_API.G_EXC_ERROR THEN
992: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
993: P_MODULE => l_module
994: ,P_API_NAME => L_API_NAME
995: ,P_PKG_NAME => G_PKG_NAME
998: ,X_MSG_COUNT => X_MSG_COUNT
999: ,X_MSG_DATA => X_MSG_DATA
1000: ,X_RETURN_STATUS => X_RETURN_STATUS);
1001:
1002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1003: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1004: P_MODULE => l_module
1005: ,P_API_NAME => L_API_NAME
1006: ,P_PKG_NAME => G_PKG_NAME
1032: --
1033:
1034: PROCEDURE Delete_Opp_Lines
1035: ( p_api_version_number IN NUMBER,
1036: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1037: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1038: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1039: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1040: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
1033:
1034: PROCEDURE Delete_Opp_Lines
1035: ( p_api_version_number IN NUMBER,
1036: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1037: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1038: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1039: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1040: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
1041: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
1034: PROCEDURE Delete_Opp_Lines
1035: ( p_api_version_number IN NUMBER,
1036: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1037: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1038: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1039: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1040: p_line_tbl IN AS_OPPORTUNITY_PUB.Line_Tbl_Type,
1041: p_header_rec IN AS_OPPORTUNITY_PUB.Header_Rec_Type,
1042: p_check_access_flag IN VARCHAR2,
1060: -- Standard Start of API savepoint
1061: SAVEPOINT DELETE_OPP_LINES_PUB;
1062:
1063: -- Standard call to check for call compatibility.
1064: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1065: p_api_version_number,
1066: l_api_name,
1067: G_PKG_NAME)
1068: THEN
1065: p_api_version_number,
1066: l_api_name,
1067: G_PKG_NAME)
1068: THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: END IF;
1071:
1072:
1073: -- Initialize message list if p_init_msg_list is set to TRUE.
1070: END IF;
1071:
1072:
1073: -- Initialize message list if p_init_msg_list is set to TRUE.
1074: IF FND_API.to_Boolean( p_init_msg_list )
1075: THEN
1076: FND_MSG_PUB.initialize;
1077: END IF;
1078:
1087:
1088: END IF;
1089:
1090: -- Initialize API return status to SUCCESS
1091: x_return_status := FND_API.G_RET_STS_SUCCESS;
1092:
1093: --
1094: -- API body
1095: --
1111: *****/
1112:
1113: AS_OPP_line_PVT.Delete_opp_lines(
1114: P_Api_Version_Number => 2.0,
1115: P_Init_Msg_List => FND_API.G_FALSE,
1116: P_Commit => p_commit,
1117: P_Validation_Level => P_Validation_Level,
1118: P_Check_Access_Flag => p_check_access_flag,
1119: P_Admin_Flag => P_Admin_Flag ,
1128: X_Msg_Count => x_msg_count,
1129: X_Msg_Data => x_msg_data);
1130:
1131: -- Check return status from the above procedure call
1132: IF x_return_status = FND_API.G_RET_STS_ERROR then
1133: raise FND_API.G_EXC_ERROR;
1134: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1135: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1136: END IF;
1129: X_Msg_Data => x_msg_data);
1130:
1131: -- Check return status from the above procedure call
1132: IF x_return_status = FND_API.G_RET_STS_ERROR then
1133: raise FND_API.G_EXC_ERROR;
1134: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1135: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1136: END IF;
1137:
1130:
1131: -- Check return status from the above procedure call
1132: IF x_return_status = FND_API.G_RET_STS_ERROR then
1133: raise FND_API.G_EXC_ERROR;
1134: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1135: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1136: END IF;
1137:
1138: --
1131: -- Check return status from the above procedure call
1132: IF x_return_status = FND_API.G_RET_STS_ERROR then
1133: raise FND_API.G_EXC_ERROR;
1134: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1135: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1136: END IF;
1137:
1138: --
1139: -- End of API body
1139: -- End of API body
1140: --
1141:
1142: -- Standard check for p_commit
1143: IF FND_API.to_Boolean( p_commit )
1144: THEN
1145: COMMIT WORK;
1146: END IF;
1147:
1162: p_data => x_msg_data
1163: );
1164:
1165: EXCEPTION
1166: WHEN FND_API.G_EXC_ERROR THEN
1167: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1168: P_MODULE => l_module
1169: ,P_API_NAME => L_API_NAME
1170: ,P_PKG_NAME => G_PKG_NAME
1173: ,X_MSG_COUNT => X_MSG_COUNT
1174: ,X_MSG_DATA => X_MSG_DATA
1175: ,X_RETURN_STATUS => X_RETURN_STATUS);
1176:
1177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1178: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1179: P_MODULE => l_module
1180: ,P_API_NAME => L_API_NAME
1181: ,P_PKG_NAME => G_PKG_NAME
1200:
1201:
1202: PROCEDURE Create_Sales_Credits
1203: ( p_api_version_number IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1205: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1206: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1207: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1208: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1201:
1202: PROCEDURE Create_Sales_Credits
1203: ( p_api_version_number IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1205: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1206: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1207: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1208: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1209: p_check_access_flag IN VARCHAR2,
1202: PROCEDURE Create_Sales_Credits
1203: ( p_api_version_number IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1205: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1206: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1207: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1208: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1209: p_check_access_flag IN VARCHAR2,
1210: p_admin_flag IN VARCHAR2,
1226: -- Standard Start of API savepoint
1227: SAVEPOINT CREATE_SALES_CREDITS_PUB;
1228:
1229: -- Standard call to check for call compatibility.
1230: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1231: p_api_version_number,
1232: l_api_name,
1233: G_PKG_NAME)
1234: THEN
1231: p_api_version_number,
1232: l_api_name,
1233: G_PKG_NAME)
1234: THEN
1235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1236: END IF;
1237:
1238:
1239: -- Initialize message list if p_init_msg_list is set to TRUE.
1236: END IF;
1237:
1238:
1239: -- Initialize message list if p_init_msg_list is set to TRUE.
1240: IF FND_API.to_Boolean( p_init_msg_list )
1241: THEN
1242: FND_MSG_PUB.initialize;
1243: END IF;
1244:
1253:
1254: END IF;
1255:
1256: -- Initialize API return status to SUCCESS
1257: x_return_status := FND_API.G_RET_STS_SUCCESS;
1258:
1259: --
1260: -- API body
1261: --
1280: -- Calling Private package: Create_SALES_CREDITS
1281: -- Hint: Primary key needs to be returned
1282: AS_OPP_sales_credit_PVT.Create_sales_credits(
1283: P_Api_Version_Number => 2.0,
1284: P_Init_Msg_List => FND_API.G_FALSE,
1285: P_Commit => p_commit,
1286: P_Validation_Level => P_Validation_Level,
1287: P_Check_Access_Flag => p_check_access_flag,
1288: P_Admin_Flag => P_Admin_Flag ,
1297: X_Msg_Data => x_msg_data);
1298:
1299:
1300: -- Check return status from the above procedure call
1301: IF x_return_status = FND_API.G_RET_STS_ERROR then
1302: raise FND_API.G_EXC_ERROR;
1303: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1304: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1305: END IF;
1298:
1299:
1300: -- Check return status from the above procedure call
1301: IF x_return_status = FND_API.G_RET_STS_ERROR then
1302: raise FND_API.G_EXC_ERROR;
1303: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1304: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1305: END IF;
1306:
1299:
1300: -- Check return status from the above procedure call
1301: IF x_return_status = FND_API.G_RET_STS_ERROR then
1302: raise FND_API.G_EXC_ERROR;
1303: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1304: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1305: END IF;
1306:
1307: --
1300: -- Check return status from the above procedure call
1301: IF x_return_status = FND_API.G_RET_STS_ERROR then
1302: raise FND_API.G_EXC_ERROR;
1303: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1304: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1305: END IF;
1306:
1307: --
1308: -- End of API body.
1308: -- End of API body.
1309: --
1310:
1311: -- Standard check for p_commit
1312: IF FND_API.to_Boolean( p_commit )
1313: THEN
1314: COMMIT WORK;
1315: END IF;
1316:
1330: p_data => x_msg_data
1331: );
1332:
1333: EXCEPTION
1334: WHEN FND_API.G_EXC_ERROR THEN
1335: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1336: P_MODULE => l_module
1337: ,P_API_NAME => L_API_NAME
1338: ,P_PKG_NAME => G_PKG_NAME
1341: ,X_MSG_COUNT => X_MSG_COUNT
1342: ,X_MSG_DATA => X_MSG_DATA
1343: ,X_RETURN_STATUS => X_RETURN_STATUS);
1344:
1345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1346: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1347: P_MODULE => l_module
1348: ,P_API_NAME => L_API_NAME
1349: ,P_PKG_NAME => G_PKG_NAME
1367:
1368:
1369: PROCEDURE Update_Sales_Credits
1370: ( p_api_version_number IN NUMBER,
1371: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1372: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1373: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1374: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1375: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1368:
1369: PROCEDURE Update_Sales_Credits
1370: ( p_api_version_number IN NUMBER,
1371: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1372: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1373: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1374: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1375: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1376: p_check_access_flag IN VARCHAR2,
1369: PROCEDURE Update_Sales_Credits
1370: ( p_api_version_number IN NUMBER,
1371: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1372: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1373: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1374: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1375: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1376: p_check_access_flag IN VARCHAR2,
1377: p_admin_flag IN VARCHAR2,
1394: -- Standard Start of API savepoint
1395: SAVEPOINT UPDATE_SALES_CREDITS_PUB;
1396:
1397: -- Standard call to check for call compatibility.
1398: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1399: p_api_version_number,
1400: l_api_name,
1401: G_PKG_NAME)
1402: THEN
1399: p_api_version_number,
1400: l_api_name,
1401: G_PKG_NAME)
1402: THEN
1403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1404: END IF;
1405:
1406:
1407: -- Initialize message list if p_init_msg_list is set to TRUE.
1404: END IF;
1405:
1406:
1407: -- Initialize message list if p_init_msg_list is set to TRUE.
1408: IF FND_API.to_Boolean( p_init_msg_list )
1409: THEN
1410: FND_MSG_PUB.initialize;
1411: END IF;
1412:
1421:
1422: END IF;
1423:
1424: -- Initialize API return status to SUCCESS
1425: x_return_status := FND_API.G_RET_STS_SUCCESS;
1426:
1427: --
1428: -- API body
1429: --
1445: *****/
1446:
1447: AS_OPP_sales_credit_PVT.Update_sales_credits(
1448: P_Api_Version_Number => 2.0,
1449: P_Init_Msg_List => FND_API.G_FALSE,
1450: P_Commit => p_commit,
1451: P_Validation_Level => P_Validation_Level,
1452: P_Check_Access_Flag => p_check_access_flag ,
1453: P_Admin_Flag => P_Admin_Flag ,
1461: X_Msg_Count => x_msg_count,
1462: X_Msg_Data => x_msg_data);
1463:
1464: -- Check return status from the above procedure call
1465: IF x_return_status = FND_API.G_RET_STS_ERROR then
1466: raise FND_API.G_EXC_ERROR;
1467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1469: END IF;
1462: X_Msg_Data => x_msg_data);
1463:
1464: -- Check return status from the above procedure call
1465: IF x_return_status = FND_API.G_RET_STS_ERROR then
1466: raise FND_API.G_EXC_ERROR;
1467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1469: END IF;
1470:
1463:
1464: -- Check return status from the above procedure call
1465: IF x_return_status = FND_API.G_RET_STS_ERROR then
1466: raise FND_API.G_EXC_ERROR;
1467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1469: END IF;
1470:
1471: --
1464: -- Check return status from the above procedure call
1465: IF x_return_status = FND_API.G_RET_STS_ERROR then
1466: raise FND_API.G_EXC_ERROR;
1467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1469: END IF;
1470:
1471: --
1472: -- End of API body
1472: -- End of API body
1473: --
1474:
1475: -- Standard check for p_commit
1476: IF FND_API.to_Boolean( p_commit )
1477: THEN
1478: COMMIT WORK;
1479: END IF;
1480:
1495: p_data => x_msg_data
1496: );
1497:
1498: EXCEPTION
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1501: P_MODULE => l_module
1502: ,P_API_NAME => L_API_NAME
1503: ,P_PKG_NAME => G_PKG_NAME
1506: ,X_MSG_COUNT => X_MSG_COUNT
1507: ,X_MSG_DATA => X_MSG_DATA
1508: ,X_RETURN_STATUS => X_RETURN_STATUS);
1509:
1510: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1511: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1512: P_MODULE => l_module
1513: ,P_API_NAME => L_API_NAME
1514: ,P_PKG_NAME => G_PKG_NAME
1533:
1534:
1535: PROCEDURE Modify_Sales_Credits
1536: ( p_api_version_number IN NUMBER,
1537: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1538: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1539: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1540: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1541: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1534:
1535: PROCEDURE Modify_Sales_Credits
1536: ( p_api_version_number IN NUMBER,
1537: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1538: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1539: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1540: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1541: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1542: p_check_access_flag IN VARCHAR2,
1535: PROCEDURE Modify_Sales_Credits
1536: ( p_api_version_number IN NUMBER,
1537: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1538: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1539: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1540: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1541: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_Tbl_Type,
1542: p_check_access_flag IN VARCHAR2,
1543: p_admin_flag IN VARCHAR2,
1560: -- Standard Start of API savepoint
1561: SAVEPOINT MODIFY_SALES_CREDITS_PUB;
1562:
1563: -- Standard call to check for call compatibility.
1564: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1565: p_api_version_number,
1566: l_api_name,
1567: G_PKG_NAME)
1568: THEN
1565: p_api_version_number,
1566: l_api_name,
1567: G_PKG_NAME)
1568: THEN
1569: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1570: END IF;
1571:
1572:
1573: -- Initialize message list if p_init_msg_list is set to TRUE.
1570: END IF;
1571:
1572:
1573: -- Initialize message list if p_init_msg_list is set to TRUE.
1574: IF FND_API.to_Boolean( p_init_msg_list )
1575: THEN
1576: FND_MSG_PUB.initialize;
1577: END IF;
1578:
1587:
1588: END IF;
1589:
1590: -- Initialize API return status to SUCCESS
1591: x_return_status := FND_API.G_RET_STS_SUCCESS;
1592:
1593: --
1594: -- API body
1595: --
1611: *****/
1612:
1613: AS_OPP_sales_credit_PVT.Modify_Sales_Credits(
1614: P_Api_Version_Number => 2.0,
1615: P_Init_Msg_List => FND_API.G_FALSE,
1616: P_Commit => p_commit,
1617: P_Validation_Level => P_Validation_Level,
1618: P_Check_Access_Flag => p_check_access_flag ,
1619: P_Admin_Flag => P_Admin_Flag ,
1627: X_Msg_Count => x_msg_count,
1628: X_Msg_Data => x_msg_data);
1629:
1630: -- Check return status from the above procedure call
1631: IF x_return_status = FND_API.G_RET_STS_ERROR then
1632: raise FND_API.G_EXC_ERROR;
1633: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1634: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1635: END IF;
1628: X_Msg_Data => x_msg_data);
1629:
1630: -- Check return status from the above procedure call
1631: IF x_return_status = FND_API.G_RET_STS_ERROR then
1632: raise FND_API.G_EXC_ERROR;
1633: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1634: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1635: END IF;
1636:
1629:
1630: -- Check return status from the above procedure call
1631: IF x_return_status = FND_API.G_RET_STS_ERROR then
1632: raise FND_API.G_EXC_ERROR;
1633: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1634: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1635: END IF;
1636:
1637: --
1630: -- Check return status from the above procedure call
1631: IF x_return_status = FND_API.G_RET_STS_ERROR then
1632: raise FND_API.G_EXC_ERROR;
1633: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1634: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1635: END IF;
1636:
1637: --
1638: -- End of API body
1638: -- End of API body
1639: --
1640:
1641: -- Standard check for p_commit
1642: IF FND_API.to_Boolean( p_commit )
1643: THEN
1644: COMMIT WORK;
1645: END IF;
1646:
1659: p_data => x_msg_data
1660: );
1661:
1662: EXCEPTION
1663: WHEN FND_API.G_EXC_ERROR THEN
1664: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1665: P_MODULE => l_module
1666: ,P_API_NAME => L_API_NAME
1667: ,P_PKG_NAME => G_PKG_NAME
1670: ,X_MSG_COUNT => X_MSG_COUNT
1671: ,X_MSG_DATA => X_MSG_DATA
1672: ,X_RETURN_STATUS => X_RETURN_STATUS);
1673:
1674: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1675: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1676: P_MODULE => l_module
1677: ,P_API_NAME => L_API_NAME
1678: ,P_PKG_NAME => G_PKG_NAME
1696:
1697:
1698: PROCEDURE Delete_Sales_Credits
1699: ( p_api_version_number IN NUMBER,
1700: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1701: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1702: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1703: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1704: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_tbl_Type,
1697:
1698: PROCEDURE Delete_Sales_Credits
1699: ( p_api_version_number IN NUMBER,
1700: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1701: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1702: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1703: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1704: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_tbl_Type,
1705: p_check_access_flag IN VARCHAR2,
1698: PROCEDURE Delete_Sales_Credits
1699: ( p_api_version_number IN NUMBER,
1700: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1701: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1702: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1703: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1704: p_sales_credit_tbl IN AS_OPPORTUNITY_PUB.Sales_Credit_tbl_Type,
1705: p_check_access_flag IN VARCHAR2,
1706: p_admin_flag IN VARCHAR2,
1723: -- Standard Start of API savepoint
1724: SAVEPOINT DELETE_SALES_CREDITS_PUB;
1725:
1726: -- Standard call to check for call compatibility.
1727: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1728: p_api_version_number,
1729: l_api_name,
1730: G_PKG_NAME)
1731: THEN
1728: p_api_version_number,
1729: l_api_name,
1730: G_PKG_NAME)
1731: THEN
1732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1733: END IF;
1734:
1735:
1736: -- Initialize message list if p_init_msg_list is set to TRUE.
1733: END IF;
1734:
1735:
1736: -- Initialize message list if p_init_msg_list is set to TRUE.
1737: IF FND_API.to_Boolean( p_init_msg_list )
1738: THEN
1739: FND_MSG_PUB.initialize;
1740: END IF;
1741:
1750:
1751: END IF;
1752:
1753: -- Initialize API return status to SUCCESS
1754: x_return_status := FND_API.G_RET_STS_SUCCESS;
1755:
1756: --
1757: -- API body
1758: --
1773: );
1774: *****/
1775: AS_OPP_sales_credit_PVT.Delete_sales_credits(
1776: P_Api_Version_Number => 2.0,
1777: P_Init_Msg_List => FND_API.G_FALSE,
1778: P_Commit => p_commit,
1779: P_Validation_Level => P_Validation_Level,
1780: P_Check_Access_Flag => p_check_access_flag,
1781: P_Admin_Flag => P_Admin_Flag,
1789: X_Msg_Count => x_msg_count,
1790: X_Msg_Data => x_msg_data);
1791:
1792: -- Check return status from the above procedure call
1793: IF x_return_status = FND_API.G_RET_STS_ERROR then
1794: raise FND_API.G_EXC_ERROR;
1795: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1796: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1790: X_Msg_Data => x_msg_data);
1791:
1792: -- Check return status from the above procedure call
1793: IF x_return_status = FND_API.G_RET_STS_ERROR then
1794: raise FND_API.G_EXC_ERROR;
1795: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1796: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1798:
1791:
1792: -- Check return status from the above procedure call
1793: IF x_return_status = FND_API.G_RET_STS_ERROR then
1794: raise FND_API.G_EXC_ERROR;
1795: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1796: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1798:
1799: --
1792: -- Check return status from the above procedure call
1793: IF x_return_status = FND_API.G_RET_STS_ERROR then
1794: raise FND_API.G_EXC_ERROR;
1795: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1796: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1798:
1799: --
1800: -- End of API body
1800: -- End of API body
1801: --
1802:
1803: -- Standard check for p_commit
1804: IF FND_API.to_Boolean( p_commit )
1805: THEN
1806: COMMIT WORK;
1807: END IF;
1808:
1823: p_data => x_msg_data
1824: );
1825:
1826: EXCEPTION
1827: WHEN FND_API.G_EXC_ERROR THEN
1828: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1829: P_MODULE => l_module
1830: ,P_API_NAME => L_API_NAME
1831: ,P_PKG_NAME => G_PKG_NAME
1834: ,X_MSG_COUNT => X_MSG_COUNT
1835: ,X_MSG_DATA => X_MSG_DATA
1836: ,X_RETURN_STATUS => X_RETURN_STATUS);
1837:
1838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1839: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1840: P_MODULE => l_module
1841: ,P_API_NAME => L_API_NAME
1842: ,P_PKG_NAME => G_PKG_NAME
1860:
1861:
1862: PROCEDURE Update_Orders
1863: ( p_api_version_number IN NUMBER,
1864: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1865: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1866: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1867: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1868: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
1861:
1862: PROCEDURE Update_Orders
1863: ( p_api_version_number IN NUMBER,
1864: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1865: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1866: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1867: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1868: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
1869: p_check_access_flag IN VARCHAR2,
1862: PROCEDURE Update_Orders
1863: ( p_api_version_number IN NUMBER,
1864: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1865: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1866: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
1867: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
1868: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
1869: p_check_access_flag IN VARCHAR2,
1870: p_admin_flag IN VARCHAR2,
1887: -- Standard Start of API savepoint
1888: SAVEPOINT UPDATE_ORDERS_PUB;
1889:
1890: -- Standard call to check for call compatibility.
1891: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1892: p_api_version_number,
1893: l_api_name,
1894: G_PKG_NAME)
1895: THEN
1892: p_api_version_number,
1893: l_api_name,
1894: G_PKG_NAME)
1895: THEN
1896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1897: END IF;
1898:
1899:
1900: -- Initialize message list if p_init_msg_list is set to TRUE.
1897: END IF;
1898:
1899:
1900: -- Initialize message list if p_init_msg_list is set to TRUE.
1901: IF FND_API.to_Boolean( p_init_msg_list )
1902: THEN
1903: FND_MSG_PUB.initialize;
1904: END IF;
1905:
1913: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1914: END IF;
1915:
1916: -- Initialize API return status to SUCCESS
1917: x_return_status := FND_API.G_RET_STS_SUCCESS;
1918:
1919: --
1920: -- API body
1921: --
1939: -- Commenting the following call and obsolete AS_OPP_order_PVT for R12
1940:
1941: /*AS_OPP_order_PVT.Update_orders(
1942: P_Api_Version_Number => 2.0,
1943: P_Init_Msg_List => FND_API.G_FALSE,
1944: P_Commit => p_commit,
1945: P_Validation_Level => P_Validation_Level,
1946: P_Check_Access_Flag => p_check_access_flag,
1947: P_Admin_Flag => P_Admin_Flag,
1955: X_Msg_Count => x_msg_count,
1956: X_Msg_Data => x_msg_data);
1957:
1958: -- Check return status from the above procedure call
1959: IF x_return_status = FND_API.G_RET_STS_ERROR then
1960: raise FND_API.G_EXC_ERROR;
1961: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1962: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1963: END IF;
1956: X_Msg_Data => x_msg_data);
1957:
1958: -- Check return status from the above procedure call
1959: IF x_return_status = FND_API.G_RET_STS_ERROR then
1960: raise FND_API.G_EXC_ERROR;
1961: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1962: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1963: END IF;
1964: */
1957:
1958: -- Check return status from the above procedure call
1959: IF x_return_status = FND_API.G_RET_STS_ERROR then
1960: raise FND_API.G_EXC_ERROR;
1961: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1962: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1963: END IF;
1964: */
1965:
1958: -- Check return status from the above procedure call
1959: IF x_return_status = FND_API.G_RET_STS_ERROR then
1960: raise FND_API.G_EXC_ERROR;
1961: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1962: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1963: END IF;
1964: */
1965:
1966:
1968: -- End of API body
1969: --
1970:
1971: -- Standard check for p_commit
1972: IF FND_API.to_Boolean( p_commit )
1973: THEN
1974: COMMIT WORK;
1975: END IF;
1976:
1991: p_data => x_msg_data
1992: );
1993:
1994: EXCEPTION
1995: WHEN FND_API.G_EXC_ERROR THEN
1996: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1997: P_MODULE => l_module
1998: ,P_API_NAME => L_API_NAME
1999: ,P_PKG_NAME => G_PKG_NAME
2002: ,X_MSG_COUNT => X_MSG_COUNT
2003: ,X_MSG_DATA => X_MSG_DATA
2004: ,X_RETURN_STATUS => X_RETURN_STATUS);
2005:
2006: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2007: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2008: P_MODULE => l_module
2009: ,P_API_NAME => L_API_NAME
2010: ,P_PKG_NAME => G_PKG_NAME
2028:
2029:
2030: PROCEDURE Delete_Orders
2031: ( p_api_version_number IN NUMBER,
2032: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2033: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2034: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2035: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2036: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
2029:
2030: PROCEDURE Delete_Orders
2031: ( p_api_version_number IN NUMBER,
2032: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2033: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2034: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2035: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2036: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
2037: p_check_access_flag IN VARCHAR2,
2030: PROCEDURE Delete_Orders
2031: ( p_api_version_number IN NUMBER,
2032: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2033: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2034: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2035: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2036: p_lead_order_tbl IN AS_OPPORTUNITY_PUB.Order_tbl_Type,
2037: p_check_access_flag IN VARCHAR2,
2038: p_admin_flag IN VARCHAR2,
2055: -- Standard Start of API savepoint
2056: SAVEPOINT DELETE_ORDERS_PUB;
2057:
2058: -- Standard call to check for call compatibility.
2059: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2060: p_api_version_number,
2061: l_api_name,
2062: G_PKG_NAME)
2063: THEN
2060: p_api_version_number,
2061: l_api_name,
2062: G_PKG_NAME)
2063: THEN
2064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2065: END IF;
2066:
2067:
2068: -- Initialize message list if p_init_msg_list is set to TRUE.
2065: END IF;
2066:
2067:
2068: -- Initialize message list if p_init_msg_list is set to TRUE.
2069: IF FND_API.to_Boolean( p_init_msg_list )
2070: THEN
2071: FND_MSG_PUB.initialize;
2072: END IF;
2073:
2081: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2082: END IF;
2083:
2084: -- Initialize API return status to SUCCESS
2085: x_return_status := FND_API.G_RET_STS_SUCCESS;
2086:
2087: --
2088: -- API body
2089: --
2105: *****/
2106: -- Commenting the following call and obsolete AS_OPP_order_PVT for R12
2107: /* AS_OPP_order_PVT.Delete_orders(
2108: P_Api_Version_Number => 2.0,
2109: P_Init_Msg_List => FND_API.G_FALSE,
2110: P_Commit => p_commit,
2111: P_Validation_Level => P_Validation_Level,
2112: P_Check_Access_Flag => p_check_access_flag,
2113: P_Admin_Flag => P_Admin_Flag,
2121: X_Msg_Count => x_msg_count,
2122: X_Msg_Data => x_msg_data);
2123:
2124: -- Check return status from the above procedure call
2125: IF x_return_status = FND_API.G_RET_STS_ERROR then
2126: raise FND_API.G_EXC_ERROR;
2127: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2128: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2129: END IF;
2122: X_Msg_Data => x_msg_data);
2123:
2124: -- Check return status from the above procedure call
2125: IF x_return_status = FND_API.G_RET_STS_ERROR then
2126: raise FND_API.G_EXC_ERROR;
2127: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2128: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2129: END IF;
2130:
2123:
2124: -- Check return status from the above procedure call
2125: IF x_return_status = FND_API.G_RET_STS_ERROR then
2126: raise FND_API.G_EXC_ERROR;
2127: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2128: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2129: END IF;
2130:
2131: --
2124: -- Check return status from the above procedure call
2125: IF x_return_status = FND_API.G_RET_STS_ERROR then
2126: raise FND_API.G_EXC_ERROR;
2127: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2128: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2129: END IF;
2130:
2131: --
2132: -- End of API body
2132: -- End of API body
2133: --
2134:
2135: -- Standard check for p_commit
2136: IF FND_API.to_Boolean( p_commit )
2137: THEN
2138: COMMIT WORK;
2139: END IF;*/
2140:
2155: p_data => x_msg_data
2156: );
2157:
2158: EXCEPTION
2159: WHEN FND_API.G_EXC_ERROR THEN
2160: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2161: P_MODULE => l_module
2162: ,P_API_NAME => L_API_NAME
2163: ,P_PKG_NAME => G_PKG_NAME
2166: ,X_MSG_COUNT => X_MSG_COUNT
2167: ,X_MSG_DATA => X_MSG_DATA
2168: ,X_RETURN_STATUS => X_RETURN_STATUS);
2169:
2170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2171: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2172: P_MODULE => l_module
2173: ,P_API_NAME => L_API_NAME
2174: ,P_PKG_NAME => G_PKG_NAME
2192:
2193:
2194: PROCEDURE Create_Competitors
2195: ( p_api_version_number IN NUMBER,
2196: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2197: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2198: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2199: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2200: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2193:
2194: PROCEDURE Create_Competitors
2195: ( p_api_version_number IN NUMBER,
2196: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2197: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2198: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2199: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2200: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2201: p_check_access_flag IN VARCHAR2,
2194: PROCEDURE Create_Competitors
2195: ( p_api_version_number IN NUMBER,
2196: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2197: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2198: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2199: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2200: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2201: p_check_access_flag IN VARCHAR2,
2202: p_admin_flag IN VARCHAR2,
2220: -- Standard Start of API savepoint
2221: SAVEPOINT CREATE_COMPETITORS_PUB;
2222:
2223: -- Standard call to check for call compatibility.
2224: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2225: p_api_version_number,
2226: l_api_name,
2227: G_PKG_NAME)
2228: THEN
2225: p_api_version_number,
2226: l_api_name,
2227: G_PKG_NAME)
2228: THEN
2229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2230: END IF;
2231:
2232:
2233: -- Initialize message list if p_init_msg_list is set to TRUE.
2230: END IF;
2231:
2232:
2233: -- Initialize message list if p_init_msg_list is set to TRUE.
2234: IF FND_API.to_Boolean( p_init_msg_list )
2235: THEN
2236: FND_MSG_PUB.initialize;
2237: END IF;
2238:
2246: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2247:
2248: END IF;
2249: -- Initialize API return status to SUCCESS
2250: x_return_status := FND_API.G_RET_STS_SUCCESS;
2251:
2252: --
2253: -- API body
2254: --
2272: -- Calling Private package: Create_COMPETITOR
2273: -- Hint: Primary key needs to be returned
2274: AS_OPP_competitor_PVT.Create_competitors(
2275: P_Api_Version_Number => 2.0,
2276: P_Init_Msg_List => FND_API.G_FALSE,
2277: P_Commit => p_commit,
2278: P_Validation_Level => P_Validation_Level,
2279: P_Check_Access_Flag => p_check_access_flag,
2280: P_Admin_Flag => P_Admin_Flag,
2288: X_Msg_Count => x_msg_count,
2289: X_Msg_Data => x_msg_data);
2290:
2291: -- Check return status from the above procedure call
2292: IF x_return_status = FND_API.G_RET_STS_ERROR then
2293: raise FND_API.G_EXC_ERROR;
2294: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2295: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2296: END IF;
2289: X_Msg_Data => x_msg_data);
2290:
2291: -- Check return status from the above procedure call
2292: IF x_return_status = FND_API.G_RET_STS_ERROR then
2293: raise FND_API.G_EXC_ERROR;
2294: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2295: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2296: END IF;
2297:
2290:
2291: -- Check return status from the above procedure call
2292: IF x_return_status = FND_API.G_RET_STS_ERROR then
2293: raise FND_API.G_EXC_ERROR;
2294: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2295: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2296: END IF;
2297:
2298: --
2291: -- Check return status from the above procedure call
2292: IF x_return_status = FND_API.G_RET_STS_ERROR then
2293: raise FND_API.G_EXC_ERROR;
2294: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2295: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2296: END IF;
2297:
2298: --
2299: -- End of API body.
2299: -- End of API body.
2300: --
2301:
2302: -- Standard check for p_commit
2303: IF FND_API.to_Boolean( p_commit )
2304: THEN
2305: COMMIT WORK;
2306: END IF;
2307:
2322: p_data => x_msg_data
2323: );
2324:
2325: EXCEPTION
2326: WHEN FND_API.G_EXC_ERROR THEN
2327: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2328: P_MODULE => l_module
2329: ,P_API_NAME => L_API_NAME
2330: ,P_PKG_NAME => G_PKG_NAME
2333: ,X_MSG_COUNT => X_MSG_COUNT
2334: ,X_MSG_DATA => X_MSG_DATA
2335: ,X_RETURN_STATUS => X_RETURN_STATUS);
2336:
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2339: P_MODULE => l_module
2340: ,P_API_NAME => L_API_NAME
2341: ,P_PKG_NAME => G_PKG_NAME
2359:
2360:
2361: PROCEDURE Update_Competitors
2362: ( p_api_version_number IN NUMBER,
2363: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2364: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2365: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2366: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2367: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2360:
2361: PROCEDURE Update_Competitors
2362: ( p_api_version_number IN NUMBER,
2363: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2364: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2365: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2366: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2367: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2368: p_check_access_flag IN VARCHAR2,
2361: PROCEDURE Update_Competitors
2362: ( p_api_version_number IN NUMBER,
2363: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2364: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2365: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2366: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2367: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2368: p_check_access_flag IN VARCHAR2,
2369: p_admin_flag IN VARCHAR2,
2386: -- Standard Start of API savepoint
2387: SAVEPOINT UPDATE_COMPETITORS_PUB;
2388:
2389: -- Standard call to check for call compatibility.
2390: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2391: p_api_version_number,
2392: l_api_name,
2393: G_PKG_NAME)
2394: THEN
2391: p_api_version_number,
2392: l_api_name,
2393: G_PKG_NAME)
2394: THEN
2395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2396: END IF;
2397:
2398:
2399: -- Initialize message list if p_init_msg_list is set to TRUE.
2396: END IF;
2397:
2398:
2399: -- Initialize message list if p_init_msg_list is set to TRUE.
2400: IF FND_API.to_Boolean( p_init_msg_list )
2401: THEN
2402: FND_MSG_PUB.initialize;
2403: END IF;
2404:
2413:
2414: END IF;
2415:
2416: -- Initialize API return status to SUCCESS
2417: x_return_status := FND_API.G_RET_STS_SUCCESS;
2418:
2419: --
2420: -- API body
2421: --
2438: *****/
2439:
2440: AS_OPP_competitor_pvt.Update_competitors(
2441: P_Api_Version_Number => 2.0,
2442: P_Init_Msg_List => FND_API.G_FALSE,
2443: P_Commit => p_commit,
2444: P_Validation_Level => P_Validation_Level,
2445: P_Check_Access_Flag => p_check_access_flag,
2446: P_Admin_Flag => P_Admin_Flag ,
2454: X_Msg_Count => x_msg_count,
2455: X_Msg_Data => x_msg_data);
2456:
2457: -- Check return status from the above procedure call
2458: IF x_return_status = FND_API.G_RET_STS_ERROR then
2459: raise FND_API.G_EXC_ERROR;
2460: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2461: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2455: X_Msg_Data => x_msg_data);
2456:
2457: -- Check return status from the above procedure call
2458: IF x_return_status = FND_API.G_RET_STS_ERROR then
2459: raise FND_API.G_EXC_ERROR;
2460: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2461: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2456:
2457: -- Check return status from the above procedure call
2458: IF x_return_status = FND_API.G_RET_STS_ERROR then
2459: raise FND_API.G_EXC_ERROR;
2460: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2461: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2464: --
2457: -- Check return status from the above procedure call
2458: IF x_return_status = FND_API.G_RET_STS_ERROR then
2459: raise FND_API.G_EXC_ERROR;
2460: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2461: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2464: --
2465: -- End of API body
2465: -- End of API body
2466: --
2467:
2468: -- Standard check for p_commit
2469: IF FND_API.to_Boolean( p_commit )
2470: THEN
2471: COMMIT WORK;
2472: END IF;
2473:
2487: p_data => x_msg_data
2488: );
2489:
2490: EXCEPTION
2491: WHEN FND_API.G_EXC_ERROR THEN
2492: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2493: P_MODULE => l_module
2494: ,P_API_NAME => L_API_NAME
2495: ,P_PKG_NAME => G_PKG_NAME
2498: ,X_MSG_COUNT => X_MSG_COUNT
2499: ,X_MSG_DATA => X_MSG_DATA
2500: ,X_RETURN_STATUS => X_RETURN_STATUS);
2501:
2502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2503: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2504: P_MODULE => l_module
2505: ,P_API_NAME => L_API_NAME
2506: ,P_PKG_NAME => G_PKG_NAME
2524:
2525:
2526: PROCEDURE Delete_Competitors
2527: ( p_api_version_number IN NUMBER,
2528: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2529: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2530: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2531: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2532: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2525:
2526: PROCEDURE Delete_Competitors
2527: ( p_api_version_number IN NUMBER,
2528: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2529: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2530: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2531: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2532: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2533: p_check_access_flag IN VARCHAR2,
2526: PROCEDURE Delete_Competitors
2527: ( p_api_version_number IN NUMBER,
2528: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2529: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2530: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2531: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2532: p_competitor_tbl IN AS_OPPORTUNITY_PUB.Competitor_tbl_Type,
2533: p_check_access_flag IN VARCHAR2,
2534: p_admin_flag IN VARCHAR2,
2551: -- Standard Start of API savepoint
2552: SAVEPOINT DELETE_COMPETITORS_PUB;
2553:
2554: -- Standard call to check for call compatibility.
2555: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2556: p_api_version_number,
2557: l_api_name,
2558: G_PKG_NAME)
2559: THEN
2556: p_api_version_number,
2557: l_api_name,
2558: G_PKG_NAME)
2559: THEN
2560: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2561: END IF;
2562:
2563:
2564: -- Initialize message list if p_init_msg_list is set to TRUE.
2561: END IF;
2562:
2563:
2564: -- Initialize message list if p_init_msg_list is set to TRUE.
2565: IF FND_API.to_Boolean( p_init_msg_list )
2566: THEN
2567: FND_MSG_PUB.initialize;
2568: END IF;
2569:
2578:
2579: END IF;
2580:
2581: -- Initialize API return status to SUCCESS
2582: x_return_status := FND_API.G_RET_STS_SUCCESS;
2583:
2584: --
2585: -- API body
2586: --
2602: *****/
2603:
2604: AS_OPP_competitor_pvt.Delete_competitors(
2605: P_Api_Version_Number => 2.0,
2606: P_Init_Msg_List => FND_API.G_FALSE,
2607: P_Commit => p_commit,
2608: P_Validation_Level => P_Validation_Level,
2609: P_Check_Access_Flag => p_check_access_flag,
2610: P_Admin_Flag => P_Admin_Flag,
2618: X_Msg_Count => x_msg_count,
2619: X_Msg_Data => x_msg_data);
2620:
2621: -- Check return status from the above procedure call
2622: IF x_return_status = FND_API.G_RET_STS_ERROR then
2623: raise FND_API.G_EXC_ERROR;
2624: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2625: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2626: END IF;
2619: X_Msg_Data => x_msg_data);
2620:
2621: -- Check return status from the above procedure call
2622: IF x_return_status = FND_API.G_RET_STS_ERROR then
2623: raise FND_API.G_EXC_ERROR;
2624: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2625: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2626: END IF;
2627:
2620:
2621: -- Check return status from the above procedure call
2622: IF x_return_status = FND_API.G_RET_STS_ERROR then
2623: raise FND_API.G_EXC_ERROR;
2624: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2625: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2626: END IF;
2627:
2628: --
2621: -- Check return status from the above procedure call
2622: IF x_return_status = FND_API.G_RET_STS_ERROR then
2623: raise FND_API.G_EXC_ERROR;
2624: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2625: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2626: END IF;
2627:
2628: --
2629: -- End of API body
2629: -- End of API body
2630: --
2631:
2632: -- Standard check for p_commit
2633: IF FND_API.to_Boolean( p_commit )
2634: THEN
2635: COMMIT WORK;
2636: END IF;
2637:
2651: p_data => x_msg_data
2652: );
2653:
2654: EXCEPTION
2655: WHEN FND_API.G_EXC_ERROR THEN
2656: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2657: P_MODULE => l_module
2658: ,P_API_NAME => L_API_NAME
2659: ,P_PKG_NAME => G_PKG_NAME
2662: ,X_MSG_COUNT => X_MSG_COUNT
2663: ,X_MSG_DATA => X_MSG_DATA
2664: ,X_RETURN_STATUS => X_RETURN_STATUS);
2665:
2666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2667: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2668: P_MODULE => l_module
2669: ,P_API_NAME => L_API_NAME
2670: ,P_PKG_NAME => G_PKG_NAME
2688:
2689:
2690: PROCEDURE Create_Competitor_Prods
2691: ( p_api_version_number IN NUMBER,
2692: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2693: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2694: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2695: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2696: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2689:
2690: PROCEDURE Create_Competitor_Prods
2691: ( p_api_version_number IN NUMBER,
2692: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2693: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2694: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2695: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2696: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2697: p_check_access_flag IN VARCHAR2,
2690: PROCEDURE Create_Competitor_Prods
2691: ( p_api_version_number IN NUMBER,
2692: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2693: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2694: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2695: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2696: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2697: p_check_access_flag IN VARCHAR2,
2698: p_admin_flag IN VARCHAR2,
2716: -- Standard Start of API savepoint
2717: SAVEPOINT CREATE_COMPETITOR_PRODS_PUB;
2718:
2719: -- Standard call to check for call compatibility.
2720: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2721: p_api_version_number,
2722: l_api_name,
2723: G_PKG_NAME)
2724: THEN
2721: p_api_version_number,
2722: l_api_name,
2723: G_PKG_NAME)
2724: THEN
2725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2726: END IF;
2727:
2728:
2729: -- Initialize message list if p_init_msg_list is set to TRUE.
2726: END IF;
2727:
2728:
2729: -- Initialize message list if p_init_msg_list is set to TRUE.
2730: IF FND_API.to_Boolean( p_init_msg_list )
2731: THEN
2732: FND_MSG_PUB.initialize;
2733: END IF;
2734:
2743:
2744: END IF;
2745:
2746: -- Initialize API return status to SUCCESS
2747: x_return_status := FND_API.G_RET_STS_SUCCESS;
2748:
2749: --
2750: -- API body
2751: --
2769: -- Calling Private package: Create_COMPETITOR_PROD
2770: -- Hint: Primary key needs to be returned
2771: AS_competitor_prod_PVT.Create_competitor_prods(
2772: P_Api_Version_Number => 2.0,
2773: P_Init_Msg_List => FND_API.G_FALSE,
2774: P_Commit => p_commit,
2775: P_Validation_Level => P_Validation_Level,
2776: P_Check_Access_Flag => p_check_access_flag,
2777: P_Admin_Flag => P_Admin_Flag,
2785: X_Msg_Count => x_msg_count,
2786: X_Msg_Data => x_msg_data);
2787:
2788: -- Check return status from the above procedure call
2789: IF x_return_status = FND_API.G_RET_STS_ERROR then
2790: raise FND_API.G_EXC_ERROR;
2791: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2792: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2793: END IF;
2786: X_Msg_Data => x_msg_data);
2787:
2788: -- Check return status from the above procedure call
2789: IF x_return_status = FND_API.G_RET_STS_ERROR then
2790: raise FND_API.G_EXC_ERROR;
2791: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2792: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2793: END IF;
2794:
2787:
2788: -- Check return status from the above procedure call
2789: IF x_return_status = FND_API.G_RET_STS_ERROR then
2790: raise FND_API.G_EXC_ERROR;
2791: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2792: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2793: END IF;
2794:
2795: --
2788: -- Check return status from the above procedure call
2789: IF x_return_status = FND_API.G_RET_STS_ERROR then
2790: raise FND_API.G_EXC_ERROR;
2791: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2792: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2793: END IF;
2794:
2795: --
2796: -- End of API body.
2796: -- End of API body.
2797: --
2798:
2799: -- Standard check for p_commit
2800: IF FND_API.to_Boolean( p_commit )
2801: THEN
2802: COMMIT WORK;
2803: END IF;
2804:
2819: p_data => x_msg_data
2820: );
2821:
2822: EXCEPTION
2823: WHEN FND_API.G_EXC_ERROR THEN
2824: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2825: P_MODULE => l_module
2826: ,P_API_NAME => L_API_NAME
2827: ,P_PKG_NAME => G_PKG_NAME
2830: ,X_MSG_COUNT => X_MSG_COUNT
2831: ,X_MSG_DATA => X_MSG_DATA
2832: ,X_RETURN_STATUS => X_RETURN_STATUS);
2833:
2834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2835: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2836: P_MODULE => l_module
2837: ,P_API_NAME => L_API_NAME
2838: ,P_PKG_NAME => G_PKG_NAME
2856:
2857:
2858: PROCEDURE Update_Competitor_Prods
2859: ( p_api_version_number IN NUMBER,
2860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2864: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2857:
2858: PROCEDURE Update_Competitor_Prods
2859: ( p_api_version_number IN NUMBER,
2860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2864: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2865: p_check_access_flag IN VARCHAR2,
2858: PROCEDURE Update_Competitor_Prods
2859: ( p_api_version_number IN NUMBER,
2860: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2861: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2862: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
2863: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
2864: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
2865: p_check_access_flag IN VARCHAR2,
2866: p_admin_flag IN VARCHAR2,
2883: -- Standard Start of API savepoint
2884: SAVEPOINT UPDATE_COMPETITOR_PRODS_PUB;
2885:
2886: -- Standard call to check for call compatibility.
2887: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2888: p_api_version_number,
2889: l_api_name,
2890: G_PKG_NAME)
2891: THEN
2888: p_api_version_number,
2889: l_api_name,
2890: G_PKG_NAME)
2891: THEN
2892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2893: END IF;
2894:
2895:
2896: -- Initialize message list if p_init_msg_list is set to TRUE.
2893: END IF;
2894:
2895:
2896: -- Initialize message list if p_init_msg_list is set to TRUE.
2897: IF FND_API.to_Boolean( p_init_msg_list )
2898: THEN
2899: FND_MSG_PUB.initialize;
2900: END IF;
2901:
2910:
2911: END IF;
2912:
2913: -- Initialize API return status to SUCCESS
2914: x_return_status := FND_API.G_RET_STS_SUCCESS;
2915:
2916: --
2917: -- API body
2918: --
2934: *****/
2935:
2936: AS_competitor_prod_pvt.Update_competitor_prods(
2937: P_Api_Version_Number => 2.0,
2938: P_Init_Msg_List => FND_API.G_FALSE,
2939: P_Commit => p_commit,
2940: P_Validation_Level => P_Validation_Level,
2941: P_Check_Access_Flag => p_check_access_flag,
2942: P_Admin_Flag => P_Admin_Flag ,
2950: X_Msg_Count => x_msg_count,
2951: X_Msg_Data => x_msg_data);
2952:
2953: -- Check return status from the above procedure call
2954: IF x_return_status = FND_API.G_RET_STS_ERROR then
2955: raise FND_API.G_EXC_ERROR;
2956: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2957: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2951: X_Msg_Data => x_msg_data);
2952:
2953: -- Check return status from the above procedure call
2954: IF x_return_status = FND_API.G_RET_STS_ERROR then
2955: raise FND_API.G_EXC_ERROR;
2956: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2957: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2959:
2952:
2953: -- Check return status from the above procedure call
2954: IF x_return_status = FND_API.G_RET_STS_ERROR then
2955: raise FND_API.G_EXC_ERROR;
2956: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2957: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2959:
2960: --
2953: -- Check return status from the above procedure call
2954: IF x_return_status = FND_API.G_RET_STS_ERROR then
2955: raise FND_API.G_EXC_ERROR;
2956: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2957: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2959:
2960: --
2961: -- End of API body
2961: -- End of API body
2962: --
2963:
2964: -- Standard check for p_commit
2965: IF FND_API.to_Boolean( p_commit )
2966: THEN
2967: COMMIT WORK;
2968: END IF;
2969:
2983: p_data => x_msg_data
2984: );
2985:
2986: EXCEPTION
2987: WHEN FND_API.G_EXC_ERROR THEN
2988: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
2989: P_MODULE => l_module
2990: ,P_API_NAME => L_API_NAME
2991: ,P_PKG_NAME => G_PKG_NAME
2994: ,X_MSG_COUNT => X_MSG_COUNT
2995: ,X_MSG_DATA => X_MSG_DATA
2996: ,X_RETURN_STATUS => X_RETURN_STATUS);
2997:
2998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2999: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3000: P_MODULE => l_module
3001: ,P_API_NAME => L_API_NAME
3002: ,P_PKG_NAME => G_PKG_NAME
3020:
3021:
3022: PROCEDURE Delete_Competitor_Prods
3023: ( p_api_version_number IN NUMBER,
3024: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3025: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3026: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3027: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3028: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
3021:
3022: PROCEDURE Delete_Competitor_Prods
3023: ( p_api_version_number IN NUMBER,
3024: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3025: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3026: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3027: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3028: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
3029: p_check_access_flag IN VARCHAR2,
3022: PROCEDURE Delete_Competitor_Prods
3023: ( p_api_version_number IN NUMBER,
3024: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3025: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3026: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3027: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3028: p_competitor_prod_tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_tbl_Type,
3029: p_check_access_flag IN VARCHAR2,
3030: p_admin_flag IN VARCHAR2,
3047: -- Standard Start of API savepoint
3048: SAVEPOINT DELETE_COMPETITOR_PRODS_PUB;
3049:
3050: -- Standard call to check for call compatibility.
3051: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3052: p_api_version_number,
3053: l_api_name,
3054: G_PKG_NAME)
3055: THEN
3052: p_api_version_number,
3053: l_api_name,
3054: G_PKG_NAME)
3055: THEN
3056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3057: END IF;
3058:
3059:
3060: -- Initialize message list if p_init_msg_list is set to TRUE.
3057: END IF;
3058:
3059:
3060: -- Initialize message list if p_init_msg_list is set to TRUE.
3061: IF FND_API.to_Boolean( p_init_msg_list )
3062: THEN
3063: FND_MSG_PUB.initialize;
3064: END IF;
3065:
3074: END IF;
3075:
3076:
3077: -- Initialize API return status to SUCCESS
3078: x_return_status := FND_API.G_RET_STS_SUCCESS;
3079:
3080: --
3081: -- API body
3082: --
3098: *****/
3099:
3100: AS_competitor_prod_pvt.Delete_competitor_prods(
3101: P_Api_Version_Number => 2.0,
3102: P_Init_Msg_List => FND_API.G_FALSE,
3103: P_Commit => p_commit,
3104: P_Validation_Level => P_Validation_Level,
3105: P_Check_Access_Flag => p_check_access_flag,
3106: P_Admin_Flag => P_Admin_Flag,
3114: X_Msg_Count => x_msg_count,
3115: X_Msg_Data => x_msg_data);
3116:
3117: -- Check return status from the above procedure call
3118: IF x_return_status = FND_API.G_RET_STS_ERROR then
3119: raise FND_API.G_EXC_ERROR;
3120: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3121: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3122: END IF;
3115: X_Msg_Data => x_msg_data);
3116:
3117: -- Check return status from the above procedure call
3118: IF x_return_status = FND_API.G_RET_STS_ERROR then
3119: raise FND_API.G_EXC_ERROR;
3120: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3121: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3122: END IF;
3123:
3116:
3117: -- Check return status from the above procedure call
3118: IF x_return_status = FND_API.G_RET_STS_ERROR then
3119: raise FND_API.G_EXC_ERROR;
3120: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3121: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3122: END IF;
3123:
3124: --
3117: -- Check return status from the above procedure call
3118: IF x_return_status = FND_API.G_RET_STS_ERROR then
3119: raise FND_API.G_EXC_ERROR;
3120: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3121: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3122: END IF;
3123:
3124: --
3125: -- End of API body
3125: -- End of API body
3126: --
3127:
3128: -- Standard check for p_commit
3129: IF FND_API.to_Boolean( p_commit )
3130: THEN
3131: COMMIT WORK;
3132: END IF;
3133:
3148: p_data => x_msg_data
3149: );
3150:
3151: EXCEPTION
3152: WHEN FND_API.G_EXC_ERROR THEN
3153: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3154: P_MODULE => l_module
3155: ,P_API_NAME => L_API_NAME
3156: ,P_PKG_NAME => G_PKG_NAME
3159: ,X_MSG_COUNT => X_MSG_COUNT
3160: ,X_MSG_DATA => X_MSG_DATA
3161: ,X_RETURN_STATUS => X_RETURN_STATUS);
3162:
3163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3164: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3165: P_MODULE => l_module
3166: ,P_API_NAME => L_API_NAME
3167: ,P_PKG_NAME => G_PKG_NAME
3185:
3186:
3187: PROCEDURE Create_Decision_Factors
3188: ( p_api_version_number IN NUMBER,
3189: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3190: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3191: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3192: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3193: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3186:
3187: PROCEDURE Create_Decision_Factors
3188: ( p_api_version_number IN NUMBER,
3189: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3190: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3191: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3192: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3193: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3194: p_check_access_flag IN VARCHAR2,
3187: PROCEDURE Create_Decision_Factors
3188: ( p_api_version_number IN NUMBER,
3189: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3190: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3191: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3192: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3193: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3194: p_check_access_flag IN VARCHAR2,
3195: p_admin_flag IN VARCHAR2,
3212: -- Standard Start of API savepoint
3213: SAVEPOINT CREATE_DECISION_FACTORS_PUB;
3214:
3215: -- Standard call to check for call compatibility.
3216: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3217: p_api_version_number,
3218: l_api_name,
3219: G_PKG_NAME)
3220: THEN
3217: p_api_version_number,
3218: l_api_name,
3219: G_PKG_NAME)
3220: THEN
3221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3222: END IF;
3223:
3224:
3225: -- Initialize message list if p_init_msg_list is set to TRUE.
3222: END IF;
3223:
3224:
3225: -- Initialize message list if p_init_msg_list is set to TRUE.
3226: IF FND_API.to_Boolean( p_init_msg_list )
3227: THEN
3228: FND_MSG_PUB.initialize;
3229: END IF;
3230:
3239: END IF;
3240:
3241:
3242: -- Initialize API return status to SUCCESS
3243: x_return_status := FND_API.G_RET_STS_SUCCESS;
3244:
3245: --
3246: -- API body
3247: --
3265: -- Calling Private package: Create_DECISION_FACTOR
3266: -- Hint: Primary key needs to be returned
3267: AS_decision_factor_PVT.Create_decision_factors(
3268: P_Api_Version_Number => 2.0,
3269: P_Init_Msg_List => FND_API.G_FALSE,
3270: P_Commit => p_commit,
3271: P_Validation_Level => P_Validation_Level,
3272: P_Check_Access_Flag => p_check_access_flag,
3273: P_Admin_Flag => P_Admin_Flag,
3281: X_Msg_Count => x_msg_count,
3282: X_Msg_Data => x_msg_data);
3283:
3284: -- Check return status from the above procedure call
3285: IF x_return_status = FND_API.G_RET_STS_ERROR then
3286: raise FND_API.G_EXC_ERROR;
3287: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3288: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3289: END IF;
3282: X_Msg_Data => x_msg_data);
3283:
3284: -- Check return status from the above procedure call
3285: IF x_return_status = FND_API.G_RET_STS_ERROR then
3286: raise FND_API.G_EXC_ERROR;
3287: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3288: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3289: END IF;
3290:
3283:
3284: -- Check return status from the above procedure call
3285: IF x_return_status = FND_API.G_RET_STS_ERROR then
3286: raise FND_API.G_EXC_ERROR;
3287: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3288: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3289: END IF;
3290:
3291: --
3284: -- Check return status from the above procedure call
3285: IF x_return_status = FND_API.G_RET_STS_ERROR then
3286: raise FND_API.G_EXC_ERROR;
3287: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3288: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3289: END IF;
3290:
3291: --
3292: -- End of API body.
3292: -- End of API body.
3293: --
3294:
3295: -- Standard check for p_commit
3296: IF FND_API.to_Boolean( p_commit )
3297: THEN
3298: COMMIT WORK;
3299: END IF;
3300:
3315: p_data => x_msg_data
3316: );
3317:
3318: EXCEPTION
3319: WHEN FND_API.G_EXC_ERROR THEN
3320: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3321: P_MODULE => l_module
3322: ,P_API_NAME => L_API_NAME
3323: ,P_PKG_NAME => G_PKG_NAME
3326: ,X_MSG_COUNT => X_MSG_COUNT
3327: ,X_MSG_DATA => X_MSG_DATA
3328: ,X_RETURN_STATUS => X_RETURN_STATUS);
3329:
3330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3331: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3332: P_MODULE => l_module
3333: ,P_API_NAME => L_API_NAME
3334: ,P_PKG_NAME => G_PKG_NAME
3352:
3353:
3354: PROCEDURE Update_Decision_Factors
3355: ( p_api_version_number IN NUMBER,
3356: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3357: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3358: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3359: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3360: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3353:
3354: PROCEDURE Update_Decision_Factors
3355: ( p_api_version_number IN NUMBER,
3356: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3357: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3358: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3359: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3360: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3361: p_check_access_flag IN VARCHAR2,
3354: PROCEDURE Update_Decision_Factors
3355: ( p_api_version_number IN NUMBER,
3356: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3357: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3358: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3359: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3360: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3361: p_check_access_flag IN VARCHAR2,
3362: p_admin_flag IN VARCHAR2,
3379: -- Standard Start of API savepoint
3380: SAVEPOINT UPDATE_DECISION_FACTORS_PUB;
3381:
3382: -- Standard call to check for call compatibility.
3383: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3384: p_api_version_number,
3385: l_api_name,
3386: G_PKG_NAME)
3387: THEN
3384: p_api_version_number,
3385: l_api_name,
3386: G_PKG_NAME)
3387: THEN
3388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3389: END IF;
3390:
3391:
3392: -- Initialize message list if p_init_msg_list is set to TRUE.
3389: END IF;
3390:
3391:
3392: -- Initialize message list if p_init_msg_list is set to TRUE.
3393: IF FND_API.to_Boolean( p_init_msg_list )
3394: THEN
3395: FND_MSG_PUB.initialize;
3396: END IF;
3397:
3405: 'Start time: ' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
3406: END IF;
3407:
3408: -- Initialize API return status to SUCCESS
3409: x_return_status := FND_API.G_RET_STS_SUCCESS;
3410:
3411: --
3412: -- API body
3413: --
3429: *****/
3430:
3431: AS_decision_factor_pvt.Update_decision_factors(
3432: P_Api_Version_Number => 2.0,
3433: P_Init_Msg_List => FND_API.G_FALSE,
3434: P_Commit => p_commit,
3435: P_Validation_Level => P_Validation_Level,
3436: P_Check_Access_Flag => p_check_access_flag,
3437: P_Admin_Flag => P_Admin_Flag ,
3445: X_Msg_Count => x_msg_count,
3446: X_Msg_Data => x_msg_data);
3447:
3448: -- Check return status from the above procedure call
3449: IF x_return_status = FND_API.G_RET_STS_ERROR then
3450: raise FND_API.G_EXC_ERROR;
3451: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3452: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3453: END IF;
3446: X_Msg_Data => x_msg_data);
3447:
3448: -- Check return status from the above procedure call
3449: IF x_return_status = FND_API.G_RET_STS_ERROR then
3450: raise FND_API.G_EXC_ERROR;
3451: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3452: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3453: END IF;
3454:
3447:
3448: -- Check return status from the above procedure call
3449: IF x_return_status = FND_API.G_RET_STS_ERROR then
3450: raise FND_API.G_EXC_ERROR;
3451: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3452: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3453: END IF;
3454:
3455: --
3448: -- Check return status from the above procedure call
3449: IF x_return_status = FND_API.G_RET_STS_ERROR then
3450: raise FND_API.G_EXC_ERROR;
3451: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3452: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3453: END IF;
3454:
3455: --
3456: -- End of API body
3456: -- End of API body
3457: --
3458:
3459: -- Standard check for p_commit
3460: IF FND_API.to_Boolean( p_commit )
3461: THEN
3462: COMMIT WORK;
3463: END IF;
3464:
3479: p_data => x_msg_data
3480: );
3481:
3482: EXCEPTION
3483: WHEN FND_API.G_EXC_ERROR THEN
3484: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3485: P_MODULE => l_module
3486: ,P_API_NAME => L_API_NAME
3487: ,P_PKG_NAME => G_PKG_NAME
3490: ,X_MSG_COUNT => X_MSG_COUNT
3491: ,X_MSG_DATA => X_MSG_DATA
3492: ,X_RETURN_STATUS => X_RETURN_STATUS);
3493:
3494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3495: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3496: P_MODULE => l_module
3497: ,P_API_NAME => L_API_NAME
3498: ,P_PKG_NAME => G_PKG_NAME
3516:
3517:
3518: PROCEDURE Delete_Decision_Factors
3519: ( p_api_version_number IN NUMBER,
3520: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3521: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3522: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3523: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3524: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3517:
3518: PROCEDURE Delete_Decision_Factors
3519: ( p_api_version_number IN NUMBER,
3520: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3521: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3522: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3523: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3524: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3525: p_check_access_flag IN VARCHAR2,
3518: PROCEDURE Delete_Decision_Factors
3519: ( p_api_version_number IN NUMBER,
3520: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3521: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3522: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3523: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3524: p_decision_factor_tbl IN AS_OPPORTUNITY_PUB.Decision_Factor_tbl_Type,
3525: p_check_access_flag IN VARCHAR2,
3526: p_admin_flag IN VARCHAR2,
3543: -- Standard Start of API savepoint
3544: SAVEPOINT DELETE_DECISION_FACTORS_PUB;
3545:
3546: -- Standard call to check for call compatibility.
3547: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3548: p_api_version_number,
3549: l_api_name,
3550: G_PKG_NAME)
3551: THEN
3548: p_api_version_number,
3549: l_api_name,
3550: G_PKG_NAME)
3551: THEN
3552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3553: END IF;
3554:
3555:
3556: -- Initialize message list if p_init_msg_list is set to TRUE.
3553: END IF;
3554:
3555:
3556: -- Initialize message list if p_init_msg_list is set to TRUE.
3557: IF FND_API.to_Boolean( p_init_msg_list )
3558: THEN
3559: FND_MSG_PUB.initialize;
3560: END IF;
3561:
3570: END IF;
3571:
3572:
3573: -- Initialize API return status to SUCCESS
3574: x_return_status := FND_API.G_RET_STS_SUCCESS;
3575:
3576: --
3577: -- API body
3578: --
3594: *****/
3595:
3596: AS_decision_factor_pvt.Delete_decision_factors(
3597: P_Api_Version_Number => 2.0,
3598: P_Init_Msg_List => FND_API.G_FALSE,
3599: P_Commit => p_commit,
3600: P_Validation_Level => P_Validation_Level,
3601: P_Check_Access_Flag => p_check_access_flag,
3602: P_Admin_Flag => P_Admin_Flag,
3610: X_Msg_Count => x_msg_count,
3611: X_Msg_Data => x_msg_data);
3612:
3613: -- Check return status from the above procedure call
3614: IF x_return_status = FND_API.G_RET_STS_ERROR then
3615: raise FND_API.G_EXC_ERROR;
3616: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3617: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3618: END IF;
3611: X_Msg_Data => x_msg_data);
3612:
3613: -- Check return status from the above procedure call
3614: IF x_return_status = FND_API.G_RET_STS_ERROR then
3615: raise FND_API.G_EXC_ERROR;
3616: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3617: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3618: END IF;
3619:
3612:
3613: -- Check return status from the above procedure call
3614: IF x_return_status = FND_API.G_RET_STS_ERROR then
3615: raise FND_API.G_EXC_ERROR;
3616: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3617: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3618: END IF;
3619:
3620: --
3613: -- Check return status from the above procedure call
3614: IF x_return_status = FND_API.G_RET_STS_ERROR then
3615: raise FND_API.G_EXC_ERROR;
3616: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3617: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3618: END IF;
3619:
3620: --
3621: -- End of API body
3621: -- End of API body
3622: --
3623:
3624: -- Standard check for p_commit
3625: IF FND_API.to_Boolean( p_commit )
3626: THEN
3627: COMMIT WORK;
3628: END IF;
3629:
3644: p_data => x_msg_data
3645: );
3646:
3647: EXCEPTION
3648: WHEN FND_API.G_EXC_ERROR THEN
3649: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3650: P_MODULE => l_module
3651: ,P_API_NAME => L_API_NAME
3652: ,P_PKG_NAME => G_PKG_NAME
3655: ,X_MSG_COUNT => X_MSG_COUNT
3656: ,X_MSG_DATA => X_MSG_DATA
3657: ,X_RETURN_STATUS => X_RETURN_STATUS);
3658:
3659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3660: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3661: P_MODULE => l_module
3662: ,P_API_NAME => L_API_NAME
3663: ,P_PKG_NAME => G_PKG_NAME
3681:
3682:
3683: PROCEDURE Create_Contacts
3684: ( p_api_version_number IN NUMBER,
3685: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3686: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3687: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3688: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3689: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3682:
3683: PROCEDURE Create_Contacts
3684: ( p_api_version_number IN NUMBER,
3685: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3686: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3687: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3688: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3689: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3690: p_header_rec IN HEADER_REC_TYPE DEFAULT G_MISS_HEADER_REC,
3683: PROCEDURE Create_Contacts
3684: ( p_api_version_number IN NUMBER,
3685: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3686: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3687: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3688: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3689: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3690: p_header_rec IN HEADER_REC_TYPE DEFAULT G_MISS_HEADER_REC,
3691: p_check_access_flag IN VARCHAR2,
3710: -- Standard Start of API savepoint
3711: SAVEPOINT CREATE_CONTACTS_PUB;
3712:
3713: -- Standard call to check for call compatibility.
3714: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3715: p_api_version_number,
3716: l_api_name,
3717: G_PKG_NAME)
3718: THEN
3715: p_api_version_number,
3716: l_api_name,
3717: G_PKG_NAME)
3718: THEN
3719: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3720: END IF;
3721:
3722:
3723: -- Initialize message list if p_init_msg_list is set to TRUE.
3720: END IF;
3721:
3722:
3723: -- Initialize message list if p_init_msg_list is set to TRUE.
3724: IF FND_API.to_Boolean( p_init_msg_list )
3725: THEN
3726: FND_MSG_PUB.initialize;
3727: END IF;
3728:
3737: END IF;
3738:
3739:
3740: -- Initialize API return status to SUCCESS
3741: x_return_status := FND_API.G_RET_STS_SUCCESS;
3742:
3743: --
3744: -- API body
3745: --
3762: -- Calling Private package: Create_OPP_CONTACT
3763: -- Hint: Primary key needs to be returned
3764: AS_OPP_contact_PVT.Create_opp_contacts(
3765: P_Api_Version_Number => 2.0,
3766: P_Init_Msg_List => FND_API.G_FALSE,
3767: P_Commit => p_commit,
3768: P_Validation_Level => P_Validation_Level,
3769: P_Check_Access_Flag => p_check_access_flag,
3770: P_Admin_Flag => P_Admin_Flag,
3778: X_Msg_Count => x_msg_count,
3779: X_Msg_Data => x_msg_data);
3780:
3781: -- Check return status from the above procedure call
3782: IF x_return_status = FND_API.G_RET_STS_ERROR then
3783: raise FND_API.G_EXC_ERROR;
3784: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3785: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3786: END IF;
3779: X_Msg_Data => x_msg_data);
3780:
3781: -- Check return status from the above procedure call
3782: IF x_return_status = FND_API.G_RET_STS_ERROR then
3783: raise FND_API.G_EXC_ERROR;
3784: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3785: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3786: END IF;
3787:
3780:
3781: -- Check return status from the above procedure call
3782: IF x_return_status = FND_API.G_RET_STS_ERROR then
3783: raise FND_API.G_EXC_ERROR;
3784: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3785: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3786: END IF;
3787:
3788: --
3781: -- Check return status from the above procedure call
3782: IF x_return_status = FND_API.G_RET_STS_ERROR then
3783: raise FND_API.G_EXC_ERROR;
3784: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3785: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3786: END IF;
3787:
3788: --
3789: -- End of API body.
3789: -- End of API body.
3790: --
3791:
3792: -- Standard check for p_commit
3793: IF FND_API.to_Boolean( p_commit )
3794: THEN
3795: COMMIT WORK;
3796: END IF;
3797:
3812: p_data => x_msg_data
3813: );
3814:
3815: EXCEPTION
3816: WHEN FND_API.G_EXC_ERROR THEN
3817: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3818: P_MODULE => l_module
3819: ,P_API_NAME => L_API_NAME
3820: ,P_PKG_NAME => G_PKG_NAME
3823: ,X_MSG_COUNT => X_MSG_COUNT
3824: ,X_MSG_DATA => X_MSG_DATA
3825: ,X_RETURN_STATUS => X_RETURN_STATUS);
3826:
3827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3828: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3829: P_MODULE => l_module
3830: ,P_API_NAME => L_API_NAME
3831: ,P_PKG_NAME => G_PKG_NAME
3849:
3850:
3851: PROCEDURE Update_Contacts
3852: ( p_api_version_number IN NUMBER,
3853: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3854: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3855: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3856: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3857: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3850:
3851: PROCEDURE Update_Contacts
3852: ( p_api_version_number IN NUMBER,
3853: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3854: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3855: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3856: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3857: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3858: p_check_access_flag IN VARCHAR2,
3851: PROCEDURE Update_Contacts
3852: ( p_api_version_number IN NUMBER,
3853: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3854: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3855: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
3856: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
3857: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
3858: p_check_access_flag IN VARCHAR2,
3859: p_admin_flag IN VARCHAR2,
3876: -- Standard Start of API savepoint
3877: SAVEPOINT UPDATE_CONTACTS_PUB;
3878:
3879: -- Standard call to check for call compatibility.
3880: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3881: p_api_version_number,
3882: l_api_name,
3883: G_PKG_NAME)
3884: THEN
3881: p_api_version_number,
3882: l_api_name,
3883: G_PKG_NAME)
3884: THEN
3885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3886: END IF;
3887:
3888:
3889: -- Initialize message list if p_init_msg_list is set to TRUE.
3886: END IF;
3887:
3888:
3889: -- Initialize message list if p_init_msg_list is set to TRUE.
3890: IF FND_API.to_Boolean( p_init_msg_list )
3891: THEN
3892: FND_MSG_PUB.initialize;
3893: END IF;
3894:
3903:
3904: END IF;
3905:
3906: -- Initialize API return status to SUCCESS
3907: x_return_status := FND_API.G_RET_STS_SUCCESS;
3908:
3909: --
3910: -- API body
3911: --
3927: *****/
3928:
3929: AS_OPP_contact_PVT.Update_opp_contacts(
3930: P_Api_Version_Number => 2.0,
3931: P_Init_Msg_List => FND_API.G_FALSE,
3932: P_Commit => p_commit,
3933: P_Validation_Level => P_Validation_Level,
3934: P_Check_Access_Flag => p_check_access_flag,
3935: P_Admin_Flag => P_Admin_Flag,
3943: X_Msg_Count => x_msg_count,
3944: X_Msg_Data => x_msg_data);
3945:
3946: -- Check return status from the above procedure call
3947: IF x_return_status = FND_API.G_RET_STS_ERROR then
3948: raise FND_API.G_EXC_ERROR;
3949: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3950: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3951: END IF;
3944: X_Msg_Data => x_msg_data);
3945:
3946: -- Check return status from the above procedure call
3947: IF x_return_status = FND_API.G_RET_STS_ERROR then
3948: raise FND_API.G_EXC_ERROR;
3949: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3950: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3951: END IF;
3952:
3945:
3946: -- Check return status from the above procedure call
3947: IF x_return_status = FND_API.G_RET_STS_ERROR then
3948: raise FND_API.G_EXC_ERROR;
3949: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3950: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3951: END IF;
3952:
3953: --
3946: -- Check return status from the above procedure call
3947: IF x_return_status = FND_API.G_RET_STS_ERROR then
3948: raise FND_API.G_EXC_ERROR;
3949: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
3950: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3951: END IF;
3952:
3953: --
3954: -- End of API body
3954: -- End of API body
3955: --
3956:
3957: -- Standard check for p_commit
3958: IF FND_API.to_Boolean( p_commit )
3959: THEN
3960: COMMIT WORK;
3961: END IF;
3962:
3977: p_data => x_msg_data
3978: );
3979:
3980: EXCEPTION
3981: WHEN FND_API.G_EXC_ERROR THEN
3982: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3983: P_MODULE => l_module
3984: ,P_API_NAME => L_API_NAME
3985: ,P_PKG_NAME => G_PKG_NAME
3988: ,X_MSG_COUNT => X_MSG_COUNT
3989: ,X_MSG_DATA => X_MSG_DATA
3990: ,X_RETURN_STATUS => X_RETURN_STATUS);
3991:
3992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3993: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
3994: P_MODULE => l_module
3995: ,P_API_NAME => L_API_NAME
3996: ,P_PKG_NAME => G_PKG_NAME
4014:
4015:
4016: PROCEDURE Delete_Contacts
4017: ( p_api_version_number IN NUMBER,
4018: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4019: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4020: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4021: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4022: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
4015:
4016: PROCEDURE Delete_Contacts
4017: ( p_api_version_number IN NUMBER,
4018: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4019: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4020: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4021: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4022: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
4023: p_check_access_flag IN VARCHAR2,
4016: PROCEDURE Delete_Contacts
4017: ( p_api_version_number IN NUMBER,
4018: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4019: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4020: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4021: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4022: p_contact_tbl IN AS_OPPORTUNITY_PUB.Contact_tbl_Type,
4023: p_check_access_flag IN VARCHAR2,
4024: p_admin_flag IN VARCHAR2,
4042: -- Standard Start of API savepoint
4043: SAVEPOINT DELETE_CONTACTS_PUB;
4044:
4045: -- Standard call to check for call compatibility.
4046: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4047: p_api_version_number,
4048: l_api_name,
4049: G_PKG_NAME)
4050: THEN
4047: p_api_version_number,
4048: l_api_name,
4049: G_PKG_NAME)
4050: THEN
4051: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4052: END IF;
4053:
4054:
4055: -- Initialize message list if p_init_msg_list is set to TRUE.
4052: END IF;
4053:
4054:
4055: -- Initialize message list if p_init_msg_list is set to TRUE.
4056: IF FND_API.to_Boolean( p_init_msg_list )
4057: THEN
4058: FND_MSG_PUB.initialize;
4059: END IF;
4060:
4069: END IF;
4070:
4071:
4072: -- Initialize API return status to SUCCESS
4073: x_return_status := FND_API.G_RET_STS_SUCCESS;
4074:
4075: --
4076: -- API body
4077: --
4093: *****/
4094:
4095: AS_OPP_contact_PVT.Delete_opp_contacts(
4096: P_Api_Version_Number => 2.0,
4097: P_Init_Msg_List => FND_API.G_FALSE,
4098: P_Commit => p_commit,
4099: P_Validation_Level => P_Validation_Level,
4100: P_Check_Access_Flag => p_check_access_flag,
4101: P_Admin_Flag => P_Admin_Flag,
4109: X_Msg_Count => x_msg_count,
4110: X_Msg_Data => x_msg_data);
4111:
4112: -- Check return status from the above procedure call
4113: IF x_return_status = FND_API.G_RET_STS_ERROR then
4114: raise FND_API.G_EXC_ERROR;
4115: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4116: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4117: END IF;
4110: X_Msg_Data => x_msg_data);
4111:
4112: -- Check return status from the above procedure call
4113: IF x_return_status = FND_API.G_RET_STS_ERROR then
4114: raise FND_API.G_EXC_ERROR;
4115: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4116: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4117: END IF;
4118:
4111:
4112: -- Check return status from the above procedure call
4113: IF x_return_status = FND_API.G_RET_STS_ERROR then
4114: raise FND_API.G_EXC_ERROR;
4115: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4116: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4117: END IF;
4118:
4119: --
4112: -- Check return status from the above procedure call
4113: IF x_return_status = FND_API.G_RET_STS_ERROR then
4114: raise FND_API.G_EXC_ERROR;
4115: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4116: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4117: END IF;
4118:
4119: --
4120: -- End of API body
4120: -- End of API body
4121: --
4122:
4123: -- Standard check for p_commit
4124: IF FND_API.to_Boolean( p_commit )
4125: THEN
4126: COMMIT WORK;
4127: END IF;
4128:
4143: p_data => x_msg_data
4144: );
4145:
4146: EXCEPTION
4147: WHEN FND_API.G_EXC_ERROR THEN
4148: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4149: P_MODULE => l_module
4150: ,P_API_NAME => L_API_NAME
4151: ,P_PKG_NAME => G_PKG_NAME
4154: ,X_MSG_COUNT => X_MSG_COUNT
4155: ,X_MSG_DATA => X_MSG_DATA
4156: ,X_RETURN_STATUS => X_RETURN_STATUS);
4157:
4158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4159: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4160: P_MODULE => l_module
4161: ,P_API_NAME => L_API_NAME
4162: ,P_PKG_NAME => G_PKG_NAME
4180:
4181:
4182: PROCEDURE Create_Obstacles
4183: ( p_api_version_number IN NUMBER,
4184: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4185: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4186: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4187: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4188: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4181:
4182: PROCEDURE Create_Obstacles
4183: ( p_api_version_number IN NUMBER,
4184: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4185: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4186: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4187: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4188: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4189: p_check_access_flag IN VARCHAR2,
4182: PROCEDURE Create_Obstacles
4183: ( p_api_version_number IN NUMBER,
4184: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4185: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4186: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4187: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4188: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4189: p_check_access_flag IN VARCHAR2,
4190: p_admin_flag IN VARCHAR2,
4207: -- Standard Start of API savepoint
4208: SAVEPOINT CREATE_OBSTACLES_PUB;
4209:
4210: -- Standard call to check for call compatibility.
4211: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4212: p_api_version_number,
4213: l_api_name,
4214: G_PKG_NAME)
4215: THEN
4212: p_api_version_number,
4213: l_api_name,
4214: G_PKG_NAME)
4215: THEN
4216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4217: END IF;
4218:
4219:
4220: -- Initialize message list if p_init_msg_list is set to TRUE.
4217: END IF;
4218:
4219:
4220: -- Initialize message list if p_init_msg_list is set to TRUE.
4221: IF FND_API.to_Boolean( p_init_msg_list )
4222: THEN
4223: FND_MSG_PUB.initialize;
4224: END IF;
4225:
4234: END IF;
4235:
4236:
4237: -- Initialize API return status to SUCCESS
4238: x_return_status := FND_API.G_RET_STS_SUCCESS;
4239:
4240: --
4241: -- API body
4242: --
4261: -- Calling Private package: Create_OBSTACLE
4262: -- Hint: Primary key needs to be returned
4263: AS_OPP_obstacle_PVT.Create_obstacles(
4264: P_Api_Version_Number => 2.0,
4265: P_Init_Msg_List => FND_API.G_FALSE,
4266: P_Commit => p_commit,
4267: P_Validation_Level => P_Validation_Level,
4268: P_Check_Access_Flag => p_check_access_flag,
4269: P_Admin_Flag => P_Admin_Flag,
4277: X_Msg_Count => x_msg_count,
4278: X_Msg_Data => x_msg_data);
4279:
4280: -- Check return status from the above procedure call
4281: IF x_return_status = FND_API.G_RET_STS_ERROR then
4282: raise FND_API.G_EXC_ERROR;
4283: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4285: END IF;
4278: X_Msg_Data => x_msg_data);
4279:
4280: -- Check return status from the above procedure call
4281: IF x_return_status = FND_API.G_RET_STS_ERROR then
4282: raise FND_API.G_EXC_ERROR;
4283: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4285: END IF;
4286:
4279:
4280: -- Check return status from the above procedure call
4281: IF x_return_status = FND_API.G_RET_STS_ERROR then
4282: raise FND_API.G_EXC_ERROR;
4283: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4285: END IF;
4286:
4287: --
4280: -- Check return status from the above procedure call
4281: IF x_return_status = FND_API.G_RET_STS_ERROR then
4282: raise FND_API.G_EXC_ERROR;
4283: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4285: END IF;
4286:
4287: --
4288: -- End of API body.
4288: -- End of API body.
4289: --
4290:
4291: -- Standard check for p_commit
4292: IF FND_API.to_Boolean( p_commit )
4293: THEN
4294: COMMIT WORK;
4295: END IF;
4296:
4311: p_data => x_msg_data
4312: );
4313:
4314: EXCEPTION
4315: WHEN FND_API.G_EXC_ERROR THEN
4316: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4317: P_MODULE => l_module
4318: ,P_API_NAME => L_API_NAME
4319: ,P_PKG_NAME => G_PKG_NAME
4322: ,X_MSG_COUNT => X_MSG_COUNT
4323: ,X_MSG_DATA => X_MSG_DATA
4324: ,X_RETURN_STATUS => X_RETURN_STATUS);
4325:
4326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4327: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4328: P_MODULE => l_module
4329: ,P_API_NAME => L_API_NAME
4330: ,P_PKG_NAME => G_PKG_NAME
4349:
4350:
4351: PROCEDURE Update_Obstacles
4352: ( p_api_version_number IN NUMBER,
4353: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4354: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4355: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4356: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4357: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4350:
4351: PROCEDURE Update_Obstacles
4352: ( p_api_version_number IN NUMBER,
4353: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4354: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4355: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4356: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4357: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4358: p_check_access_flag IN VARCHAR2,
4351: PROCEDURE Update_Obstacles
4352: ( p_api_version_number IN NUMBER,
4353: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4354: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4355: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4356: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4357: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4358: p_check_access_flag IN VARCHAR2,
4359: p_admin_flag IN VARCHAR2,
4376: -- Standard Start of API savepoint
4377: SAVEPOINT UPDATE_OBSTACLES_PUB;
4378:
4379: -- Standard call to check for call compatibility.
4380: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4381: p_api_version_number,
4382: l_api_name,
4383: G_PKG_NAME)
4384: THEN
4381: p_api_version_number,
4382: l_api_name,
4383: G_PKG_NAME)
4384: THEN
4385: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4386: END IF;
4387:
4388:
4389: -- Initialize message list if p_init_msg_list is set to TRUE.
4386: END IF;
4387:
4388:
4389: -- Initialize message list if p_init_msg_list is set to TRUE.
4390: IF FND_API.to_Boolean( p_init_msg_list )
4391: THEN
4392: FND_MSG_PUB.initialize;
4393: END IF;
4394:
4403:
4404: END IF;
4405:
4406: -- Initialize API return status to SUCCESS
4407: x_return_status := FND_API.G_RET_STS_SUCCESS;
4408:
4409: --
4410: -- API body
4411: --
4426: *****/
4427:
4428: AS_OPP_obstacle_PVT.Update_obstacles(
4429: P_Api_Version_Number => 2.0,
4430: P_Init_Msg_List => FND_API.G_FALSE,
4431: P_Commit => p_commit,
4432: P_Validation_Level => P_Validation_Level,
4433: P_Check_Access_Flag => p_check_access_flag,
4434: P_Admin_Flag => P_Admin_Flag,
4443: X_Msg_Data => x_msg_data);
4444:
4445:
4446: -- Check return status from the above procedure call
4447: IF x_return_status = FND_API.G_RET_STS_ERROR then
4448: raise FND_API.G_EXC_ERROR;
4449: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4450: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4451: END IF;
4444:
4445:
4446: -- Check return status from the above procedure call
4447: IF x_return_status = FND_API.G_RET_STS_ERROR then
4448: raise FND_API.G_EXC_ERROR;
4449: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4450: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4451: END IF;
4452:
4445:
4446: -- Check return status from the above procedure call
4447: IF x_return_status = FND_API.G_RET_STS_ERROR then
4448: raise FND_API.G_EXC_ERROR;
4449: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4450: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4451: END IF;
4452:
4453: --
4446: -- Check return status from the above procedure call
4447: IF x_return_status = FND_API.G_RET_STS_ERROR then
4448: raise FND_API.G_EXC_ERROR;
4449: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4450: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4451: END IF;
4452:
4453: --
4454: -- End of API body
4454: -- End of API body
4455: --
4456:
4457: -- Standard check for p_commit
4458: IF FND_API.to_Boolean( p_commit )
4459: THEN
4460: COMMIT WORK;
4461: END IF;
4462:
4477: p_data => x_msg_data
4478: );
4479:
4480: EXCEPTION
4481: WHEN FND_API.G_EXC_ERROR THEN
4482: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4483: P_MODULE => l_module
4484: ,P_API_NAME => L_API_NAME
4485: ,P_PKG_NAME => G_PKG_NAME
4488: ,X_MSG_COUNT => X_MSG_COUNT
4489: ,X_MSG_DATA => X_MSG_DATA
4490: ,X_RETURN_STATUS => X_RETURN_STATUS);
4491:
4492: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4493: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4494: P_MODULE => l_module
4495: ,P_API_NAME => L_API_NAME
4496: ,P_PKG_NAME => G_PKG_NAME
4514:
4515:
4516: PROCEDURE Delete_Obstacles
4517: ( p_api_version_number IN NUMBER,
4518: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4519: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4520: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4521: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4522: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4515:
4516: PROCEDURE Delete_Obstacles
4517: ( p_api_version_number IN NUMBER,
4518: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4519: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4520: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4521: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4522: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4523: p_check_access_flag IN VARCHAR2,
4516: PROCEDURE Delete_Obstacles
4517: ( p_api_version_number IN NUMBER,
4518: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4519: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4520: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4521: p_identity_salesforce_id IN NUMBER DEFAULT NULL,
4522: p_obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_Type,
4523: p_check_access_flag IN VARCHAR2,
4524: p_admin_flag IN VARCHAR2,
4541: -- Standard Start of API savepoint
4542: SAVEPOINT DELETE_OBSTACLES_PUB;
4543:
4544: -- Standard call to check for call compatibility.
4545: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4546: p_api_version_number,
4547: l_api_name,
4548: G_PKG_NAME)
4549: THEN
4546: p_api_version_number,
4547: l_api_name,
4548: G_PKG_NAME)
4549: THEN
4550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4551: END IF;
4552:
4553:
4554: -- Initialize message list if p_init_msg_list is set to TRUE.
4551: END IF;
4552:
4553:
4554: -- Initialize message list if p_init_msg_list is set to TRUE.
4555: IF FND_API.to_Boolean( p_init_msg_list )
4556: THEN
4557: FND_MSG_PUB.initialize;
4558: END IF;
4559:
4568:
4569: END IF;
4570:
4571: -- Initialize API return status to SUCCESS
4572: x_return_status := FND_API.G_RET_STS_SUCCESS;
4573:
4574: --
4575: -- API body
4576: --
4593: *****/
4594:
4595: AS_OPP_obstacle_PVT.Delete_obstacles(
4596: P_Api_Version_Number => 2.0,
4597: P_Init_Msg_List => FND_API.G_FALSE,
4598: P_Commit => p_commit,
4599: P_Validation_Level => P_Validation_Level ,
4600: P_Check_Access_Flag => p_check_access_flag,
4601: P_Admin_Flag => P_Admin_Flag,
4609: X_Msg_Count => x_msg_count,
4610: X_Msg_Data => x_msg_data);
4611:
4612: -- Check return status from the above procedure call
4613: IF x_return_status = FND_API.G_RET_STS_ERROR then
4614: raise FND_API.G_EXC_ERROR;
4615: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4610: X_Msg_Data => x_msg_data);
4611:
4612: -- Check return status from the above procedure call
4613: IF x_return_status = FND_API.G_RET_STS_ERROR then
4614: raise FND_API.G_EXC_ERROR;
4615: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4611:
4612: -- Check return status from the above procedure call
4613: IF x_return_status = FND_API.G_RET_STS_ERROR then
4614: raise FND_API.G_EXC_ERROR;
4615: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4619: --
4612: -- Check return status from the above procedure call
4613: IF x_return_status = FND_API.G_RET_STS_ERROR then
4614: raise FND_API.G_EXC_ERROR;
4615: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
4616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4619: --
4620: -- End of API body
4620: -- End of API body
4621: --
4622:
4623: -- Standard check for p_commit
4624: IF FND_API.to_Boolean( p_commit )
4625: THEN
4626: COMMIT WORK;
4627: END IF;
4628:
4643: p_data => x_msg_data
4644: );
4645:
4646: EXCEPTION
4647: WHEN FND_API.G_EXC_ERROR THEN
4648: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4649: P_MODULE => l_module
4650: ,P_API_NAME => L_API_NAME
4651: ,P_PKG_NAME => G_PKG_NAME
4654: ,X_MSG_COUNT => X_MSG_COUNT
4655: ,X_MSG_DATA => X_MSG_DATA
4656: ,X_RETURN_STATUS => X_RETURN_STATUS);
4657:
4658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4659: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4660: P_MODULE => l_module
4661: ,P_API_NAME => L_API_NAME
4662: ,P_PKG_NAME => G_PKG_NAME
4679: End Delete_obstacles;
4680:
4681: PROCEDURE Delete_SalesTeams
4682: ( p_api_version_number IN NUMBER,
4683: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4684: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4685: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4686: p_sales_team_tbl IN AS_ACCESS_PUB.SALES_TEAM_TBL_TYPE,
4687: p_check_access_flag IN VARCHAR2,
4680:
4681: PROCEDURE Delete_SalesTeams
4682: ( p_api_version_number IN NUMBER,
4683: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4684: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4685: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4686: p_sales_team_tbl IN AS_ACCESS_PUB.SALES_TEAM_TBL_TYPE,
4687: p_check_access_flag IN VARCHAR2,
4688: p_admin_flag IN VARCHAR2,
4681: PROCEDURE Delete_SalesTeams
4682: ( p_api_version_number IN NUMBER,
4683: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4684: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4685: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4686: p_sales_team_tbl IN AS_ACCESS_PUB.SALES_TEAM_TBL_TYPE,
4687: p_check_access_flag IN VARCHAR2,
4688: p_admin_flag IN VARCHAR2,
4689: p_admin_group_id IN NUMBER,
4734: -- Standard Start of API savepoint
4735: SAVEPOINT DELETE_SALESTEAMS_PUB;
4736:
4737: -- Standard call to check for call compatibility.
4738: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4739: p_api_version_number,
4740: l_api_name,
4741: G_PKG_NAME)
4742: THEN
4739: p_api_version_number,
4740: l_api_name,
4741: G_PKG_NAME)
4742: THEN
4743: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4744: END IF;
4745:
4746:
4747: -- Initialize message list if p_init_msg_list is set to TRUE.
4744: END IF;
4745:
4746:
4747: -- Initialize message list if p_init_msg_list is set to TRUE.
4748: IF FND_API.to_Boolean( p_init_msg_list )
4749: THEN
4750: FND_MSG_PUB.initialize;
4751: END IF;
4752:
4761:
4762: END IF;
4763:
4764: -- Initialize API return status to SUCCESS
4765: x_return_status := FND_API.G_RET_STS_SUCCESS;
4766:
4767: -- Call Get_Access_Profiles to get access_profile_rec
4768: AS_OPPORTUNITY_PUB.Get_Access_Profiles(
4769: p_profile_tbl => p_profile_tbl,
4781: BEGIN
4782: l_sales_team_rec := p_sales_team_tbl(l_curr_row);
4783:
4784: IF(l_sales_team_rec.lead_id IS NULL OR
4785: l_sales_team_rec.lead_id = FND_API.G_MISS_NUM) OR
4786: (l_sales_team_rec.salesforce_id IS NULL OR
4787: l_sales_team_rec.salesforce_id = FND_API.G_MISS_NUM)
4788: THEN
4789: open c_sales_team(l_sales_team_rec.access_id);
4783:
4784: IF(l_sales_team_rec.lead_id IS NULL OR
4785: l_sales_team_rec.lead_id = FND_API.G_MISS_NUM) OR
4786: (l_sales_team_rec.salesforce_id IS NULL OR
4787: l_sales_team_rec.salesforce_id = FND_API.G_MISS_NUM)
4788: THEN
4789: open c_sales_team(l_sales_team_rec.access_id);
4790: fetch c_sales_team into l_lead_id, l_salesforce_id, l_sales_group_id;
4791: close c_sales_team;
4805: IF C_SalesCredit_Exist%NOTFOUND THEN
4806: -- Call the AS_ACCESS_PUB.Delete_SalesTeam API
4807: AS_ACCESS_PUB.Delete_SalesTeam(
4808: p_api_version_number => l_api_version_number,
4809: p_init_msg_list => FND_API.G_FALSE,
4810: p_commit => p_commit,
4811: p_validation_level => p_validation_level,
4812: p_access_profile_rec => l_access_profile_rec,
4813: p_check_access_flag => p_check_access_flag,
4840: p_token1 => 'SALESREP',
4841: p_token1_value => l_person_name );
4842:
4843:
4844: x_return_status := FND_API.G_RET_STS_ERROR;
4845:
4846: FND_MSG_PUB.Count_And_Get(
4847: p_count => x_msg_count,
4848: p_data => x_msg_data
4854:
4855: END;
4856:
4857: -- Check return status from the above procedure call
4858: IF x_return_status = FND_API.G_RET_STS_ERROR
4859: THEN
4860: raise FND_API.G_EXC_ERROR;
4861: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
4862: THEN
4856:
4857: -- Check return status from the above procedure call
4858: IF x_return_status = FND_API.G_RET_STS_ERROR
4859: THEN
4860: raise FND_API.G_EXC_ERROR;
4861: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
4862: THEN
4863: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4864: END IF;
4857: -- Check return status from the above procedure call
4858: IF x_return_status = FND_API.G_RET_STS_ERROR
4859: THEN
4860: raise FND_API.G_EXC_ERROR;
4861: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
4862: THEN
4863: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4864: END IF;
4865:
4859: THEN
4860: raise FND_API.G_EXC_ERROR;
4861: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
4862: THEN
4863: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4864: END IF;
4865:
4866: END LOOP;
4867:
4869: -- End of API body
4870: --
4871:
4872: -- Standard check for p_commit
4873: IF FND_API.to_Boolean( p_commit )
4874: THEN
4875: COMMIT WORK;
4876: END IF;
4877:
4893: );
4894:
4895:
4896: EXCEPTION
4897: WHEN FND_API.G_EXC_ERROR THEN
4898: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4899: P_MODULE => l_module
4900: ,P_API_NAME => L_API_NAME
4901: ,P_PKG_NAME => G_PKG_NAME
4904: ,X_MSG_COUNT => X_MSG_COUNT
4905: ,X_MSG_DATA => X_MSG_DATA
4906: ,X_RETURN_STATUS => X_RETURN_STATUS);
4907:
4908: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4909: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
4910: P_MODULE => l_module
4911: ,P_API_NAME => L_API_NAME
4912: ,P_PKG_NAME => G_PKG_NAME
4940: -- End of Comments
4941:
4942: PROCEDURE Copy_Opportunity
4943: ( p_api_version_number IN NUMBER,
4944: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4945: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4946: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4941:
4942: PROCEDURE Copy_Opportunity
4943: ( p_api_version_number IN NUMBER,
4944: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4945: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4946: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4942: PROCEDURE Copy_Opportunity
4943: ( p_api_version_number IN NUMBER,
4944: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4945: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4946: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4945: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4946: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4946: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4954: p_copy_methodology IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4947: p_lead_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4954: p_copy_methodology IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4955: p_new_customer_id IN NUMBER,
4948: p_description IN VARCHAR2,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4954: p_copy_methodology IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4955: p_new_customer_id IN NUMBER,
4956: p_new_address_id IN NUMBER,
4949: p_copy_salesteam IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4954: p_copy_methodology IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4955: p_new_customer_id IN NUMBER,
4956: p_new_address_id IN NUMBER,
4957: p_check_access_flag IN VARCHAR2,
4950: p_copy_opp_lines IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4951: p_copy_lead_contacts IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4952: p_copy_lead_competitors IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4953: p_copy_sales_credits IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4954: p_copy_methodology IN VARCHAR2 DEFAULT FND_API.G_FALSE,
4955: p_new_customer_id IN NUMBER,
4956: p_new_address_id IN NUMBER,
4957: p_check_access_flag IN VARCHAR2,
4958: p_admin_flag IN VARCHAR2,
4977: -- Standard Start of API savepoint
4978: SAVEPOINT COPY_OPPORTUNITY_PUB;
4979:
4980: -- Standard call to check for call compatibility.
4981: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4982: p_api_version_number,
4983: l_api_name,
4984: G_PKG_NAME)
4985: THEN
4982: p_api_version_number,
4983: l_api_name,
4984: G_PKG_NAME)
4985: THEN
4986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4987: END IF;
4988:
4989:
4990: -- Initialize message list if p_init_msg_list is set to TRUE.
4987: END IF;
4988:
4989:
4990: -- Initialize message list if p_init_msg_list is set to TRUE.
4991: IF FND_API.to_Boolean( p_init_msg_list )
4992: THEN
4993: FND_MSG_PUB.initialize;
4994: END IF;
4995:
5005:
5006: END IF;
5007:
5008: -- Initialize API return status to SUCCESS
5009: x_return_status := FND_API.G_RET_STS_SUCCESS;
5010:
5011: --
5012: -- API body
5013: --
5015: -- Calling Private package: Create_OPP_HEADER
5016: -- Hint: Primary key needs to be returned
5017: AS_OPP_COPY_PVT.Copy_Opportunity(
5018: P_Api_Version_Number => 2.0,
5019: P_Init_Msg_List => FND_API.G_FALSE,
5020: P_Commit => p_commit,
5021: P_Validation_Level => P_Validation_Level ,
5022: P_Lead_Id => p_lead_id,
5023: P_Description => p_description,
5041: X_Msg_Count => x_msg_count,
5042: X_Msg_Data => x_msg_data);
5043:
5044: -- Check return status from the above procedure call
5045: IF x_return_status = FND_API.G_RET_STS_ERROR then
5046: raise FND_API.G_EXC_ERROR;
5047: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5048: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5049: END IF;
5042: X_Msg_Data => x_msg_data);
5043:
5044: -- Check return status from the above procedure call
5045: IF x_return_status = FND_API.G_RET_STS_ERROR then
5046: raise FND_API.G_EXC_ERROR;
5047: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5048: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5049: END IF;
5050:
5043:
5044: -- Check return status from the above procedure call
5045: IF x_return_status = FND_API.G_RET_STS_ERROR then
5046: raise FND_API.G_EXC_ERROR;
5047: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5048: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5049: END IF;
5050:
5051: --
5044: -- Check return status from the above procedure call
5045: IF x_return_status = FND_API.G_RET_STS_ERROR then
5046: raise FND_API.G_EXC_ERROR;
5047: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5048: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5049: END IF;
5050:
5051: --
5052: -- End of API body.
5052: -- End of API body.
5053: --
5054:
5055: -- Standard check for p_commit
5056: IF FND_API.to_Boolean( p_commit )
5057: THEN
5058: COMMIT WORK;
5059: END IF;
5060:
5074: p_data => x_msg_data
5075: );
5076:
5077: EXCEPTION
5078: WHEN FND_API.G_EXC_ERROR THEN
5079: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
5080: P_MODULE => l_module
5081: ,P_API_NAME => L_API_NAME
5082: ,P_PKG_NAME => G_PKG_NAME
5085: ,X_MSG_COUNT => X_MSG_COUNT
5086: ,X_MSG_DATA => X_MSG_DATA
5087: ,X_RETURN_STATUS => X_RETURN_STATUS);
5088:
5089: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5090: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
5091: P_MODULE => l_module
5092: ,P_API_NAME => L_API_NAME
5093: ,P_PKG_NAME => G_PKG_NAME
5147:
5148: END LOOP;
5149:
5150: IF x_access_profile_rec.opp_access_profile_value IS NULL OR
5151: x_access_profile_rec.opp_access_profile_value = FND_API.G_MISS_CHAR
5152: THEN
5153: x_access_profile_rec.opp_access_profile_value
5154: := FND_PROFILE.Value('AS_OPP_ACCESS');
5155: END IF;
5154: := FND_PROFILE.Value('AS_OPP_ACCESS');
5155: END IF;
5156:
5157: IF x_access_profile_rec.lead_access_profile_value IS NULL OR
5158: x_access_profile_rec.lead_access_profile_value = FND_API.G_MISS_CHAR
5159: THEN
5160: x_access_profile_rec.lead_access_profile_value
5161: := FND_PROFILE.Value('AS_LEAD_ACCESS');
5162: END IF;
5161: := FND_PROFILE.Value('AS_LEAD_ACCESS');
5162: END IF;
5163:
5164: IF x_access_profile_rec.cust_access_profile_value IS NULL OR
5165: x_access_profile_rec.cust_access_profile_value = FND_API.G_MISS_CHAR
5166: THEN
5167: x_access_profile_rec.cust_access_profile_value
5168: := FND_PROFILE.Value('AS_CUST_ACCESS');
5169: END IF;
5168: := FND_PROFILE.Value('AS_CUST_ACCESS');
5169: END IF;
5170:
5171: IF x_access_profile_rec.mgr_update_profile_value IS NULL OR
5172: x_access_profile_rec.mgr_update_profile_value = FND_API.G_MISS_CHAR
5173: THEN
5174: x_access_profile_rec.mgr_update_profile_value
5175: := FND_PROFILE.Value('AS_MGR_UPDATE');
5176: END IF;
5175: := FND_PROFILE.Value('AS_MGR_UPDATE');
5176: END IF;
5177:
5178: IF x_access_profile_rec.admin_update_profile_value IS NULL OR
5179: x_access_profile_rec.admin_update_profile_value = FND_API.G_MISS_CHAR
5180: THEN
5181: x_access_profile_rec.admin_update_profile_value
5182: := FND_PROFILE.Value('AS_ADMIN_UPDATE');
5183: END IF;
5195: BEGIN
5196: FOR l_curr IN 1..l_profile_count LOOP
5197: IF p_profile_tbl(l_curr).PROFILE_NAME = p_profile_name THEN
5198: IF p_profile_tbl(l_curr).PROFILE_VALUE IS NOT NULL AND
5199: p_profile_tbl(l_curr).PROFILE_VALUE <> FND_API.G_MISS_CHAR
5200: THEN
5201: RETURN p_profile_tbl(l_curr).PROFILE_VALUE;
5202: END IF;
5203: ELSE