16: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
17:
18: PROCEDURE Create_process_rules(
19: P_Api_Version_Number IN NUMBER,
20: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
21: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
22: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
23: P_Identity_Resource_Id IN NUMBER,
24: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
17:
18: PROCEDURE Create_process_rules(
19: P_Api_Version_Number IN NUMBER,
20: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
21: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
22: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
23: P_Identity_Resource_Id IN NUMBER,
24: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
25: X_process_rule_id OUT NOCOPY NUMBER,
18: PROCEDURE Create_process_rules(
19: P_Api_Version_Number IN NUMBER,
20: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
21: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
22: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
23: P_Identity_Resource_Id IN NUMBER,
24: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
25: X_process_rule_id OUT NOCOPY NUMBER,
26: X_Return_Status OUT NOCOPY VARCHAR2,
35: -- Standard Start of API savepoint
36: SAVEPOINT CREATE_PROCESS_RULES_PUB;
37:
38: -- Standard call to check for call compatibility.
39: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
40: p_api_version_number,
41: l_api_name,
42: G_PKG_NAME)
43: THEN
40: p_api_version_number,
41: l_api_name,
42: G_PKG_NAME)
43: THEN
44: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
45: END IF;
46:
47:
48: -- Initialize message list if p_init_msg_list is set to TRUE.
45: END IF;
46:
47:
48: -- Initialize message list if p_init_msg_list is set to TRUE.
49: IF FND_API.to_Boolean( p_init_msg_list )
50: THEN
51: FND_MSG_PUB.initialize;
52: END IF;
53:
66:
67: END IF;
68:
69: -- Initialize API return status to SUCCESS
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:
72: --
73: -- API body
74: --
83: -- Calling Private package: Create_PROCESS_RULES
84:
85: PV_process_rule_PVT.Create_process_rule(
86: P_Api_Version_Number => 2.0,
87: P_Init_Msg_List => FND_API.G_FALSE,
88: P_Commit => FND_API.G_FALSE,
89: P_Validation_Level => P_Validation_Level,
90: P_Identity_Resource_Id => P_Identity_Resource_Id,
91: P_process_rule_rec => p_RULES_Rec ,
84:
85: PV_process_rule_PVT.Create_process_rule(
86: P_Api_Version_Number => 2.0,
87: P_Init_Msg_List => FND_API.G_FALSE,
88: P_Commit => FND_API.G_FALSE,
89: P_Validation_Level => P_Validation_Level,
90: P_Identity_Resource_Id => P_Identity_Resource_Id,
91: P_process_rule_rec => p_RULES_Rec ,
92: X_process_rule_id => x_process_rule_id,
95: X_Msg_Data => x_msg_data);
96:
97:
98: -- Check return status from the above procedure call
99: IF x_return_status = FND_API.G_RET_STS_ERROR then
100: raise FND_API.G_EXC_ERROR;
101: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
102: raise FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
96:
97:
98: -- Check return status from the above procedure call
99: IF x_return_status = FND_API.G_RET_STS_ERROR then
100: raise FND_API.G_EXC_ERROR;
101: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
102: raise FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
97:
98: -- Check return status from the above procedure call
99: IF x_return_status = FND_API.G_RET_STS_ERROR then
100: raise FND_API.G_EXC_ERROR;
101: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
102: raise FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
105: --
98: -- Check return status from the above procedure call
99: IF x_return_status = FND_API.G_RET_STS_ERROR then
100: raise FND_API.G_EXC_ERROR;
101: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
102: raise FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
105: --
106: -- End of API body.
106: -- End of API body.
107: --
108:
109: -- Standard check for p_commit
110: IF FND_API.to_Boolean( p_commit )
111: THEN
112: COMMIT WORK;
113: END IF;
114:
133: p_data => x_msg_data
134: );
135:
136: EXCEPTION
137: WHEN FND_API.G_EXC_ERROR THEN
138: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
139: P_API_NAME => L_API_NAME
140: ,P_PKG_NAME => G_PKG_NAME
141: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
143: ,X_MSG_COUNT => X_MSG_COUNT
144: ,X_MSG_DATA => X_MSG_DATA
145: ,X_RETURN_STATUS => X_RETURN_STATUS);
146:
147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
148: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
149: P_API_NAME => L_API_NAME
150: ,P_PKG_NAME => G_PKG_NAME
151: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
170:
171: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
172: PROCEDURE Update_process_rules(
173: P_Api_Version_Number IN NUMBER,
174: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
175: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
176: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
177: P_Identity_Resource_Id IN NUMBER,
178: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
171: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
172: PROCEDURE Update_process_rules(
173: P_Api_Version_Number IN NUMBER,
174: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
175: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
176: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
177: P_Identity_Resource_Id IN NUMBER,
178: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
179: X_Return_Status OUT NOCOPY VARCHAR2,
172: PROCEDURE Update_process_rules(
173: P_Api_Version_Number IN NUMBER,
174: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
175: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
176: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
177: P_Identity_Resource_Id IN NUMBER,
178: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
179: X_Return_Status OUT NOCOPY VARCHAR2,
180: X_Msg_Count OUT NOCOPY NUMBER,
188: -- Standard Start of API savepoint
189: SAVEPOINT UPDATE_PROCESS_RULES_PUB;
190:
191: -- Standard call to check for call compatibility.
192: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
193: p_api_version_number,
194: l_api_name,
195: G_PKG_NAME)
196: THEN
193: p_api_version_number,
194: l_api_name,
195: G_PKG_NAME)
196: THEN
197: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
198: END IF;
199:
200:
201: -- Initialize message list if p_init_msg_list is set to TRUE.
198: END IF;
199:
200:
201: -- Initialize message list if p_init_msg_list is set to TRUE.
202: IF FND_API.to_Boolean( p_init_msg_list )
203: THEN
204: FND_MSG_PUB.initialize;
205: END IF;
206:
219:
220: END IF;
221:
222: -- Initialize API return status to SUCCESS
223: x_return_status := FND_API.G_RET_STS_SUCCESS;
224:
225: --
226: -- API body
227: --
227: --
228:
229: PV_process_rule_PVT.Update_process_rule(
230: P_Api_Version_Number => 2.0,
231: P_Init_Msg_List => FND_API.G_FALSE,
232: P_Commit => p_commit,
233: P_Validation_Level => P_Validation_Level,
234: P_Identity_Resource_Id => P_Identity_Resource_Id,
235: P_process_rule_rec => p_RULES_Rec ,
237: X_Msg_Count => x_msg_count,
238: X_Msg_Data => x_msg_data);
239:
240: -- Check return status from the above procedure call
241: IF x_return_status = FND_API.G_RET_STS_ERROR then
242: raise FND_API.G_EXC_ERROR;
243: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
244: raise FND_API.G_EXC_UNEXPECTED_ERROR;
245: END IF;
238: X_Msg_Data => x_msg_data);
239:
240: -- Check return status from the above procedure call
241: IF x_return_status = FND_API.G_RET_STS_ERROR then
242: raise FND_API.G_EXC_ERROR;
243: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
244: raise FND_API.G_EXC_UNEXPECTED_ERROR;
245: END IF;
246:
239:
240: -- Check return status from the above procedure call
241: IF x_return_status = FND_API.G_RET_STS_ERROR then
242: raise FND_API.G_EXC_ERROR;
243: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
244: raise FND_API.G_EXC_UNEXPECTED_ERROR;
245: END IF;
246:
247: --
240: -- Check return status from the above procedure call
241: IF x_return_status = FND_API.G_RET_STS_ERROR then
242: raise FND_API.G_EXC_ERROR;
243: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
244: raise FND_API.G_EXC_UNEXPECTED_ERROR;
245: END IF;
246:
247: --
248: -- End of API body
248: -- End of API body
249: --
250:
251: -- Standard check for p_commit
252: IF FND_API.to_Boolean( p_commit )
253: THEN
254: COMMIT WORK;
255: END IF;
256:
275: p_data => x_msg_data
276: );
277:
278: EXCEPTION
279: WHEN FND_API.G_EXC_ERROR THEN
280: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
281: P_API_NAME => L_API_NAME
282: ,P_PKG_NAME => G_PKG_NAME
283: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
285: ,X_MSG_COUNT => X_MSG_COUNT
286: ,X_MSG_DATA => X_MSG_DATA
287: ,X_RETURN_STATUS => X_RETURN_STATUS);
288:
289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
290: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
291: P_API_NAME => L_API_NAME
292: ,P_PKG_NAME => G_PKG_NAME
293: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
313: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
314: -- The Master delete procedure may not be needed depends on different business requirements.
315: PROCEDURE Delete_process_rules(
316: P_Api_Version_Number IN NUMBER,
317: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
318: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
319: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
320: P_Identity_Resource_Id IN NUMBER,
321: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
314: -- The Master delete procedure may not be needed depends on different business requirements.
315: PROCEDURE Delete_process_rules(
316: P_Api_Version_Number IN NUMBER,
317: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
318: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
319: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
320: P_Identity_Resource_Id IN NUMBER,
321: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
322: X_Return_Status OUT NOCOPY VARCHAR2,
315: PROCEDURE Delete_process_rules(
316: P_Api_Version_Number IN NUMBER,
317: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
318: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
319: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
320: P_Identity_Resource_Id IN NUMBER,
321: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
322: X_Return_Status OUT NOCOPY VARCHAR2,
323: X_Msg_Count OUT NOCOPY NUMBER,
331: -- Standard Start of API savepoint
332: SAVEPOINT DELETE_PROCESS_RULES_PUB;
333:
334: -- Standard call to check for call compatibility.
335: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
336: p_api_version_number,
337: l_api_name,
338: G_PKG_NAME)
339: THEN
336: p_api_version_number,
337: l_api_name,
338: G_PKG_NAME)
339: THEN
340: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
341: END IF;
342:
343:
344: -- Initialize message list if p_init_msg_list is set to TRUE.
341: END IF;
342:
343:
344: -- Initialize message list if p_init_msg_list is set to TRUE.
345: IF FND_API.to_Boolean( p_init_msg_list )
346: THEN
347: FND_MSG_PUB.initialize;
348: END IF;
349:
362:
363: END IF;
364:
365: -- Initialize API return status to SUCCESS
366: x_return_status := FND_API.G_RET_STS_SUCCESS;
367:
368: --
369: -- API body
370: --
370: --
371:
372: PV_process_rule_PVT.Delete_process_rule(
373: P_Api_Version_Number => 2.0,
374: P_Init_Msg_List => FND_API.G_FALSE,
375: P_Commit => p_commit,
376: P_Validation_Level => p_Validation_Level,
377: P_Identity_Resource_Id => P_Identity_Resource_Id,
378: P_process_rule_rec => p_RULES_Rec,
381: X_Msg_Data => x_msg_data);
382:
383:
384: -- Check return status from the above procedure call
385: IF x_return_status = FND_API.G_RET_STS_ERROR then
386: raise FND_API.G_EXC_ERROR;
387: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
388: raise FND_API.G_EXC_UNEXPECTED_ERROR;
389: END IF;
382:
383:
384: -- Check return status from the above procedure call
385: IF x_return_status = FND_API.G_RET_STS_ERROR then
386: raise FND_API.G_EXC_ERROR;
387: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
388: raise FND_API.G_EXC_UNEXPECTED_ERROR;
389: END IF;
390:
383:
384: -- Check return status from the above procedure call
385: IF x_return_status = FND_API.G_RET_STS_ERROR then
386: raise FND_API.G_EXC_ERROR;
387: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
388: raise FND_API.G_EXC_UNEXPECTED_ERROR;
389: END IF;
390:
391: --
384: -- Check return status from the above procedure call
385: IF x_return_status = FND_API.G_RET_STS_ERROR then
386: raise FND_API.G_EXC_ERROR;
387: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
388: raise FND_API.G_EXC_UNEXPECTED_ERROR;
389: END IF;
390:
391: --
392: -- End of API body
392: -- End of API body
393: --
394:
395: -- Standard check for p_commit
396: IF FND_API.to_Boolean( p_commit )
397: THEN
398: COMMIT WORK;
399: END IF;
400:
419: p_data => x_msg_data
420: );
421:
422: EXCEPTION
423: WHEN FND_API.G_EXC_ERROR THEN
424: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
425: P_API_NAME => L_API_NAME
426: ,P_PKG_NAME => G_PKG_NAME
427: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
429: ,X_MSG_COUNT => X_MSG_COUNT
430: ,X_MSG_DATA => X_MSG_DATA
431: ,X_RETURN_STATUS => X_RETURN_STATUS);
432:
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
435: P_API_NAME => L_API_NAME
436: ,P_PKG_NAME => G_PKG_NAME
437: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
454: End Delete_process_rules;
455:
456: PROCEDURE Copy_process_rules(
457: P_Api_Version_Number IN NUMBER,
458: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
459: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
460: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
461: P_Identity_Resource_Id IN NUMBER,
462: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
455:
456: PROCEDURE Copy_process_rules(
457: P_Api_Version_Number IN NUMBER,
458: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
459: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
460: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
461: P_Identity_Resource_Id IN NUMBER,
462: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
463: X_process_rule_id OUT NOCOPY NUMBER,
456: PROCEDURE Copy_process_rules(
457: P_Api_Version_Number IN NUMBER,
458: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
459: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
460: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
461: P_Identity_Resource_Id IN NUMBER,
462: P_RULES_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE := PV_RULE_RECTYPE_PUB.G_MISS_RULES_REC,
463: X_process_rule_id OUT NOCOPY NUMBER,
464: X_Return_Status OUT NOCOPY VARCHAR2,
473: -- Standard Start of API savepoint
474: SAVEPOINT COPY_PROCESS_RULES_PUB;
475:
476: -- Standard call to check for call compatibility.
477: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
478: p_api_version_number,
479: l_api_name,
480: G_PKG_NAME)
481: THEN
478: p_api_version_number,
479: l_api_name,
480: G_PKG_NAME)
481: THEN
482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
483: END IF;
484:
485:
486: -- Initialize message list if p_init_msg_list is set to TRUE.
483: END IF;
484:
485:
486: -- Initialize message list if p_init_msg_list is set to TRUE.
487: IF FND_API.to_Boolean( p_init_msg_list )
488: THEN
489: FND_MSG_PUB.initialize;
490: END IF;
491:
504:
505: END IF;
506:
507: -- Initialize API return status to SUCCESS
508: x_return_status := FND_API.G_RET_STS_SUCCESS;
509:
510: --
511: -- API body
512: --
521: -- Calling Private package: Copy_PROCESS_RULES
522:
523: PV_process_rule_PVT.Copy_process_rule(
524: P_Api_Version_Number => 2.0,
525: P_Init_Msg_List => FND_API.G_FALSE,
526: P_Commit => FND_API.G_FALSE,
527: P_Validation_Level => P_Validation_Level,
528: P_Identity_Resource_Id => P_Identity_Resource_Id,
529: P_process_rule_rec => p_RULES_Rec ,
522:
523: PV_process_rule_PVT.Copy_process_rule(
524: P_Api_Version_Number => 2.0,
525: P_Init_Msg_List => FND_API.G_FALSE,
526: P_Commit => FND_API.G_FALSE,
527: P_Validation_Level => P_Validation_Level,
528: P_Identity_Resource_Id => P_Identity_Resource_Id,
529: P_process_rule_rec => p_RULES_Rec ,
530: X_process_rule_id => x_process_rule_id,
533: X_Msg_Data => x_msg_data);
534:
535:
536: -- Check return status from the above procedure call
537: IF x_return_status = FND_API.G_RET_STS_ERROR then
538: raise FND_API.G_EXC_ERROR;
539: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
534:
535:
536: -- Check return status from the above procedure call
537: IF x_return_status = FND_API.G_RET_STS_ERROR then
538: raise FND_API.G_EXC_ERROR;
539: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
535:
536: -- Check return status from the above procedure call
537: IF x_return_status = FND_API.G_RET_STS_ERROR then
538: raise FND_API.G_EXC_ERROR;
539: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
543: --
536: -- Check return status from the above procedure call
537: IF x_return_status = FND_API.G_RET_STS_ERROR then
538: raise FND_API.G_EXC_ERROR;
539: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
543: --
544: -- End of API body.
544: -- End of API body.
545: --
546:
547: -- Standard check for p_commit
548: IF FND_API.to_Boolean( p_commit )
549: THEN
550: COMMIT WORK;
551: END IF;
552:
571: p_data => x_msg_data
572: );
573:
574: EXCEPTION
575: WHEN FND_API.G_EXC_ERROR THEN
576: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
577: P_API_NAME => L_API_NAME
578: ,P_PKG_NAME => G_PKG_NAME
579: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
581: ,X_MSG_COUNT => X_MSG_COUNT
582: ,X_MSG_DATA => X_MSG_DATA
583: ,X_RETURN_STATUS => X_RETURN_STATUS);
584:
585: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
586: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
587: P_API_NAME => L_API_NAME
588: ,P_PKG_NAME => G_PKG_NAME
589: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR