DBA Data[Home] [Help]

APPS.BSC_DIMENSION_GROUPS_PUB dependencies on BSC_DIMENSION_GROUPS_PUB

Line 1: package body BSC_DIMENSION_GROUPS_PUB as

1: package body BSC_DIMENSION_GROUPS_PUB as
2: /* $Header: BSCPDMGB.pls 120.0 2005/05/31 18:54:36 appldev noship $ */
3: /*
4: +==============================================================================+
5: | Copyright (c) 2001 Oracle Corporation, Redwood Shores, CA, USA |

Line 55: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_DIMENSION_GROUPS_PUB';

51: | 21-DEC-04 vtulasi Modified for bug#4045278 - Addtion of LUD |
52: | 30-DEC-04 vtulasi For bug #4093926 |
53: +==============================================================================+
54: */
55: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_DIMENSION_GROUPS_PUB';
56:
57: --: This procedure is used to Create a Dimension Group. This is the entry point
58: --: for the API for the Dimension Group entity.
59: --: This procedure is part of the Dimension Group API.

Line 63: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

59: --: This procedure is part of the Dimension Group API.
60:
61: procedure Create_Dimension_Group(
62: p_commit IN varchar2 := FND_API.G_FALSE
63: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
64: ,p_create_Dim_Levels IN BOOLEAN
65: ,x_return_status OUT NOCOPY varchar2
66: ,x_msg_count OUT NOCOPY number
67: ,x_msg_data OUT NOCOPY varchar2

Line 70: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

66: ,x_msg_count OUT NOCOPY number
67: ,x_msg_data OUT NOCOPY varchar2
68: ) is
69:
70: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
71:
72: begin
73: x_return_status := FND_API.G_RET_STS_SUCCESS;
74: FND_MSG_PUB.Initialize;

Line 209: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

205: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
206: WHEN NO_DATA_FOUND THEN
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: IF (x_msg_data IS NOT NULL) THEN
209: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
210: ELSE
211: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
212: END IF;
213: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 211: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: IF (x_msg_data IS NOT NULL) THEN
209: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
210: ELSE
211: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
212: END IF;
213: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
214: WHEN OTHERS THEN
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 217: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

213: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
214: WHEN OTHERS THEN
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
216: IF (x_msg_data IS NOT NULL) THEN
217: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
218: ELSE
219: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
220: END IF;
221: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 219: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
216: IF (x_msg_data IS NOT NULL) THEN
217: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
218: ELSE
219: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
220: END IF;
221: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
222: end Create_Dimension_Group;
223:

Line 227: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

223:
224:
225: procedure Create_Dimension_Group(
226: p_commit IN varchar2 := FND_API.G_FALSE
227: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
228: ,x_return_status OUT NOCOPY varchar2
229: ,x_msg_count OUT NOCOPY number
230: ,x_msg_data OUT NOCOPY varchar2
231: ) is

Line 233: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

229: ,x_msg_count OUT NOCOPY number
230: ,x_msg_data OUT NOCOPY varchar2
231: ) is
232:
233: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
234:
235: BEGIN
236: l_Dim_Grp_Rec := p_Dim_Grp_Rec;
237: l_Dim_Grp_Rec.Bsc_Last_Update_Date := NVL(p_Dim_Grp_Rec.Bsc_Last_Update_Date, SYSDATE);

Line 275: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

271: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
272: WHEN NO_DATA_FOUND THEN
273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
274: IF (x_msg_data IS NOT NULL) THEN
275: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
276: ELSE
277: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
278: END IF;
279: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 277: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
274: IF (x_msg_data IS NOT NULL) THEN
275: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
276: ELSE
277: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
278: END IF;
279: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 283: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

279: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
282: IF (x_msg_data IS NOT NULL) THEN
283: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
284: ELSE
285: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
286: END IF;
287: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 285: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';

