eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.ASO_SECURITY_INT dependencies on FND_API

Line 114: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

110:
111:
112: PROCEDURE Add_Resource
113: (
114: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
115: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
116: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
117: p_call_from_oafwk_flag IN VARCHAR2,
118: X_Qte_Access_Tbl OUT NOCOPY /* file.sql.39 change */ Qte_Access_Tbl_Type,

Line 115: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

111:
112: PROCEDURE Add_Resource
113: (
114: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
115: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
116: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
117: p_call_from_oafwk_flag IN VARCHAR2,
118: X_Qte_Access_Tbl OUT NOCOPY /* file.sql.39 change */ Qte_Access_Tbl_Type,
119: X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 178: x_return_status := FND_API.G_RET_STS_SUCCESS;

174: -- Standard Start of API savepoint
175: SAVEPOINT Add_Resource_INT;
176:
177: -- Initialize API return status to success
178: x_return_status := FND_API.G_RET_STS_SUCCESS;
179:
180: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
181: IF aso_debug_pub.g_debug_flag = 'Y' THEN
182: aso_debug_pub.add('ASO_SECURITY_INT: ****** Start of Add_Resource API ******', 1, 'Y');

Line 188: IF FND_API.To_Boolean(p_init_msg_list) THEN

184: aso_debug_pub.add('Add_Resource: p_qte_access_tbl.count: ' || p_qte_access_tbl.count);
185: END IF;
186:
187: -- Initialize message list if p_init_msg_list is set to TRUE.
188: IF FND_API.To_Boolean(p_init_msg_list) THEN
189: FND_Msg_Pub.initialize;
190: END IF;
191:
192: -- API body

Line 197: l_quote_number := FND_API.G_MISS_NUM;

193: X_Qte_Access_Tbl := l_qte_access_tbl;
194:
195: FOR i IN 1..l_qte_access_tbl.count LOOP
196:
197: l_quote_number := FND_API.G_MISS_NUM;
198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;

Line 198: l_resource_id := FND_API.G_MISS_NUM;

194:
195: FOR i IN 1..l_qte_access_tbl.count LOOP
196:
197: l_quote_number := FND_API.G_MISS_NUM;
198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;

Line 199: l_resource_grp_id := FND_API.G_MISS_NUM;

195: FOR i IN 1..l_qte_access_tbl.count LOOP
196:
197: l_quote_number := FND_API.G_MISS_NUM;
198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;

Line 200: l_update_access_flag := FND_API.G_MISS_CHAR;

196:
197: l_quote_number := FND_API.G_MISS_NUM;
198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;
204:

Line 201: l_primary_resource_id := FND_API.G_MISS_NUM;

197: l_quote_number := FND_API.G_MISS_NUM;
198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;
204:
205:

Line 202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;

198: l_resource_id := FND_API.G_MISS_NUM;
199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;
204:
205:
206: If ((l_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or

Line 203: l_access_id := FND_API.G_MISS_NUM;

199: l_resource_grp_id := FND_API.G_MISS_NUM;
200: l_update_access_flag := FND_API.G_MISS_CHAR;
201: l_primary_resource_id := FND_API.G_MISS_NUM;
202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;
204:
205:
206: If ((l_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
207: (l_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then

Line 206: If ((l_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or

202: l_primary_resource_grp_id := FND_API.G_MISS_NUM;
203: l_access_id := FND_API.G_MISS_NUM;
204:
205:
206: If ((l_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
207: (l_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
208:
209: FOR l_lock_rec IN Lock_check(l_qte_access_tbl(i).quote_number) LOOP
210:

Line 207: (l_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then

203: l_access_id := FND_API.G_MISS_NUM;
204:
205:
206: If ((l_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
207: (l_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
208:
209: FOR l_lock_rec IN Lock_check(l_qte_access_tbl(i).quote_number) LOOP
210:
211: IF l_lock_rec.price_request_id IS NOT NULL THEN

Line 218: raise fnd_api.g_exc_error;

214: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
215: FND_MSG_PUB.ADD;
216: end if;
217:
218: raise fnd_api.g_exc_error;
219:
220: END IF;
221:
222: END LOOP;

Line 226: IF l_qte_access_tbl(i).access_id IS NOT NULL AND l_qte_access_tbl(i).access_id <> FND_API.G_MISS_NUM THEN

222: END LOOP;
223:
224: end if;
225:
226: IF l_qte_access_tbl(i).access_id IS NOT NULL AND l_qte_access_tbl(i).access_id <> FND_API.G_MISS_NUM THEN
227:
228: IF aso_debug_pub.g_debug_flag = 'Y' THEN
229: aso_debug_pub.add('Add_Resource: LOOP for access_id: ' || l_qte_access_tbl(i).access_id);
230: END IF;

Line 232: if (nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false)

228: IF aso_debug_pub.g_debug_flag = 'Y' THEN
229: aso_debug_pub.add('Add_Resource: LOOP for access_id: ' || l_qte_access_tbl(i).access_id);
230: END IF;
231:
232: if (nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false)
233: OR ((nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_true) and (l_qte_access_tbl(i).operation_code = 'UPDATE')) then
234:
235: open c_access_id_exist(l_qte_access_tbl(i).access_id);
236: fetch c_access_id_exist into l_qte_access_tbl(i).access_id;

Line 233: OR ((nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_true) and (l_qte_access_tbl(i).operation_code = 'UPDATE')) then

229: aso_debug_pub.add('Add_Resource: LOOP for access_id: ' || l_qte_access_tbl(i).access_id);
230: END IF;
231:
232: if (nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false)
233: OR ((nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_true) and (l_qte_access_tbl(i).operation_code = 'UPDATE')) then
234:
235: open c_access_id_exist(l_qte_access_tbl(i).access_id);
236: fetch c_access_id_exist into l_qte_access_tbl(i).access_id;
237:

Line 242: x_return_status := fnd_api.g_ret_sts_error;

238: if c_access_id_exist%notfound then
239:
240: close c_access_id_exist;
241:
242: x_return_status := fnd_api.g_ret_sts_error;
243:
244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.Set_Name('ASO', 'ASO_API_INVALID_ID');
246: FND_MESSAGE.Set_token('COLUMN', 'access_id');

Line 251: RAISE FND_API.G_EXC_ERROR;

247: FND_MESSAGE.Set_token('VALUE', l_qte_access_tbl(i).access_id);
248: FND_MSG_PUB.Add;
249: END IF;
250:
251: RAISE FND_API.G_EXC_ERROR;
252:
253: end if;
254:
255: close c_access_id_exist;

Line 261: IF l_qte_access_tbl(i).quote_number IS NOT NULL AND l_qte_access_tbl(i).quote_number <> FND_API.G_MISS_NUM THEN

257: end if;
258:
259: ELSE
260:
261: IF l_qte_access_tbl(i).quote_number IS NOT NULL AND l_qte_access_tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
262:
263: IF l_qte_access_tbl(i).resource_id IS NOT NULL AND l_qte_access_tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
264:
265: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 263: IF l_qte_access_tbl(i).resource_id IS NOT NULL AND l_qte_access_tbl(i).resource_id <> FND_API.G_MISS_NUM THEN

259: ELSE
260:
261: IF l_qte_access_tbl(i).quote_number IS NOT NULL AND l_qte_access_tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
262:
263: IF l_qte_access_tbl(i).resource_id IS NOT NULL AND l_qte_access_tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
264:
265: IF aso_debug_pub.g_debug_flag = 'Y' THEN
266: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: LOOP for resource_id: ' || l_qte_access_tbl(i).resource_id, 1, 'Y');
267: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: LOOP for quote_number: ' || l_qte_access_tbl(i).quote_number, 1, 'Y');

Line 283: IF nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false THEN

279: IF aso_debug_pub.g_debug_flag = 'Y' THEN
280: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: l_access_id: ' || l_access_id, 1, 'Y');
281: END IF;
282:
283: IF nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false THEN
284:
285: IF ((l_qte_access_tbl(i).access_id is null) OR (l_qte_access_tbl(i).access_id = fnd_api.g_miss_num)) THEN
286:
287: l_qte_access_tbl(i).operation_code := 'CREATE';

Line 285: IF ((l_qte_access_tbl(i).access_id is null) OR (l_qte_access_tbl(i).access_id = fnd_api.g_miss_num)) THEN

281: END IF;
282:
283: IF nvl(p_call_from_oafwk_flag, 'N') = fnd_api.g_false THEN
284:
285: IF ((l_qte_access_tbl(i).access_id is null) OR (l_qte_access_tbl(i).access_id = fnd_api.g_miss_num)) THEN
286:
287: l_qte_access_tbl(i).operation_code := 'CREATE';
288: ELSE
289: l_qte_access_tbl(i).operation_code := 'UPDATE';

Line 304: x_return_status := fnd_api.g_ret_sts_error;

300: -- 4535602
301: OPEN C_existing_resource(l_qte_access_tbl(i).quote_number, l_qte_access_tbl(i).resource_id);
302: FETCH C_existing_resource INTO l_exist_access_id;
303: IF C_existing_resource%FOUND THEN
304: x_return_status := fnd_api.g_ret_sts_error;
305:
306: IF aso_debug_pub.g_debug_flag = 'Y' THEN
307: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: duplicate resource: ' || l_exist_access_id, 1, 'Y');
308: END IF;

Line 316: RAISE FND_API.G_EXC_ERROR;

312: END IF;
313:
314: CLOSE C_existing_resource;
315:
316: RAISE FND_API.G_EXC_ERROR;
317: END IF;
318: CLOSE C_existing_resource;
319: -- 4535602
320:

Line 389: p_CREATION_DATE => fnd_api.g_miss_date,

385: p_QUOTE_NUMBER => l_qte_access_tbl(i).QUOTE_NUMBER,
386: p_RESOURCE_ID => l_qte_access_tbl(i).RESOURCE_ID,
387: p_RESOURCE_GRP_ID => l_qte_access_tbl(i).RESOURCE_GRP_ID,
388: p_CREATED_BY => G_USER_ID,
389: p_CREATION_DATE => fnd_api.g_miss_date,
390: p_LAST_UPDATED_BY => G_USER_ID,
391: p_LAST_UPDATE_LOGIN => G_LOGIN_ID,
392: p_LAST_UPDATE_DATE => SYSDATE,
393: p_REQUEST_ID => l_qte_access_tbl(i).REQUEST_ID,

Line 463: x_return_status := FND_API.G_RET_STS_ERROR;

459: END LOOP;
460:
461: IF l_primary_resource_id = l_resource_id THEN
462: IF l_update_access_flag <> 'Y' THEN
463: x_return_status := FND_API.G_RET_STS_ERROR;
464:
465: IF aso_debug_pub.g_debug_flag = 'Y' THEN
466: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: trying to set primary resource update_access_flag other than Y', 1, 'Y');
467: END IF;

Line 472: RAISE FND_API.G_EXC_ERROR;

468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
469: FND_MESSAGE.Set_Name('ASO', 'ASO_SEC_ADD_INVALID_ACCESS');
470: FND_MSG_PUB.Add;
471: END IF;
472: RAISE FND_API.G_EXC_ERROR;
473: ELSE
474: IF l_resource_grp_id IS NOT NULL AND l_resource_grp_id <> FND_API.G_MISS_NUM THEN
475: IF l_primary_resource_grp_id <> l_resource_grp_id THEN
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 474: IF l_resource_grp_id IS NOT NULL AND l_resource_grp_id <> FND_API.G_MISS_NUM THEN

470: FND_MSG_PUB.Add;
471: END IF;
472: RAISE FND_API.G_EXC_ERROR;
473: ELSE
474: IF l_resource_grp_id IS NOT NULL AND l_resource_grp_id <> FND_API.G_MISS_NUM THEN
475: IF l_primary_resource_grp_id <> l_resource_grp_id THEN
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: before update ASO_QUOTE_HEADERS_ALL', 1, 'Y');
478: END IF;

Line 492: x_return_status := FND_API.G_RET_STS_ERROR;

488: IF SQL%ROWCOUNT = 0 THEN
489: IF aso_debug_pub.g_debug_flag = 'Y' THEN
490: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: inside update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
491: END IF;
492: x_return_status := FND_API.G_RET_STS_ERROR;
493: RAISE FND_API.G_EXC_ERROR;
494: END IF;
495:
496: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 493: RAISE FND_API.G_EXC_ERROR;

489: IF aso_debug_pub.g_debug_flag = 'Y' THEN
490: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: inside update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
491: END IF;
492: x_return_status := FND_API.G_RET_STS_ERROR;
493: RAISE FND_API.G_EXC_ERROR;
494: END IF;
495:
496: IF aso_debug_pub.g_debug_flag = 'Y' THEN
497: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: after update ASO_QUOTE_HEADERS_ALL', 1, 'Y');

Line 529: x_return_status := FND_API.G_RET_STS_ERROR;

525: IF SQL%ROWCOUNT = 0 THEN
526: IF aso_debug_pub.g_debug_flag = 'Y' THEN
527: aso_debug_pub.add('ASO_SECURITY_INT: End of Add_Resource: after update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
528: END IF;
529: x_return_status := FND_API.G_RET_STS_ERROR;
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532:
533: -- Change START

Line 530: RAISE FND_API.G_EXC_ERROR;

526: IF aso_debug_pub.g_debug_flag = 'Y' THEN
527: aso_debug_pub.add('ASO_SECURITY_INT: End of Add_Resource: after update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
528: END IF;
529: x_return_status := FND_API.G_RET_STS_ERROR;
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532:
533: -- Change START
534: -- Release 12 TAP Changes

Line 553: IF FND_API.To_Boolean(p_commit) THEN

549: aso_debug_pub.add('ASO_SECURITY_INT: Add_Resource: End of API body', 1, 'Y');
550: END IF;
551:
552: -- Standard check of p_commit.
553: IF FND_API.To_Boolean(p_commit) THEN
554: COMMIT WORK;
555: END IF;
556:
557: -- Standard call to get message count and if count is 1, get message info.

Line 559: p_encoded => FND_API.G_FALSE,

555: END IF;
556:
557: -- Standard call to get message count and if count is 1, get message info.
558: FND_Msg_Pub.Count_And_Get(
559: p_encoded => FND_API.G_FALSE,
560: p_count => x_msg_count,
561: p_data => x_msg_data
562: );
563:

Line 565: WHEN FND_API.G_EXC_ERROR THEN

561: p_data => x_msg_data
562: );
563:
564: EXCEPTION
565: WHEN FND_API.G_EXC_ERROR THEN
566: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
567: P_API_NAME => L_API_NAME,
568: P_PKG_NAME => G_PKG_NAME,
569: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,

Line 578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

574: X_MSG_DATA => X_MSG_DATA,
575: X_RETURN_STATUS => X_RETURN_STATUS
576: );
577:
578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
579: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
580: P_API_NAME => L_API_NAME,
581: P_PKG_NAME => G_PKG_NAME,
582: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,

Line 608: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

604: END Add_Resource;
605:
606: PROCEDURE Add_Resource
607: (
608: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
609: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
610: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
611: X_Qte_Access_Tbl OUT NOCOPY /* file.sql.39 change */ Qte_Access_Tbl_Type,
612: X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 609: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

605:
606: PROCEDURE Add_Resource
607: (
608: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
609: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
610: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
611: X_Qte_Access_Tbl OUT NOCOPY /* file.sql.39 change */ Qte_Access_Tbl_Type,
612: X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
613: X_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 618: l_call_from_oafwk_flag varchar2(1) := fnd_api.g_false;

614: X_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
615: )
616: IS
617:
618: l_call_from_oafwk_flag varchar2(1) := fnd_api.g_false;
619:
620: Begin
621: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
622:

Line 650: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

646:
647:
648: PROCEDURE Delete_Resource
649: (
650: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
651: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
652: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
653: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
654: X_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 651: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

647:
648: PROCEDURE Delete_Resource
649: (
650: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
651: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
652: P_Qte_Access_Tbl IN Qte_Access_Tbl_Type,
653: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
654: X_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
655: X_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 704: IF FND_API.To_Boolean(p_init_msg_list) THEN

700: -- Standard Start of API savepoint
701: SAVEPOINT Delete_Resource_INT;
702:
703: -- Initialize message list if p_init_msg_list is set to TRUE.
704: IF FND_API.To_Boolean(p_init_msg_list) THEN
705: FND_Msg_Pub.initialize;
706: END IF;
707:
708: -- Initialize API return status to success

Line 709: x_return_status := FND_API.G_RET_STS_SUCCESS;

705: FND_Msg_Pub.initialize;
706: END IF;
707:
708: -- Initialize API return status to success
709: x_return_status := FND_API.G_RET_STS_SUCCESS;
710:
711: -- API body
712:
713: FOR i IN 1..P_Qte_Access_Tbl.count LOOP

Line 715: l_primary_resource_id := FND_API.G_MISS_NUM;

711: -- API body
712:
713: FOR i IN 1..P_Qte_Access_Tbl.count LOOP
714:
715: l_primary_resource_id := FND_API.G_MISS_NUM;
716: l_resource_id := FND_API.G_MISS_NUM;
717: l_quote_number := FND_API.G_MISS_NUM;
718: l_access_id := FND_API.G_MISS_NUM;
719:

Line 716: l_resource_id := FND_API.G_MISS_NUM;

712:
713: FOR i IN 1..P_Qte_Access_Tbl.count LOOP
714:
715: l_primary_resource_id := FND_API.G_MISS_NUM;
716: l_resource_id := FND_API.G_MISS_NUM;
717: l_quote_number := FND_API.G_MISS_NUM;
718: l_access_id := FND_API.G_MISS_NUM;
719:
720: IF P_Qte_Access_Tbl(i).access_id IS NOT NULL AND P_Qte_Access_Tbl(i).access_id <> FND_API.G_MISS_NUM THEN

Line 717: l_quote_number := FND_API.G_MISS_NUM;

713: FOR i IN 1..P_Qte_Access_Tbl.count LOOP
714:
715: l_primary_resource_id := FND_API.G_MISS_NUM;
716: l_resource_id := FND_API.G_MISS_NUM;
717: l_quote_number := FND_API.G_MISS_NUM;
718: l_access_id := FND_API.G_MISS_NUM;
719:
720: IF P_Qte_Access_Tbl(i).access_id IS NOT NULL AND P_Qte_Access_Tbl(i).access_id <> FND_API.G_MISS_NUM THEN
721: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 718: l_access_id := FND_API.G_MISS_NUM;

714:
715: l_primary_resource_id := FND_API.G_MISS_NUM;
716: l_resource_id := FND_API.G_MISS_NUM;
717: l_quote_number := FND_API.G_MISS_NUM;
718: l_access_id := FND_API.G_MISS_NUM;
719:
720: IF P_Qte_Access_Tbl(i).access_id IS NOT NULL AND P_Qte_Access_Tbl(i).access_id <> FND_API.G_MISS_NUM THEN
721: IF aso_debug_pub.g_debug_flag = 'Y' THEN
722: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: LOOP for access_id: ' || P_Qte_Access_Tbl(i).access_id, 1, 'Y');

Line 720: IF P_Qte_Access_Tbl(i).access_id IS NOT NULL AND P_Qte_Access_Tbl(i).access_id <> FND_API.G_MISS_NUM THEN

716: l_resource_id := FND_API.G_MISS_NUM;
717: l_quote_number := FND_API.G_MISS_NUM;
718: l_access_id := FND_API.G_MISS_NUM;
719:
720: IF P_Qte_Access_Tbl(i).access_id IS NOT NULL AND P_Qte_Access_Tbl(i).access_id <> FND_API.G_MISS_NUM THEN
721: IF aso_debug_pub.g_debug_flag = 'Y' THEN
722: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: LOOP for access_id: ' || P_Qte_Access_Tbl(i).access_id, 1, 'Y');
723: END IF;
724:

Line 727: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or

723: END IF;
724:
725: l_access_id := P_Qte_Access_Tbl(i).access_id;
726:
727: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
728: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
729:
730: FOR l_quote_num_rec IN C_Quote_num(l_access_id) LOOP
731:

Line 728: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then

724:
725: l_access_id := P_Qte_Access_Tbl(i).access_id;
726:
727: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
728: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
729:
730: FOR l_quote_num_rec IN C_Quote_num(l_access_id) LOOP
731:
732: FOR l_lock_rec IN C_lock_check(l_quote_num_rec.quote_number) LOOP

Line 741: raise FND_API.G_EXC_ERROR;

737: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
738: FND_MSG_PUB.ADD;
739: END IF;
740:
741: raise FND_API.G_EXC_ERROR;
742: END IF;
743:
744: END LOOP;
745:

Line 752: IF P_Qte_Access_Tbl(i).quote_number IS NOT NULL AND P_Qte_Access_Tbl(i).quote_number <> FND_API.G_MISS_NUM THEN

748: end if;
749:
750: ELSE
751:
752: IF P_Qte_Access_Tbl(i).quote_number IS NOT NULL AND P_Qte_Access_Tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
753: IF P_Qte_Access_Tbl(i).resource_id IS NOT NULL AND P_Qte_Access_Tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
754:
755: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
756: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then

Line 753: IF P_Qte_Access_Tbl(i).resource_id IS NOT NULL AND P_Qte_Access_Tbl(i).resource_id <> FND_API.G_MISS_NUM THEN

749:
750: ELSE
751:
752: IF P_Qte_Access_Tbl(i).quote_number IS NOT NULL AND P_Qte_Access_Tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
753: IF P_Qte_Access_Tbl(i).resource_id IS NOT NULL AND P_Qte_Access_Tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
754:
755: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
756: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
757:

Line 755: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or

751:
752: IF P_Qte_Access_Tbl(i).quote_number IS NOT NULL AND P_Qte_Access_Tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
753: IF P_Qte_Access_Tbl(i).resource_id IS NOT NULL AND P_Qte_Access_Tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
754:
755: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
756: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
757:
758: FOR l_lock_rec IN C_lock_check(P_Qte_Access_Tbl(i).quote_number) LOOP
759:

Line 756: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then

752: IF P_Qte_Access_Tbl(i).quote_number IS NOT NULL AND P_Qte_Access_Tbl(i).quote_number <> FND_API.G_MISS_NUM THEN
753: IF P_Qte_Access_Tbl(i).resource_id IS NOT NULL AND P_Qte_Access_Tbl(i).resource_id <> FND_API.G_MISS_NUM THEN
754:
755: if ((p_qte_access_tbl(i).batch_price_flag <> fnd_api.g_false) or
756: (p_qte_access_tbl(i).batch_price_flag = fnd_api.g_miss_char)) then
757:
758: FOR l_lock_rec IN C_lock_check(P_Qte_Access_Tbl(i).quote_number) LOOP
759:
760: IF l_lock_rec.price_request_id IS NOT NULL THEN

Line 767: raise FND_API.G_EXC_ERROR;

763: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
764: FND_MSG_PUB.ADD;
765: END IF;
766:
767: raise FND_API.G_EXC_ERROR;
768:
769: END IF;
770:
771: END LOOP;

Line 792: IF l_access_id IS NOT NULL AND l_access_id <> FND_API.G_MISS_NUM THEN

788: IF aso_debug_pub.g_debug_flag = 'Y' THEN
789: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: count: ' || P_Qte_Access_Tbl.count);
790: END IF;
791:
792: IF l_access_id IS NOT NULL AND l_access_id <> FND_API.G_MISS_NUM THEN
793:
794: FOR l_resource_rec IN C_resource(l_access_id) LOOP
795: l_quote_number := l_resource_rec.quote_number;
796: l_resource_id := l_resource_rec.resource_id;

Line 805: IF l_quote_number IS NOT NULL AND l_quote_number <> FND_API.G_MISS_NUM THEN

801: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: l_resource_id: ' || l_resource_id);
802: END IF;
803: END LOOP;
804:
805: IF l_quote_number IS NOT NULL AND l_quote_number <> FND_API.G_MISS_NUM THEN
806:
807: FOR l_primary_resource_rec IN C_primary_resource(l_quote_number) LOOP
808: l_primary_resource_id := l_primary_resource_rec.resource_id;
809:

Line 817: x_return_status := FND_API.G_RET_STS_ERROR;

813: END IF;
814: END LOOP;
815:
816: IF l_primary_resource_id = l_resource_id THEN
817: x_return_status := FND_API.G_RET_STS_ERROR;
818:
819: IF aso_debug_pub.g_debug_flag = 'Y' THEN
820: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: trying to delete primary salesrep', 1, 'Y');
821: END IF;

Line 827: RAISE FND_API.G_EXC_ERROR;

823: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
824: FND_MESSAGE.Set_Name('ASO', 'ASO_SEC_DELETE_PRIMARY_RES');
825: FND_MSG_PUB.Add;
826: END IF;
827: RAISE FND_API.G_EXC_ERROR;
828: ELSE
829:
830: IF aso_debug_pub.g_debug_flag = 'Y' THEN
831: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: before Delete_Row: l_access_id: ' || l_access_id, 1, 'Y');

Line 846: x_return_status := FND_API.G_RET_STS_ERROR;

842:
843: END IF;
844:
845: ELSE
846: x_return_status := FND_API.G_RET_STS_ERROR;
847:
848: IF aso_debug_pub.g_debug_flag = 'Y' THEN
849: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: trying to delete a non-existent entry', 1, 'Y');
850:

Line 856: RAISE FND_API.G_EXC_ERROR;

852: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
853: FND_MESSAGE.Set_Name('ASO', 'ASO_SEC_DELETE_INVALID_ID');
854: FND_MSG_PUB.Add;
855: END IF;
856: RAISE FND_API.G_EXC_ERROR;
857: END IF;
858:
859: ELSE
860: x_return_status := FND_API.G_RET_STS_ERROR;

Line 860: x_return_status := FND_API.G_RET_STS_ERROR;

856: RAISE FND_API.G_EXC_ERROR;
857: END IF;
858:
859: ELSE
860: x_return_status := FND_API.G_RET_STS_ERROR;
861:
862: IF aso_debug_pub.g_debug_flag = 'Y' THEN
863: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: trying to delete without passing enough info', 1, 'Y');
864: END IF;

Line 870: RAISE FND_API.G_EXC_ERROR;

866: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
867: FND_MESSAGE.Set_Name('ASO', 'ASO_SEC_DELETE_INSUFFICIENT');
868: FND_MSG_PUB.Add;
869: END IF;
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: END LOOP;
874:

Line 890: x_return_status := FND_API.G_RET_STS_ERROR;

886: IF SQL%ROWCOUNT = 0 THEN
887: IF aso_debug_pub.g_debug_flag = 'Y' THEN
888: aso_debug_pub.add('ASO_SECURITY_INT: End of Delete_Resource: after update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
889: END IF;
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893:
894: -- Change START

Line 891: RAISE FND_API.G_EXC_ERROR;

887: IF aso_debug_pub.g_debug_flag = 'Y' THEN
888: aso_debug_pub.add('ASO_SECURITY_INT: End of Delete_Resource: after update ASO_QUOTE_HEADERS_ALL: SQL%ROWCOUNT = 0', 1, 'Y');
889: END IF;
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893:
894: -- Change START
895: -- Release 12 TAP Changes

Line 913: IF FND_API.To_Boolean(p_commit) THEN

909: IF aso_debug_pub.g_debug_flag = 'Y' THEN
910: aso_debug_pub.add('ASO_SECURITY_INT: Delete_Resource: End of API body', 1, 'Y');
911: END IF;
912: -- Standard check of p_commit.
913: IF FND_API.To_Boolean(p_commit) THEN
914: COMMIT WORK;
915: END IF;
916:
917: -- Standard call to get message count and if count is 1, get message info.

Line 919: p_encoded => FND_API.G_FALSE,

915: END IF;
916:
917: -- Standard call to get message count and if count is 1, get message info.
918: FND_Msg_Pub.Count_And_Get(
919: p_encoded => FND_API.G_FALSE,
920: p_count => x_msg_count ,
921: p_data => x_msg_data
922: );
923:

Line 925: WHEN FND_API.G_EXC_ERROR THEN

921: p_data => x_msg_data
922: );
923:
924: EXCEPTION
925: WHEN FND_API.G_EXC_ERROR THEN
926: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
927: P_API_NAME => L_API_NAME,
928: P_PKG_NAME => G_PKG_NAME,
929: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,

Line 938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

934: X_MSG_DATA => X_MSG_DATA,
935: X_RETURN_STATUS => X_RETURN_STATUS
936: );
937:
938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
939: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
940: P_API_NAME => L_API_NAME,
941: P_PKG_NAME => G_PKG_NAME,
942: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,

Line 969: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

965:
966:
967: PROCEDURE Add_SalesRep_QuoteCreator
968: (
969: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
970: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
971: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
972: X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
973: X_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 970: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

966:
967: PROCEDURE Add_SalesRep_QuoteCreator
968: (
969: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
970: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
971: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
972: X_RETURN_STATUS OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
973: X_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
974: X_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 1016: IF FND_API.To_Boolean(p_init_msg_list) THEN

1012: -- Standard Start of API savepoint
1013: SAVEPOINT Add_SalesRep_QuoteCreator_INT;
1014:
1015: -- Initialize message list if p_init_msg_list is set to TRUE.
1016: IF FND_API.To_Boolean(p_init_msg_list) THEN
1017: FND_Msg_Pub.initialize;
1018: END IF;
1019:
1020: -- Initialize API return status to success

Line 1021: x_return_status := FND_API.G_RET_STS_SUCCESS;

1017: FND_Msg_Pub.initialize;
1018: END IF;
1019:
1020: -- Initialize API return status to success
1021: x_return_status := FND_API.G_RET_STS_SUCCESS;
1022:
1023: -- API body
1024:
1025: IF p_qte_header_rec.resource_id IS NOT NULL AND p_qte_header_rec.resource_id <> FND_API.G_MISS_NUM THEN

Line 1025: IF p_qte_header_rec.resource_id IS NOT NULL AND p_qte_header_rec.resource_id <> FND_API.G_MISS_NUM THEN

1021: x_return_status := FND_API.G_RET_STS_SUCCESS;
1022:
1023: -- API body
1024:
1025: IF p_qte_header_rec.resource_id IS NOT NULL AND p_qte_header_rec.resource_id <> FND_API.G_MISS_NUM THEN
1026:
1027: l_qte_access_rec.QUOTE_NUMBER := p_qte_header_rec.quote_number;
1028: l_qte_access_rec.RESOURCE_ID := p_qte_header_rec.resource_id;
1029: l_qte_access_rec.RESOURCE_GRP_ID := p_qte_header_rec.resource_grp_id;

Line 1058: IF (l_qte_access_rec.ROLE_ID IS NULL OR l_qte_access_rec.ROLE_ID = FND_API.G_MISS_NUM) THEN

1054:
1055: CLOSE C_get_resource_role;
1056:
1057: -- if the resource does not have a group, get it from the QOT Params
1058: IF (l_qte_access_rec.ROLE_ID IS NULL OR l_qte_access_rec.ROLE_ID = FND_API.G_MISS_NUM) THEN
1059: l_qte_access_rec.ROLE_ID := aso_utility_pvt.get_ou_attribute_value(aso_utility_pvt.G_DEFAULT_SALES_ROLE,p_qte_header_rec.org_id);
1060: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1061: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: getting role from QOT PARAMS ', 1, 'N');
1062: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: l_qte_access_rec.ROLE_ID: '|| l_qte_access_rec.ROLE_ID, 1, 'N');

Line 1169: P_INIT_MSG_LIST => FND_API.G_FALSE,

1165: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: before Add_Resource', 1, 'Y');
1166: END IF;
1167:
1168: ASO_SECURITY_INT.Add_Resource(
1169: P_INIT_MSG_LIST => FND_API.G_FALSE,
1170: P_COMMIT => FND_API.G_FALSE,
1171: P_Qte_Access_tbl => l_qte_access_tbl,
1172: X_Qte_Access_tbl => lx_qte_access_tbl,
1173: X_RETURN_STATUS => x_return_status,

Line 1170: P_COMMIT => FND_API.G_FALSE,

1166: END IF;
1167:
1168: ASO_SECURITY_INT.Add_Resource(
1169: P_INIT_MSG_LIST => FND_API.G_FALSE,
1170: P_COMMIT => FND_API.G_FALSE,
1171: P_Qte_Access_tbl => l_qte_access_tbl,
1172: X_Qte_Access_tbl => lx_qte_access_tbl,
1173: X_RETURN_STATUS => x_return_status,
1174: X_msg_count => X_msg_count,

Line 1184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1181: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: after Add_Resource: x_return_status: ' || x_return_status, 1, 'Y');
1182: END IF;
1183:
1184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1185: RAISE FND_API.G_EXC_ERROR;
1186: END IF;
1187:
1188: END IF;

Line 1185: RAISE FND_API.G_EXC_ERROR;

1181: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: after Add_Resource: x_return_status: ' || x_return_status, 1, 'Y');
1182: END IF;
1183:
1184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1185: RAISE FND_API.G_EXC_ERROR;
1186: END IF;
1187:
1188: END IF;
1189:

Line 1196: IF FND_API.To_Boolean(p_commit) THEN

1192: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1193: aso_debug_pub.add('ASO_SECURITY_INT: Add_SalesRep_QuoteCreator: End of API body', 1, 'Y');
1194: END IF;
1195: -- Standard check of p_commit.
1196: IF FND_API.To_Boolean(p_commit) THEN
1197: COMMIT WORK;
1198: END IF;
1199:
1200: -- Standard call to get message count and if count is 1, get message info.

Line 1202: p_encoded => FND_API.G_FALSE,

1198: END IF;
1199:
1200: -- Standard call to get message count and if count is 1, get message info.
1201: FND_Msg_Pub.Count_And_Get(
1202: p_encoded => FND_API.G_FALSE,
1203: p_count => x_msg_count ,
1204: p_data => x_msg_data
1205: );
1206:

Line 1208: WHEN FND_API.G_EXC_ERROR THEN

1204: p_data => x_msg_data
1205: );
1206:
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1210: P_API_NAME => L_API_NAME,
1211: P_PKG_NAME => G_PKG_NAME,
1212: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,

Line 1221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1217: X_MSG_DATA => X_MSG_DATA,
1218: X_RETURN_STATUS => X_RETURN_STATUS
1219: );
1220:
1221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1222: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1223: P_API_NAME => L_API_NAME,
1224: P_PKG_NAME => G_PKG_NAME,
1225: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,