DBA Data[Home] [Help]

APPS.BSC_DIMENSION_LEVELS_PVT dependencies on BSC_DIMENSION_LEVELS_PVT

Line 1: package body BSC_DIMENSION_LEVELS_PVT as

1: package body BSC_DIMENSION_LEVELS_PVT as
2: /* $Header: BSCVDMLB.pls 120.6 2006/02/10 01:16:27 adrao noship $ */
3: /*
4: +======================================================================================+
5: | Copyright (c) 2001 Oracle Corporation, Redwood Shores, CA, USA |

Line 51: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_DIMENSION_LEVELS_PVT';

47: | 08-FEB-2006 adrao Bug#5011937 Changed all the calls from Do_Ddl() to Do_Ddl_AT() |
48: | [Autonomous Transaction] |
49: +======================================================================================+
50: */
51: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_DIMENSION_LEVELS_PVT';
52: g_db_object varchar2(30) := null;
53:
54: /**********************************************************************************/
55:

Line 103: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';

99: EXCEPTION
100: WHEN OTHERS THEN
101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
102: IF (x_msg_data IS NOT NULL) THEN
103: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';
104: ELSE
105: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';
106: END IF;
107: end Create_Dim_Level;

Line 105: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';

101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
102: IF (x_msg_data IS NOT NULL) THEN
103: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';
104: ELSE
105: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';
106: END IF;
107: end Create_Dim_Level;
108:
109: /************************************************************************************

Line 161: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

157: RAISE;
158: WHEN NO_DATA_FOUND THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: IF (x_msg_data IS NOT NULL) THEN
161: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
162: ELSE
163: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
164: END IF;
165: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 163: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: IF (x_msg_data IS NOT NULL) THEN
161: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
162: ELSE
163: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
164: END IF;
165: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
166: RAISE;
167: WHEN OTHERS THEN

Line 170: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

166: RAISE;
167: WHEN OTHERS THEN
168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: IF (x_msg_data IS NOT NULL) THEN
170: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
171: ELSE
172: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
173: END IF;
174: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 172: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: IF (x_msg_data IS NOT NULL) THEN
170: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
171: ELSE
172: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
173: END IF;
174: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
175: RAISE;
176: end Retrieve_Dim_Level;

Line 228: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

224: WHEN NO_DATA_FOUND THEN
225: ROLLBACK TO UpdateBSCDimLevPVT;
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: IF (x_msg_data IS NOT NULL) THEN
228: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
229: ELSE
230: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
231: END IF;
232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 230: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: IF (x_msg_data IS NOT NULL) THEN
228: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
229: ELSE
230: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
231: END IF;
232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
233: RAISE;
234: WHEN OTHERS THEN

Line 238: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

234: WHEN OTHERS THEN
235: ROLLBACK TO UpdateBSCDimLevPVT;
236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
237: IF (x_msg_data IS NOT NULL) THEN
238: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
239: ELSE
240: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
241: END IF;
242: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 240: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
237: IF (x_msg_data IS NOT NULL) THEN
238: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
239: ELSE
240: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
241: END IF;
242: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
243: RAISE;
244: end Update_Dim_Level;

Line 277: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);

273:
274: l_Dim_Level_Rec := p_Dim_Level_Rec;
275: -- Validate level id exists.
276: if p_Dim_Level_Rec.Bsc_Level_Id is not null then
277: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);
278: if l_count = 0 then
279: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
280: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
281: FND_MSG_PUB.ADD;

Line 404: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

400: END IF;
401: ROLLBACK TO DeleteBSCDimLevPVT;
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
403: IF (x_msg_data IS NOT NULL) THEN
404: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
405: ELSE
406: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
407: END IF;
408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 406: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
403: IF (x_msg_data IS NOT NULL) THEN
404: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
405: ELSE
406: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
407: END IF;
408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
409: RAISE;
410: WHEN OTHERS THEN

Line 417: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

413: END IF;
414: ROLLBACK TO DeleteBSCDimLevPVT;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: IF (x_msg_data IS NOT NULL) THEN
417: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
418: ELSE
419: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
420: END IF;
421: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 419: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: IF (x_msg_data IS NOT NULL) THEN
417: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
418: ELSE
419: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
420: END IF;
421: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
422: RAISE;
423: end Delete_Dim_Level;

Line 452: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);

448: SAVEPOINT CreateBSCDimLevMdPVT;
449: FND_MSG_PUB.Initialize;
450: -- Validate Level Id not exists.
451: if p_Dim_Level_Rec.Bsc_Level_Id is not null then
452: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);
453: if l_count <> 0 then
454: FND_MESSAGE.SET_NAME('BSC','BSC_LEVEL_ID_EXISTS');
455: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
456: FND_MSG_PUB.ADD;

Line 572: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

568: WHEN NO_DATA_FOUND THEN
569: ROLLBACK TO CreateBSCDimLevMdPVT;
570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
571: IF (x_msg_data IS NOT NULL) THEN
572: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
573: ELSE
574: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
575: END IF;
576: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 574: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
571: IF (x_msg_data IS NOT NULL) THEN
572: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
573: ELSE
574: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
575: END IF;
576: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
577: RAISE;
578: WHEN OTHERS THEN

Line 588: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

584: RAISE FND_API.G_EXC_ERROR;
585: end if;
586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: IF (x_msg_data IS NOT NULL) THEN
588: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
589: ELSE
590: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
591: END IF;
592: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 590: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: IF (x_msg_data IS NOT NULL) THEN
588: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
589: ELSE
590: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
591: END IF;
592: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
593: RAISE;
594: end Create_Bsc_Dim_Levels_Md;

Line 689: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

685: RAISE;
686: WHEN NO_DATA_FOUND THEN
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: IF (x_msg_data IS NOT NULL) THEN
689: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
690: ELSE
691: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
692: END IF;
693: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 691: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: IF (x_msg_data IS NOT NULL) THEN
689: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
690: ELSE
691: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
692: END IF;
693: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
694: RAISE;
695: WHEN OTHERS THEN

Line 698: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

694: RAISE;
695: WHEN OTHERS THEN
696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: IF (x_msg_data IS NOT NULL) THEN
698: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
699: ELSE
700: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
701: END IF;
702: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 700: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: IF (x_msg_data IS NOT NULL) THEN
698: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
699: ELSE
700: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
701: END IF;
702: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
703: RAISE;
704: end Retrieve_Bsc_Dim_Levels_Md;

Line 883: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

879: WHEN NO_DATA_FOUND THEN
880: ROLLBACK TO UpdateBSCDimLevMdPVT;
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
882: IF (x_msg_data IS NOT NULL) THEN
883: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
884: ELSE
885: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
886: END IF;
887: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 885: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
882: IF (x_msg_data IS NOT NULL) THEN
883: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
884: ELSE
885: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
886: END IF;
887: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
888: RAISE;
889: WHEN OTHERS THEN

Line 893: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

889: WHEN OTHERS THEN
890: ROLLBACK TO UpdateBSCDimLevMdPVT;
891: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
892: IF (x_msg_data IS NOT NULL) THEN
893: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
894: ELSE
895: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
896: END IF;
897: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 895: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

891: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
892: IF (x_msg_data IS NOT NULL) THEN
893: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
894: ELSE
895: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
896: END IF;
897: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
898: RAISE;
899: end Update_Bsc_Dim_Levels_Md;

Line 963: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

959: WHEN NO_DATA_FOUND THEN
960: ROLLBACK TO DeleteBSCDimLevMdPVT;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: IF (x_msg_data IS NOT NULL) THEN
963: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
964: ELSE
965: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
966: END IF;
967: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 965: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: IF (x_msg_data IS NOT NULL) THEN
963: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
964: ELSE
965: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
966: END IF;
967: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
968: RAISE;
969: WHEN OTHERS THEN

Line 973: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

969: WHEN OTHERS THEN
970: ROLLBACK TO DeleteBSCDimLevMdPVT;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: IF (x_msg_data IS NOT NULL) THEN
973: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
974: ELSE
975: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
976: END IF;
977: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 975: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: IF (x_msg_data IS NOT NULL) THEN
973: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
974: ELSE
975: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
976: END IF;
977: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
978: RAISE;
979: end Delete_Bsc_Dim_Levels_Md;

Line 1003: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);

999: FND_MSG_PUB.Initialize;
1000: SAVEPOINT CreateBSCSysDimLevColsPVT;
1001: -- Validate Level Id exists.
1002: if p_Dim_Level_Rec.Bsc_Level_Id is not null then
1003: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);
1004: if l_count <> 1 then
1005: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1006: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1007: FND_MSG_PUB.ADD;

Line 1056: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';

1052: WHEN NO_DATA_FOUND THEN
1053: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1055: IF (x_msg_data IS NOT NULL) THEN
1056: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1057: ELSE
1058: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1059: END IF;
1060: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1058: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';

1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1055: IF (x_msg_data IS NOT NULL) THEN
1056: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1057: ELSE
1058: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1059: END IF;
1060: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1061: RAISE;
1062: WHEN OTHERS THEN

Line 1072: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';

1068: FND_MSG_PUB.ADD;
1069: RAISE FND_API.G_EXC_ERROR;
1070: end if;
1071: IF (x_msg_data IS NOT NULL) THEN
1072: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1073: ELSE
1074: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1075: END IF;
1076: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1074: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';

1070: end if;
1071: IF (x_msg_data IS NOT NULL) THEN
1072: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1073: ELSE
1074: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1075: END IF;
1076: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1077: RAISE;
1078: end Create_Bsc_Sys_Dim_Lvl_Cols;

Line 1128: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';

1124: RAISE;
1125: WHEN NO_DATA_FOUND THEN
1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1127: IF (x_msg_data IS NOT NULL) THEN
1128: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1129: ELSE
1130: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1131: END IF;
1132: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1130: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';

1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1127: IF (x_msg_data IS NOT NULL) THEN
1128: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1129: ELSE
1130: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1131: END IF;
1132: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1133: RAISE;
1134: WHEN OTHERS THEN

Line 1137: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';

1133: RAISE;
1134: WHEN OTHERS THEN
1135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1136: IF (x_msg_data IS NOT NULL) THEN
1137: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1138: ELSE
1139: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1140: END IF;
1141: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1139: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';

1135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1136: IF (x_msg_data IS NOT NULL) THEN
1137: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1138: ELSE
1139: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1140: END IF;
1141: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1142: RAISE;
1143: end Retrieve_Bsc_Sys_Dim_Lvl_Cols;

Line 1225: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

1221: WHEN NO_DATA_FOUND THEN
1222: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1224: IF (x_msg_data IS NOT NULL) THEN
1225: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1226: ELSE
1227: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1228: END IF;
1229: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1227: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1224: IF (x_msg_data IS NOT NULL) THEN
1225: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1226: ELSE
1227: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1228: END IF;
1229: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1230: RAISE;
1231: WHEN OTHERS THEN

Line 1235: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

1231: WHEN OTHERS THEN
1232: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: IF (x_msg_data IS NOT NULL) THEN
1235: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1236: ELSE
1237: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1238: END IF;
1239: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1237: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

1233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: IF (x_msg_data IS NOT NULL) THEN
1235: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1236: ELSE
1237: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1238: END IF;
1239: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1240: RAISE;
1241: end Update_Bsc_Sys_Dim_Lvl_Cols;

Line 1293: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

1289: WHEN NO_DATA_FOUND THEN
1290: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1292: IF (x_msg_data IS NOT NULL) THEN
1293: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1294: ELSE
1295: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1296: END IF;
1297: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1295: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1292: IF (x_msg_data IS NOT NULL) THEN
1293: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1294: ELSE
1295: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1296: END IF;
1297: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1298: RAISE;
1299: WHEN OTHERS THEN

Line 1303: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

1299: WHEN OTHERS THEN
1300: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1302: IF (x_msg_data IS NOT NULL) THEN
1303: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1304: ELSE
1305: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1306: END IF;
1307: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1305: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1302: IF (x_msg_data IS NOT NULL) THEN
1303: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1304: ELSE
1305: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1306: END IF;
1307: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1308: RAISE;
1309: end Delete_Bsc_Sys_Dim_Lvl_Cols;

Line 1779: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

1775: -- Validate level id exists.
1776:
1777: IF ((p_Dim_Level_Rec.Bsc_Level_Id IS NOT NULL) AND (p_Dim_Level_Rec.Bsc_Parent_Level_Id IS NOT NULL)) THEN
1778:
1779: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1780: IF (l_count = 0) THEN
1781: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1782: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1783: FND_MSG_PUB.ADD;

Line 1787: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);

1783: FND_MSG_PUB.ADD;
1784: RAISE FND_API.G_EXC_ERROR;
1785: END IF;
1786:
1787: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
1788: IF (l_count = 0) THEN
1789: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1790: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
1791: FND_MSG_PUB.ADD;

Line 1935: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

1931: WHEN NO_DATA_FOUND THEN
1932: ROLLBACK TO CreateBSCDimLevRelsPVT;
1933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1934: IF (x_msg_data IS NOT NULL) THEN
1935: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1936: ELSE
1937: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1938: END IF;
1939: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1937: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

1933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1934: IF (x_msg_data IS NOT NULL) THEN
1935: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1936: ELSE
1937: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1938: END IF;
1939: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1940: RAISE;
1941: WHEN OTHERS THEN

Line 1945: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

1941: WHEN OTHERS THEN
1942: ROLLBACK TO CreateBSCDimLevRelsPVT;
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944: IF (x_msg_data IS NOT NULL) THEN
1945: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1946: ELSE
1947: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1948: END IF;
1949: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1947: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944: IF (x_msg_data IS NOT NULL) THEN
1945: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1946: ELSE
1947: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1948: END IF;
1949: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1950: RAISE;
1951: END Create_Dim_Level_Relation;

Line 1999: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

1995: WHEN NO_DATA_FOUND THEN
1996: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1998: IF (x_msg_data IS NOT NULL) THEN
1999: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2000: ELSE
2001: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2002: END IF;
2003: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 2001: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1998: IF (x_msg_data IS NOT NULL) THEN
1999: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2000: ELSE
2001: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2002: END IF;
2003: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2004: RAISE;
2005: WHEN OTHERS THEN

Line 2009: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

2005: WHEN OTHERS THEN
2006: ROLLBACK TO DeleteBSCDimLevRelsPVT;
2007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2008: IF (x_msg_data IS NOT NULL) THEN
2009: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2010: ELSE
2011: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2012: END IF;
2013: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 2011: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

2007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2008: IF (x_msg_data IS NOT NULL) THEN
2009: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2010: ELSE
2011: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2012: END IF;
2013: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2014: RAISE;
2015: END Delete_Dim_Level_Relation;

Line 2133: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

2129: RAISE;
2130: WHEN NO_DATA_FOUND THEN
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132: IF (x_msg_data IS NOT NULL) THEN
2133: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2134: ELSE
2135: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2136: END IF;
2137: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 2135: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132: IF (x_msg_data IS NOT NULL) THEN
2133: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2134: ELSE
2135: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2136: END IF;
2137: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2138: RAISE;
2139: WHEN OTHERS THEN

Line 2142: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

2138: RAISE;
2139: WHEN OTHERS THEN
2140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2141: IF (x_msg_data IS NOT NULL) THEN
2142: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2143: ELSE
2144: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2145: END IF;
2146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 2144: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

2140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2141: IF (x_msg_data IS NOT NULL) THEN
2142: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2143: ELSE
2144: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2145: END IF;
2146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2147: RAISE;
2148: END Evaluate_Circular_Relationship;

Line 2275: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);

2271: FND_MSG_PUB.Initialize;
2272: g_db_object := 'Retrieve_Relationship';
2273: -- Validate level id exists.
2274: IF ((p_Dim_Level_Rec.Bsc_Level_Id IS NOT NULL) AND (p_Dim_Level_Rec.Bsc_Parent_Level_Id IS NOT NULL)) THEN
2275: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Level_Id);
2276: IF (l_count = 0) THEN
2277: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2278: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
2279: FND_MSG_PUB.ADD;

Line 2282: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Parent_Level_Id);

2278: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
2279: FND_MSG_PUB.ADD;
2280: RAISE FND_API.G_EXC_ERROR;
2281: END IF;
2282: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Parent_Level_Id);
2283: IF (l_count = 0) THEN
2284: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2285: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
2286: FND_MSG_PUB.ADD;

Line 2386: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

2382: CLOSE cr_getId_rels;
2383: END IF;
2384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2385: IF (x_msg_data IS NOT NULL) THEN
2386: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2387: ELSE
2388: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2389: END IF;
2390: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 2388: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

2384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2385: IF (x_msg_data IS NOT NULL) THEN
2386: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2387: ELSE
2388: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2389: END IF;
2390: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2391: RAISE;
2392: WHEN OTHERS THEN

Line 2398: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

2394: CLOSE cr_getId_rels;
2395: END IF;
2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: IF (x_msg_data IS NOT NULL) THEN
2398: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2399: ELSE
2400: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2401: END IF;
2402: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 2400: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: IF (x_msg_data IS NOT NULL) THEN
2398: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2399: ELSE
2400: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2401: END IF;
2402: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2403: RAISE;
2404: END Retrieve_Relationship;

Line 2468: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Child_level_Id);

2464: FND_MSG_PUB.Initialize;
2465:
2466: IF ((p_Child_level_Id IS NOT NULL) AND (p_Parent_level_Id IS NOT NULL)) THEN
2467:
2468: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Child_level_Id);
2469: IF (l_count = 0) THEN
2470: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2471: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Child_level_Id);
2472: FND_MSG_PUB.ADD;

Line 2476: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Parent_level_Id);

2472: FND_MSG_PUB.ADD;
2473: RAISE FND_API.G_EXC_ERROR;
2474: END IF;
2475:
2476: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Parent_level_Id);
2477: IF (l_count = 0) THEN
2478: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2479: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Parent_level_Id);
2480: FND_MSG_PUB.ADD;

Line 2592: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

2588: CLOSE r_col;
2589: END IF;
2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF (x_msg_data IS NOT NULL) THEN
2592: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2593: ELSE
2594: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2595: END IF;
2596: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 2594: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF (x_msg_data IS NOT NULL) THEN
2592: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2593: ELSE
2594: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2595: END IF;
2596: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2597: RAISE;
2598: WHEN OTHERS THEN

Line 2610: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

2606: CLOSE r_col;
2607: END IF;
2608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2609: IF (x_msg_data IS NOT NULL) THEN
2610: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2611: ELSE
2612: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2613: END IF;
2614: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 2612: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

2608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2609: IF (x_msg_data IS NOT NULL) THEN
2610: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2611: ELSE
2612: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2613: END IF;
2614: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2615: RAISE;
2616: END get_Relation_Column;

Line 2686: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';

2682: RAISE;
2683: WHEN NO_DATA_FOUND THEN
2684: x_return_status := FND_API.G_RET_STS_ERROR;
2685: IF (x_msg_data IS NOT NULL) THEN
2686: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2687: ELSE
2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2689: END IF;
2690: RAISE FND_API.G_EXC_ERROR;

Line 2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';

2684: x_return_status := FND_API.G_RET_STS_ERROR;
2685: IF (x_msg_data IS NOT NULL) THEN
2686: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2687: ELSE
2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2689: END IF;
2690: RAISE FND_API.G_EXC_ERROR;
2691: WHEN OTHERS THEN
2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2694: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';

2690: RAISE FND_API.G_EXC_ERROR;
2691: WHEN OTHERS THEN
2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2693: IF (x_msg_data IS NOT NULL) THEN
2694: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2695: ELSE
2696: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels '||SQLERRM;
2697: END IF;
2698: RAISE;

Line 2696: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels '||SQLERRM;

2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2693: IF (x_msg_data IS NOT NULL) THEN
2694: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2695: ELSE
2696: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels '||SQLERRM;
2697: END IF;
2698: RAISE;
2699:
2700: END Retr_Updated_Bsc_Dim_Levels;

Line 2726: BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels

2722:
2723: l_Dim_Level_Rec_In.Bsc_Dim_Level_Long_Name := p_Bsc_Pmf_Dim_Rec.dimension_Level_long_name;
2724: l_Dim_Level_Rec_In.Bsc_Level_Short_Name := p_Bsc_Pmf_Dim_Rec.dimension_level_short_name;
2725:
2726: BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels
2727: (p_Dim_Level_Rec => l_Dim_Level_Rec_In
2728: ,x_Dim_Level_Rec => l_Dim_Level_Rec_out
2729: ,x_return_status => x_return_status
2730: ,x_msg_count => x_msg_count

Line 2772: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level ';

2768: WHEN OTHERS THEN
2769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2770: ROLLBACK TO TranslateBSCDimLevPVT;
2771: IF (x_msg_data IS NOT NULL) THEN
2772: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level ';
2773: ELSE
2774: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level '||SQLERRM;
2775: END IF;
2776: END Translate_Dimension_Level;

Line 2774: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level '||SQLERRM;

2770: ROLLBACK TO TranslateBSCDimLevPVT;
2771: IF (x_msg_data IS NOT NULL) THEN
2772: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level ';
2773: ELSE
2774: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level '||SQLERRM;
2775: END IF;
2776: END Translate_Dimension_Level;
2777:
2778:

Line 2846: end BSC_DIMENSION_LEVELS_PVT;

2842:
2843: END Trans_DimObj_By_Given_Lang;
2844:
2845:
2846: end BSC_DIMENSION_LEVELS_PVT;