281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
282: IF (x_msg_data IS NOT NULL) THEN
283: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
284: ELSE
285: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group ';
286: END IF;
287: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
288: end Create_Dimension_Group;
289: /************************************************************************************

Line 294: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

290: ************************************************************************************/
291:
292: procedure Retrieve_Dimension_Group(
293: p_commit IN varchar2 := FND_API.G_FALSE
294: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
295: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
296: ,x_return_status OUT NOCOPY varchar2
297: ,x_msg_count OUT NOCOPY number
298: ,x_msg_data OUT NOCOPY varchar2

Line 295: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

291:
292: procedure Retrieve_Dimension_Group(
293: p_commit IN varchar2 := FND_API.G_FALSE
294: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
295: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
296: ,x_return_status OUT NOCOPY varchar2
297: ,x_msg_count OUT NOCOPY number
298: ,x_msg_data OUT NOCOPY varchar2
299: ) is

Line 343: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';

339: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
340: WHEN NO_DATA_FOUND THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: IF (x_msg_data IS NOT NULL) THEN
343: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
344: ELSE
345: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
346: END IF;
347: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 345: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';

341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: IF (x_msg_data IS NOT NULL) THEN
343: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
344: ELSE
345: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
346: END IF;
347: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
348: WHEN OTHERS THEN
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 351: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';

347: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
348: WHEN OTHERS THEN
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: IF (x_msg_data IS NOT NULL) THEN
351: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
352: ELSE
353: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
354: END IF;
355: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 353: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';

349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: IF (x_msg_data IS NOT NULL) THEN
351: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
352: ELSE
353: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dimension_Group ';
354: END IF;
355: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
356:
357: end Retrieve_Dimension_Group;

Line 364: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

360: ************************************************************************************/
361:
362: procedure Update_Dimension_Group(
363: p_commit IN varchar2 := FND_API.G_FALSE
364: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
365: ,p_create_Dim_Levels IN BOOLEAN
366: ,x_return_status OUT NOCOPY varchar2
367: ,x_msg_count OUT NOCOPY number
368: ,x_msg_data OUT NOCOPY varchar2

Line 371: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

367: ,x_msg_count OUT NOCOPY number
368: ,x_msg_data OUT NOCOPY varchar2
369: ) IS
370:
371: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
372: begin
373:
374: l_Dim_Grp_Rec := p_Dim_Grp_Rec;
375: l_Dim_Grp_Rec.Bsc_Last_Update_Date := NVL(p_Dim_Grp_Rec.Bsc_Last_Update_Date, SYSDATE);

Line 418: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

414: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
415: WHEN NO_DATA_FOUND THEN
416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
417: IF (x_msg_data IS NOT NULL) THEN
418: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
419: ELSE
420: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
421: END IF;
422: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 420: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
417: IF (x_msg_data IS NOT NULL) THEN
418: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
419: ELSE
420: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
421: END IF;
422: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
423: WHEN OTHERS THEN
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 426: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

422: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
423: WHEN OTHERS THEN
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: IF (x_msg_data IS NOT NULL) THEN
426: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
427: ELSE
428: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
429: END IF;
430: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 428: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: IF (x_msg_data IS NOT NULL) THEN
426: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
427: ELSE
428: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
429: END IF;
430: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
431:
432: END Update_Dimension_Group;

Line 437: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

433:
434:
435: procedure Update_Dimension_Group(
436: p_commit IN varchar2 := FND_API.G_FALSE
437: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
438: ,x_return_status OUT NOCOPY varchar2
439: ,x_msg_count OUT NOCOPY number
440: ,x_msg_data OUT NOCOPY varchar2
441: ) is

Line 443: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

439: ,x_msg_count OUT NOCOPY number
440: ,x_msg_data OUT NOCOPY varchar2
441: ) is
442:
443: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
444: begin
445: l_Dim_Grp_Rec := p_Dim_Grp_Rec;
446: l_Dim_Grp_Rec.Bsc_Last_Update_Date := NVL(p_Dim_Grp_Rec.Bsc_Last_Update_Date, SYSDATE);
447:

