21: PROCEDURE save_list_button_config
22: (p_tab_id IN NUMBER
23: ,p_new_list_config IN VARCHAR2
24: ,p_old_list_config IN VARCHAR2
25: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
26: ,x_return_status OUT NOCOPY VARCHAR2
27: ,x_msg_count OUT NOCOPY NUMBER
28: ,x_msg_data OUT NOCOPY VARCHAR2
29: ) IS
37: ,x_return_status => x_return_status
38: ,x_msg_count => x_msg_count
39: ,x_msg_data => x_msg_data
40: );
41: IF(x_return_status IS NOT NULL AND x_return_status <>FND_API.G_RET_STS_SUCCESS ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
44:
45: BSC_COMMON_DIMENSIONS_PVT.delete_common_dimensions(
38: ,x_msg_count => x_msg_count
39: ,x_msg_data => x_msg_data
40: );
41: IF(x_return_status IS NOT NULL AND x_return_status <>FND_API.G_RET_STS_SUCCESS ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
44:
45: BSC_COMMON_DIMENSIONS_PVT.delete_common_dimensions(
46: p_tab_id => p_tab_id
43: END IF;
44:
45: BSC_COMMON_DIMENSIONS_PVT.delete_common_dimensions(
46: p_tab_id => p_tab_id
47: ,p_commit => FND_API.G_FALSE
48: ,x_return_status => x_return_status
49: ,x_msg_count => x_msg_count
50: ,x_msg_data => x_msg_data
51: );
53: IF (p_new_list_config IS NOT NULL) THEN
54: BSC_COMMON_DIMENSIONS_PVT.insert_common_dimensions(
55: p_tab_id => p_tab_id
56: ,p_new_list_config => p_new_list_config
57: ,p_commit => FND_API.G_FALSE
58: ,x_return_status => x_return_status
59: ,x_msg_count => x_msg_count
60: ,x_msg_data => x_msg_data
61: );
65: BSC_COMMON_DIMENSIONS_PUB.update_user_list_access(
66: p_tab_id => p_tab_id
67: ,p_new_list_config => p_new_list_config
68: ,p_old_list_config => p_old_list_config
69: ,p_commit => FND_API.G_FALSE
70: ,x_return_status => x_return_status
71: ,x_msg_count => x_msg_count
72: ,x_msg_data => x_msg_data
73: );
74:
75:
76: --VALIDATE common dimensions
77: BSC_COMMON_DIM_LEVELS_PUB.Check_Common_Dim_Levels(
78: p_commit => FND_API.G_FALSE
79: ,p_Tab_Id => p_tab_id
80: ,x_return_status => x_return_status
81: ,x_msg_count => x_msg_count
82: ,x_msg_data => x_msg_data
85:
86:
87: END IF;
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90: FND_MSG_PUB.Count_And_Get
91: ( p_encoded => FND_API.G_FALSE
92: , p_count => x_msg_count
93: , p_data => x_msg_data
87: END IF;
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90: FND_MSG_PUB.Count_And_Get
91: ( p_encoded => FND_API.G_FALSE
92: , p_count => x_msg_count
93: , p_data => x_msg_data
94: );
95:
92: , p_count => x_msg_count
93: , p_data => x_msg_data
94: );
95:
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: RAISE;
98: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
99: FND_MSG_PUB.Count_And_Get
100: ( p_encoded => FND_API.G_FALSE
94: );
95:
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: RAISE;
98: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
99: FND_MSG_PUB.Count_And_Get
100: ( p_encoded => FND_API.G_FALSE
101: , p_count => x_msg_count
102: , p_data => x_msg_data
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: RAISE;
98: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
99: FND_MSG_PUB.Count_And_Get
100: ( p_encoded => FND_API.G_FALSE
101: , p_count => x_msg_count
102: , p_data => x_msg_data
103: );
104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
100: ( p_encoded => FND_API.G_FALSE
101: , p_count => x_msg_count
102: , p_data => x_msg_data
103: );
104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
105:
106: RAISE;
107: WHEN NO_DATA_FOUND THEN
108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
105:
106: RAISE;
107: WHEN NO_DATA_FOUND THEN
108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
109: IF (x_msg_data IS NOT NULL) THEN
110: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.save_list_button_config ';
111: ELSE
112: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.save_list_button_config ';
113: END IF;
114:
115: RAISE;
116: WHEN OTHERS THEN
117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
118: IF (x_msg_data IS NOT NULL) THEN
119: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.save_list_button_config ';
120: ELSE
121: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.save_list_button_config ';
144: (
145: p_tab_id IN NUMBER
146: ,p_new_list_config IN VARCHAR2
147: ,p_old_list_config IN VARCHAR2
148: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
149: ,x_return_status OUT NOCOPY VARCHAR2
150: ,x_msg_count OUT NOCOPY NUMBER
151: ,x_msg_data OUT NOCOPY VARCHAR2
152: ) IS
246: END IF;
247: BSC_COMMON_DIMENSIONS_PVT.delete_user_list_access (
248: p_tab_id => p_tab_id
249: ,p_dim_level_index => l_index
250: ,p_commit => FND_API.G_FALSE
251: ,x_return_status => x_return_status
252: ,x_msg_count => x_msg_count
253: ,x_msg_data => x_msg_data
254: );
281: ,p_created_by => l_user_id
282: ,p_last_update_date => SYSDATE
283: ,p_last_updated_by => l_login_id
284: ,p_last_update_login => NULL
285: ,p_commit => FND_API.G_FALSE
286: ,x_return_status => x_return_status
287: ,x_msg_count => x_msg_count
288: ,x_msg_data => x_msg_data
289: );
297: END LOOP;
298: END LOOP;
299: END IF;
300: EXCEPTION
301: WHEN FND_API.G_EXC_ERROR THEN
302: FND_MSG_PUB.Count_And_Get
303: ( p_encoded => FND_API.G_FALSE
304: , p_count => x_msg_count
305: , p_data => x_msg_data
299: END IF;
300: EXCEPTION
301: WHEN FND_API.G_EXC_ERROR THEN
302: FND_MSG_PUB.Count_And_Get
303: ( p_encoded => FND_API.G_FALSE
304: , p_count => x_msg_count
305: , p_data => x_msg_data
306: );
307:
304: , p_count => x_msg_count
305: , p_data => x_msg_data
306: );
307:
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: RAISE;
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: FND_MSG_PUB.Count_And_Get
312: ( p_encoded => FND_API.G_FALSE
306: );
307:
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: RAISE;
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: FND_MSG_PUB.Count_And_Get
312: ( p_encoded => FND_API.G_FALSE
313: , p_count => x_msg_count
314: , p_data => x_msg_data
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: RAISE;
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: FND_MSG_PUB.Count_And_Get
312: ( p_encoded => FND_API.G_FALSE
313: , p_count => x_msg_count
314: , p_data => x_msg_data
315: );
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
312: ( p_encoded => FND_API.G_FALSE
313: , p_count => x_msg_count
314: , p_data => x_msg_data
315: );
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
317:
318: RAISE;
319: WHEN NO_DATA_FOUND THEN
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
317:
318: RAISE;
319: WHEN NO_DATA_FOUND THEN
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
321: IF (x_msg_data IS NOT NULL) THEN
322: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.update_user_list_access ';
323: ELSE
324: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.update_user_list_access ';
325: END IF;
326:
327: RAISE;
328: WHEN OTHERS THEN
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
330: IF (x_msg_data IS NOT NULL) THEN
331: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.update_user_list_access ';
332: ELSE
333: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.update_user_list_access ';
347: (
348: p_prototype_flag IN NUMBER
349: ,p_tab_id IN NUMBER
350: ,p_dim_level_id IN NUMBER
351: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
352: ,x_return_status OUT NOCOPY VARCHAR2
353: ,x_msg_count OUT NOCOPY NUMBER
354: ,x_msg_data OUT NOCOPY VARCHAR2
355:
389:
390: END IF;
391:
392: EXCEPTION
393: WHEN FND_API.G_EXC_ERROR THEN
394: FND_MSG_PUB.Count_And_Get
395: ( p_encoded => FND_API.G_FALSE
396: , p_count => x_msg_count
397: , p_data => x_msg_data
391:
392: EXCEPTION
393: WHEN FND_API.G_EXC_ERROR THEN
394: FND_MSG_PUB.Count_And_Get
395: ( p_encoded => FND_API.G_FALSE
396: , p_count => x_msg_count
397: , p_data => x_msg_data
398: );
399:
396: , p_count => x_msg_count
397: , p_data => x_msg_data
398: );
399:
400: x_return_status := FND_API.G_RET_STS_ERROR;
401: RAISE;
402: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
403: FND_MSG_PUB.Count_And_Get
404: ( p_encoded => FND_API.G_FALSE
398: );
399:
400: x_return_status := FND_API.G_RET_STS_ERROR;
401: RAISE;
402: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
403: FND_MSG_PUB.Count_And_Get
404: ( p_encoded => FND_API.G_FALSE
405: , p_count => x_msg_count
406: , p_data => x_msg_data
400: x_return_status := FND_API.G_RET_STS_ERROR;
401: RAISE;
402: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
403: FND_MSG_PUB.Count_And_Get
404: ( p_encoded => FND_API.G_FALSE
405: , p_count => x_msg_count
406: , p_data => x_msg_data
407: );
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
404: ( p_encoded => FND_API.G_FALSE
405: , p_count => x_msg_count
406: , p_data => x_msg_data
407: );
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409:
410: RAISE;
411: WHEN NO_DATA_FOUND THEN
412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409:
410: RAISE;
411: WHEN NO_DATA_FOUND THEN
412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
413: IF (x_msg_data IS NOT NULL) THEN
414: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.change_prototype_flag ';
415: ELSE
416: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.change_prototype_flag ';
417: END IF;
418:
419: RAISE;
420: WHEN OTHERS THEN
421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
422: IF (x_msg_data IS NOT NULL) THEN
423: x_msg_data := x_msg_data||' -> BSC_COMMON_DIMENSIONS_PUB.change_prototype_flag ';
424: ELSE
425: x_msg_data := SQLERRM||' at BSC_COMMON_DIMENSIONS_PUB.change_prototype_flag ';