29:
30: BEGIN
31:
32: --DBMS_OUTPUT.PUT_LINE('Entered inside BSC_CUSTOM_VIEW_PUB.delete_Custom_View procedure');
33: FND_MSG_PUB.Initialize;
34: x_return_status := FND_API.G_RET_STS_SUCCESS;
35: l_exist_dependency := FND_API.G_FALSE;
36:
37: IF (p_tab_id IS NULL) THEN
36:
37: IF (p_tab_id IS NULL) THEN
38: FND_MESSAGE.SET_NAME('BSC','BSC_REQ_FIELD_MISSING');
39: FND_MESSAGE.SET_TOKEN('FIELD_NAME', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'TAB_ID'), TRUE);
40: FND_MSG_PUB.ADD;
41: RAISE FND_API.G_EXC_ERROR;
42: END IF;
43:
44: IF (p_tab_view_id IS NULL) THEN
43:
44: IF (p_tab_view_id IS NULL) THEN
45: FND_MESSAGE.SET_NAME('BSC','BSC_REQ_FIELD_MISSING');
46: FND_MESSAGE.SET_TOKEN('FIELD_NAME', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'TAB_VIEW_ID'), TRUE);
47: FND_MSG_PUB.ADD;
48: RAISE FND_API.G_EXC_ERROR;
49: END IF;
50:
51:
56: -- if yes then throw the exception that these views cannot be deleted.
57:
58: IF((l_CustView_Rec.Bsc_Tab_View_Id IS NOT NULL) AND (l_CustView_Rec.Bsc_Tab_View_Id<2)) THEN
59: FND_MESSAGE.SET_NAME('BSC','BSC_RES_VIEW_NOT_DELETE');
60: FND_MSG_PUB.ADD;
61: RAISE FND_API.G_EXC_ERROR;
62: END IF;
63:
64: -- Do the validation on the dependency of the custom view
79: IF (l_exist_dependency IS NOT NULL) AND (l_exist_dependency = FND_API.G_TRUE) THEN
80: x_return_status := FND_API.G_RET_STS_ERROR;
81: FND_MESSAGE.SET_NAME('BSC','BSC_DELETE_CUSTOMVIEW_ERR');
82: FND_MESSAGE.SET_TOKEN('DEP_OBJ_LIST',l_dep_obj_list);
83: FND_MSG_PUB.ADD;
84: RAISE FND_API.G_EXC_ERROR;
85: END IF;
86:
87:
107:
108: EXCEPTION
109: WHEN FND_API.G_EXC_ERROR THEN
110: IF (x_msg_data IS NULL) THEN
111: FND_MSG_PUB.Count_And_Get
112: ( p_encoded => FND_API.G_FALSE
113: , p_count => x_msg_count
114: , p_data => x_msg_data
115: );
119: x_return_status := FND_API.G_RET_STS_ERROR;
120:
121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
122: IF (x_msg_data IS NULL) THEN
123: FND_MSG_PUB.Count_And_Get
124: ( p_encoded => FND_API.G_FALSE
125: , p_count => x_msg_count
126: , p_data => x_msg_data
127: );
169: ,x_msg_count OUT NOCOPY NUMBER
170: ,x_msg_data OUT NOCOPY VARCHAR2
171: )IS
172: BEGIN
173: FND_MSG_PUB.Initialize;
174: x_return_status := FND_API.G_RET_STS_SUCCESS;
175:
176: IF (p_tab_id IS NULL) THEN
177: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
175:
176: IF (p_tab_id IS NULL) THEN
177: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
178: FND_MESSAGE.SET_TOKEN('BSC_SCORECARD', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'TAB_ID'), TRUE);
179: FND_MSG_PUB.ADD;
180: RAISE FND_API.G_EXC_ERROR;
181: END IF;
182:
183: BSC_BIS_LOCKS_PUB.LOCK_TAB
212:
213: EXCEPTION
214: WHEN FND_API.G_EXC_ERROR THEN
215: IF (x_msg_data IS NULL) THEN
216: FND_MSG_PUB.Count_And_Get
217: ( p_encoded => FND_API.G_FALSE
218: , p_count => x_msg_count
219: , p_data => x_msg_data
220: );
224: x_return_status := FND_API.G_RET_STS_ERROR;
225:
226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
227: IF (x_msg_data IS NULL) THEN
228: FND_MSG_PUB.Count_And_Get
229: ( p_encoded => FND_API.G_FALSE
230: , p_count => x_msg_count
231: , p_data => x_msg_data
232: );
271: ,x_msg_count OUT NOCOPY NUMBER
272: ,x_msg_data OUT NOCOPY VARCHAR2
273: )IS
274: BEGIN
275: FND_MSG_PUB.Initialize;
276: x_return_status := FND_API.G_RET_STS_SUCCESS;
277:
278: IF (p_tab_id IS NULL) THEN
279: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
277:
278: IF (p_tab_id IS NULL) THEN
279: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
280: FND_MESSAGE.SET_TOKEN('BSC_SCORECARD', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'TAB_ID'), TRUE);
281: FND_MSG_PUB.ADD;
282: RAISE FND_API.G_EXC_ERROR;
283: END IF;
284: IF (p_assign_views IS NOT NULL) THEN
285:
300:
301: EXCEPTION
302: WHEN FND_API.G_EXC_ERROR THEN
303: IF (x_msg_data IS NULL) THEN
304: FND_MSG_PUB.Count_And_Get
305: ( p_encoded => FND_API.G_FALSE
306: , p_count => x_msg_count
307: , p_data => x_msg_data
308: );
312: x_return_status := FND_API.G_RET_STS_ERROR;
313:
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: IF (x_msg_data IS NULL) THEN
316: FND_MSG_PUB.Count_And_Get
317: ( p_encoded => FND_API.G_FALSE
318: , p_count => x_msg_count
319: , p_data => x_msg_data
320: );
361: ,x_msg_data OUT NOCOPY VARCHAR2
362: )IS
363:
364: BEGIN
365: FND_MSG_PUB.Initialize;
366: x_return_status := FND_API.G_RET_STS_SUCCESS;
367:
368: IF (p_tab_id IS NULL) THEN
369: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
367:
368: IF (p_tab_id IS NULL) THEN
369: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_SCORECARD_VIEW_ID');
370: FND_MESSAGE.SET_TOKEN('BSC_SCORECARD', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'TAB_ID'), TRUE);
371: FND_MSG_PUB.ADD;
372: RAISE FND_API.G_EXC_ERROR;
373: END IF;
374:
375: IF(p_unassign_views IS NOT NULL) THEN
389: END IF;
390: EXCEPTION
391: WHEN FND_API.G_EXC_ERROR THEN
392: IF (x_msg_data IS NULL) THEN
393: FND_MSG_PUB.Count_And_Get
394: ( p_encoded => FND_API.G_FALSE
395: , p_count => x_msg_count
396: , p_data => x_msg_data
397: );
401: x_return_status := FND_API.G_RET_STS_ERROR;
402:
403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
404: IF (x_msg_data IS NULL) THEN
405: FND_MSG_PUB.Count_And_Get
406: ( p_encoded => FND_API.G_FALSE
407: , p_count => x_msg_count
408: , p_data => x_msg_data
409: );
452: )IS
453: l_Count NUMBER;
454:
455: BEGIN
456: FND_MSG_PUB.Initialize;
457: x_return_status := FND_API.G_RET_STS_SUCCESS;
458:
459: BSC_CUSTOM_VIEW_PVT.Delete_Custom_View_Links
460: (
472:
473: EXCEPTION
474: WHEN FND_API.G_EXC_ERROR THEN
475: IF (x_msg_data IS NULL) THEN
476: FND_MSG_PUB.Count_And_Get
477: ( p_encoded => FND_API.G_FALSE
478: , p_count => x_msg_count
479: , p_data => x_msg_data
480: );
484: x_return_status := FND_API.G_RET_STS_ERROR;
485:
486: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
487: IF (x_msg_data IS NULL) THEN
488: FND_MSG_PUB.Count_And_Get
489: ( p_encoded => FND_API.G_FALSE
490: , p_count => x_msg_count
491: , p_data => x_msg_data
492: );