Line 484: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

480: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
481: WHEN NO_DATA_FOUND THEN
482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
483: IF (x_msg_data IS NOT NULL) THEN
484: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
485: ELSE
486: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
487: END IF;
488: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 486: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
483: IF (x_msg_data IS NOT NULL) THEN
484: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
485: ELSE
486: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
487: END IF;
488: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
489: WHEN OTHERS THEN
490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 492: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

488: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
489: WHEN OTHERS THEN
490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
491: IF (x_msg_data IS NOT NULL) THEN
492: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
493: ELSE
494: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
495: END IF;
496: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 494: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';

490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
491: IF (x_msg_data IS NOT NULL) THEN
492: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
493: ELSE
494: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group ';
495: END IF;
496: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
497:
498: end Update_Dimension_Group;

Line 507: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

503: --: This procedure is part of the Dimension Group API.
504:
505: procedure Delete_Dimension_Group(
506: p_commit IN varchar2 := FND_API.G_FALSE
507: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
508: ,x_return_status OUT NOCOPY varchar2
509: ,x_msg_count OUT NOCOPY number
510: ,x_msg_data OUT NOCOPY varchar2
511: )is

Line 556: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';

552: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
553: WHEN NO_DATA_FOUND THEN
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: IF (x_msg_data IS NOT NULL) THEN
556: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
557: ELSE
558: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
559: END IF;
560: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 558: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';

554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: IF (x_msg_data IS NOT NULL) THEN
556: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
557: ELSE
558: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
559: END IF;
560: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
561: WHEN OTHERS THEN
562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 564: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';

560: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
561: WHEN OTHERS THEN
562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
563: IF (x_msg_data IS NOT NULL) THEN
564: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
565: ELSE
566: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
567: END IF;
568: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 566: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';

562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
563: IF (x_msg_data IS NOT NULL) THEN
564: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
565: ELSE
566: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dimension_Group ';
567: END IF;
568: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
569:
570: end Delete_Dimension_Group;

Line 580: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

576: --: This procedure is part of the Dimension Group API.
577:
578: procedure Create_Dim_Levels_In_Group(
579: p_commit IN varchar2 := FND_API.G_FALSE
580: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
581: ,x_return_status OUT NOCOPY varchar2
582: ,x_msg_count OUT NOCOPY number
583: ,x_msg_data OUT NOCOPY varchar2
584: ) is

Line 596: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

592: l_parent_in_total NUMBER;
593: l_no_items NUMBER;
594: l_total_disp_name bsc_sys_dim_levels_vl.total_disp_name%TYPE;
595: l_comp_disp_name bsc_sys_dim_levels_vl.comp_disp_name%TYPE;
596: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
597: begin
598:
599: x_return_status := FND_API.G_RET_STS_SUCCESS;
600: l_Dim_Grp_Rec := p_Dim_Grp_Rec;

Line 669: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';

665: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
666: WHEN NO_DATA_FOUND THEN
667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
668: IF (x_msg_data IS NOT NULL) THEN
669: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
670: ELSE
671: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
672: END IF;
673: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 671: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';

667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
668: IF (x_msg_data IS NOT NULL) THEN
669: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
670: ELSE
671: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
672: END IF;
673: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
674: WHEN OTHERS THEN
675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 677: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';

673: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
674: WHEN OTHERS THEN
675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
676: IF (x_msg_data IS NOT NULL) THEN
677: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
678: ELSE
679: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
680: END IF;
681: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 679: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';

675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
676: IF (x_msg_data IS NOT NULL) THEN
677: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
678: ELSE
679: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Create_Dim_Levels_In_Group ';
680: END IF;
681: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
682:
683: end Create_Dim_Levels_In_Group;

Line 690: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

686: ************************************************************************************/
687:
688: procedure Retrieve_Dim_Levels_In_Group(
689: p_commit IN varchar2 := FND_API.G_FALSE
690: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
691: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
692: ,x_return_status OUT NOCOPY varchar2
693: ,x_msg_count OUT NOCOPY number
694: ,x_msg_data OUT NOCOPY varchar2

Line 691: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

687:
688: procedure Retrieve_Dim_Levels_In_Group(
689: p_commit IN varchar2 := FND_API.G_FALSE
690: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
691: ,x_Dim_Grp_Rec IN OUT NOCOPY BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
692: ,x_return_status OUT NOCOPY varchar2
693: ,x_msg_count OUT NOCOPY number
694: ,x_msg_data OUT NOCOPY varchar2
695: ) is

Line 730: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';

726: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
727: WHEN NO_DATA_FOUND THEN
728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
729: IF (x_msg_data IS NOT NULL) THEN
730: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
731: ELSE
732: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
733: END IF;
734: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 732: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';

728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
729: IF (x_msg_data IS NOT NULL) THEN
730: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
731: ELSE
732: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
733: END IF;
734: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
735: WHEN OTHERS THEN
736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 738: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';

734: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
735: WHEN OTHERS THEN
736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
737: IF (x_msg_data IS NOT NULL) THEN
738: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
739: ELSE
740: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
741: END IF;
742: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 740: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';

736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
737: IF (x_msg_data IS NOT NULL) THEN
738: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
739: ELSE
740: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Dim_Levels_In_Group ';
741: END IF;
742: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
743:
744: end Retrieve_Dim_Levels_In_Group;

Line 751: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

747: ************************************************************************************/
748:
749: procedure Update_Dim_Levels_In_Group(
750: p_commit IN varchar2 := FND_API.G_FALSE
751: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
752: ,x_return_status OUT NOCOPY varchar2
753: ,x_msg_count OUT NOCOPY number
754: ,x_msg_data OUT NOCOPY varchar2
755: ) is

Line 789: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';

785: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
786: WHEN NO_DATA_FOUND THEN
787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
788: IF (x_msg_data IS NOT NULL) THEN
789: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
790: ELSE
791: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
792: END IF;
793: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 791: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';

787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
788: IF (x_msg_data IS NOT NULL) THEN
789: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
790: ELSE
791: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
792: END IF;
793: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
794: WHEN OTHERS THEN
795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 797: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';

793: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
794: WHEN OTHERS THEN
795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
796: IF (x_msg_data IS NOT NULL) THEN
797: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
798: ELSE
799: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
800: END IF;
801: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 799: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';

795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
796: IF (x_msg_data IS NOT NULL) THEN
797: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
798: ELSE
799: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Update_Dim_Levels_In_Group ';
800: END IF;
801: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
802:
803: end Update_Dim_Levels_In_Group;

Line 812: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

808: --: This procedure deletes dimensions from dimension groups.
809:
810: procedure Delete_Dim_Levels_In_Group(
811: p_commit IN varchar2 := FND_API.G_FALSE
812: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
813: ,x_return_status OUT NOCOPY varchar2
814: ,x_msg_count OUT NOCOPY number
815: ,x_msg_data OUT NOCOPY varchar2
816: ) is

Line 850: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';

846: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
847: WHEN NO_DATA_FOUND THEN
848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
849: IF (x_msg_data IS NOT NULL) THEN
850: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
851: ELSE
852: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
853: END IF;
854: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 852: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';

848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
849: IF (x_msg_data IS NOT NULL) THEN
850: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
851: ELSE
852: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
853: END IF;
854: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
855: WHEN OTHERS THEN
856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 858: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';

854: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
855: WHEN OTHERS THEN
856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
857: IF (x_msg_data IS NOT NULL) THEN
858: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
859: ELSE
860: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
861: END IF;
862: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 860: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';

856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
857: IF (x_msg_data IS NOT NULL) THEN
858: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
859: ELSE
860: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Delete_Dim_Levels_In_Group ';
861: END IF;
862: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
863:
864: end Delete_Dim_Levels_In_Group;

Line 899: l_dim_grp_rec BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;

895: )
896: IS
897: l_dim_level_id NUMBER;
898: l_dim_group_id NUMBER;
899: l_dim_grp_rec BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;
900: l_dim_grp_rec_out BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;
901:
902: CURSOR c_dim_group (cp_dim_shortname VARCHAR2) IS
903: SELECT dim_group_id

Line 900: l_dim_grp_rec_out BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;

896: IS
897: l_dim_level_id NUMBER;
898: l_dim_group_id NUMBER;
899: l_dim_grp_rec BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;
900: l_dim_grp_rec_out BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;
901:
902: CURSOR c_dim_group (cp_dim_shortname VARCHAR2) IS
903: SELECT dim_group_id
904: FROM bsc_sys_dim_groups_vl

Line 1040: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';

1036: CLOSE c_dim_level;
1037: END IF;
1038: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1039: IF (x_msg_data IS NOT NULL) THEN
1040: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';
1041: ELSE
1042: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';
1043: END IF;
1044: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1042: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';

1038: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1039: IF (x_msg_data IS NOT NULL) THEN
1040: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';
1041: ELSE
1042: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.Retrieve_Sys_Dim_Lvls_Grp_Wrap ';
1043: END IF;
1044: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1045: END Retrieve_Sys_Dim_Lvls_Grp_Wrap;
1046:

Line 1094: l_dim_grp_rec BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;

1090: ,x_msg_count OUT NOCOPY NUMBER
1091: ,x_msg_data OUT NOCOPY VARCHAR2
1092: ) IS
1093:
1094: l_dim_grp_rec BSC_DIMENSION_GROUPS_PUB.BSC_DIM_GROUP_REC_TYPE;
1095: l_dim_level_id NUMBER;
1096: l_dim_group_id NUMBER;
1097: BEGIN
1098: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1159: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';

1155: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1156: WHEN NO_DATA_FOUND THEN
1157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1158: IF (x_msg_data IS NOT NULL) THEN
1159: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1160: ELSE
1161: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1162: END IF;
1163: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);

Line 1161: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';

1157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1158: IF (x_msg_data IS NOT NULL) THEN
1159: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1160: ELSE
1161: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1162: END IF;
1163: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1164: WHEN OTHERS THEN
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1167: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';

1163: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1164: WHEN OTHERS THEN
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: IF (x_msg_data IS NOT NULL) THEN
1167: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1168: ELSE
1169: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1170: END IF;
1171: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);

Line 1169: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';

1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: IF (x_msg_data IS NOT NULL) THEN
1167: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1168: ELSE
1169: x_msg_data := SQLERRM||' at BSC_DIMENSION_GROUPS_PUB.set_dim_lvl_grp_prop_wrap ';
1170: END IF;
1171: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1172: END set_dim_lvl_grp_prop_wrap;
1173:

Line 1221: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

1217: * Called from BISDIMLV.lct
1218: */
1219: PROCEDURE Translate_Dimension_Group
1220: ( p_commit IN VARCHAR2 := FND_API.G_FALSE
1221: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
1222: ,x_return_status OUT NOCOPY VARCHAR2
1223: ,x_msg_count OUT NOCOPY NUMBER
1224: ,x_msg_data OUT NOCOPY VARCHAR2
1225: )

Line 1227: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

1223: ,x_msg_count OUT NOCOPY NUMBER
1224: ,x_msg_data OUT NOCOPY VARCHAR2
1225: )
1226: IS
1227: l_Dim_Grp_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
1228:
1229: BEGIN
1230:
1231: l_Dim_Grp_Rec := p_Dim_Grp_Rec;

Line 1272: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group ';

1268: );
1269: WHEN OTHERS THEN
1270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1271: IF (x_msg_data IS NOT NULL) THEN
1272: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group ';
1273: ELSE
1274: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group '||SQLERRM;
1275: END IF;
1276: END Translate_Dimension_Group;

Line 1274: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group '||SQLERRM;

1270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1271: IF (x_msg_data IS NOT NULL) THEN
1272: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group ';
1273: ELSE
1274: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.Translate_Dimension_Group '||SQLERRM;
1275: END IF;
1276: END Translate_Dimension_Group;
1277:
1278: --====================================================================

Line 1338: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

1334: */
1335:
1336: PROCEDURE load_dimension_group (
1337: p_commit IN VARCHAR2 := FND_API.G_FALSE
1338: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
1339: ,x_return_status OUT NOCOPY VARCHAR2
1340: ,x_msg_count OUT NOCOPY NUMBER
1341: ,x_msg_data OUT NOCOPY VARCHAR2
1342: ,p_force_mode IN BOOLEAN := FALSE

Line 1345: l_Bsc_Dim_Group_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

1341: ,x_msg_data OUT NOCOPY VARCHAR2
1342: ,p_force_mode IN BOOLEAN := FALSE
1343: )
1344: IS
1345: l_Bsc_Dim_Group_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
1346: l_is_insert VARCHAR2(10) := 'Y';
1347: l_count NUMBER;
1348: l_owner_name VARCHAR2(100);
1349: l_ret_code BOOLEAN;

Line 1397: BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group(

1393: ,x_msg_data => x_msg_data
1394: );
1395: IF (l_ret_code) THEN
1396:
1397: BSC_DIMENSION_GROUPS_PUB.Update_Dimension_Group(
1398: p_commit => FND_API.G_TRUE
1399: ,p_Dim_Grp_Rec => l_Bsc_Dim_Group_Rec
1400: ,p_create_Dim_Levels => FALSE
1401: ,x_return_status => x_return_status

Line 1408: BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group(

1404: );
1405: END IF;
1406: ELSE
1407:
1408: BSC_DIMENSION_GROUPS_PUB.Create_Dimension_Group(
1409: p_commit => FND_API.G_TRUE
1410: ,p_Dim_Grp_Rec => l_Bsc_Dim_Group_Rec
1411: ,p_create_Dim_Levels => FALSE
1412: ,x_return_status => x_return_status

Line 1437: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';

1433: );
1434: WHEN NO_DATA_FOUND THEN
1435: x_return_status := FND_API.G_RET_STS_ERROR;
1436: IF (x_msg_data IS NOT NULL) THEN
1437: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';
1438: ELSE
1439: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;
1440: END IF;
1441: WHEN OTHERS THEN

Line 1439: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;

1435: x_return_status := FND_API.G_RET_STS_ERROR;
1436: IF (x_msg_data IS NOT NULL) THEN
1437: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';
1438: ELSE
1439: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;
1440: END IF;
1441: WHEN OTHERS THEN
1442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1443: IF (x_msg_data IS NOT NULL) THEN

Line 1444: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';

1440: END IF;
1441: WHEN OTHERS THEN
1442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1443: IF (x_msg_data IS NOT NULL) THEN
1444: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';
1445: ELSE
1446: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;
1447: END IF;
1448:

Line 1446: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;

1442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1443: IF (x_msg_data IS NOT NULL) THEN
1444: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dimension_group ';
1445: ELSE
1446: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dimension_group '||SQLERRM;
1447: END IF;
1448:
1449: END load_dimension_group;
1450:

Line 1458: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

1454: */
1455: PROCEDURE load_dim_levels_in_group(
1456: p_commit IN VARCHAR2 := FND_API.G_FALSE
1457: ,p_Bsc_Pmf_Dim_Rec IN BSC_PMF_UI_API_PUB.Bsc_Pmf_Dim_Rec_Type
1458: ,p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
1459: ,x_return_status OUT NOCOPY VARCHAR2
1460: ,x_msg_count OUT NOCOPY NUMBER
1461: ,x_msg_data OUT NOCOPY VARCHAR2
1462: )

Line 1465: l_Bsc_Dim_Group_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;

1461: ,x_msg_data OUT NOCOPY VARCHAR2
1462: )
1463: IS
1464: l_rel_count NUMBER;
1465: l_Bsc_Dim_Group_Rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
1466: BEGIN
1467:
1468: x_return_status := FND_API.G_RET_STS_SUCCESS;
1469: l_Bsc_Dim_Group_Rec := p_Dim_Grp_Rec;

Line 1528: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';

1524: );
1525: WHEN NO_DATA_FOUND THEN
1526: x_return_status := FND_API.G_RET_STS_ERROR;
1527: IF (x_msg_data IS NOT NULL) THEN
1528: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';
1529: ELSE
1530: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;
1531: END IF;
1532: WHEN OTHERS THEN

Line 1530: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;

1526: x_return_status := FND_API.G_RET_STS_ERROR;
1527: IF (x_msg_data IS NOT NULL) THEN
1528: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';
1529: ELSE
1530: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;
1531: END IF;
1532: WHEN OTHERS THEN
1533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1534: IF (x_msg_data IS NOT NULL) THEN

Line 1535: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';

1531: END IF;
1532: WHEN OTHERS THEN
1533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1534: IF (x_msg_data IS NOT NULL) THEN
1535: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';
1536: ELSE
1537: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;
1538: END IF;
1539: END load_dim_levels_in_group;

Line 1537: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;

1533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1534: IF (x_msg_data IS NOT NULL) THEN
1535: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group ';
1536: ELSE
1537: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.load_dim_levels_in_group '||SQLERRM;
1538: END IF;
1539: END load_dim_levels_in_group;
1540:
1541: --=============================================================================

Line 1574: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';

1570: CLOSE c_dim_grp_id;
1571: END IF;
1572: x_return_status := FND_API.G_RET_STS_ERROR ;
1573: IF (x_msg_data IS NOT NULL) THEN
1574: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';
1575: ELSE
1576: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;
1577: END IF;
1578: WHEN FND_API.G_EXC_ERROR THEN

Line 1576: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;

1572: x_return_status := FND_API.G_RET_STS_ERROR ;
1573: IF (x_msg_data IS NOT NULL) THEN
1574: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';
1575: ELSE
1576: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;
1577: END IF;
1578: WHEN FND_API.G_EXC_ERROR THEN
1579: IF (c_dim_grp_id%ISOPEN) THEN
1580: CLOSE c_dim_grp_id;

Line 1604: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';

1600: CLOSE c_dim_grp_id;
1601: END IF;
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1603: IF (x_msg_data IS NOT NULL) THEN
1604: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';
1605: ELSE
1606: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;
1607: END IF;
1608:

Line 1606: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;

1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1603: IF (x_msg_data IS NOT NULL) THEN
1604: x_msg_data := x_msg_data||' -> BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname ';
1605: ELSE
1606: x_msg_data := 'BSC_DIMENSION_GROUPS_PUB.ret_dimgrpid_fr_shname '||SQLERRM;
1607: END IF;
1608:
1609: END ret_dimgrpid_fr_shname;
1610:

Line 1620: , p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type

1616: *************************************************************************************/
1617:
1618: procedure Translate_Dim_By_Given_Lang
1619: ( p_commit IN VARCHAR2
1620: , p_Dim_Grp_Rec IN BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type
1621: , x_return_status OUT NOCOPY VARCHAR2
1622: , x_msg_count OUT NOCOPY NUMBER
1623: , x_msg_data OUT NOCOPY VARCHAR2
1624: )

Line 1658: end BSC_DIMENSION_GROUPS_PUB;

1654: END Translate_Dim_By_Given_Lang;
1655:
1656:
1657:
1658: end BSC_DIMENSION_GROUPS_PUB;