20: REM | 26-JUL-2002 rchandra Fixed for enh 2440739 |
21: REM | 13-NOV-2002 SASHAIK Fixed for bug 2664898
22: REM | 23-JAN-03 sugopal For having different local variables for IN and OUT |
23: REM | parameters (bug#2758428) |
24: REM | 30-JAN-03 sugopal FND_API.G_MISS_xxx should not be used in |
25: REM | initialization or declaration (bug#2774644) |
26: REM | 13-FEB-03 sashaik 2784713 Measure update fix. |
27: REM | 11-APR-03 sugopal Not possible to update an existing value with null |
28: REM | in the Create/Update performance measures page - |
166:
167: -- rpenneru 12/27/2004 for enh#4080204
168: PROCEDURE Load_Measure_Extension
169: ( p_api_version IN NUMBER
170: , p_commit IN VARCHAR2 := FND_API.G_FALSE
171: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
172: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
173: , x_return_status OUT NOCOPY VARCHAR2
174: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
316: l_login_id number;
317: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
318: BEGIN
319:
320: x_return_status := FND_API.G_RET_STS_SUCCESS;
321: if (BIS_UTILITIES_PUB.Value_Missing(p_dimension_id) = FND_API.G_TRUE) then
322: return;
323: end if;
324:
317: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
318: BEGIN
319:
320: x_return_status := FND_API.G_RET_STS_SUCCESS;
321: if (BIS_UTILITIES_PUB.Value_Missing(p_dimension_id) = FND_API.G_TRUE) then
322: return;
323: end if;
324:
325: l_user_id := BIS_UTILITIES_PUB.Get_Owner_Id(p_owner);
350:
351: --commented RAISE
352: EXCEPTION
353: WHEN NO_DATA_FOUND THEN
354: x_return_status := FND_API.G_RET_STS_ERROR ;
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
351: --commented RAISE
352: EXCEPTION
353: WHEN NO_DATA_FOUND THEN
354: x_return_status := FND_API.G_RET_STS_ERROR ;
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
352: EXCEPTION
353: WHEN NO_DATA_FOUND THEN
354: x_return_status := FND_API.G_RET_STS_ERROR ;
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
353: WHEN NO_DATA_FOUND THEN
354: x_return_status := FND_API.G_RET_STS_ERROR ;
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: x_return_status := FND_API.G_RET_STS_ERROR ;
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
362: when others then
355: --RAISE FND_API.G_EXC_ERROR;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
362: when others then
363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
356: when FND_API.G_EXC_ERROR then
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
362: when others then
363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
364: --added last two params
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: --RAISE FND_API.G_EXC_ERROR;
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
362: when others then
363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
364: --added last two params
365:
359: when FND_API.G_EXC_UNEXPECTED_ERROR then
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
361: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
362: when others then
363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
364: --added last two params
365:
366: l_error_tbl := x_error_tbl;
367: BIS_UTILITIES_PVT.Add_Error_Message
370: , p_error_proc_name => G_PKG_NAME||'.Create_Indicator_Dimension'
371: , p_error_table => l_error_tbl
372: , x_error_table => x_error_tbl
373: );
374: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
375:
376: end Create_Indicator_Dimension;
377:
378: PROCEDURE Create_Indicator_Dimensions
385: l_id NUMBER := p_Measure_rec.Measure_Id;
386: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
387: BEGIN
388:
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
392: = FND_API.G_FALSE
393: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
388:
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
392: = FND_API.G_FALSE
393: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
394: = FND_API.G_FALSE) then
395:
396: Create_Indicator_Dimension( l_id
390:
391: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
392: = FND_API.G_FALSE
393: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
394: = FND_API.G_FALSE) then
395:
396: Create_Indicator_Dimension( l_id
397: , p_Measure_Rec.Dimension1_Id
398: , 1
401: , x_error_tbl
402: );
403:
404: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
405: = FND_API.G_FALSE
406: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
407: = FND_API.G_FALSE) then
408:
409: Create_Indicator_Dimension( l_id
403:
404: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
405: = FND_API.G_FALSE
406: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
407: = FND_API.G_FALSE) then
408:
409: Create_Indicator_Dimension( l_id
410: , p_Measure_Rec.Dimension2_Id
411: , 2
414: , x_error_tbl
415: );
416:
417: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
418: = FND_API.G_FALSE
419: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
420: = FND_API.G_FALSE) then
421: Create_Indicator_Dimension( l_id
422: , p_Measure_Rec.Dimension3_Id
416:
417: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
418: = FND_API.G_FALSE
419: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
420: = FND_API.G_FALSE) then
421: Create_Indicator_Dimension( l_id
422: , p_Measure_Rec.Dimension3_Id
423: , 3
424: , p_owner
426: , x_error_tbl
427: );
428:
429: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
430: = FND_API.G_FALSE
431: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
432: = FND_API.G_FALSE) then
433: Create_Indicator_Dimension( l_id
434: , p_Measure_Rec.Dimension4_Id
428:
429: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
430: = FND_API.G_FALSE
431: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
432: = FND_API.G_FALSE) then
433: Create_Indicator_Dimension( l_id
434: , p_Measure_Rec.Dimension4_Id
435: , 4
436: , p_owner
438: , x_error_tbl
439: );
440:
441: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
442: = FND_API.G_FALSE
443: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
444: = FND_API.G_FALSE) then
445: Create_Indicator_Dimension( l_id
446: , p_Measure_Rec.Dimension5_Id
440:
441: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
442: = FND_API.G_FALSE
443: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
444: = FND_API.G_FALSE) then
445: Create_Indicator_Dimension( l_id
446: , p_Measure_Rec.Dimension5_Id
447: , 5
448: , p_owner
450: , x_error_tbl
451: );
452:
453: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
454: = FND_API.G_FALSE
455: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension6_id)
456: = FND_API.G_FALSE) then
457: Create_Indicator_Dimension( l_id
458: , p_Measure_Rec.Dimension6_Id
452:
453: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
454: = FND_API.G_FALSE
455: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension6_id)
456: = FND_API.G_FALSE) then
457: Create_Indicator_Dimension( l_id
458: , p_Measure_Rec.Dimension6_Id
459: , 6
460: , p_owner
462: , x_error_tbl
463: );
464:
465: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
466: = FND_API.G_FALSE
467: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension7_id)
468: = FND_API.G_FALSE) then
469: Create_Indicator_Dimension( l_id
470: , p_Measure_Rec.Dimension7_Id
464:
465: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
466: = FND_API.G_FALSE
467: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension7_id)
468: = FND_API.G_FALSE) then
469: Create_Indicator_Dimension( l_id
470: , p_Measure_Rec.Dimension7_Id
471: , 7
472: , p_owner
483:
484: --commented RAISE
485: EXCEPTION
486: WHEN NO_DATA_FOUND THEN
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
484: --commented RAISE
485: EXCEPTION
486: WHEN NO_DATA_FOUND THEN
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
485: EXCEPTION
486: WHEN NO_DATA_FOUND THEN
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
486: WHEN NO_DATA_FOUND THEN
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
487: x_return_status := FND_API.G_RET_STS_ERROR ;
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: when others then
488: -- RAISE FND_API.G_EXC_ERROR;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: when others then
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: when others then
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
497: --added last two params
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: -- RAISE FND_API.G_EXC_ERROR;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: when others then
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
497: --added last two params
498: l_error_tbl := x_error_tbl;
492: when FND_API.G_EXC_UNEXPECTED_ERROR then
493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
494: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
495: when others then
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
497: --added last two params
498: l_error_tbl := x_error_tbl;
499: BIS_UTILITIES_PVT.Add_Error_Message
500: ( p_error_msg_id => SQLCODE
502: , p_error_proc_name => G_PKG_NAME||'.Create_Indicator_Dimension'
503: , p_error_table => l_error_tbl
504: , x_error_table => x_error_tbl
505: );
506: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
507:
508: END Create_Indicator_Dimensions;
509:
510: --Overload Create_Indicator_Dimensions so that old data model ldts can be uploaded using
522: l_id NUMBER := p_Measure_rec.Measure_Id;
523: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
524: BEGIN
525:
526: x_return_status := FND_API.G_RET_STS_SUCCESS;
527:
528: if(IS_OLD_DATA_MODEL(p_Measure_Rec,p_Org_Dimension_ID,p_Time_Dimension_ID)) THEN
529:
530: if (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_id)
527:
528: if(IS_OLD_DATA_MODEL(p_Measure_Rec,p_Org_Dimension_ID,p_Time_Dimension_ID)) THEN
529:
530: if (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_id)
531: = FND_API.G_FALSE
532: AND BIS_UTILITIES_PUB.Value_Null(p_Org_Dimension_id)
533: = FND_API.G_FALSE) then
534:
535: Create_Indicator_Dimension( l_id
529:
530: if (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_id)
531: = FND_API.G_FALSE
532: AND BIS_UTILITIES_PUB.Value_Null(p_Org_Dimension_id)
533: = FND_API.G_FALSE) then
534:
535: Create_Indicator_Dimension( l_id
536: , p_Org_Dimension_Id
537: , 1
539: , x_return_status
540: , x_error_tbl
541: );
542: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
543: = FND_API.G_FALSE
544: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
545: = FND_API.G_FALSE) then
546:
547: Create_Indicator_Dimension( l_id
541: );
542: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
543: = FND_API.G_FALSE
544: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
545: = FND_API.G_FALSE) then
546:
547: Create_Indicator_Dimension( l_id
548: , p_Time_Dimension_Id
549: , 2
552: , x_error_tbl
553: );
554:
555: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
556: = FND_API.G_FALSE
557: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
558: = FND_API.G_FALSE) then
559:
560: Create_Indicator_Dimension( l_id
554:
555: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
556: = FND_API.G_FALSE
557: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
558: = FND_API.G_FALSE) then
559:
560: Create_Indicator_Dimension( l_id
561: , p_Measure_Rec.Dimension1_Id
562: , 3
565: , x_error_tbl
566: );
567:
568: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
569: = FND_API.G_FALSE
570: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
571: = FND_API.G_FALSE) then
572:
573: Create_Indicator_Dimension( l_id
567:
568: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
569: = FND_API.G_FALSE
570: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
571: = FND_API.G_FALSE) then
572:
573: Create_Indicator_Dimension( l_id
574: , p_Measure_Rec.Dimension2_Id
575: , 4
578: , x_error_tbl
579: );
580:
581: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
582: = FND_API.G_FALSE
583: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
584: = FND_API.G_FALSE) then
585: Create_Indicator_Dimension( l_id
586: , p_Measure_Rec.Dimension3_Id
580:
581: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
582: = FND_API.G_FALSE
583: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
584: = FND_API.G_FALSE) then
585: Create_Indicator_Dimension( l_id
586: , p_Measure_Rec.Dimension3_Id
587: , 5
588: , p_owner
590: , x_error_tbl
591: );
592:
593: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
594: = FND_API.G_FALSE
595: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
596: = FND_API.G_FALSE) then
597: Create_Indicator_Dimension( l_id
598: , p_Measure_Rec.Dimension4_Id
592:
593: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
594: = FND_API.G_FALSE
595: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
596: = FND_API.G_FALSE) then
597: Create_Indicator_Dimension( l_id
598: , p_Measure_Rec.Dimension4_Id
599: , 6
600: , p_owner
602: , x_error_tbl
603: );
604:
605: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
606: = FND_API.G_FALSE
607: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
608: = FND_API.G_FALSE) then
609: Create_Indicator_Dimension( l_id
610: , p_Measure_Rec.Dimension5_Id
604:
605: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
606: = FND_API.G_FALSE
607: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
608: = FND_API.G_FALSE) then
609: Create_Indicator_Dimension( l_id
610: , p_Measure_Rec.Dimension5_Id
611: , 7
612: , p_owner
623:
624: ELSE
625:
626: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
627: = FND_API.G_FALSE
628: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
629: = FND_API.G_FALSE) then
630:
631: Create_Indicator_Dimension( l_id
625:
626: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
627: = FND_API.G_FALSE
628: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension1_id)
629: = FND_API.G_FALSE) then
630:
631: Create_Indicator_Dimension( l_id
632: , p_Measure_Rec.Dimension1_Id
633: , 1
636: , x_error_tbl
637: );
638:
639: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
640: = FND_API.G_FALSE
641: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
642: = FND_API.G_FALSE) then
643:
644: Create_Indicator_Dimension( l_id
638:
639: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
640: = FND_API.G_FALSE
641: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension2_id)
642: = FND_API.G_FALSE) then
643:
644: Create_Indicator_Dimension( l_id
645: , p_Measure_Rec.Dimension2_Id
646: , 2
649: , x_error_tbl
650: );
651:
652: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
653: = FND_API.G_FALSE
654: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
655: = FND_API.G_FALSE) then
656: Create_Indicator_Dimension( l_id
657: , p_Measure_Rec.Dimension3_Id
651:
652: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
653: = FND_API.G_FALSE
654: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension3_id)
655: = FND_API.G_FALSE) then
656: Create_Indicator_Dimension( l_id
657: , p_Measure_Rec.Dimension3_Id
658: , 3
659: ,p_owner
661: , x_error_tbl
662: );
663:
664: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
665: = FND_API.G_FALSE
666: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
667: = FND_API.G_FALSE) then
668: Create_Indicator_Dimension( l_id
669: , p_Measure_Rec.Dimension4_Id
663:
664: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
665: = FND_API.G_FALSE
666: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension4_id)
667: = FND_API.G_FALSE) then
668: Create_Indicator_Dimension( l_id
669: , p_Measure_Rec.Dimension4_Id
670: , 4
671: , p_owner
673: , x_error_tbl
674: );
675:
676: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
677: = FND_API.G_FALSE
678: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
679: = FND_API.G_FALSE) then
680: Create_Indicator_Dimension( l_id
681: , p_Measure_Rec.Dimension5_Id
675:
676: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
677: = FND_API.G_FALSE
678: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension5_id)
679: = FND_API.G_FALSE) then
680: Create_Indicator_Dimension( l_id
681: , p_Measure_Rec.Dimension5_Id
682: , 5
683: , p_owner
685: , x_error_tbl
686: );
687:
688: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
689: = FND_API.G_FALSE
690: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension6_id)
691: = FND_API.G_FALSE) then
692: Create_Indicator_Dimension( l_id
693: , p_Measure_Rec.Dimension6_Id
687:
688: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
689: = FND_API.G_FALSE
690: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension6_id)
691: = FND_API.G_FALSE) then
692: Create_Indicator_Dimension( l_id
693: , p_Measure_Rec.Dimension6_Id
694: , 6
695: , p_owner
697: , x_error_tbl
698: );
699:
700: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
701: = FND_API.G_FALSE
702: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension7_id)
703: = FND_API.G_FALSE) then
704: Create_Indicator_Dimension( l_id
705: , p_Measure_Rec.Dimension7_Id
699:
700: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
701: = FND_API.G_FALSE
702: AND BIS_UTILITIES_PUB.Value_Null(p_Measure_Rec.Dimension7_id)
703: = FND_API.G_FALSE) then
704: Create_Indicator_Dimension( l_id
705: , p_Measure_Rec.Dimension7_Id
706: , 7
707: , p_owner
719: END IF;
720: --commented RAISE
721: EXCEPTION
722: WHEN NO_DATA_FOUND THEN
723: x_return_status := FND_API.G_RET_STS_ERROR ;
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
720: --commented RAISE
721: EXCEPTION
722: WHEN NO_DATA_FOUND THEN
723: x_return_status := FND_API.G_RET_STS_ERROR ;
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
721: EXCEPTION
722: WHEN NO_DATA_FOUND THEN
723: x_return_status := FND_API.G_RET_STS_ERROR ;
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
722: WHEN NO_DATA_FOUND THEN
723: x_return_status := FND_API.G_RET_STS_ERROR ;
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
723: x_return_status := FND_API.G_RET_STS_ERROR ;
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: when others then
724: -- RAISE FND_API.G_EXC_ERROR;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: when others then
732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
725: when FND_API.G_EXC_ERROR then
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: when others then
732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
733: --added last two params
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: -- RAISE FND_API.G_EXC_ERROR;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: when others then
732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
733: --added last two params
734: l_error_tbl := x_error_tbl;
728: when FND_API.G_EXC_UNEXPECTED_ERROR then
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: when others then
732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
733: --added last two params
734: l_error_tbl := x_error_tbl;
735: BIS_UTILITIES_PVT.Add_Error_Message
736: ( p_error_msg_id => SQLCODE
738: , p_error_proc_name => G_PKG_NAME||'.Create_Indicator_Dimension'
739: , p_error_table => l_error_tbl
740: , x_error_table => x_error_tbl
741: );
742: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
743:
744: END Create_Indicator_Dimensions;
745:
746: PROCEDURE SetNULL
844: -- they are passed in
845: --- redundant because of defaults in next overloaded signature
846: --Procedure Create_Measure
847: --( p_api_version IN NUMBER
848: --, p_commit IN VARCHAR2 := FND_API.G_FALSE
849: --, p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
850: --, p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
851: --, x_return_status OUT NOCOPY VARCHAR2
852: --, x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
845: --- redundant because of defaults in next overloaded signature
846: --Procedure Create_Measure
847: --( p_api_version IN NUMBER
848: --, p_commit IN VARCHAR2 := FND_API.G_FALSE
849: --, p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
850: --, p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
851: --, x_return_status OUT NOCOPY VARCHAR2
852: --, x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
853: --)
865: -- );
866: --
867: --EXCEPTION
868: -- when others then
869: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
870: -- -- added last two params
871: -- BIS_UTILITIES_PVT.Add_Error_Message
872: -- ( p_error_msg_id => SQLCODE
873: -- , p_error_description => SQLERRM
874: -- , p_error_proc_name => G_PKG_NAME||'.Create_Measure'
875: -- , p_error_table => x_error_tbl
876: -- , x_error_table => x_error_tbl
877: -- );
878: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
879: --
880: --END Create_Measure;
881:
882: -- creates one Measure for the given owner,
882: -- creates one Measure for the given owner,
883: -- with the dimensions sequenced in the order they are passed in
884: Procedure Create_Measure
885: ( p_api_version IN NUMBER
886: , p_commit IN VARCHAR2 := FND_API.G_FALSE
887: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
888: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
889: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
890: , x_return_status OUT NOCOPY VARCHAR2
883: -- with the dimensions sequenced in the order they are passed in
884: Procedure Create_Measure
885: ( p_api_version IN NUMBER
886: , p_commit IN VARCHAR2 := FND_API.G_FALSE
887: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
888: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
889: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
890: , x_return_status OUT NOCOPY VARCHAR2
891: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
897: l_id number;
898: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
899: l_application_rec BIS_APPLICATION_PVT.Application_rec_type;
900: l_measure_id NUMBER;
901: l_own_appl VARCHAR2(100) := FND_API.G_FALSE ; --2465354
902: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
903: l_Mapped_measure bis_indicators_tl.NAME%TYPE;
904: l_Return_Status VARCHAR2(2000);
905:
904: l_Return_Status VARCHAR2(2000);
905:
906: BEGIN
907:
908: x_return_status := FND_API.G_RET_STS_SUCCESS;
909: SetNULL( p_Measure_Rec, l_Measure_Rec);
910: --trying to phase out NOCOPY this procedure--created two new procedures
911: --a call to value_id_conversion is already made in the public package
912: /*
922:
923: -- dbms_output.put_line('PVT. val id conv: '||x_return_status );
924:
925: --Added this check
926: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
927: RAISE FND_API.G_EXC_ERROR;
928: END IF;
929: --dbms_output.put_line('1'||'l_measure_rec.function_short_name');
930:
923: -- dbms_output.put_line('PVT. val id conv: '||x_return_status );
924:
925: --Added this check
926: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
927: RAISE FND_API.G_EXC_ERROR;
928: END IF;
929: --dbms_output.put_line('1'||'l_measure_rec.function_short_name');
930:
931: Validate_Measure( p_api_version
938: --dbms_output.put_line('2'||'l_measure_rec.function_short_name');
939:
940: --dbms_output.put_line('PVT. validate Measure: '||x_return_status );
941:
942: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
943: --dbms_output.put_line('inside exception');
944: RAISE FND_API.G_EXC_ERROR;
945: END IF;
946: --
940: --dbms_output.put_line('PVT. validate Measure: '||x_return_status );
941:
942: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
943: --dbms_output.put_line('inside exception');
944: RAISE FND_API.G_EXC_ERROR;
945: END IF;
946: --
947: l_Measure_Id := Get_Measure_Id_From_Short_Name(p_measure_rec);
948:
955: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
956: , p_error_table => l_error_tbl
957: , x_error_table => x_error_tbl
958: );
959: RAISE FND_API.G_EXC_ERROR;
960: end if;
961: --
962:
963: -- mdamle 07/18/2003 - Allow enable_link = Y only if function_name is not null
970: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
971: , p_error_table => l_error_tbl
972: , x_error_table => x_error_tbl
973: );
974: RAISE FND_API.G_EXC_ERROR;
975: end if;
976:
977: -- ankgoel: bug#3557236
978: IF (p_Measure_rec.is_validate <> FND_API.G_FALSE) THEN
974: RAISE FND_API.G_EXC_ERROR;
975: end if;
976:
977: -- ankgoel: bug#3557236
978: IF (p_Measure_rec.is_validate <> FND_API.G_FALSE) THEN
979: -- mdamle 07/18/2003 - Check if measure is being mapped to a source
980: -- that's already mapped to another measure.
981: if isSourceColumnMappedAlready(p_Measure_rec, l_Mapped_measure) then
982: l_error_tbl := x_error_tbl;
990: , p_error_table => l_error_tbl
991: , x_error_table => x_error_tbl
992: );
993:
994: RAISE FND_API.G_EXC_ERROR;
995: end if;
996:
997: --sawu: 9/2/04: need to validate compare-to column also for bug#3859267
998: if isCompareColumnMappedAlready(p_Measure_rec, l_Mapped_measure) then
1007: , p_error_table => l_error_tbl
1008: , x_error_table => x_error_tbl
1009: );
1010:
1011: RAISE FND_API.G_EXC_ERROR;
1012: end if;
1013: END IF;
1014:
1015: -- ankgoel: bug#3891748 - Created_By will take precedence over Owner.
1120:
1121: --2465354
1122: l_application_rec.Application_id := l_Measure_Rec.Application_Id;
1123: IF (NVL(l_application_rec.Application_id,-1) <> -1 ) THEN
1124: l_own_appl := FND_API.G_TRUE;
1125: END IF;
1126: --2465354
1127:
1128: Create_Application_Measure
1145: , p_owner => p_owner
1146: , x_return_status => l_Return_Status
1147: , x_error_Tbl => x_error_Tbl
1148: );
1149: IF (l_return_status IS NOT NULL AND l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1150: RAISE FND_API.G_EXC_ERROR;
1151: END IF;
1152: END IF;
1153:
1146: , x_return_status => l_Return_Status
1147: , x_error_Tbl => x_error_Tbl
1148: );
1149: IF (l_return_status IS NOT NULL AND l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1150: RAISE FND_API.G_EXC_ERROR;
1151: END IF;
1152: END IF;
1153:
1154: if (p_commit = FND_API.G_TRUE) then
1150: RAISE FND_API.G_EXC_ERROR;
1151: END IF;
1152: END IF;
1153:
1154: if (p_commit = FND_API.G_TRUE) then
1155: COMMIT;
1156: end if;
1157:
1158: --commented RAISE
1157:
1158: --commented RAISE
1159: EXCEPTION
1160: WHEN NO_DATA_FOUND THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR ;
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1158: --commented RAISE
1159: EXCEPTION
1160: WHEN NO_DATA_FOUND THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR ;
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1159: EXCEPTION
1160: WHEN NO_DATA_FOUND THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR ;
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1160: WHEN NO_DATA_FOUND THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR ;
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1161: x_return_status := FND_API.G_RET_STS_ERROR ;
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1169: when others then
1162: --RAISE FND_API.G_EXC_ERROR;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1169: when others then
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1163: when FND_API.G_EXC_ERROR then
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1169: when others then
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1171: --added last two params
1164: x_return_status := FND_API.G_RET_STS_ERROR ;
1165: -- RAISE FND_API.G_EXC_ERROR;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1169: when others then
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1171: --added last two params
1172: l_error_tbl := x_error_tbl;
1166: when FND_API.G_EXC_UNEXPECTED_ERROR then
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1168: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1169: when others then
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1171: --added last two params
1172: l_error_tbl := x_error_tbl;
1173: BIS_UTILITIES_PVT.Add_Error_Message
1174: ( p_error_msg_id => SQLCODE
1176: , p_error_proc_name => G_PKG_NAME||'.Create_Measure'
1177: , p_error_table => l_error_tbl
1178: , x_error_table => x_error_tbl
1179: );
1180: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1181:
1182: END Create_Measure;
1183: --
1184: --
1188: --The latest lct file. The lct file can call Load_Measure which calls this
1189: --by passing in Org and Time dimension short_names also
1190: Procedure Create_Measure
1191: ( p_api_version IN NUMBER
1192: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1193: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1194: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
1195: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
1196: , p_Org_Dimension_ID IN NUMBER
1189: --by passing in Org and Time dimension short_names also
1190: Procedure Create_Measure
1191: ( p_api_version IN NUMBER
1192: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1193: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1194: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
1195: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
1196: , p_Org_Dimension_ID IN NUMBER
1197: , p_Time_Dimension_ID IN NUMBER
1205: l_id number;
1206: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
1207: l_application_rec BIS_APPLICATION_PVT.Application_rec_type;
1208: l_measure_id NUMBER;
1209: l_own_appl VARCHAR2(100) := FND_API.G_FALSE ; --2465354
1210: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1211: BEGIN
1212:
1213: x_return_status := FND_API.G_RET_STS_SUCCESS;
1209: l_own_appl VARCHAR2(100) := FND_API.G_FALSE ; --2465354
1210: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1211: BEGIN
1212:
1213: x_return_status := FND_API.G_RET_STS_SUCCESS;
1214: SetNULL( p_Measure_Rec, l_Measure_Rec);
1215:
1216: --trying to phase out NOCOPY this procedure--created two new procedures
1217: --a call to value_id_conversion is already made in the public package
1228:
1229: -- dbms_output.put_line('PVT. val id conv: '||x_return_status );
1230:
1231: --Added this check
1232: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;
1235:
1236: Validate_Measure( p_api_version
1229: -- dbms_output.put_line('PVT. val id conv: '||x_return_status );
1230:
1231: --Added this check
1232: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;
1235:
1236: Validate_Measure( p_api_version
1237: , p_validation_level
1242: );
1243:
1244: -- dbms_output.put_line('PVT. validate Measure: '||x_return_status );
1245:
1246: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1247: RAISE FND_API.G_EXC_ERROR;
1248: END IF;
1249:
1250: --added this call to validate Org Dimension
1243:
1244: -- dbms_output.put_line('PVT. validate Measure: '||x_return_status );
1245:
1246: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1247: RAISE FND_API.G_EXC_ERROR;
1248: END IF;
1249:
1250: --added this call to validate Org Dimension
1251: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
1250: --added this call to validate Org Dimension
1251: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
1252: ( p_api_version => p_api_version
1253: , p_dimension_id => p_Org_Dimension_ID
1254: , p_dimension_short_name => FND_API.G_MISS_CHAR
1255: , x_return_status => x_return_status
1256: , x_error_Tbl => x_error_Tbl
1257: );
1258: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1254: , p_dimension_short_name => FND_API.G_MISS_CHAR
1255: , x_return_status => x_return_status
1256: , x_error_Tbl => x_error_Tbl
1257: );
1258: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1259: RAISE FND_API.G_EXC_ERROR;
1260: END IF;
1261:
1262: --added this call to validate Time Dimension
1255: , x_return_status => x_return_status
1256: , x_error_Tbl => x_error_Tbl
1257: );
1258: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1259: RAISE FND_API.G_EXC_ERROR;
1260: END IF;
1261:
1262: --added this call to validate Time Dimension
1263: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
1262: --added this call to validate Time Dimension
1263: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
1264: ( p_api_version => p_api_version
1265: , p_dimension_id => p_Time_Dimension_ID
1266: , p_dimension_short_name => FND_API.G_MISS_CHAR
1267: , x_return_status => x_return_status
1268: , x_error_Tbl => x_error_Tbl
1269: );
1270: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1266: , p_dimension_short_name => FND_API.G_MISS_CHAR
1267: , x_return_status => x_return_status
1268: , x_error_Tbl => x_error_Tbl
1269: );
1270: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1271: RAISE FND_API.G_EXC_ERROR;
1272: END IF;
1273:
1274:
1267: , x_return_status => x_return_status
1268: , x_error_Tbl => x_error_Tbl
1269: );
1270: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1271: RAISE FND_API.G_EXC_ERROR;
1272: END IF;
1273:
1274:
1275: --
1284: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
1285: , p_error_table => l_error_tbl
1286: , x_error_table => x_error_tbl
1287: );
1288: RAISE FND_API.G_EXC_ERROR;
1289: end if;
1290: --
1291:
1292: -- ankgoel: bug#3891748 - Created_By will take precedence over Owner.
1426:
1427: --2465354
1428: l_application_rec.Application_id := l_Measure_Rec.Application_Id;
1429: IF (NVL(l_application_rec.Application_id,-1) <> -1 ) THEN
1430: l_own_appl := FND_API.G_TRUE ;
1431: END IF;
1432: --2465354
1433:
1434: Create_Application_Measure
1443: );
1444:
1445: -- dbms_output.put_line('create measure application: '||x_return_status);
1446:
1447: if (p_commit = FND_API.G_TRUE) then
1448: COMMIT;
1449: end if;
1450:
1451: --commented RAISE
1450:
1451: --commented RAISE
1452: EXCEPTION
1453: WHEN NO_DATA_FOUND THEN
1454: x_return_status := FND_API.G_RET_STS_ERROR ;
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1451: --commented RAISE
1452: EXCEPTION
1453: WHEN NO_DATA_FOUND THEN
1454: x_return_status := FND_API.G_RET_STS_ERROR ;
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1452: EXCEPTION
1453: WHEN NO_DATA_FOUND THEN
1454: x_return_status := FND_API.G_RET_STS_ERROR ;
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1453: WHEN NO_DATA_FOUND THEN
1454: x_return_status := FND_API.G_RET_STS_ERROR ;
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1454: x_return_status := FND_API.G_RET_STS_ERROR ;
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1462: when others then
1455: --RAISE FND_API.G_EXC_ERROR;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1462: when others then
1463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1456: when FND_API.G_EXC_ERROR then
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1462: when others then
1463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1464: --added last two params
1457: x_return_status := FND_API.G_RET_STS_ERROR ;
1458: -- RAISE FND_API.G_EXC_ERROR;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1462: when others then
1463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1464: --added last two params
1465: l_error_tbl := x_error_tbl;
1459: when FND_API.G_EXC_UNEXPECTED_ERROR then
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1461: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1462: when others then
1463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1464: --added last two params
1465: l_error_tbl := x_error_tbl;
1466: BIS_UTILITIES_PVT.Add_Error_Message
1467: ( p_error_msg_id => SQLCODE
1469: , p_error_proc_name => G_PKG_NAME||'.Create_Measure'
1470: , p_error_table => l_error_tbl
1471: , x_error_table => x_error_tbl
1472: );
1473: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1474:
1475: END Create_Measure;
1476: --
1477: --
1480: -- If information about the dimensions are not required, set all_info to
1481: -- FALSE
1482: Procedure Retrieve_Measures
1483: ( p_api_version IN NUMBER
1484: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
1485: , x_Measure_tbl OUT NOCOPY BIS_MEASURE_PUB.Measure_Tbl_Type
1486: , x_return_status OUT NOCOPY VARCHAR2
1487: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1488: )
1499:
1500: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1501: BEGIN
1502:
1503: x_return_status := FND_API.G_RET_STS_SUCCESS;
1504:
1505: for cr in cr_all_measures loop
1506:
1507: l_measure_rec.measure_id := cr.measure_id;
1525:
1526: --commented RAISE
1527: EXCEPTION
1528: WHEN NO_DATA_FOUND THEN
1529: x_return_status := FND_API.G_RET_STS_ERROR ;
1530: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1531: --RAISE FND_API.G_EXC_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1527: EXCEPTION
1528: WHEN NO_DATA_FOUND THEN
1529: x_return_status := FND_API.G_RET_STS_ERROR ;
1530: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1531: --RAISE FND_API.G_EXC_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1528: WHEN NO_DATA_FOUND THEN
1529: x_return_status := FND_API.G_RET_STS_ERROR ;
1530: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1531: --RAISE FND_API.G_EXC_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1529: x_return_status := FND_API.G_RET_STS_ERROR ;
1530: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1531: --RAISE FND_API.G_EXC_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1531: --RAISE FND_API.G_EXC_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1538: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1539: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1532: when FND_API.G_EXC_ERROR then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1538: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1539: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: when others then
1533: x_return_status := FND_API.G_RET_STS_ERROR ;
1534: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1538: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1539: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: when others then
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1535: --RAISE FND_API.G_EXC_ERROR;
1536: when FND_API.G_EXC_UNEXPECTED_ERROR then
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1538: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1539: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: when others then
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1542: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1543: --added last two params
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1538: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1539: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: when others then
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1542: IF cr_all_measures%ISOPEN THEN CLOSE cr_all_measures; END IF;
1543: --added last two params
1544: l_error_tbl := x_error_tbl;
1545: BIS_UTILITIES_PVT.Add_Error_Message
1548: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Measures'
1549: , p_error_table => l_error_tbl
1550: , x_error_table => x_error_tbl
1551: );
1552: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1553:
1554: END Retrieve_Measures;
1555: --
1556: --
1558: -- If information about the dimension are not required, set all_info to FALSE.
1559: Procedure Retrieve_Measure
1560: ( p_api_version IN NUMBER
1561: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
1562: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
1563: , x_Measure_Rec IN OUT NOCOPY BIS_MEASURE_PUB.Measure_Rec_Type
1564: , x_return_status OUT NOCOPY VARCHAR2
1565: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1566: )
1569: l_dimension_rec BIS_DIMENSION_PUB.DIMENSION_REC_TYPE;
1570: l_Dimension_Rec_p BIS_DIMENSION_PUB.DIMENSION_REC_TYPE;
1571: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1572: BEGIN
1573: x_return_status := FND_API.G_RET_STS_SUCCESS;
1574:
1575: IF (p_Measure_Rec.Measure_Id IS NOT NULL) THEN
1576: Select Measure_id
1577: , Measure_short_name
1668: , x_Measure_rec.Dataset_Id
1669: from bisbv_performance_measures
1670: where measure_short_name = p_Measure_Rec.Measure_Short_Name; -- bug fix -- mahesh
1671: END IF;
1672: IF p_all_info = FND_API.G_TRUE THEN
1673:
1674: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension1_Id)
1675: = FND_API.G_TRUE AND
1676: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension1_Id)
1671: END IF;
1672: IF p_all_info = FND_API.G_TRUE THEN
1673:
1674: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension1_Id)
1675: = FND_API.G_TRUE AND
1676: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension1_Id)
1677: = FND_API.G_TRUE) THEN
1678: l_dimension_rec.dimension_id := x_Measure_rec.Dimension1_Id;
1679: l_Dimension_Rec_p := l_Dimension_Rec;
1673:
1674: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension1_Id)
1675: = FND_API.G_TRUE AND
1676: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension1_Id)
1677: = FND_API.G_TRUE) THEN
1678: l_dimension_rec.dimension_id := x_Measure_rec.Dimension1_Id;
1679: l_Dimension_Rec_p := l_Dimension_Rec;
1680: BIS_DIMENSION_PVT.Retrieve_Dimension
1681: ( p_api_version
1690: x_Measure_rec.Dimension1_Name := l_dimension_rec.Dimension_Name;
1691: end if;
1692:
1693: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension2_Id)
1694: = FND_API.G_TRUE AND
1695: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1696: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension2_Id)
1697: = FND_API.G_TRUE) THEN
1698:
1691: end if;
1692:
1693: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension2_Id)
1694: = FND_API.G_TRUE AND
1695: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1696: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension2_Id)
1697: = FND_API.G_TRUE) THEN
1698:
1699: l_dimension_rec.dimension_id := x_Measure_rec.Dimension2_Id;
1693: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension2_Id)
1694: = FND_API.G_TRUE AND
1695: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1696: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension2_Id)
1697: = FND_API.G_TRUE) THEN
1698:
1699: l_dimension_rec.dimension_id := x_Measure_rec.Dimension2_Id;
1700: l_Dimension_Rec_p := l_Dimension_Rec;
1701: BIS_DIMENSION_PVT.Retrieve_Dimension
1713: return;
1714: end if;
1715:
1716: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension3_Id)
1717: = FND_API.G_TRUE AND
1718: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1719: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension3_Id)
1720: = FND_API.G_TRUE) THEN
1721:
1714: end if;
1715:
1716: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension3_Id)
1717: = FND_API.G_TRUE AND
1718: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1719: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension3_Id)
1720: = FND_API.G_TRUE) THEN
1721:
1722: l_dimension_rec.dimension_id := x_Measure_rec.Dimension3_Id;
1716: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension3_Id)
1717: = FND_API.G_TRUE AND
1718: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1719: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension3_Id)
1720: = FND_API.G_TRUE) THEN
1721:
1722: l_dimension_rec.dimension_id := x_Measure_rec.Dimension3_Id;
1723: l_Dimension_Rec_p := l_Dimension_Rec;
1724: BIS_DIMENSION_PVT.Retrieve_Dimension
1736: return;
1737: end if;
1738:
1739: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension4_Id)
1740: = FND_API.G_TRUE AND
1741: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1742: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension4_Id)
1743: = FND_API.G_TRUE) THEN
1744:
1737: end if;
1738:
1739: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension4_Id)
1740: = FND_API.G_TRUE AND
1741: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1742: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension4_Id)
1743: = FND_API.G_TRUE) THEN
1744:
1745: l_dimension_rec.dimension_id := x_Measure_rec.Dimension4_Id;
1739: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension4_Id)
1740: = FND_API.G_TRUE AND
1741: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1742: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension4_Id)
1743: = FND_API.G_TRUE) THEN
1744:
1745: l_dimension_rec.dimension_id := x_Measure_rec.Dimension4_Id;
1746: l_Dimension_Rec_p := l_Dimension_Rec;
1747: BIS_DIMENSION_PVT.Retrieve_Dimension
1759: return;
1760: end if;
1761:
1762: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension5_Id)
1763: = FND_API.G_TRUE AND
1764: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1765: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension5_Id)
1766: = FND_API.G_TRUE) THEN
1767:
1760: end if;
1761:
1762: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension5_Id)
1763: = FND_API.G_TRUE AND
1764: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1765: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension5_Id)
1766: = FND_API.G_TRUE) THEN
1767:
1768: l_dimension_rec.dimension_id := x_Measure_rec.Dimension5_Id;
1762: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension5_Id)
1763: = FND_API.G_TRUE AND
1764: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1765: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension5_Id)
1766: = FND_API.G_TRUE) THEN
1767:
1768: l_dimension_rec.dimension_id := x_Measure_rec.Dimension5_Id;
1769: l_Dimension_Rec_p := l_Dimension_Rec;
1770: BIS_DIMENSION_PVT.Retrieve_Dimension
1782: return;
1783: end if;
1784:
1785: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension6_Id)
1786: = FND_API.G_TRUE AND
1787: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1788: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension6_Id)
1789: = FND_API.G_TRUE) THEN
1790:
1783: end if;
1784:
1785: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension6_Id)
1786: = FND_API.G_TRUE AND
1787: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1788: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension6_Id)
1789: = FND_API.G_TRUE) THEN
1790:
1791: l_dimension_rec.dimension_id := x_Measure_rec.Dimension6_Id;
1785: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension6_Id)
1786: = FND_API.G_TRUE AND
1787: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1788: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension6_Id)
1789: = FND_API.G_TRUE) THEN
1790:
1791: l_dimension_rec.dimension_id := x_Measure_rec.Dimension6_Id;
1792: l_Dimension_Rec_p := l_Dimension_Rec;
1793: BIS_DIMENSION_PVT.Retrieve_Dimension
1805: return;
1806: end if;
1807:
1808: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension7_Id)
1809: = FND_API.G_TRUE AND
1810: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1811: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension7_Id)
1812: = FND_API.G_TRUE) THEN
1813:
1806: end if;
1807:
1808: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension7_Id)
1809: = FND_API.G_TRUE AND
1810: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1811: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension7_Id)
1812: = FND_API.G_TRUE) THEN
1813:
1814: l_dimension_rec.dimension_id := x_Measure_rec.Dimension7_Id;
1808: if (BIS_UTILITIES_PUB.Value_Not_Missing(x_Measure_rec.Dimension7_Id)
1809: = FND_API.G_TRUE AND
1810: x_return_status = FND_API.G_RET_STS_SUCCESS AND
1811: BIS_UTILITIES_PUB.Value_Not_NULL(x_Measure_rec.Dimension7_Id)
1812: = FND_API.G_TRUE) THEN
1813:
1814: l_dimension_rec.dimension_id := x_Measure_rec.Dimension7_Id;
1815: l_Dimension_Rec_p := l_Dimension_Rec;
1816: BIS_DIMENSION_PVT.Retrieve_Dimension
1831:
1832: --commented RAISE
1833: EXCEPTION
1834: WHEN NO_DATA_FOUND THEN
1835: x_return_status := FND_API.G_RET_STS_ERROR ;
1836: --added the error message
1837: l_error_tbl := x_error_tbl;
1838: BIS_UTILITIES_PVT.Add_Error_Message
1839: ( p_error_msg_name => 'BIS_INVALID_MEASURE_VALUE'
1842: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
1843: , p_error_table => l_error_tbl
1844: , x_error_table => x_error_tbl
1845: );
1846: -- RAISE FND_API.G_EXC_ERROR;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1843: , p_error_table => l_error_tbl
1844: , x_error_table => x_error_tbl
1845: );
1846: -- RAISE FND_API.G_EXC_ERROR;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1844: , x_error_table => x_error_tbl
1845: );
1846: -- RAISE FND_API.G_EXC_ERROR;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1845: );
1846: -- RAISE FND_API.G_EXC_ERROR;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: when others then
1846: -- RAISE FND_API.G_EXC_ERROR;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: when others then
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1847: when FND_API.G_EXC_ERROR then
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: when others then
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1855: --added last two params
1848: x_return_status := FND_API.G_RET_STS_ERROR ;
1849: -- RAISE FND_API.G_EXC_ERROR;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: when others then
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1855: --added last two params
1856: l_error_tbl := x_error_tbl;
1850: when FND_API.G_EXC_UNEXPECTED_ERROR then
1851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1852: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: when others then
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1855: --added last two params
1856: l_error_tbl := x_error_tbl;
1857: BIS_UTILITIES_PVT.Add_Error_Message
1858: ( p_error_msg_id => SQLCODE
1860: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Measure'
1861: , p_error_table => l_error_tbl
1862: , x_error_table => x_error_tbl
1863: );
1864: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1865:
1866: END Retrieve_Measure;
1867: --
1868: Procedure Update_Indicator_Dimension
1878: l_login_id number;
1879: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1880: BEGIN
1881:
1882: if (BIS_UTILITIES_PUB.Value_Missing(p_dimension_id) = FND_API.G_TRUE) then
1883: return;
1884: end if;
1885:
1886: l_user_id := BIS_UTILITIES_PUB.Get_Owner_Id(p_owner);
1899:
1900: --commented RAISE
1901: EXCEPTION
1902: WHEN NO_DATA_FOUND THEN
1903: x_return_status := FND_API.G_RET_STS_ERROR ;
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1900: --commented RAISE
1901: EXCEPTION
1902: WHEN NO_DATA_FOUND THEN
1903: x_return_status := FND_API.G_RET_STS_ERROR ;
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1901: EXCEPTION
1902: WHEN NO_DATA_FOUND THEN
1903: x_return_status := FND_API.G_RET_STS_ERROR ;
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1902: WHEN NO_DATA_FOUND THEN
1903: x_return_status := FND_API.G_RET_STS_ERROR ;
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: x_return_status := FND_API.G_RET_STS_ERROR ;
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: when others then
1904: --RAISE FND_API.G_EXC_ERROR;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: when others then
1912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1905: when FND_API.G_EXC_ERROR then
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: when others then
1912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1913: --added last two params
1906: x_return_status := FND_API.G_RET_STS_ERROR ;
1907: -- RAISE FND_API.G_EXC_ERROR;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: when others then
1912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1913: --added last two params
1914: l_error_tbl := x_error_tbl;
1908: when FND_API.G_EXC_UNEXPECTED_ERROR then
1909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1910: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: when others then
1912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1913: --added last two params
1914: l_error_tbl := x_error_tbl;
1915: BIS_UTILITIES_PVT.Add_Error_Message
1916: ( p_error_msg_id => SQLCODE
1918: , p_error_proc_name => G_PKG_NAME||'.Update_Indicator_Dimension'
1919: , p_error_table => l_error_tbl
1920: , x_error_table => x_error_tbl
1921: );
1922: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1923:
1924: end Update_Indicator_Dimension;
1925:
1926: FUNCTION Dimension_Count(p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type)
1929: l_count NUMBER := 2;
1930: BEGIN
1931:
1932: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1933: = FND_API.G_FALSE
1934: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1935: = FND_API.G_FALSE) then
1936: l_count := 3;
1937: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1931:
1932: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1933: = FND_API.G_FALSE
1934: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1935: = FND_API.G_FALSE) then
1936: l_count := 3;
1937: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1938: = FND_API.G_FALSE
1939: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1934: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1935: = FND_API.G_FALSE) then
1936: l_count := 3;
1937: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1938: = FND_API.G_FALSE
1939: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1940: = FND_API.G_FALSE) then
1941: l_count := 4;
1942: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
1936: l_count := 3;
1937: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1938: = FND_API.G_FALSE
1939: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1940: = FND_API.G_FALSE) then
1941: l_count := 4;
1942: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
1943: = FND_API.G_FALSE
1944: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
1939: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1940: = FND_API.G_FALSE) then
1941: l_count := 4;
1942: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
1943: = FND_API.G_FALSE
1944: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
1945: = FND_API.G_FALSE) then
1946: l_count := 5;
1947: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
1941: l_count := 4;
1942: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
1943: = FND_API.G_FALSE
1944: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
1945: = FND_API.G_FALSE) then
1946: l_count := 5;
1947: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
1948: = FND_API.G_FALSE
1949: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
1944: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
1945: = FND_API.G_FALSE) then
1946: l_count := 5;
1947: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
1948: = FND_API.G_FALSE
1949: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
1950: = FND_API.G_FALSE) then
1951: l_count := 6;
1952: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
1946: l_count := 5;
1947: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
1948: = FND_API.G_FALSE
1949: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
1950: = FND_API.G_FALSE) then
1951: l_count := 6;
1952: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
1953: = FND_API.G_FALSE
1954: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
1949: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
1950: = FND_API.G_FALSE) then
1951: l_count := 6;
1952: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
1953: = FND_API.G_FALSE
1954: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
1955: = FND_API.G_FALSE) then
1956: l_count := 7;
1957: end if;
1951: l_count := 6;
1952: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
1953: = FND_API.G_FALSE
1954: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
1955: = FND_API.G_FALSE) then
1956: l_count := 7;
1957: end if;
1958: end if;
1959: end if;
1976: BEGIN
1977:
1978: if(IS_OLD_DATA_MODEL(p_Measure_Rec,p_Org_Dimension_Id,p_Time_Dimension_Id)) then
1979: if (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_id)
1980: = FND_API.G_FALSE
1981: AND BIS_UTILITIES_PUB.Value_Null(p_Org_Dimension_id)
1982: = FND_API.G_FALSE) then
1983: l_count := 1;
1984: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
1978: if(IS_OLD_DATA_MODEL(p_Measure_Rec,p_Org_Dimension_Id,p_Time_Dimension_Id)) then
1979: if (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_id)
1980: = FND_API.G_FALSE
1981: AND BIS_UTILITIES_PUB.Value_Null(p_Org_Dimension_id)
1982: = FND_API.G_FALSE) then
1983: l_count := 1;
1984: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
1985: = FND_API.G_FALSE
1986: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
1981: AND BIS_UTILITIES_PUB.Value_Null(p_Org_Dimension_id)
1982: = FND_API.G_FALSE) then
1983: l_count := 1;
1984: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
1985: = FND_API.G_FALSE
1986: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
1987: = FND_API.G_FALSE) then
1988: l_count := 2;
1989: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1983: l_count := 1;
1984: if (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_id)
1985: = FND_API.G_FALSE
1986: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
1987: = FND_API.G_FALSE) then
1988: l_count := 2;
1989: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1990: = FND_API.G_FALSE
1991: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1986: AND BIS_UTILITIES_PUB.Value_Null(p_Time_Dimension_id)
1987: = FND_API.G_FALSE) then
1988: l_count := 2;
1989: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1990: = FND_API.G_FALSE
1991: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1992: = FND_API.G_FALSE) then
1993: l_count := 3;
1994: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1988: l_count := 2;
1989: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
1990: = FND_API.G_FALSE
1991: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1992: = FND_API.G_FALSE) then
1993: l_count := 3;
1994: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1995: = FND_API.G_FALSE
1996: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1991: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
1992: = FND_API.G_FALSE) then
1993: l_count := 3;
1994: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1995: = FND_API.G_FALSE
1996: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1997: = FND_API.G_FALSE) then
1998: l_count := 4;
1999: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
1993: l_count := 3;
1994: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
1995: = FND_API.G_FALSE
1996: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1997: = FND_API.G_FALSE) then
1998: l_count := 4;
1999: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2000: = FND_API.G_FALSE
2001: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
1996: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
1997: = FND_API.G_FALSE) then
1998: l_count := 4;
1999: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2000: = FND_API.G_FALSE
2001: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2002: = FND_API.G_FALSE) then
2003: l_count := 5;
2004: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
1998: l_count := 4;
1999: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2000: = FND_API.G_FALSE
2001: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2002: = FND_API.G_FALSE) then
2003: l_count := 5;
2004: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2005: = FND_API.G_FALSE
2006: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2001: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2002: = FND_API.G_FALSE) then
2003: l_count := 5;
2004: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2005: = FND_API.G_FALSE
2006: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2007: = FND_API.G_FALSE) then
2008: l_count := 6;
2009: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2003: l_count := 5;
2004: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2005: = FND_API.G_FALSE
2006: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2007: = FND_API.G_FALSE) then
2008: l_count := 6;
2009: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2010: = FND_API.G_FALSE
2011: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2006: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2007: = FND_API.G_FALSE) then
2008: l_count := 6;
2009: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2010: = FND_API.G_FALSE
2011: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2012: = FND_API.G_FALSE) then
2013: l_count := 7;
2014: end if;
2008: l_count := 6;
2009: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2010: = FND_API.G_FALSE
2011: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2012: = FND_API.G_FALSE) then
2013: l_count := 7;
2014: end if;
2015: end if;
2016: end if;
2020: end if;
2021:
2022: else
2023: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
2024: = FND_API.G_FALSE
2025: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
2026: = FND_API.G_FALSE) then
2027: l_count := 1;
2028: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
2022: else
2023: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension1_id)
2024: = FND_API.G_FALSE
2025: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
2026: = FND_API.G_FALSE) then
2027: l_count := 1;
2028: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
2029: = FND_API.G_FALSE
2030: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
2025: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension1_id)
2026: = FND_API.G_FALSE) then
2027: l_count := 1;
2028: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
2029: = FND_API.G_FALSE
2030: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
2031: = FND_API.G_FALSE) then
2032: l_count := 2;
2033: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2027: l_count := 1;
2028: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension2_id)
2029: = FND_API.G_FALSE
2030: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
2031: = FND_API.G_FALSE) then
2032: l_count := 2;
2033: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2034: = FND_API.G_FALSE
2035: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2030: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension2_id)
2031: = FND_API.G_FALSE) then
2032: l_count := 2;
2033: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2034: = FND_API.G_FALSE
2035: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2036: = FND_API.G_FALSE) then
2037: l_count := 3;
2038: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2032: l_count := 2;
2033: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension3_id)
2034: = FND_API.G_FALSE
2035: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2036: = FND_API.G_FALSE) then
2037: l_count := 3;
2038: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2039: = FND_API.G_FALSE
2040: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2035: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension3_id)
2036: = FND_API.G_FALSE) then
2037: l_count := 3;
2038: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2039: = FND_API.G_FALSE
2040: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2041: = FND_API.G_FALSE) then
2042: l_count := 4;
2043: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2037: l_count := 3;
2038: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension4_id)
2039: = FND_API.G_FALSE
2040: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2041: = FND_API.G_FALSE) then
2042: l_count := 4;
2043: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2044: = FND_API.G_FALSE
2045: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2040: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension4_id)
2041: = FND_API.G_FALSE) then
2042: l_count := 4;
2043: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2044: = FND_API.G_FALSE
2045: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2046: = FND_API.G_FALSE) then
2047: l_count := 5;
2048: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
2042: l_count := 4;
2043: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension5_id)
2044: = FND_API.G_FALSE
2045: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2046: = FND_API.G_FALSE) then
2047: l_count := 5;
2048: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
2049: = FND_API.G_FALSE
2050: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension6_id)
2045: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension5_id)
2046: = FND_API.G_FALSE) then
2047: l_count := 5;
2048: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
2049: = FND_API.G_FALSE
2050: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension6_id)
2051: = FND_API.G_FALSE) then
2052: l_count := 6;
2053: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
2047: l_count := 5;
2048: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension6_id)
2049: = FND_API.G_FALSE
2050: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension6_id)
2051: = FND_API.G_FALSE) then
2052: l_count := 6;
2053: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
2054: = FND_API.G_FALSE
2055: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension7_id)
2050: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension6_id)
2051: = FND_API.G_FALSE) then
2052: l_count := 6;
2053: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
2054: = FND_API.G_FALSE
2055: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension7_id)
2056: = FND_API.G_FALSE) then
2057: l_count := 7;
2058: end if;
2052: l_count := 6;
2053: if (BIS_UTILITIES_PUB.Value_Missing(p_Measure_Rec.Dimension7_id)
2054: = FND_API.G_FALSE
2055: AND BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Dimension7_id)
2056: = FND_API.G_FALSE) then
2057: l_count := 7;
2058: end if;
2059: end if;
2060: end if;
2205:
2206: FOR i IN 1..7 LOOP -- Dimensions ab_de_f become abdef__
2207:
2208: IF ( bis_utilities_pvt.Value_Not_Missing
2209: (p_value => l_dim_tbl(i).Dimension_id ) = FND_API.G_TRUE ) THEN
2210:
2211: l_arranged_dim_tbl(j).Dimension_id := l_dim_tbl(i).Dimension_id;
2212: j := j+1;
2213:
2242: RETURN NUMBER IS
2243: BEGIN
2244:
2245: IF ( bis_utilities_pvt.Value_Missing
2246: (p_value => p_number ) = FND_API.G_TRUE ) THEN
2247: RETURN NULL;
2248: ELSE
2249: RETURN p_number;
2250: END IF;
2260: RETURN VARCHAR2 IS
2261: BEGIN
2262:
2263: IF ( bis_utilities_pvt.Value_Missing
2264: (p_value => p_varchar2 ) = FND_API.G_TRUE ) THEN
2265: RETURN NULL;
2266: ELSE
2267: RETURN p_varchar2;
2268: END IF;
2316:
2317: x_measure_rec := p_Measure_Rec1;
2318:
2319: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Measure_Name);
2320: IF (l_ret = FND_API.G_FALSE) THEN
2321: x_measure_rec.Measure_Name := p_measure_rec.Measure_Name;
2322: END IF;
2323:
2324: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Description);
2321: x_measure_rec.Measure_Name := p_measure_rec.Measure_Name;
2322: END IF;
2323:
2324: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Description);
2325: IF (l_ret = FND_API.G_FALSE) THEN
2326: x_measure_rec.Description := p_measure_rec.Description;
2327: END IF;
2328:
2329: -- Added for P1 2565752
2327: END IF;
2328:
2329: -- Added for P1 2565752
2330: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Unit_Of_Measure_Class);
2331: IF (l_ret = FND_API.G_FALSE) THEN
2332: x_measure_rec.Unit_Of_Measure_Class := p_measure_rec.Unit_Of_Measure_Class;
2333: END IF;
2334:
2335: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ACTUAL_DATA_SOURCE_TYPE);
2332: x_measure_rec.Unit_Of_Measure_Class := p_measure_rec.Unit_Of_Measure_Class;
2333: END IF;
2334:
2335: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ACTUAL_DATA_SOURCE_TYPE);
2336: IF (l_ret = FND_API.G_FALSE) THEN
2337: x_measure_rec.ACTUAL_DATA_SOURCE_TYPE := p_measure_rec.ACTUAL_DATA_SOURCE_TYPE;
2338: END IF;
2339:
2340: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ACTUAL_DATA_SOURCE);
2337: x_measure_rec.ACTUAL_DATA_SOURCE_TYPE := p_measure_rec.ACTUAL_DATA_SOURCE_TYPE;
2338: END IF;
2339:
2340: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ACTUAL_DATA_SOURCE);
2341: IF (l_ret = FND_API.G_FALSE) THEN
2342: x_measure_rec.ACTUAL_DATA_SOURCE := p_measure_rec.ACTUAL_DATA_SOURCE;
2343: END IF;
2344:
2345: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.FUNCTION_NAME);
2342: x_measure_rec.ACTUAL_DATA_SOURCE := p_measure_rec.ACTUAL_DATA_SOURCE;
2343: END IF;
2344:
2345: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.FUNCTION_NAME);
2346: IF (l_ret = FND_API.G_FALSE) THEN
2347: x_measure_rec.FUNCTION_NAME := p_measure_rec.FUNCTION_NAME;
2348: END IF;
2349:
2350: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.COMPARISON_SOURCE);
2347: x_measure_rec.FUNCTION_NAME := p_measure_rec.FUNCTION_NAME;
2348: END IF;
2349:
2350: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.COMPARISON_SOURCE);
2351: IF (l_ret = FND_API.G_FALSE) THEN
2352: x_measure_rec.COMPARISON_SOURCE := p_measure_rec.COMPARISON_SOURCE;
2353: END IF;
2354:
2355:
2353: END IF;
2354:
2355:
2356: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.INCREASE_IN_MEASURE);
2357: IF (l_ret = FND_API.G_FALSE) THEN
2358: x_measure_rec.INCREASE_IN_MEASURE := p_measure_rec.INCREASE_IN_MEASURE;
2359: END IF;
2360:
2361: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ENABLE_LINK);
2358: x_measure_rec.INCREASE_IN_MEASURE := p_measure_rec.INCREASE_IN_MEASURE;
2359: END IF;
2360:
2361: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ENABLE_LINK);
2362: IF (l_ret = FND_API.G_FALSE) THEN
2363: x_measure_rec.ENABLE_LINK := p_measure_rec.ENABLE_LINK;
2364: END IF;
2365: -- 3031053
2366: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ENABLED);
2363: x_measure_rec.ENABLE_LINK := p_measure_rec.ENABLE_LINK;
2364: END IF;
2365: -- 3031053
2366: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.ENABLED);
2367: IF (l_ret = FND_API.G_FALSE) THEN
2368: x_measure_rec.ENABLED := p_measure_rec.ENABLED;
2369: END IF;
2370: --3031053
2371: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Obsolete); --3865711
2368: x_measure_rec.ENABLED := p_measure_rec.ENABLED;
2369: END IF;
2370: --3031053
2371: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Obsolete); --3865711
2372: IF (l_ret = FND_API.G_FALSE) THEN
2373: x_measure_rec.Obsolete := p_measure_rec.Obsolete;
2374: END IF;
2375: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Measure_Type); --3865711
2376: IF (l_ret = FND_API.G_FALSE) THEN
2372: IF (l_ret = FND_API.G_FALSE) THEN
2373: x_measure_rec.Obsolete := p_measure_rec.Obsolete;
2374: END IF;
2375: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Measure_Type); --3865711
2376: IF (l_ret = FND_API.G_FALSE) THEN
2377: x_measure_rec.Measure_Type := p_measure_rec.Measure_Type;
2378: END IF;
2379: --- 2465354
2380: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Application_Id);
2377: x_measure_rec.Measure_Type := p_measure_rec.Measure_Type;
2378: END IF;
2379: --- 2465354
2380: l_ret := BIS_UTILITIES_PUB.Value_Missing(p_measure_rec.Application_Id);
2381: IF (l_ret = FND_API.G_FALSE) THEN
2382: x_measure_rec.Application_Id := p_measure_rec.Application_Id;
2383: END IF;
2384: --- 2465354
2385:
2435:
2436: l_is_missing := BIS_UTILITIES_PUB.Value_Missing(p_dim_id);
2437: l_is_null := BIS_UTILITIES_PUB.Value_Null(p_dim_id);
2438:
2439: IF ( (l_is_missing = FND_API.G_TRUE)
2440: OR (l_is_null = FND_API.G_TRUE)
2441: ) THEN
2442: RETURN NULL;
2443: ELSE
2436: l_is_missing := BIS_UTILITIES_PUB.Value_Missing(p_dim_id);
2437: l_is_null := BIS_UTILITIES_PUB.Value_Null(p_dim_id);
2438:
2439: IF ( (l_is_missing = FND_API.G_TRUE)
2440: OR (l_is_null = FND_API.G_TRUE)
2441: ) THEN
2442: RETURN NULL;
2443: ELSE
2444: RETURN p_dim_id;
2456: -- 1) no Measure levels or targets exist
2457: -- 2) no users have selected to see actuals for the Measure
2458: Procedure Update_Measure
2459: ( p_api_version IN NUMBER
2460: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2461: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2462: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2463: , x_return_status OUT NOCOPY VARCHAR2
2464: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
2457: -- 2) no users have selected to see actuals for the Measure
2458: Procedure Update_Measure
2459: ( p_api_version IN NUMBER
2460: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2461: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2462: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2463: , x_return_status OUT NOCOPY VARCHAR2
2464: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
2465: )
2480:
2481: --commented RAISE
2482: EXCEPTION
2483: when others then
2484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2485: --added last two params
2486: l_error_tbl := x_error_tbl;
2487: BIS_UTILITIES_PVT.Add_Error_Message
2488: ( p_error_msg_id => SQLCODE
2490: , p_error_proc_name => G_PKG_NAME||'.Update_Measure'
2491: , p_error_table => l_error_tbl
2492: , x_error_table => x_error_tbl
2493: );
2494: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2495:
2496: END Update_Measure;
2497:
2498: --
2501: -- 1) no Measure levels or targets exist
2502: -- 2) no users have selected to see actuals for the Measure
2503: Procedure Update_Measure -- Changed for 2784713
2504: ( p_api_version IN NUMBER
2505: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2506: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2507: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2508: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
2509: , x_return_status OUT NOCOPY VARCHAR2
2502: -- 2) no users have selected to see actuals for the Measure
2503: Procedure Update_Measure -- Changed for 2784713
2504: ( p_api_version IN NUMBER
2505: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2506: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2507: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2508: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
2509: , x_return_status OUT NOCOPY VARCHAR2
2510: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
2518: l_Measure_Rec_Overlap BIS_MEASURE_PUB.Measure_Rec_Type;
2519: l_count NUMBER := 0;
2520: l_Measure_Id NUMBER;
2521: l_application_rec BIS_APPLICATION_PVT.Application_rec_type; --2465354
2522: l_own_appl VARCHAR2(100) := FND_API.G_FALSE ; --2465354
2523: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2524: l_Mapped_measure bis_indicators_tl.NAME%TYPE;
2525: l_Return_Status VARCHAR2(2000);
2526:
2534: , x_return_status
2535: , x_error_Tbl
2536: );
2537:
2538: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2539: RAISE FND_API.G_EXC_ERROR;
2540: END IF;
2541:
2542: --
2535: , x_error_Tbl
2536: );
2537:
2538: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2539: RAISE FND_API.G_EXC_ERROR;
2540: END IF;
2541:
2542: --
2543: BIS_MEASURE_PVT.Retrieve_Measure
2542: --
2543: BIS_MEASURE_PVT.Retrieve_Measure
2544: ( p_api_version => 1.0
2545: , p_Measure_Rec => p_Measure_Rec
2546: , p_all_info => FND_API.G_TRUE
2547: , x_Measure_Rec => l_measure_rec_Orig
2548: , x_return_status => x_return_status
2549: , x_error_Tbl => x_error_Tbl
2550: );
2559: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
2560: , p_error_table => l_error_tbl
2561: , x_error_table => x_error_tbl
2562: );
2563: RAISE FND_API.G_EXC_ERROR;
2564: end if;
2565:
2566: -- ankgoel: bug#3557236
2567: IF (p_Measure_rec.is_validate <> FND_API.G_FALSE) THEN
2563: RAISE FND_API.G_EXC_ERROR;
2564: end if;
2565:
2566: -- ankgoel: bug#3557236
2567: IF (p_Measure_rec.is_validate <> FND_API.G_FALSE) THEN
2568: -- mdamle 07/18/2003 - Check if measure is being mapped to a source
2569: -- that's already mapped to another measure.
2570: if isSourceColumnMappedAlready(p_Measure_rec, l_Mapped_measure) then
2571: l_error_tbl := x_error_tbl;
2579: , p_value1 => l_Mapped_measure
2580: , p_error_table => l_error_tbl
2581: , x_error_table => x_error_tbl
2582: );
2583: RAISE FND_API.G_EXC_ERROR;
2584: end if;
2585:
2586: --sawu: 9/2/04: need to validate compare-to column also for bug#3859267
2587: if isCompareColumnMappedAlready(p_Measure_rec, l_Mapped_measure) then
2596: , p_error_table => l_error_tbl
2597: , x_error_table => x_error_tbl
2598: );
2599:
2600: RAISE FND_API.G_EXC_ERROR;
2601: end if;
2602: END IF;
2603:
2604: l_Measure_Id := l_measure_rec_Orig.measure_id;
2617: , p_error_table => l_error_tbl
2618: , x_error_table => x_error_tbl
2619: );
2620:
2621: RAISE FND_API.G_EXC_ERROR;
2622: end if;
2623: end if;
2624: --
2625: BIS_TARGET_LEVEL_PVT.Count_Target_Levels( p_api_version =>1.0
2631:
2632: -- ankgoel: bug#3922308: This part of validation will only run for ldt uploads.
2633: -- The control coming from JAVA layer doesn't need this validation since all logic
2634: -- is present at JAVA layer itself.
2635: IF ( (l_count > 0) AND (p_Measure_rec.is_validate = FND_API.G_FALSE) AND
2636: ( NVL(l_Measure_Rec_Orig.dimension1_id,1) <> NVL(p_Measure_Rec.dimension1_id,1) OR
2637: NVL(l_Measure_Rec_Orig.dimension2_id,2) <> NVL(p_Measure_Rec.dimension2_id,2) OR
2638: NVL(l_Measure_Rec_Orig.dimension3_id,3) <> NVL(p_Measure_Rec.dimension3_id,3) OR
2639: NVL(l_Measure_Rec_Orig.dimension4_id,4) <> NVL(p_Measure_Rec.dimension4_id,4) OR
2651: , p_error_table => l_error_tbl
2652: , x_error_table => x_error_tbl
2653: );
2654:
2655: RAISE FND_API.G_EXC_ERROR;
2656: END IF;
2657:
2658: -- ankgoel: bug#3922308: Now that the user can update the actual data source
2659: -- for a measure, however the new souce having the same set of dimensions,
2660: -- it may happen that the order of set of dimensions is modified.
2661: -- Get dimensions from the original record in that order, so that bis_indicator_dimensions
2662: -- will still have the same sequence of dimensions.
2663: -- This will be done only if the measure has an existing summary level.
2664: IF ((l_count > 0) AND (p_Measure_rec.is_validate <> FND_API.G_FALSE)) THEN
2665: GetOriginalDimensions( p_Measure_Rec_Orig => l_Measure_Rec_Orig
2666: , p_Measure_Rec => p_Measure_Rec
2667: , x_Measure_Rec_Overlap => l_Measure_Rec_Overlap
2668: );
2737:
2738: --2465354
2739: l_application_rec.Application_id := l_Measure_Rec.Application_Id;
2740: IF (NVL(l_application_rec.Application_id,-1) <> -1 ) THEN
2741: l_own_appl := FND_API.G_TRUE;
2742: END IF;
2743:
2744: Update_Application_Measure
2745: ( p_api_version => p_api_version
2764: , p_owner => p_owner
2765: , x_return_status => l_Return_Status
2766: , x_error_Tbl => x_error_Tbl
2767: );
2768: IF (l_return_status IS NOT NULL AND l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2769: RAISE FND_API.G_EXC_ERROR;
2770: END IF;
2771: END IF;
2772:
2765: , x_return_status => l_Return_Status
2766: , x_error_Tbl => x_error_Tbl
2767: );
2768: IF (l_return_status IS NOT NULL AND l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2769: RAISE FND_API.G_EXC_ERROR;
2770: END IF;
2771: END IF;
2772:
2773: if (p_commit = FND_API.G_TRUE) then
2769: RAISE FND_API.G_EXC_ERROR;
2770: END IF;
2771: END IF;
2772:
2773: if (p_commit = FND_API.G_TRUE) then
2774: COMMIT;
2775: end if;
2776:
2777: --commented RAISE
2776:
2777: --commented RAISE
2778: EXCEPTION
2779: WHEN NO_DATA_FOUND THEN
2780: x_return_status := FND_API.G_RET_STS_ERROR ;
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2777: --commented RAISE
2778: EXCEPTION
2779: WHEN NO_DATA_FOUND THEN
2780: x_return_status := FND_API.G_RET_STS_ERROR ;
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2778: EXCEPTION
2779: WHEN NO_DATA_FOUND THEN
2780: x_return_status := FND_API.G_RET_STS_ERROR ;
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2779: WHEN NO_DATA_FOUND THEN
2780: x_return_status := FND_API.G_RET_STS_ERROR ;
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2780: x_return_status := FND_API.G_RET_STS_ERROR ;
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2788: when others then
2781: --RAISE FND_API.G_EXC_ERROR;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2788: when others then
2789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2782: when FND_API.G_EXC_ERROR then
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2788: when others then
2789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2790: --added last two params
2783: x_return_status := FND_API.G_RET_STS_ERROR ;
2784: -- RAISE FND_API.G_EXC_ERROR;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2788: when others then
2789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2790: --added last two params
2791: l_error_tbl := x_error_tbl;
2785: when FND_API.G_EXC_UNEXPECTED_ERROR then
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2787: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2788: when others then
2789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2790: --added last two params
2791: l_error_tbl := x_error_tbl;
2792: BIS_UTILITIES_PVT.Add_Error_Message
2793: ( p_error_msg_id => SQLCODE
2795: , p_error_proc_name => G_PKG_NAME||'.Update_Measure'
2796: , p_error_table => l_error_tbl
2797: , x_error_table => x_error_tbl
2798: );
2799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2800:
2801: END Update_Measure;
2802:
2803: --
2806: --The latest lct file. The lct file can call Load_Measure which calls this
2807: --by passing in Org and Time dimension short_names also
2808: Procedure Update_Measure
2809: ( p_api_version IN NUMBER
2810: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2811: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2812: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2813: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
2814: , p_Org_Dimension_ID IN NUMBER
2807: --by passing in Org and Time dimension short_names also
2808: Procedure Update_Measure
2809: ( p_api_version IN NUMBER
2810: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2811: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2812: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2813: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
2814: , p_Org_Dimension_ID IN NUMBER
2815: , p_Time_Dimension_ID IN NUMBER
2823: l_Measure_Rec_Orig BIS_MEASURE_PUB.Measure_Rec_Type;
2824: l_count NUMBER := 0;
2825: l_Measure_Id NUMBER;
2826: l_application_rec BIS_APPLICATION_PVT.Application_rec_type; --2465354
2827: l_own_appl VARCHAR2(100) := FND_API.G_FALSE ; --2465354
2828: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2829: BEGIN
2830: -- l_measure_rec := p_measure_rec;
2831:
2836: , x_return_status
2837: , x_error_Tbl
2838: );
2839:
2840: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2841: RAISE FND_API.G_EXC_ERROR;
2842: END IF;
2843:
2844: --added this call to validate Org Dimension
2837: , x_error_Tbl
2838: );
2839:
2840: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2841: RAISE FND_API.G_EXC_ERROR;
2842: END IF;
2843:
2844: --added this call to validate Org Dimension
2845: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
2844: --added this call to validate Org Dimension
2845: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
2846: ( p_api_version => p_api_version
2847: , p_dimension_id => p_Org_Dimension_ID
2848: , p_dimension_short_name => FND_API.G_MISS_CHAR
2849: , x_return_status => x_return_status
2850: , x_error_Tbl => x_error_Tbl
2851: );
2852: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2848: , p_dimension_short_name => FND_API.G_MISS_CHAR
2849: , x_return_status => x_return_status
2850: , x_error_Tbl => x_error_Tbl
2851: );
2852: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2853: RAISE FND_API.G_EXC_ERROR;
2854: END IF;
2855:
2856: --added this call to validate Time Dimension
2849: , x_return_status => x_return_status
2850: , x_error_Tbl => x_error_Tbl
2851: );
2852: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2853: RAISE FND_API.G_EXC_ERROR;
2854: END IF;
2855:
2856: --added this call to validate Time Dimension
2857: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
2856: --added this call to validate Time Dimension
2857: BIS_MEASURE_VALIDATE_PVT.Validate_Dimension_Id
2858: ( p_api_version => p_api_version
2859: , p_dimension_id => p_Time_Dimension_ID
2860: , p_dimension_short_name => FND_API.G_MISS_CHAR
2861: , x_return_status => x_return_status
2862: , x_error_Tbl => x_error_Tbl
2863: );
2864: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2860: , p_dimension_short_name => FND_API.G_MISS_CHAR
2861: , x_return_status => x_return_status
2862: , x_error_Tbl => x_error_Tbl
2863: );
2864: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2865: RAISE FND_API.G_EXC_ERROR;
2866: END IF;
2867: --
2868: BIS_MEASURE_PVT.Retrieve_Measure
2861: , x_return_status => x_return_status
2862: , x_error_Tbl => x_error_Tbl
2863: );
2864: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2865: RAISE FND_API.G_EXC_ERROR;
2866: END IF;
2867: --
2868: BIS_MEASURE_PVT.Retrieve_Measure
2869: ( p_api_version => 1.0
2867: --
2868: BIS_MEASURE_PVT.Retrieve_Measure
2869: ( p_api_version => 1.0
2870: , p_Measure_Rec => p_Measure_Rec
2871: , p_all_info => FND_API.G_FALSE
2872: , x_Measure_Rec => l_measure_rec_Orig
2873: , x_return_status => x_return_status
2874: , x_error_Tbl => x_error_Tbl
2875: );
2890: , p_error_table => l_error_tbl
2891: , x_error_table => x_error_tbl
2892: );
2893:
2894: RAISE FND_API.G_EXC_ERROR;
2895: end if;
2896: end if;
2897: --
2898: BIS_TARGET_LEVEL_PVT.Count_Target_Levels( p_api_version =>1.0
2921: , p_error_table => l_error_tbl
2922: , x_error_table => x_error_tbl
2923: );
2924:
2925: RAISE FND_API.G_EXC_ERROR;
2926: END IF;
2927:
2928: -- retrieve record from database and apply changes
2929:
2987:
2988: --2465354
2989: l_application_rec.Application_id := l_Measure_Rec.Application_Id;
2990: IF (NVL(l_application_rec.Application_id,-1) <> -1 ) THEN
2991: l_own_appl := FND_API.G_TRUE;
2992: END IF;
2993:
2994: Update_Application_Measure
2995: ( p_api_version => p_api_version
3002: , x_error_Tbl => x_error_Tbl
3003: );
3004: --2465354
3005:
3006: if (p_commit = FND_API.G_TRUE) then
3007: COMMIT;
3008: end if;
3009:
3010: --commented RAISE
3009:
3010: --commented RAISE
3011: EXCEPTION
3012: WHEN NO_DATA_FOUND THEN
3013: x_return_status := FND_API.G_RET_STS_ERROR ;
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3010: --commented RAISE
3011: EXCEPTION
3012: WHEN NO_DATA_FOUND THEN
3013: x_return_status := FND_API.G_RET_STS_ERROR ;
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3011: EXCEPTION
3012: WHEN NO_DATA_FOUND THEN
3013: x_return_status := FND_API.G_RET_STS_ERROR ;
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3012: WHEN NO_DATA_FOUND THEN
3013: x_return_status := FND_API.G_RET_STS_ERROR ;
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3013: x_return_status := FND_API.G_RET_STS_ERROR ;
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3021: when others then
3014: --RAISE FND_API.G_EXC_ERROR;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3021: when others then
3022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3015: when FND_API.G_EXC_ERROR then
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3021: when others then
3022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3023: --added last two params
3016: x_return_status := FND_API.G_RET_STS_ERROR ;
3017: -- RAISE FND_API.G_EXC_ERROR;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3021: when others then
3022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3023: --added last two params
3024: l_error_tbl := x_error_tbl;
3018: when FND_API.G_EXC_UNEXPECTED_ERROR then
3019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3020: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3021: when others then
3022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3023: --added last two params
3024: l_error_tbl := x_error_tbl;
3025: BIS_UTILITIES_PVT.Add_Error_Message
3026: ( p_error_msg_id => SQLCODE
3028: , p_error_proc_name => G_PKG_NAME||'.Update_Measure'
3029: , p_error_table => l_error_tbl
3030: , x_error_table => x_error_tbl
3031: );
3032: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3033:
3034: END Update_Measure;
3035:
3036: --
3041: -- 3) no users have selected to see actuals for the Measure
3042: --
3043: Procedure Delete_Measure
3044: ( p_api_version IN NUMBER
3045: , p_commit IN VARCHAR2 := FND_API.G_FALSE
3046: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3047: , x_return_status OUT NOCOPY VARCHAR2
3048: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3049: )
3052: l_dcount number;
3053: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3054: BEGIN
3055:
3056: x_return_status := FND_API.G_RET_STS_SUCCESS;
3057: BIS_Target_Level_PVT.Count_Target_Levels( p_api_version
3058: , p_Measure_Rec
3059: , l_count
3060: , x_return_status
3071: , p_error_table => l_error_tbl
3072: , x_error_table => x_error_tbl
3073: );
3074:
3075: RAISE FND_API.G_EXC_ERROR;
3076: end if;
3077:
3078: --added the select and the count check
3079: select count(1) into l_dcount from bis_application_measures
3087: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
3088: , p_error_table => l_error_tbl
3089: , x_error_table => x_error_tbl
3090: );
3091: RAISE FND_API.G_EXC_ERROR;
3092: END IF;
3093: ---
3094:
3095: delete from bis_application_measures
3109:
3110: delete from bis_indicators
3111: where indicator_id = p_Measure_Rec.Measure_Id;
3112:
3113: if (p_commit = FND_API.G_TRUE) then
3114: commit;
3115: end if;
3116:
3117: --commented RAISE
3116:
3117: --commented RAISE
3118: EXCEPTION
3119: WHEN NO_DATA_FOUND THEN
3120: x_return_status := FND_API.G_RET_STS_ERROR ;
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3117: --commented RAISE
3118: EXCEPTION
3119: WHEN NO_DATA_FOUND THEN
3120: x_return_status := FND_API.G_RET_STS_ERROR ;
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3118: EXCEPTION
3119: WHEN NO_DATA_FOUND THEN
3120: x_return_status := FND_API.G_RET_STS_ERROR ;
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3119: WHEN NO_DATA_FOUND THEN
3120: x_return_status := FND_API.G_RET_STS_ERROR ;
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3120: x_return_status := FND_API.G_RET_STS_ERROR ;
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3128: when others then
3121: --RAISE FND_API.G_EXC_ERROR;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3128: when others then
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3122: when FND_API.G_EXC_ERROR then
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3128: when others then
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3130: --added last two params
3123: x_return_status := FND_API.G_RET_STS_ERROR ;
3124: --RAISE FND_API.G_EXC_ERROR;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3128: when others then
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3130: --added last two params
3131: l_error_tbl := x_error_tbl;
3125: when FND_API.G_EXC_UNEXPECTED_ERROR then
3126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3127: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3128: when others then
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3130: --added last two params
3131: l_error_tbl := x_error_tbl;
3132: BIS_UTILITIES_PVT.Add_Error_Message
3133: ( p_error_msg_id => SQLCODE
3135: , p_error_proc_name => G_PKG_NAME||'.Delete_Measure'
3136: , p_error_table => l_error_tbl
3137: , x_error_table => x_error_tbl
3138: );
3139: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3140:
3141: END Delete_Measure;
3142: --
3143: --
3142: --
3143: --
3144: Procedure Translate_Measure
3145: ( p_api_version IN NUMBER
3146: , p_commit IN VARCHAR2 := FND_API.G_FALSE
3147: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3148: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3149: , x_return_status OUT NOCOPY VARCHAR2
3150: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3143: --
3144: Procedure Translate_Measure
3145: ( p_api_version IN NUMBER
3146: , p_commit IN VARCHAR2 := FND_API.G_FALSE
3147: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3148: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3149: , x_return_status OUT NOCOPY VARCHAR2
3150: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3151: )
3164: );
3165: --commented RAISE
3166: EXCEPTION
3167: when others then
3168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3169: --added last two params
3170: l_error_tbl := x_error_tbl;
3171: BIS_UTILITIES_PVT.Add_Error_Message
3172: ( p_error_msg_id => SQLCODE
3174: , p_error_proc_name => G_PKG_NAME||'.Translate_Measure'
3175: , p_error_table => l_error_tbl
3176: , x_error_table => x_error_tbl
3177: );
3178: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3179:
3180: END Translate_Measure;
3181: --
3182: --
3181: --
3182: --
3183: Procedure Translate_Measure
3184: ( p_api_version IN NUMBER
3185: , p_commit IN VARCHAR2 := FND_API.G_FALSE
3186: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3187: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3188: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
3189: , x_return_status OUT NOCOPY VARCHAR2
3182: --
3183: Procedure Translate_Measure
3184: ( p_api_version IN NUMBER
3185: , p_commit IN VARCHAR2 := FND_API.G_FALSE
3186: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3187: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3188: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
3189: , x_return_status OUT NOCOPY VARCHAR2
3190: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3204: --
3205: BIS_MEASURE_PVT.Retrieve_Measure
3206: ( p_api_version => 1.0
3207: , p_Measure_Rec => l_Measure_Rec
3208: , p_all_info => FND_API.G_FALSE
3209: , x_Measure_Rec => l_measure_rec_Orig
3210: , x_return_status => x_return_status
3211: , x_error_Tbl => x_error_Tbl
3212: );
3218: , x_return_status
3219: , x_error_Tbl
3220: );
3221:
3222: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3223: RAISE FND_API.G_EXC_ERROR;
3224: END IF;
3225:
3226: /*
3219: , x_error_Tbl
3220: );
3221:
3222: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3223: RAISE FND_API.G_EXC_ERROR;
3224: END IF;
3225:
3226: /*
3227: if (l_measure_rec_Orig.measure_id is NOT NULL) then
3235: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
3236: , p_error_table => l_error_tbl
3237: , x_error_table => x_error_tbl
3238: );
3239: RAISE FND_API.G_EXC_ERROR;
3240: end if;
3241: end if;
3242:
3243: -- retrieve record from database and apply changes
3264: , SOURCE_LANG = userenv('LANG')
3265: where INDICATOR_ID = l_Measure_Rec_orig.Measure_Id
3266: and userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
3267:
3268: if (p_commit = FND_API.G_TRUE) then
3269: COMMIT;
3270: end if;
3271:
3272: --commented RAISE
3271:
3272: --commented RAISE
3273: EXCEPTION
3274: WHEN NO_DATA_FOUND THEN
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3272: --commented RAISE
3273: EXCEPTION
3274: WHEN NO_DATA_FOUND THEN
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3273: EXCEPTION
3274: WHEN NO_DATA_FOUND THEN
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3274: WHEN NO_DATA_FOUND THEN
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3283: when others then
3276: -- RAISE FND_API.G_EXC_ERROR;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3283: when others then
3284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3277: when FND_API.G_EXC_ERROR then
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3283: when others then
3284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3285: --added last two params
3278: x_return_status := FND_API.G_RET_STS_ERROR ;
3279: -- RAISE FND_API.G_EXC_ERROR;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3283: when others then
3284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3285: --added last two params
3286: l_error_tbl := x_error_tbl;
3280: when FND_API.G_EXC_UNEXPECTED_ERROR then
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3282: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3283: when others then
3284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3285: --added last two params
3286: l_error_tbl := x_error_tbl;
3287: BIS_UTILITIES_PVT.Add_Error_Message
3288: ( p_error_msg_id => SQLCODE
3290: , p_error_proc_name => G_PKG_NAME||'.Translate_Measure'
3291: , p_error_table => l_error_tbl
3292: , x_error_table => x_error_tbl
3293: );
3294: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3295:
3296: END Translate_Measure;
3297: --
3298: -- Validates measure
3297: --
3298: -- Validates measure
3299: PROCEDURE Validate_Measure
3300: ( p_api_version IN NUMBER
3301: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3302: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3303: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
3304: , x_return_status OUT NOCOPY VARCHAR2
3305: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3305: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
3306: )
3307: IS
3308: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3309: l_error VARCHAR2(10) := FND_API.G_FALSE;
3310: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
3311: l_region_code varchar2(30);
3312: l_pos number;
3313: l_source_column varchar2(30);
3321: , x_return_status => x_return_status
3322: , x_error_Tbl => l_error_Tbl
3323: );
3324: --EXCEPTION
3325: --when FND_API.G_EXC_ERROR then
3326: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3327: l_error := FND_API.G_TRUE;
3328: l_error_Tbl_p := x_error_Tbl;
3329: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3322: , x_error_Tbl => l_error_Tbl
3323: );
3324: --EXCEPTION
3325: --when FND_API.G_EXC_ERROR then
3326: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3327: l_error := FND_API.G_TRUE;
3328: l_error_Tbl_p := x_error_Tbl;
3329: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3330: , l_error_Tbl
3323: );
3324: --EXCEPTION
3325: --when FND_API.G_EXC_ERROR then
3326: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3327: l_error := FND_API.G_TRUE;
3328: l_error_Tbl_p := x_error_Tbl;
3329: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3330: , l_error_Tbl
3331: , x_error_tbl
3329: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3330: , l_error_Tbl
3331: , x_error_tbl
3332: );
3333: x_return_status := FND_API.G_RET_STS_ERROR;
3334: END IF;
3335: END;
3336:
3337: BEGIN
3342: , x_return_status => x_return_status
3343: , x_error_Tbl => l_error_Tbl
3344: );
3345: --EXCEPTION
3346: --when FND_API.G_EXC_ERROR then
3347: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3348: l_error := FND_API.G_TRUE;
3349: l_error_Tbl_p := x_error_Tbl;
3350: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3343: , x_error_Tbl => l_error_Tbl
3344: );
3345: --EXCEPTION
3346: --when FND_API.G_EXC_ERROR then
3347: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3348: l_error := FND_API.G_TRUE;
3349: l_error_Tbl_p := x_error_Tbl;
3350: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3351: , l_error_Tbl
3344: );
3345: --EXCEPTION
3346: --when FND_API.G_EXC_ERROR then
3347: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3348: l_error := FND_API.G_TRUE;
3349: l_error_Tbl_p := x_error_Tbl;
3350: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3351: , l_error_Tbl
3352: , x_error_tbl
3350: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3351: , l_error_Tbl
3352: , x_error_tbl
3353: );
3354: x_return_status := FND_API.G_RET_STS_ERROR;
3355: END IF;
3356: END;
3357:
3358: BEGIN
3363: , x_return_status => x_return_status
3364: , x_error_Tbl => l_error_Tbl
3365: );
3366: -- EXCEPTION
3367: -- when FND_API.G_EXC_ERROR then
3368: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3369: l_error := FND_API.G_TRUE;
3370: l_error_Tbl_p := x_error_Tbl;
3371: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3364: , x_error_Tbl => l_error_Tbl
3365: );
3366: -- EXCEPTION
3367: -- when FND_API.G_EXC_ERROR then
3368: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3369: l_error := FND_API.G_TRUE;
3370: l_error_Tbl_p := x_error_Tbl;
3371: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3372: , l_error_Tbl
3365: );
3366: -- EXCEPTION
3367: -- when FND_API.G_EXC_ERROR then
3368: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3369: l_error := FND_API.G_TRUE;
3370: l_error_Tbl_p := x_error_Tbl;
3371: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3372: , l_error_Tbl
3373: , x_error_tbl
3371: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3372: , l_error_Tbl
3373: , x_error_tbl
3374: );
3375: x_return_status := FND_API.G_RET_STS_ERROR;
3376: END IF;
3377: END;
3378:
3379: BEGIN
3384: , x_return_status => x_return_status
3385: , x_error_Tbl => l_error_Tbl
3386: );
3387: --EXCEPTION
3388: --when FND_API.G_EXC_ERROR then
3389: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3390: l_error := FND_API.G_TRUE;
3391: l_error_Tbl_p := x_error_Tbl;
3392: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3385: , x_error_Tbl => l_error_Tbl
3386: );
3387: --EXCEPTION
3388: --when FND_API.G_EXC_ERROR then
3389: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3390: l_error := FND_API.G_TRUE;
3391: l_error_Tbl_p := x_error_Tbl;
3392: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3393: , l_error_Tbl
3386: );
3387: --EXCEPTION
3388: --when FND_API.G_EXC_ERROR then
3389: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3390: l_error := FND_API.G_TRUE;
3391: l_error_Tbl_p := x_error_Tbl;
3392: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3393: , l_error_Tbl
3394: , x_error_tbl
3392: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3393: , l_error_Tbl
3394: , x_error_tbl
3395: );
3396: x_return_status := FND_API.G_RET_STS_ERROR;
3397: END IF;
3398: END;
3399:
3400:
3406: , x_return_status => x_return_status
3407: , x_error_Tbl => l_error_Tbl
3408: );
3409: -- EXCEPTION
3410: -- when FND_API.G_EXC_ERROR then
3411: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3412: l_error := FND_API.G_TRUE;
3413: l_error_Tbl_p := x_error_Tbl;
3414: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3407: , x_error_Tbl => l_error_Tbl
3408: );
3409: -- EXCEPTION
3410: -- when FND_API.G_EXC_ERROR then
3411: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3412: l_error := FND_API.G_TRUE;
3413: l_error_Tbl_p := x_error_Tbl;
3414: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3415: , l_error_Tbl
3408: );
3409: -- EXCEPTION
3410: -- when FND_API.G_EXC_ERROR then
3411: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3412: l_error := FND_API.G_TRUE;
3413: l_error_Tbl_p := x_error_Tbl;
3414: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3415: , l_error_Tbl
3416: , x_error_tbl
3414: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3415: , l_error_Tbl
3416: , x_error_tbl
3417: );
3418: x_return_status := FND_API.G_RET_STS_ERROR;
3419: END IF;
3420: END;
3421:
3422: BEGIN
3427: , x_return_status => x_return_status
3428: , x_error_Tbl => l_error_Tbl
3429: );
3430: --EXCEPTION
3431: --when FND_API.G_EXC_ERROR then
3432: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3433: l_error := FND_API.G_TRUE;
3434: l_error_Tbl_p := x_error_Tbl;
3435: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3428: , x_error_Tbl => l_error_Tbl
3429: );
3430: --EXCEPTION
3431: --when FND_API.G_EXC_ERROR then
3432: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3433: l_error := FND_API.G_TRUE;
3434: l_error_Tbl_p := x_error_Tbl;
3435: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3436: , l_error_Tbl
3429: );
3430: --EXCEPTION
3431: --when FND_API.G_EXC_ERROR then
3432: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3433: l_error := FND_API.G_TRUE;
3434: l_error_Tbl_p := x_error_Tbl;
3435: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3436: , l_error_Tbl
3437: , x_error_tbl
3435: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3436: , l_error_Tbl
3437: , x_error_tbl
3438: );
3439: x_return_status := FND_API.G_RET_STS_ERROR;
3440: END IF;
3441: END;
3442:
3443: BEGIN
3448: , x_return_status => x_return_status
3449: , x_error_Tbl => l_error_Tbl
3450: );
3451: --EXCEPTION
3452: --when FND_API.G_EXC_ERROR then
3453: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3454: l_error := FND_API.G_TRUE;
3455: l_error_Tbl_p := x_error_Tbl;
3456: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3449: , x_error_Tbl => l_error_Tbl
3450: );
3451: --EXCEPTION
3452: --when FND_API.G_EXC_ERROR then
3453: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3454: l_error := FND_API.G_TRUE;
3455: l_error_Tbl_p := x_error_Tbl;
3456: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3457: , l_error_Tbl
3450: );
3451: --EXCEPTION
3452: --when FND_API.G_EXC_ERROR then
3453: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3454: l_error := FND_API.G_TRUE;
3455: l_error_Tbl_p := x_error_Tbl;
3456: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3457: , l_error_Tbl
3458: , x_error_tbl
3456: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3457: , l_error_Tbl
3458: , x_error_tbl
3459: );
3460: x_return_status := FND_API.G_RET_STS_ERROR;
3461: END IF;
3462: END;
3463:
3464: -- Fix for 1850860 starts here
3470: , x_return_status => x_return_status
3471: , x_error_Tbl => l_error_Tbl
3472: );
3473: --EXCEPTION
3474: --when FND_API.G_EXC_ERROR then
3475: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3476: l_error := FND_API.G_TRUE;
3477: l_error_Tbl_p := x_error_Tbl;
3478: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3471: , x_error_Tbl => l_error_Tbl
3472: );
3473: --EXCEPTION
3474: --when FND_API.G_EXC_ERROR then
3475: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3476: l_error := FND_API.G_TRUE;
3477: l_error_Tbl_p := x_error_Tbl;
3478: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3479: , l_error_Tbl
3472: );
3473: --EXCEPTION
3474: --when FND_API.G_EXC_ERROR then
3475: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3476: l_error := FND_API.G_TRUE;
3477: l_error_Tbl_p := x_error_Tbl;
3478: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3479: , l_error_Tbl
3480: , x_error_tbl
3478: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3479: , l_error_Tbl
3480: , x_error_tbl
3481: );
3482: x_return_status := FND_API.G_RET_STS_ERROR;
3483: END IF;
3484: END;
3485: --
3486:
3503: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
3504: , p_error_table => l_error_tbl
3505: , x_error_table => x_error_tbl
3506: );
3507: RAISE FND_API.G_EXC_ERROR;
3508: end if;
3509:
3510:
3511: IF p_owner = BIS_UTILITIES_PUB.G_CUSTOM_OWNER THEN --2240105
3517: , x_return_status => x_return_status
3518: , x_error_Tbl => l_error_Tbl
3519: );
3520: --EXCEPTION
3521: --when FND_API.G_EXC_ERROR then
3522: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3523: l_error := FND_API.G_TRUE;
3524: l_error_Tbl_p := x_error_Tbl;
3525: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3518: , x_error_Tbl => l_error_Tbl
3519: );
3520: --EXCEPTION
3521: --when FND_API.G_EXC_ERROR then
3522: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3523: l_error := FND_API.G_TRUE;
3524: l_error_Tbl_p := x_error_Tbl;
3525: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3526: , l_error_Tbl
3519: );
3520: --EXCEPTION
3521: --when FND_API.G_EXC_ERROR then
3522: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3523: l_error := FND_API.G_TRUE;
3524: l_error_Tbl_p := x_error_Tbl;
3525: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3526: , l_error_Tbl
3527: , x_error_tbl
3525: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3526: , l_error_Tbl
3527: , x_error_tbl
3528: );
3529: x_return_status := FND_API.G_RET_STS_ERROR;
3530: END IF;
3531: END;
3532: --
3533: BEGIN
3538: , x_return_status => x_return_status
3539: , x_error_Tbl => l_error_Tbl
3540: );
3541: --EXCEPTION
3542: --when FND_API.G_EXC_ERROR then
3543: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3544: l_error := FND_API.G_TRUE;
3545: l_error_Tbl_p := x_error_Tbl;
3546: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3539: , x_error_Tbl => l_error_Tbl
3540: );
3541: --EXCEPTION
3542: --when FND_API.G_EXC_ERROR then
3543: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3544: l_error := FND_API.G_TRUE;
3545: l_error_Tbl_p := x_error_Tbl;
3546: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3547: , l_error_Tbl
3540: );
3541: --EXCEPTION
3542: --when FND_API.G_EXC_ERROR then
3543: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3544: l_error := FND_API.G_TRUE;
3545: l_error_Tbl_p := x_error_Tbl;
3546: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3547: , l_error_Tbl
3548: , x_error_tbl
3546: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3547: , l_error_Tbl
3548: , x_error_tbl
3549: );
3550: x_return_status := FND_API.G_RET_STS_ERROR;
3551: END IF;
3552: END;
3553: --
3554: BEGIN
3559: , x_return_status => x_return_status
3560: , x_error_Tbl => l_error_Tbl
3561: );
3562: --EXCEPTION
3563: --when FND_API.G_EXC_ERROR then
3564: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3565: l_error := FND_API.G_TRUE;
3566: l_error_Tbl_p := x_error_Tbl;
3567: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3560: , x_error_Tbl => l_error_Tbl
3561: );
3562: --EXCEPTION
3563: --when FND_API.G_EXC_ERROR then
3564: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3565: l_error := FND_API.G_TRUE;
3566: l_error_Tbl_p := x_error_Tbl;
3567: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3568: , l_error_Tbl
3561: );
3562: --EXCEPTION
3563: --when FND_API.G_EXC_ERROR then
3564: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3565: l_error := FND_API.G_TRUE;
3566: l_error_Tbl_p := x_error_Tbl;
3567: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3568: , l_error_Tbl
3569: , x_error_tbl
3567: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3568: , l_error_Tbl
3569: , x_error_tbl
3570: );
3571: x_return_status := FND_API.G_RET_STS_ERROR;
3572: END IF;
3573: END;
3574: --
3575: END IF; -- 2240105
3581: , x_return_status => x_return_status
3582: , x_error_Tbl => l_error_Tbl
3583: );
3584: --EXCEPTION
3585: --when FND_API.G_EXC_ERROR then
3586: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3587: l_error := FND_API.G_TRUE;
3588: l_error_Tbl_p := x_error_Tbl;
3589: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3582: , x_error_Tbl => l_error_Tbl
3583: );
3584: --EXCEPTION
3585: --when FND_API.G_EXC_ERROR then
3586: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3587: l_error := FND_API.G_TRUE;
3588: l_error_Tbl_p := x_error_Tbl;
3589: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3590: , l_error_Tbl
3583: );
3584: --EXCEPTION
3585: --when FND_API.G_EXC_ERROR then
3586: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3587: l_error := FND_API.G_TRUE;
3588: l_error_Tbl_p := x_error_Tbl;
3589: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3590: , l_error_Tbl
3591: , x_error_tbl
3589: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3590: , l_error_Tbl
3591: , x_error_tbl
3592: );
3593: x_return_status := FND_API.G_RET_STS_ERROR;
3594: END IF;
3595: END;
3596: -- Fix for 1850860 ends here
3597: -- 2440739
3602: , p_MEASURE_Rec => p_MEASURE_Rec
3603: , x_return_status => x_return_status
3604: , x_error_Tbl => l_error_Tbl
3605: );
3606: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3607: l_error := FND_API.G_TRUE;
3608: l_error_Tbl_p := x_error_Tbl;
3609: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3610: , l_error_Tbl
3603: , x_return_status => x_return_status
3604: , x_error_Tbl => l_error_Tbl
3605: );
3606: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3607: l_error := FND_API.G_TRUE;
3608: l_error_Tbl_p := x_error_Tbl;
3609: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3610: , l_error_Tbl
3611: , x_error_tbl
3609: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3610: , l_error_Tbl
3611: , x_error_tbl
3612: );
3613: x_return_status := FND_API.G_RET_STS_ERROR;
3614: END IF;
3615: END;
3616: -- 2440739
3617:
3624: , p_MEASURE_Rec => p_MEASURE_Rec
3625: , x_return_status => x_return_status
3626: , x_error_Tbl => l_error_Tbl
3627: );
3628: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3629: l_error := FND_API.G_TRUE;
3630: l_error_Tbl_p := x_error_Tbl;
3631: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3632: , l_error_Tbl
3625: , x_return_status => x_return_status
3626: , x_error_Tbl => l_error_Tbl
3627: );
3628: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3629: l_error := FND_API.G_TRUE;
3630: l_error_Tbl_p := x_error_Tbl;
3631: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3632: , l_error_Tbl
3633: , x_error_tbl
3631: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3632: , l_error_Tbl
3633: , x_error_tbl
3634: );
3635: x_return_status := FND_API.G_RET_STS_ERROR;
3636: END IF;
3637: END;
3638: -- 3031053
3639: BEGIN --3865711
3643: , p_MEASURE_Rec => p_MEASURE_Rec
3644: , x_return_status => x_return_status
3645: , x_error_Tbl => l_error_Tbl
3646: );
3647: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3648: l_error := FND_API.G_TRUE;
3649: l_error_Tbl_p := x_error_Tbl;
3650: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3651: , l_error_Tbl
3644: , x_return_status => x_return_status
3645: , x_error_Tbl => l_error_Tbl
3646: );
3647: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3648: l_error := FND_API.G_TRUE;
3649: l_error_Tbl_p := x_error_Tbl;
3650: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3651: , l_error_Tbl
3652: , x_error_tbl
3650: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3651: , l_error_Tbl
3652: , x_error_tbl
3653: );
3654: x_return_status := FND_API.G_RET_STS_ERROR;
3655: END IF;
3656: END;
3657:
3658: BEGIN
3662: , p_MEASURE_Rec => p_MEASURE_Rec
3663: , x_return_status => x_return_status
3664: , x_error_Tbl => l_error_Tbl
3665: );
3666: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3667: l_error := FND_API.G_TRUE;
3668: l_error_Tbl_p := x_error_Tbl;
3669: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3670: , l_error_Tbl
3663: , x_return_status => x_return_status
3664: , x_error_Tbl => l_error_Tbl
3665: );
3666: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3667: l_error := FND_API.G_TRUE;
3668: l_error_Tbl_p := x_error_Tbl;
3669: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3670: , l_error_Tbl
3671: , x_error_tbl
3669: BIS_UTILITIES_PVT.concatenateErrorTables( l_error_Tbl_p
3670: , l_error_Tbl
3671: , x_error_tbl
3672: );
3673: x_return_status := FND_API.G_RET_STS_ERROR;
3674: END IF;
3675: END;
3676:
3677: if (l_error = FND_API.G_TRUE) then
3673: x_return_status := FND_API.G_RET_STS_ERROR;
3674: END IF;
3675: END;
3676:
3677: if (l_error = FND_API.G_TRUE) then
3678: RAISE FND_API.G_EXC_ERROR;
3679: end if;
3680:
3681: --commented RAISE
3674: END IF;
3675: END;
3676:
3677: if (l_error = FND_API.G_TRUE) then
3678: RAISE FND_API.G_EXC_ERROR;
3679: end if;
3680:
3681: --commented RAISE
3682: EXCEPTION
3680:
3681: --commented RAISE
3682: EXCEPTION
3683: WHEN NO_DATA_FOUND THEN
3684: x_return_status := FND_API.G_RET_STS_ERROR ;
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3681: --commented RAISE
3682: EXCEPTION
3683: WHEN NO_DATA_FOUND THEN
3684: x_return_status := FND_API.G_RET_STS_ERROR ;
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3682: EXCEPTION
3683: WHEN NO_DATA_FOUND THEN
3684: x_return_status := FND_API.G_RET_STS_ERROR ;
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3683: WHEN NO_DATA_FOUND THEN
3684: x_return_status := FND_API.G_RET_STS_ERROR ;
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3684: x_return_status := FND_API.G_RET_STS_ERROR ;
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3692: when others then
3685: -- RAISE FND_API.G_EXC_ERROR;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3692: when others then
3693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3686: when FND_API.G_EXC_ERROR then
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3692: when others then
3693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3694: --added last two params
3687: x_return_status := FND_API.G_RET_STS_ERROR ;
3688: -- RAISE FND_API.G_EXC_ERROR;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3692: when others then
3693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3694: --added last two params
3695: l_error_Tbl := x_error_tbl;
3689: when FND_API.G_EXC_UNEXPECTED_ERROR then
3690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3691: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3692: when others then
3693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3694: --added last two params
3695: l_error_Tbl := x_error_tbl;
3696: BIS_UTILITIES_PVT.Add_Error_Message
3697: ( p_error_msg_id => SQLCODE
3699: , p_error_proc_name => G_PKG_NAME||'.Validate_Measure'
3700: , p_error_table => l_error_Tbl
3701: , x_error_table => x_error_tbl
3702: );
3703: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3704:
3705: END Validate_Measure;
3706: --
3707: -- Value - ID conversion
3715: IS
3716: l_convert VARCHAR2(32000);
3717: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3718: BEGIN
3719: x_return_status := FND_API.G_RET_STS_SUCCESS;
3720: x_Measure_Rec := p_Measure_Rec;
3721:
3722: if (BIS_UTILITIES_PUB.Value_Missing
3723: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
3719: x_return_status := FND_API.G_RET_STS_SUCCESS;
3720: x_Measure_Rec := p_Measure_Rec;
3721:
3722: if (BIS_UTILITIES_PUB.Value_Missing
3723: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
3724: OR BIS_UTILITIES_PUB.Value_NULL(x_Measure_Rec.Measure_id)
3725: = FND_API.G_TRUE) then
3726: BEGIN
3727: BIS_Measure_PVT.Value_ID_Conversion
3721:
3722: if (BIS_UTILITIES_PUB.Value_Missing
3723: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
3724: OR BIS_UTILITIES_PUB.Value_NULL(x_Measure_Rec.Measure_id)
3725: = FND_API.G_TRUE) then
3726: BEGIN
3727: BIS_Measure_PVT.Value_ID_Conversion
3728: ( p_api_version
3729: , x_Measure_Rec.Measure_Short_Name
3733: , x_error_Tbl
3734: );
3735: --changed this to if
3736: -- EXCEPTION
3737: -- WHEN FND_API.G_EXC_ERROR then
3738: -- NULL;
3739: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3740: RAISE FND_API.G_EXC_ERROR;
3741: end if;
3735: --changed this to if
3736: -- EXCEPTION
3737: -- WHEN FND_API.G_EXC_ERROR then
3738: -- NULL;
3739: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3740: RAISE FND_API.G_EXC_ERROR;
3741: end if;
3742: END;
3743: end if;
3736: -- EXCEPTION
3737: -- WHEN FND_API.G_EXC_ERROR then
3738: -- NULL;
3739: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3740: RAISE FND_API.G_EXC_ERROR;
3741: end if;
3742: END;
3743: end if;
3744:
3747: , x_Measure_Rec.Dimension1_Short_Name
3748: , x_Measure_Rec.Dimension1_Name
3749: );
3750:
3751: if (l_convert = FND_API.G_TRUE) then
3752: BEGIN
3753: BIS_DIMENSION_PVT.Value_ID_Conversion
3754: ( p_api_version
3755: , x_Measure_Rec.Dimension1_Short_Name
3759: , x_error_Tbl
3760: );
3761:
3762: -- EXCEPTION
3763: -- WHEN FND_API.G_EXC_ERROR then
3764: -- NULL;
3765: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3766: RAISE FND_API.G_EXC_ERROR;
3767: end if;
3761:
3762: -- EXCEPTION
3763: -- WHEN FND_API.G_EXC_ERROR then
3764: -- NULL;
3765: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3766: RAISE FND_API.G_EXC_ERROR;
3767: end if;
3768: END;
3769: end if;
3762: -- EXCEPTION
3763: -- WHEN FND_API.G_EXC_ERROR then
3764: -- NULL;
3765: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3766: RAISE FND_API.G_EXC_ERROR;
3767: end if;
3768: END;
3769: end if;
3770:
3773: , x_Measure_Rec.Dimension2_Short_Name
3774: , x_Measure_Rec.Dimension2_Name
3775: );
3776:
3777: if (l_convert = FND_API.G_TRUE) then
3778: BEGIN
3779: BIS_DIMENSION_PVT.Value_ID_Conversion
3780: ( p_api_version
3781: , x_Measure_Rec.Dimension2_Short_Name
3784: , x_return_status
3785: , x_error_Tbl
3786: );
3787: -- EXCEPTION
3788: -- WHEN FND_API.G_EXC_ERROR then
3789: -- NULL;
3790: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3791: RAISE FND_API.G_EXC_ERROR;
3792: end if;
3786: );
3787: -- EXCEPTION
3788: -- WHEN FND_API.G_EXC_ERROR then
3789: -- NULL;
3790: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3791: RAISE FND_API.G_EXC_ERROR;
3792: end if;
3793: END;
3794: end if;
3787: -- EXCEPTION
3788: -- WHEN FND_API.G_EXC_ERROR then
3789: -- NULL;
3790: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3791: RAISE FND_API.G_EXC_ERROR;
3792: end if;
3793: END;
3794: end if;
3795:
3798: , x_Measure_Rec.Dimension3_Short_Name
3799: , x_Measure_Rec.Dimension3_Name
3800: );
3801:
3802: if (l_convert = FND_API.G_TRUE) then
3803: BEGIN
3804: BIS_DIMENSION_PVT.Value_ID_Conversion
3805: ( p_api_version
3806: , x_Measure_Rec.Dimension3_Short_Name
3809: , x_return_status
3810: , x_error_Tbl
3811: );
3812: -- EXCEPTION
3813: -- WHEN FND_API.G_EXC_ERROR then
3814: -- NULL;
3815: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3816: RAISE FND_API.G_EXC_ERROR;
3817: end if;
3811: );
3812: -- EXCEPTION
3813: -- WHEN FND_API.G_EXC_ERROR then
3814: -- NULL;
3815: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3816: RAISE FND_API.G_EXC_ERROR;
3817: end if;
3818: END;
3819: end if;
3812: -- EXCEPTION
3813: -- WHEN FND_API.G_EXC_ERROR then
3814: -- NULL;
3815: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3816: RAISE FND_API.G_EXC_ERROR;
3817: end if;
3818: END;
3819: end if;
3820:
3823: , x_Measure_Rec.Dimension4_Short_Name
3824: , x_Measure_Rec.Dimension4_Name
3825: );
3826:
3827: if (l_convert = FND_API.G_TRUE) then
3828: BEGIN
3829: BIS_DIMENSION_PVT.Value_ID_Conversion
3830: ( p_api_version
3831: , x_Measure_Rec.Dimension4_Short_Name
3834: , x_return_status
3835: , x_error_Tbl
3836: );
3837: -- EXCEPTION
3838: -- WHEN FND_API.G_EXC_ERROR then
3839: -- NULL;
3840: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3841: RAISE FND_API.G_EXC_ERROR;
3842: end if;
3836: );
3837: -- EXCEPTION
3838: -- WHEN FND_API.G_EXC_ERROR then
3839: -- NULL;
3840: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3841: RAISE FND_API.G_EXC_ERROR;
3842: end if;
3843: END;
3844: end if;
3837: -- EXCEPTION
3838: -- WHEN FND_API.G_EXC_ERROR then
3839: -- NULL;
3840: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3841: RAISE FND_API.G_EXC_ERROR;
3842: end if;
3843: END;
3844: end if;
3845:
3848: , x_Measure_Rec.Dimension5_Short_Name
3849: , x_Measure_Rec.Dimension5_Name
3850: );
3851:
3852: if (l_convert = FND_API.G_TRUE) then
3853: BEGIN
3854: BIS_DIMENSION_PVT.Value_ID_Conversion
3855: ( p_api_version
3856: , x_Measure_Rec.Dimension5_Short_Name
3859: , x_return_status
3860: , x_error_Tbl
3861: );
3862: -- EXCEPTION
3863: -- WHEN FND_API.G_EXC_ERROR then
3864: -- NULL;
3865: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3866: RAISE FND_API.G_EXC_ERROR;
3867: end if;
3861: );
3862: -- EXCEPTION
3863: -- WHEN FND_API.G_EXC_ERROR then
3864: -- NULL;
3865: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3866: RAISE FND_API.G_EXC_ERROR;
3867: end if;
3868: END;
3869: end if;
3862: -- EXCEPTION
3863: -- WHEN FND_API.G_EXC_ERROR then
3864: -- NULL;
3865: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3866: RAISE FND_API.G_EXC_ERROR;
3867: end if;
3868: END;
3869: end if;
3870:
3873: , x_Measure_Rec.Dimension6_Short_Name
3874: , x_Measure_Rec.Dimension6_Name
3875: );
3876:
3877: if (l_convert = FND_API.G_TRUE) then
3878: BEGIN
3879: BIS_DIMENSION_PVT.Value_ID_Conversion
3880: ( p_api_version
3881: , x_Measure_Rec.Dimension6_Short_Name
3884: , x_return_status
3885: , x_error_Tbl
3886: );
3887: -- EXCEPTION
3888: -- WHEN FND_API.G_EXC_ERROR then
3889: -- NULL;
3890: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3891: RAISE FND_API.G_EXC_ERROR;
3892: end if;
3886: );
3887: -- EXCEPTION
3888: -- WHEN FND_API.G_EXC_ERROR then
3889: -- NULL;
3890: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3891: RAISE FND_API.G_EXC_ERROR;
3892: end if;
3893: END;
3894: end if;
3887: -- EXCEPTION
3888: -- WHEN FND_API.G_EXC_ERROR then
3889: -- NULL;
3890: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3891: RAISE FND_API.G_EXC_ERROR;
3892: end if;
3893: END;
3894: end if;
3895:
3898: , x_Measure_Rec.Dimension7_Short_Name
3899: , x_Measure_Rec.Dimension7_Name
3900: );
3901:
3902: if (l_convert = FND_API.G_TRUE) then
3903: BEGIN
3904: BIS_DIMENSION_PVT.Value_ID_Conversion
3905: ( p_api_version
3906: , x_Measure_Rec.Dimension7_Short_Name
3909: , x_return_status
3910: , x_error_Tbl
3911: );
3912: -- EXCEPTION
3913: -- WHEN FND_API.G_EXC_ERROR then
3914: -- NULL;
3915: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3916: RAISE FND_API.G_EXC_ERROR;
3917: end if;
3911: );
3912: -- EXCEPTION
3913: -- WHEN FND_API.G_EXC_ERROR then
3914: -- NULL;
3915: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3916: RAISE FND_API.G_EXC_ERROR;
3917: end if;
3918: END;
3919: end if;
3912: -- EXCEPTION
3913: -- WHEN FND_API.G_EXC_ERROR then
3914: -- NULL;
3915: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
3916: RAISE FND_API.G_EXC_ERROR;
3917: end if;
3918: END;
3919: end if;
3920:
3920:
3921: --commented RAISE
3922: EXCEPTION
3923: WHEN NO_DATA_FOUND THEN
3924: x_return_status := FND_API.G_RET_STS_ERROR ;
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3921: --commented RAISE
3922: EXCEPTION
3923: WHEN NO_DATA_FOUND THEN
3924: x_return_status := FND_API.G_RET_STS_ERROR ;
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3922: EXCEPTION
3923: WHEN NO_DATA_FOUND THEN
3924: x_return_status := FND_API.G_RET_STS_ERROR ;
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3923: WHEN NO_DATA_FOUND THEN
3924: x_return_status := FND_API.G_RET_STS_ERROR ;
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3924: x_return_status := FND_API.G_RET_STS_ERROR ;
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3932: when others then
3925: --RAISE FND_API.G_EXC_ERROR;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3932: when others then
3933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3926: when FND_API.G_EXC_ERROR then
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3932: when others then
3933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3934: --added last two params
3927: x_return_status := FND_API.G_RET_STS_ERROR ;
3928: -- RAISE FND_API.G_EXC_ERROR;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3932: when others then
3933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3934: --added last two params
3935: l_error_tbl := x_error_tbl;
3929: when FND_API.G_EXC_UNEXPECTED_ERROR then
3930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3931: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3932: when others then
3933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3934: --added last two params
3935: l_error_tbl := x_error_tbl;
3936: BIS_UTILITIES_PVT.Add_Error_Message
3937: ( p_error_msg_id => SQLCODE
3939: , p_error_proc_name => G_PKG_NAME||'.Value_ID_Conversion'
3940: , p_error_table => l_error_tbl
3941: , x_error_table => x_error_tbl
3942: );
3943: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3944:
3945: END Value_ID_Conversion;
3946:
3947: PROCEDURE Value_ID_Conversion
3954: )
3955: IS
3956: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3957: BEGIN
3958: x_return_status := FND_API.G_RET_STS_SUCCESS;
3959:
3960: if (BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Short_Name)
3961: = FND_API.G_TRUE) then
3962: SELECT Measure_id into x_Measure_ID
3957: BEGIN
3958: x_return_status := FND_API.G_RET_STS_SUCCESS;
3959:
3960: if (BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Short_Name)
3961: = FND_API.G_TRUE) then
3962: SELECT Measure_id into x_Measure_ID
3963: FROM bisbv_Performance_Measures
3964: WHERE Measure_short_name = p_Measure_Short_Name;
3965: elsif (BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Name)
3962: SELECT Measure_id into x_Measure_ID
3963: FROM bisbv_Performance_Measures
3964: WHERE Measure_short_name = p_Measure_Short_Name;
3965: elsif (BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Name)
3966: = FND_API.G_TRUE) then
3967: SELECT Measure_id into x_Measure_ID
3968: FROM bisbv_Performance_Measures
3969: WHERE Measure_name = p_Measure_Name;
3970: else
3979: , p_error_table => l_error_tbl
3980: , x_error_table => x_error_tbl
3981: );
3982:
3983: RAISE FND_API.G_EXC_ERROR;
3984: end if;
3985:
3986: --commented RAISE
3987: EXCEPTION
3985:
3986: --commented RAISE
3987: EXCEPTION
3988: WHEN NO_DATA_FOUND THEN
3989: x_return_status := FND_API.G_RET_STS_ERROR ;
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3986: --commented RAISE
3987: EXCEPTION
3988: WHEN NO_DATA_FOUND THEN
3989: x_return_status := FND_API.G_RET_STS_ERROR ;
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3987: EXCEPTION
3988: WHEN NO_DATA_FOUND THEN
3989: x_return_status := FND_API.G_RET_STS_ERROR ;
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3988: WHEN NO_DATA_FOUND THEN
3989: x_return_status := FND_API.G_RET_STS_ERROR ;
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3989: x_return_status := FND_API.G_RET_STS_ERROR ;
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: when others then
3990: -- RAISE FND_API.G_EXC_ERROR;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: when others then
3998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3991: when FND_API.G_EXC_ERROR then
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: when others then
3998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3999: --added last two params
3992: x_return_status := FND_API.G_RET_STS_ERROR ;
3993: -- RAISE FND_API.G_EXC_ERROR;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: when others then
3998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3999: --added last two params
4000: l_error_tbl := x_error_tbl;
3994: when FND_API.G_EXC_UNEXPECTED_ERROR then
3995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3996: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3997: when others then
3998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3999: --added last two params
4000: l_error_tbl := x_error_tbl;
4001: BIS_UTILITIES_PVT.Add_Error_Message
4002: ( p_error_msg_id => SQLCODE
4004: , p_error_proc_name => G_PKG_NAME||'.Value_ID_Conversion'
4005: , p_error_table => l_error_tbl
4006: , x_error_table => x_error_tbl
4007: );
4008: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009:
4010: END Value_ID_Conversion;
4011: --
4012:
4021: IS
4022: l_convert VARCHAR2(32000);
4023: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4024: BEGIN
4025: x_return_status := FND_API.G_RET_STS_SUCCESS;
4026: x_Measure_Rec := p_Measure_Rec;
4027:
4028: if (BIS_UTILITIES_PUB.Value_Missing
4029: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
4025: x_return_status := FND_API.G_RET_STS_SUCCESS;
4026: x_Measure_Rec := p_Measure_Rec;
4027:
4028: if (BIS_UTILITIES_PUB.Value_Missing
4029: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
4030: OR BIS_UTILITIES_PUB.Value_NULL(x_Measure_Rec.Measure_id)
4031: = FND_API.G_TRUE) then
4032: BEGIN
4033: BIS_Measure_PVT.Value_ID_Conversion
4027:
4028: if (BIS_UTILITIES_PUB.Value_Missing
4029: (x_Measure_Rec.Measure_id) = FND_API.G_TRUE
4030: OR BIS_UTILITIES_PUB.Value_NULL(x_Measure_Rec.Measure_id)
4031: = FND_API.G_TRUE) then
4032: BEGIN
4033: BIS_Measure_PVT.Value_ID_Conversion
4034: ( p_api_version
4035: , x_Measure_Rec.Measure_Short_Name
4037: , x_Measure_Rec.Measure_ID
4038: , x_return_status
4039: , x_error_Tbl
4040: );
4041: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4042: l_error_tbl := x_error_tbl;
4043: BIS_UTILITIES_PVT.Add_Error_Message
4044: ( p_error_msg_name => 'BIS_INVALID_MEASURE_VALUE'
4045: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4047: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4048: , p_error_table => l_error_tbl
4049: , x_error_table => x_error_tbl
4050: );
4051: RAISE FND_API.G_EXC_ERROR;
4052: end if;
4053: END;
4054: end if;
4055:
4054: end if;
4055:
4056: EXCEPTION
4057: WHEN NO_DATA_FOUND THEN
4058: x_return_status := FND_API.G_RET_STS_ERROR ;
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4055:
4056: EXCEPTION
4057: WHEN NO_DATA_FOUND THEN
4058: x_return_status := FND_API.G_RET_STS_ERROR ;
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4056: EXCEPTION
4057: WHEN NO_DATA_FOUND THEN
4058: x_return_status := FND_API.G_RET_STS_ERROR ;
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4057: WHEN NO_DATA_FOUND THEN
4058: x_return_status := FND_API.G_RET_STS_ERROR ;
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4058: x_return_status := FND_API.G_RET_STS_ERROR ;
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4066: when others then
4059: -- RAISE FND_API.G_EXC_ERROR;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4066: when others then
4067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4060: when FND_API.G_EXC_ERROR then
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4066: when others then
4067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4068: --added last two params
4061: x_return_status := FND_API.G_RET_STS_ERROR ;
4062: -- RAISE FND_API.G_EXC_ERROR;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4066: when others then
4067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4068: --added last two params
4069: l_error_tbl := x_error_tbl;
4063: when FND_API.G_EXC_UNEXPECTED_ERROR then
4064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4065: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4066: when others then
4067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4068: --added last two params
4069: l_error_tbl := x_error_tbl;
4070: BIS_UTILITIES_PVT.Add_Error_Message
4071: ( p_error_msg_id => SQLCODE
4073: , p_error_proc_name => G_PKG_NAME||'.Measure_Value_ID_Conversion'
4074: , p_error_table => l_error_tbl
4075: , x_error_table => x_error_tbl
4076: );
4077: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4078:
4079: END Measure_Value_ID_Conversion;
4080: --
4081:
4090: IS
4091: l_convert VARCHAR2(32000);
4092: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4093: BEGIN
4094: x_return_status := FND_API.G_RET_STS_SUCCESS;
4095: x_Measure_Rec := p_Measure_Rec;
4096:
4097: l_convert := BIS_UTILITIES_PVT.Convert_to_ID
4098: ( x_Measure_Rec.Dimension1_ID
4099: , x_Measure_Rec.Dimension1_Short_Name
4100: , x_Measure_Rec.Dimension1_Name
4101: );
4102:
4103: if (l_convert = FND_API.G_TRUE) then
4104: BEGIN
4105: BIS_DIMENSION_PVT.Value_ID_Conversion
4106: ( p_api_version
4107: , x_Measure_Rec.Dimension1_Short_Name
4111: , x_error_Tbl
4112: );
4113:
4114: -- EXCEPTION
4115: -- WHEN FND_API.G_EXC_ERROR then
4116: -- NULL;
4117: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4118: l_error_tbl := x_error_tbl;
4119: BIS_UTILITIES_PVT.Add_Error_Message
4113:
4114: -- EXCEPTION
4115: -- WHEN FND_API.G_EXC_ERROR then
4116: -- NULL;
4117: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4118: l_error_tbl := x_error_tbl;
4119: BIS_UTILITIES_PVT.Add_Error_Message
4120: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4121: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4123: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4124: , p_error_table => l_error_tbl
4125: , x_error_table => x_error_tbl
4126: );
4127: RAISE FND_API.G_EXC_ERROR;
4128: end if;
4129: END;
4130: end if;
4131:
4134: , x_Measure_Rec.Dimension2_Short_Name
4135: , x_Measure_Rec.Dimension2_Name
4136: );
4137:
4138: if (l_convert = FND_API.G_TRUE) then
4139: BEGIN
4140: BIS_DIMENSION_PVT.Value_ID_Conversion
4141: ( p_api_version
4142: , x_Measure_Rec.Dimension2_Short_Name
4145: , x_return_status
4146: , x_error_Tbl
4147: );
4148: -- EXCEPTION
4149: -- WHEN FND_API.G_EXC_ERROR then
4150: -- NULL;
4151: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4152: l_error_tbl := x_error_tbl;
4153: BIS_UTILITIES_PVT.Add_Error_Message
4147: );
4148: -- EXCEPTION
4149: -- WHEN FND_API.G_EXC_ERROR then
4150: -- NULL;
4151: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4152: l_error_tbl := x_error_tbl;
4153: BIS_UTILITIES_PVT.Add_Error_Message
4154: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4155: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4157: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4158: , p_error_table => l_error_tbl
4159: , x_error_table => x_error_tbl
4160: );
4161: RAISE FND_API.G_EXC_ERROR;
4162: end if;
4163: END;
4164: end if;
4165:
4168: , x_Measure_Rec.Dimension3_Short_Name
4169: , x_Measure_Rec.Dimension3_Name
4170: );
4171:
4172: if (l_convert = FND_API.G_TRUE) then
4173: BEGIN
4174: BIS_DIMENSION_PVT.Value_ID_Conversion
4175: ( p_api_version
4176: , x_Measure_Rec.Dimension3_Short_Name
4179: , x_return_status
4180: , x_error_Tbl
4181: );
4182: -- EXCEPTION
4183: -- WHEN FND_API.G_EXC_ERROR then
4184: -- NULL;
4185: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4186: l_error_tbl := x_error_tbl;
4187: BIS_UTILITIES_PVT.Add_Error_Message
4181: );
4182: -- EXCEPTION
4183: -- WHEN FND_API.G_EXC_ERROR then
4184: -- NULL;
4185: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4186: l_error_tbl := x_error_tbl;
4187: BIS_UTILITIES_PVT.Add_Error_Message
4188: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4189: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4191: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4192: , p_error_table => l_error_tbl
4193: , x_error_table => x_error_tbl
4194: );
4195: RAISE FND_API.G_EXC_ERROR;
4196: end if;
4197: END;
4198: end if;
4199:
4202: , x_Measure_Rec.Dimension4_Short_Name
4203: , x_Measure_Rec.Dimension4_Name
4204: );
4205:
4206: if (l_convert = FND_API.G_TRUE) then
4207: BEGIN
4208: BIS_DIMENSION_PVT.Value_ID_Conversion
4209: ( p_api_version
4210: , x_Measure_Rec.Dimension4_Short_Name
4213: , x_return_status
4214: , x_error_Tbl
4215: );
4216: -- EXCEPTION
4217: -- WHEN FND_API.G_EXC_ERROR then
4218: -- NULL;
4219: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4220: l_error_tbl := x_error_tbl;
4221: BIS_UTILITIES_PVT.Add_Error_Message
4215: );
4216: -- EXCEPTION
4217: -- WHEN FND_API.G_EXC_ERROR then
4218: -- NULL;
4219: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4220: l_error_tbl := x_error_tbl;
4221: BIS_UTILITIES_PVT.Add_Error_Message
4222: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4223: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4225: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4226: , p_error_table => l_error_tbl
4227: , x_error_table => x_error_tbl
4228: );
4229: RAISE FND_API.G_EXC_ERROR;
4230: end if;
4231: END;
4232: end if;
4233:
4236: , x_Measure_Rec.Dimension5_Short_Name
4237: , x_Measure_Rec.Dimension5_Name
4238: );
4239:
4240: if (l_convert = FND_API.G_TRUE) then
4241: BEGIN
4242: BIS_DIMENSION_PVT.Value_ID_Conversion
4243: ( p_api_version
4244: , x_Measure_Rec.Dimension5_Short_Name
4247: , x_return_status
4248: , x_error_Tbl
4249: );
4250: -- EXCEPTION
4251: -- WHEN FND_API.G_EXC_ERROR then
4252: -- NULL;
4253: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4254: l_error_tbl := x_error_tbl;
4255: BIS_UTILITIES_PVT.Add_Error_Message
4249: );
4250: -- EXCEPTION
4251: -- WHEN FND_API.G_EXC_ERROR then
4252: -- NULL;
4253: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4254: l_error_tbl := x_error_tbl;
4255: BIS_UTILITIES_PVT.Add_Error_Message
4256: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4257: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4259: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4260: , p_error_table => l_error_tbl
4261: , x_error_table => x_error_tbl
4262: );
4263: RAISE FND_API.G_EXC_ERROR;
4264: end if;
4265: END;
4266: end if;
4267:
4270: , x_Measure_Rec.Dimension6_Short_Name
4271: , x_Measure_Rec.Dimension6_Name
4272: );
4273:
4274: if (l_convert = FND_API.G_TRUE) then
4275: BEGIN
4276: BIS_DIMENSION_PVT.Value_ID_Conversion
4277: ( p_api_version
4278: , x_Measure_Rec.Dimension6_Short_Name
4281: , x_return_status
4282: , x_error_Tbl
4283: );
4284: -- EXCEPTION
4285: -- WHEN FND_API.G_EXC_ERROR then
4286: -- NULL;
4287: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4288: l_error_tbl := x_error_tbl;
4289: BIS_UTILITIES_PVT.Add_Error_Message
4283: );
4284: -- EXCEPTION
4285: -- WHEN FND_API.G_EXC_ERROR then
4286: -- NULL;
4287: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4288: l_error_tbl := x_error_tbl;
4289: BIS_UTILITIES_PVT.Add_Error_Message
4290: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4291: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4293: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4294: , p_error_table => l_error_tbl
4295: , x_error_table => x_error_tbl
4296: );
4297: RAISE FND_API.G_EXC_ERROR;
4298: end if;
4299: END;
4300: end if;
4301:
4304: , x_Measure_Rec.Dimension7_Short_Name
4305: , x_Measure_Rec.Dimension7_Name
4306: );
4307:
4308: if (l_convert = FND_API.G_TRUE) then
4309: BEGIN
4310: BIS_DIMENSION_PVT.Value_ID_Conversion
4311: ( p_api_version
4312: , x_Measure_Rec.Dimension7_Short_Name
4315: , x_return_status
4316: , x_error_Tbl
4317: );
4318: -- EXCEPTION
4319: -- WHEN FND_API.G_EXC_ERROR then
4320: -- NULL;
4321: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4322: l_error_tbl := x_error_tbl;
4323: BIS_UTILITIES_PVT.Add_Error_Message
4317: );
4318: -- EXCEPTION
4319: -- WHEN FND_API.G_EXC_ERROR then
4320: -- NULL;
4321: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
4322: l_error_tbl := x_error_tbl;
4323: BIS_UTILITIES_PVT.Add_Error_Message
4324: ( p_error_msg_name => 'BIS_INVALID_DIMENSION_VALUE'
4325: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
4327: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4328: , p_error_table => l_error_tbl
4329: , x_error_table => x_error_tbl
4330: );
4331: RAISE FND_API.G_EXC_ERROR;
4332: end if;
4333: END;
4334: end if;
4335:
4334: end if;
4335:
4336: EXCEPTION
4337: WHEN NO_DATA_FOUND THEN
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4335:
4336: EXCEPTION
4337: WHEN NO_DATA_FOUND THEN
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4336: EXCEPTION
4337: WHEN NO_DATA_FOUND THEN
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4337: WHEN NO_DATA_FOUND THEN
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4346: when others then
4339: -- RAISE FND_API.G_EXC_ERROR;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4346: when others then
4347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4340: when FND_API.G_EXC_ERROR then
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4346: when others then
4347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4348: --added last two params
4341: x_return_status := FND_API.G_RET_STS_ERROR ;
4342: -- RAISE FND_API.G_EXC_ERROR;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4346: when others then
4347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4348: --added last two params
4349: l_error_tbl := x_error_tbl;
4343: when FND_API.G_EXC_UNEXPECTED_ERROR then
4344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4346: when others then
4347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4348: --added last two params
4349: l_error_tbl := x_error_tbl;
4350: BIS_UTILITIES_PVT.Add_Error_Message
4351: ( p_error_msg_id => SQLCODE
4353: , p_error_proc_name => G_PKG_NAME||'.Dimension_Value_ID_Conversion'
4354: , p_error_table => l_error_tbl
4355: , x_error_table => x_error_tbl
4356: );
4357: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4358:
4359: END Dimension_Value_ID_Conversion;
4360: --
4361:
4381: order by id.sequence_no;
4382:
4383: BEGIN
4384:
4385: x_return_status := FND_API.G_RET_STS_SUCCESS;
4386:
4387: for indim in ind_dim(p_measure_rec.measure_id) loop
4388:
4389: i := i+1;
4411: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4412: , p_error_table => l_error_tbl
4413: , x_error_table => x_error_tbl
4414: );
4415: RAISE FND_API.G_EXC_ERROR;
4416: end if;
4417:
4418: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4419:
4419:
4420: --commented RAISE
4421: EXCEPTION
4422: WHEN NO_DATA_FOUND THEN
4423: x_return_status := FND_API.G_RET_STS_ERROR ;
4424: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4425: -- RAISE FND_API.G_EXC_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4421: EXCEPTION
4422: WHEN NO_DATA_FOUND THEN
4423: x_return_status := FND_API.G_RET_STS_ERROR ;
4424: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4425: -- RAISE FND_API.G_EXC_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4422: WHEN NO_DATA_FOUND THEN
4423: x_return_status := FND_API.G_RET_STS_ERROR ;
4424: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4425: -- RAISE FND_API.G_EXC_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4423: x_return_status := FND_API.G_RET_STS_ERROR ;
4424: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4425: -- RAISE FND_API.G_EXC_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4425: -- RAISE FND_API.G_EXC_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4432: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4433: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4426: when FND_API.G_EXC_ERROR then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4432: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4433: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4434: when others then
4427: x_return_status := FND_API.G_RET_STS_ERROR ;
4428: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4432: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4433: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4434: when others then
4435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4429: -- RAISE FND_API.G_EXC_ERROR;
4430: when FND_API.G_EXC_UNEXPECTED_ERROR then
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4432: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4433: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4434: when others then
4435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4436: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4437: --added last two params
4431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4432: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4433: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4434: when others then
4435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4436: IF ind_dim%ISOPEN THEN CLOSE ind_dim; END IF;
4437: --added last two params
4438: l_error_tbl := x_error_tbl;
4439: BIS_UTILITIES_PVT.Add_Error_Message
4442: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Measure_Dimensions'
4443: , p_error_table => l_error_tbl
4444: , x_error_table => x_error_tbl
4445: );
4446: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4447:
4448: END Retrieve_Measure_Dimensions;
4449: --
4450: --
4457: )
4458: IS
4459: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4460: BEGIN
4461: x_return_status := FND_API.G_RET_STS_SUCCESS;
4462: --
4463: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Rec.Measure_ID)
4464: = FND_API.G_TRUE
4465: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Measure_Rec.Measure_ID)
4460: BEGIN
4461: x_return_status := FND_API.G_RET_STS_SUCCESS;
4462: --
4463: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Rec.Measure_ID)
4464: = FND_API.G_TRUE
4465: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Measure_Rec.Measure_ID)
4466: = FND_API.G_TRUE
4467: ) THEN
4468: SELECT NVL(LAST_UPDATE_DATE, CREATION_DATE)
4462: --
4463: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Measure_Rec.Measure_ID)
4464: = FND_API.G_TRUE
4465: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Measure_Rec.Measure_ID)
4466: = FND_API.G_TRUE
4467: ) THEN
4468: SELECT NVL(LAST_UPDATE_DATE, CREATION_DATE)
4469: INTO x_last_update_date
4470: FROM bis_indicators
4484: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
4485: , p_error_table => l_error_tbl
4486: , x_error_table => x_error_tbl
4487: );
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: x_return_status := FND_API.G_RET_STS_ERROR;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4485: , p_error_table => l_error_tbl
4486: , x_error_table => x_error_tbl
4487: );
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: x_return_status := FND_API.G_RET_STS_ERROR;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4486: , x_error_table => x_error_tbl
4487: );
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: x_return_status := FND_API.G_RET_STS_ERROR;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4487: );
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: x_return_status := FND_API.G_RET_STS_ERROR;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: x_return_status := FND_API.G_RET_STS_ERROR;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4496: --RAISE;
4490: --RAISE FND_API.G_EXC_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4496: --RAISE;
4497: WHEN OTHERS THEN
4498: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4491: WHEN FND_API.G_EXC_ERROR THEN
4492: x_return_status:= FND_API.G_RET_STS_ERROR;
4493: --RAISE;
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4496: --RAISE;
4497: WHEN OTHERS THEN
4498: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4499: --added last two params
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4496: --RAISE;
4497: WHEN OTHERS THEN
4498: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4499: --added last two params
4500: l_error_tbl := x_error_tbl;
4501: BIS_UTILITIES_PVT.Add_Error_Message
4502: ( p_error_msg_id => SQLCODE
4504: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Last_Update_Date'
4505: , p_error_table => l_error_tbl
4506: , x_error_table => x_error_tbl
4507: );
4508: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4509: --
4510: END Retrieve_Last_Update_Date;
4511: --
4512: --
4524: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
4525: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4526: --
4527: BEGIN
4528: x_return_status := FND_API.G_RET_STS_SUCCESS;
4529: --
4530: l_Measure_Rec.Measure_Id := p_Measure_Rec.Measure_Id;
4531: BIS_MEASURE_PVT.Retrieve_Last_Update_Date
4532: ( p_api_version => 1.0
4537: );
4538: IF(p_timestamp IS NOT NULL) THEN
4539: l_form_date := TO_DATE(p_timestamp, BIS_UTILITIES_PVT.G_DATE_FORMAT);
4540: IF(l_form_date = l_last_update_date) THEN
4541: x_return_status := FND_API.G_TRUE;
4542: ELSE
4543: x_return_status := FND_API.G_FALSE;
4544: END IF;
4545: ELSE
4539: l_form_date := TO_DATE(p_timestamp, BIS_UTILITIES_PVT.G_DATE_FORMAT);
4540: IF(l_form_date = l_last_update_date) THEN
4541: x_return_status := FND_API.G_TRUE;
4542: ELSE
4543: x_return_status := FND_API.G_FALSE;
4544: END IF;
4545: ELSE
4546: x_return_status := FND_API.G_FALSE;
4547: END IF;
4542: ELSE
4543: x_return_status := FND_API.G_FALSE;
4544: END IF;
4545: ELSE
4546: x_return_status := FND_API.G_FALSE;
4547: END IF;
4548: --
4549:
4550: --commented RAISE
4548: --
4549:
4550: --commented RAISE
4551: EXCEPTION
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: x_return_status:= FND_API.G_RET_STS_ERROR;
4554: --RAISE;
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4549:
4550: --commented RAISE
4551: EXCEPTION
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: x_return_status:= FND_API.G_RET_STS_ERROR;
4554: --RAISE;
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4557: -- RAISE;
4551: EXCEPTION
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: x_return_status:= FND_API.G_RET_STS_ERROR;
4554: --RAISE;
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4557: -- RAISE;
4558: WHEN OTHERS THEN
4559: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: x_return_status:= FND_API.G_RET_STS_ERROR;
4554: --RAISE;
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4557: -- RAISE;
4558: WHEN OTHERS THEN
4559: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4560: --added last two params
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4557: -- RAISE;
4558: WHEN OTHERS THEN
4559: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
4560: --added last two params
4561: l_error_tbl := x_error_tbl;
4562: BIS_UTILITIES_PVT.Add_Error_Message
4563: ( p_error_msg_id => SQLCODE
4565: , p_error_proc_name => G_PKG_NAME||'.Lock_Record'
4566: , p_error_table => l_error_tbl
4567: , x_error_table => x_error_tbl
4568: );
4569: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4570: --
4571: END Lock_Record;
4572: --
4573: --
4578: --
4579: --
4580: PROCEDURE Create_Application_Measure
4581: ( p_api_version IN NUMBER
4582: , p_commit IN VARCHAR2 := FND_API.G_FALSE
4583: , p_Measure_rec IN BIS_MEASURE_PUB.Measure_Rec_Type
4584: , p_application_rec IN BIS_Application_PVT.Application_Rec_Type
4585: , p_owning_application IN VARCHAR2
4586: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
4591: -- l_error_count number;
4592: l_rec BIS_APPLICATION_MEASURE_PVT.Application_Measure_Rec_type;
4593: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4594: BEGIN
4595: x_return_status := FND_API.G_RET_STS_SUCCESS;
4596: l_rec.Measure_id := p_Measure_rec.Measure_id;
4597: l_rec.Application_id := p_application_rec.application_id;
4598: l_rec.owning_application := p_owning_application;
4599: l_rec.Created_By := p_Measure_rec.Created_By;
4619:
4620: --commented RAISE
4621: EXCEPTION
4622: WHEN NO_DATA_FOUND THEN
4623: x_return_status := FND_API.G_RET_STS_ERROR ;
4624: --RAISE FND_API.G_EXC_ERROR;
4625: when FND_API.G_EXC_ERROR then
4626: -- htp.header(2,'EXCEPTION 2 CREATE_APPLICATION_MEASURE');
4627: -- BIS_ERROR_MESSAGE_PVT.get_error_count(l_error_count,x_return_status,x_error_tbl);
4620: --commented RAISE
4621: EXCEPTION
4622: WHEN NO_DATA_FOUND THEN
4623: x_return_status := FND_API.G_RET_STS_ERROR ;
4624: --RAISE FND_API.G_EXC_ERROR;
4625: when FND_API.G_EXC_ERROR then
4626: -- htp.header(2,'EXCEPTION 2 CREATE_APPLICATION_MEASURE');
4627: -- BIS_ERROR_MESSAGE_PVT.get_error_count(l_error_count,x_return_status,x_error_tbl);
4628: -- htp.header(3,'Error Count = ' || l_error_count);
4621: EXCEPTION
4622: WHEN NO_DATA_FOUND THEN
4623: x_return_status := FND_API.G_RET_STS_ERROR ;
4624: --RAISE FND_API.G_EXC_ERROR;
4625: when FND_API.G_EXC_ERROR then
4626: -- htp.header(2,'EXCEPTION 2 CREATE_APPLICATION_MEASURE');
4627: -- BIS_ERROR_MESSAGE_PVT.get_error_count(l_error_count,x_return_status,x_error_tbl);
4628: -- htp.header(3,'Error Count = ' || l_error_count);
4629:
4626: -- htp.header(2,'EXCEPTION 2 CREATE_APPLICATION_MEASURE');
4627: -- BIS_ERROR_MESSAGE_PVT.get_error_count(l_error_count,x_return_status,x_error_tbl);
4628: -- htp.header(3,'Error Count = ' || l_error_count);
4629:
4630: x_return_status := FND_API.G_RET_STS_ERROR ;
4631: --RAISE FND_API.G_EXC_ERROR;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4627: -- BIS_ERROR_MESSAGE_PVT.get_error_count(l_error_count,x_return_status,x_error_tbl);
4628: -- htp.header(3,'Error Count = ' || l_error_count);
4629:
4630: x_return_status := FND_API.G_RET_STS_ERROR ;
4631: --RAISE FND_API.G_EXC_ERROR;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4635: when others then
4628: -- htp.header(3,'Error Count = ' || l_error_count);
4629:
4630: x_return_status := FND_API.G_RET_STS_ERROR ;
4631: --RAISE FND_API.G_EXC_ERROR;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4635: when others then
4636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4629:
4630: x_return_status := FND_API.G_RET_STS_ERROR ;
4631: --RAISE FND_API.G_EXC_ERROR;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4635: when others then
4636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4637: --added last two params
4630: x_return_status := FND_API.G_RET_STS_ERROR ;
4631: --RAISE FND_API.G_EXC_ERROR;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4635: when others then
4636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4637: --added last two params
4638: l_error_tbl := x_error_tbl;
4632: when FND_API.G_EXC_UNEXPECTED_ERROR then
4633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4634: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4635: when others then
4636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4637: --added last two params
4638: l_error_tbl := x_error_tbl;
4639: BIS_UTILITIES_PVT.Add_Error_Message
4640: ( p_error_msg_id => SQLCODE
4642: , p_error_proc_name => G_PKG_NAME||'.Create_Application_Measure'
4643: , p_error_table => l_error_tbl
4644: , x_error_table => x_error_tbl
4645: );
4646: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4647:
4648: end Create_Application_Measure;
4649: --
4650: --
4660: IS
4661: l_tbl BIS_Application_Measure_PVT.Application_Measure_Tbl_Type;
4662: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4663: BEGIN
4664: x_return_status := FND_API.G_RET_STS_SUCCESS;
4665:
4666: BIS_APPLICATION_MEASURE_PVT.Retrieve_Application_Measures( p_api_version
4667: , p_Measure_Rec , p_all_info
4668: , l_tbl
4675: x_Application_tbl(i).Application_short_name :=
4676: l_tbl(i).Application_short_name;
4677: x_Application_tbl(i).Application_name := l_tbl(i).Application_name;
4678:
4679: if (l_tbl(i).owning_application = FND_API.G_TRUE) then
4680: x_owning_Application_rec := x_Application_tbl(i);
4681: end if;
4682: END LOOP;
4683:
4683:
4684: --commented RAISE
4685: EXCEPTION
4686: WHEN NO_DATA_FOUND THEN
4687: x_return_status := FND_API.G_RET_STS_ERROR ;
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4684: --commented RAISE
4685: EXCEPTION
4686: WHEN NO_DATA_FOUND THEN
4687: x_return_status := FND_API.G_RET_STS_ERROR ;
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4685: EXCEPTION
4686: WHEN NO_DATA_FOUND THEN
4687: x_return_status := FND_API.G_RET_STS_ERROR ;
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4686: WHEN NO_DATA_FOUND THEN
4687: x_return_status := FND_API.G_RET_STS_ERROR ;
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4687: x_return_status := FND_API.G_RET_STS_ERROR ;
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4695: when others then
4688: --RAISE FND_API.G_EXC_ERROR;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4695: when others then
4696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4689: when FND_API.G_EXC_ERROR then
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4695: when others then
4696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4697: --added last two params
4690: x_return_status := FND_API.G_RET_STS_ERROR ;
4691: --RAISE FND_API.G_EXC_ERROR;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4695: when others then
4696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4697: --added last two params
4698: l_error_tbl := x_error_tbl;
4692: when FND_API.G_EXC_UNEXPECTED_ERROR then
4693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4694: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4695: when others then
4696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4697: --added last two params
4698: l_error_tbl := x_error_tbl;
4699: BIS_UTILITIES_PVT.Add_Error_Message
4700: ( p_error_msg_id => SQLCODE
4702: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Application_Measures'
4703: , p_error_table => l_error_tbl
4704: , x_error_table => x_error_tbl
4705: );
4706: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4707:
4708: end Retrieve_Application_Measures;
4709: --
4710: --
4709: --
4710: --
4711: PROCEDURE Update_Application_Measure
4712: ( p_api_version IN NUMBER
4713: , p_commit IN VARCHAR2 := FND_API.G_FALSE
4714: , p_Measure_rec IN BIS_MEASURE_PUB.Measure_Rec_Type
4715: , p_application_rec IN BIS_Application_PVT.Application_Rec_Type
4716: , p_owning_application IN VARCHAR2
4717: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
4721: IS
4722: l_rec BIS_APPLICATION_MEASURE_PVT.Application_Measure_Rec_type;
4723: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4724: BEGIN
4725: x_return_status := FND_API.G_RET_STS_SUCCESS;
4726:
4727: l_rec.Measure_id := p_Measure_rec.Measure_id;
4728: l_rec.Application_id := p_application_rec.application_id;
4729: l_rec.owning_application := p_owning_application;
4737: );
4738: --commented RAISE
4739: EXCEPTION
4740: WHEN NO_DATA_FOUND THEN
4741: x_return_status := FND_API.G_RET_STS_ERROR ;
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4738: --commented RAISE
4739: EXCEPTION
4740: WHEN NO_DATA_FOUND THEN
4741: x_return_status := FND_API.G_RET_STS_ERROR ;
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4739: EXCEPTION
4740: WHEN NO_DATA_FOUND THEN
4741: x_return_status := FND_API.G_RET_STS_ERROR ;
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4740: WHEN NO_DATA_FOUND THEN
4741: x_return_status := FND_API.G_RET_STS_ERROR ;
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4741: x_return_status := FND_API.G_RET_STS_ERROR ;
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: when others then
4742: --RAISE FND_API.G_EXC_ERROR;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: when others then
4750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4743: when FND_API.G_EXC_ERROR then
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: when others then
4750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4751: --added last two params
4744: x_return_status := FND_API.G_RET_STS_ERROR ;
4745: --RAISE FND_API.G_EXC_ERROR;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: when others then
4750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4751: --added last two params
4752: l_error_tbl := x_error_tbl;
4746: when FND_API.G_EXC_UNEXPECTED_ERROR then
4747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4748: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: when others then
4750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4751: --added last two params
4752: l_error_tbl := x_error_tbl;
4753: BIS_UTILITIES_PVT.Add_Error_Message
4754: ( p_error_msg_id => SQLCODE
4756: , p_error_proc_name => G_PKG_NAME||'.Update_Application_Measure'
4757: , p_error_table => l_error_tbl
4758: , x_error_table => x_error_tbl
4759: );
4760: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4761:
4762: end Update_Application_Measure;
4763: --
4764: --
4763: --
4764: --
4765: PROCEDURE Delete_Application_Measure
4766: ( p_api_version IN NUMBER
4767: , p_commit IN VARCHAR2 := FND_API.G_FALSE
4768: , p_Measure_rec IN BIS_MEASURE_PUB.Measure_Rec_Type
4769: , p_application_rec IN BIS_Application_PVT.Application_Rec_Type
4770: , x_return_status OUT NOCOPY VARCHAR2
4771: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
4773: IS
4774: l_rec BIS_APPLICATION_MEASURE_PVT.Application_Measure_Rec_type;
4775: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4776: BEGIN
4777: x_return_status := FND_API.G_RET_STS_SUCCESS;
4778:
4779: l_rec.Measure_id := p_Measure_rec.Measure_id;
4780: l_rec.Application_id := p_application_rec.application_id;
4781:
4788:
4789: --commented RAISE
4790: EXCEPTION
4791: WHEN NO_DATA_FOUND THEN
4792: x_return_status := FND_API.G_RET_STS_ERROR ;
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4789: --commented RAISE
4790: EXCEPTION
4791: WHEN NO_DATA_FOUND THEN
4792: x_return_status := FND_API.G_RET_STS_ERROR ;
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4790: EXCEPTION
4791: WHEN NO_DATA_FOUND THEN
4792: x_return_status := FND_API.G_RET_STS_ERROR ;
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4791: WHEN NO_DATA_FOUND THEN
4792: x_return_status := FND_API.G_RET_STS_ERROR ;
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4792: x_return_status := FND_API.G_RET_STS_ERROR ;
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4800: when others then
4793: --RAISE FND_API.G_EXC_ERROR;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4800: when others then
4801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4794: when FND_API.G_EXC_ERROR then
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4800: when others then
4801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4802: --added last two params
4795: x_return_status := FND_API.G_RET_STS_ERROR ;
4796: -- RAISE FND_API.G_EXC_ERROR;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4800: when others then
4801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4802: --added last two params
4803: l_error_tbl := x_error_tbl;
4797: when FND_API.G_EXC_UNEXPECTED_ERROR then
4798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4799: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4800: when others then
4801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4802: --added last two params
4803: l_error_tbl := x_error_tbl;
4804: BIS_UTILITIES_PVT.Add_Error_Message
4805: ( p_error_msg_id => SQLCODE
4807: , p_error_proc_name => G_PKG_NAME||'.Delete_Application_Measure'
4808: , p_error_table => l_error_tbl
4809: , x_error_table => x_error_tbl
4810: );
4811: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4812:
4813: end Delete_Application_Measure;
4814: --
4815: PROCEDURE Delete_Application_Measures
4813: end Delete_Application_Measure;
4814: --
4815: PROCEDURE Delete_Application_Measures
4816: ( p_api_version IN NUMBER
4817: , p_commit IN VARCHAR2 := FND_API.G_FALSE
4818: , p_Measure_rec IN BIS_MEASURE_PUB.Measure_Rec_Type
4819: , x_return_status OUT NOCOPY VARCHAR2
4820: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
4821: )
4822: IS
4823: l_rec BIS_APPLICATION_PVT.Application_Rec_type;
4824: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4825: BEGIN
4826: x_return_status := FND_API.G_RET_STS_SUCCESS;
4827:
4828: -- we should call the delete API on BIS_APPLICATION_MEASURE
4829: -- but this is much faster
4830:
4837: ( p_api_version => p_api_version
4838: ,p_commit => p_commit
4839: ,p_Measure_rec => p_Measure_rec
4840: ,p_application_rec => l_rec
4841: ,p_owning_application => FND_API.G_FALSE
4842: ,x_return_status => x_return_status
4843: ,x_error_Tbl => x_error_Tbl
4844: );
4845:
4845:
4846: --commented RAISE
4847: EXCEPTION
4848: WHEN NO_DATA_FOUND THEN
4849: x_return_status := FND_API.G_RET_STS_ERROR ;
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4846: --commented RAISE
4847: EXCEPTION
4848: WHEN NO_DATA_FOUND THEN
4849: x_return_status := FND_API.G_RET_STS_ERROR ;
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4847: EXCEPTION
4848: WHEN NO_DATA_FOUND THEN
4849: x_return_status := FND_API.G_RET_STS_ERROR ;
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4848: WHEN NO_DATA_FOUND THEN
4849: x_return_status := FND_API.G_RET_STS_ERROR ;
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4849: x_return_status := FND_API.G_RET_STS_ERROR ;
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4857: when others then
4850: --RAISE FND_API.G_EXC_ERROR;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4857: when others then
4858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4851: when FND_API.G_EXC_ERROR then
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4857: when others then
4858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4859: --added last two params
4852: x_return_status := FND_API.G_RET_STS_ERROR ;
4853: --RAISE FND_API.G_EXC_ERROR;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4857: when others then
4858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4859: --added last two params
4860: l_error_tbl := x_error_tbl;
4854: when FND_API.G_EXC_UNEXPECTED_ERROR then
4855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4856: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4857: when others then
4858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4859: --added last two params
4860: l_error_tbl := x_error_tbl;
4861: BIS_UTILITIES_PVT.Add_Error_Message
4862: ( p_error_msg_id => SQLCODE
4864: , p_error_proc_name => G_PKG_NAME||'.Delete_Application_Measure'
4865: , p_error_table => l_error_tbl
4866: , x_error_table => x_error_tbl
4867: );
4868: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4869:
4870: end Delete_Application_Measures;
4871: --
4872: PROCEDURE Lock_Record
4880: IS
4881: l_rec BIS_APPLICATION_MEASURE_PVT.Application_Measure_Rec_type;
4882: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4883: BEGIN
4884: x_return_status := FND_API.G_RET_STS_SUCCESS;
4885:
4886: l_rec.Measure_id := p_Measure_rec.Measure_id;
4887: l_rec.Application_id := p_application_rec.application_id;
4888:
4894: );
4895: --commented RAISE
4896: EXCEPTION
4897: WHEN NO_DATA_FOUND THEN
4898: x_return_status := FND_API.G_RET_STS_ERROR ;
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4895: --commented RAISE
4896: EXCEPTION
4897: WHEN NO_DATA_FOUND THEN
4898: x_return_status := FND_API.G_RET_STS_ERROR ;
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4896: EXCEPTION
4897: WHEN NO_DATA_FOUND THEN
4898: x_return_status := FND_API.G_RET_STS_ERROR ;
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4897: WHEN NO_DATA_FOUND THEN
4898: x_return_status := FND_API.G_RET_STS_ERROR ;
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4898: x_return_status := FND_API.G_RET_STS_ERROR ;
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: when others then
4899: --RAISE FND_API.G_EXC_ERROR;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: when others then
4907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4900: when FND_API.G_EXC_ERROR then
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: when others then
4907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4908: --added last two params
4901: x_return_status := FND_API.G_RET_STS_ERROR ;
4902: -- RAISE FND_API.G_EXC_ERROR;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: when others then
4907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4908: --added last two params
4909: l_error_tbl := x_error_tbl;
4903: when FND_API.G_EXC_UNEXPECTED_ERROR then
4904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4905: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: when others then
4907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4908: --added last two params
4909: l_error_tbl := x_error_tbl;
4910: BIS_UTILITIES_PVT.Add_Error_Message
4911: ( p_error_msg_id => SQLCODE
4913: , p_error_proc_name => G_PKG_NAME||'.Lock_Record'
4914: , p_error_table => l_error_tbl
4915: , x_error_table => x_error_tbl
4916: );
4917: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4918:
4919: end Lock_Record;
4920: --
4921: PROCEDURE Retrieve_Last_Update_Date
4929: IS
4930: l_rec BIS_APPLICATION_MEASURE_PVT.Application_Measure_Rec_type;
4931: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
4932: BEGIN
4933: x_return_status := FND_API.G_RET_STS_SUCCESS;
4934:
4935: l_rec.Measure_id := p_Measure_rec.Measure_id;
4936: l_rec.Application_id := p_application_rec.application_id;
4937:
4943: );
4944: --commented RAISE
4945: EXCEPTION
4946: WHEN NO_DATA_FOUND THEN
4947: x_return_status := FND_API.G_RET_STS_ERROR ;
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4944: --commented RAISE
4945: EXCEPTION
4946: WHEN NO_DATA_FOUND THEN
4947: x_return_status := FND_API.G_RET_STS_ERROR ;
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4945: EXCEPTION
4946: WHEN NO_DATA_FOUND THEN
4947: x_return_status := FND_API.G_RET_STS_ERROR ;
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4946: WHEN NO_DATA_FOUND THEN
4947: x_return_status := FND_API.G_RET_STS_ERROR ;
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4947: x_return_status := FND_API.G_RET_STS_ERROR ;
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4955: when others then
4948: --RAISE FND_API.G_EXC_ERROR;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4955: when others then
4956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4949: when FND_API.G_EXC_ERROR then
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4955: when others then
4956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4957: --added last two params
4950: x_return_status := FND_API.G_RET_STS_ERROR ;
4951: --RAISE FND_API.G_EXC_ERROR;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4955: when others then
4956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4957: --added last two params
4958: l_error_tbl := x_error_tbl;
4952: when FND_API.G_EXC_UNEXPECTED_ERROR then
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4955: when others then
4956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4957: --added last two params
4958: l_error_tbl := x_error_tbl;
4959: BIS_UTILITIES_PVT.Add_Error_Message
4960: ( p_error_msg_id => SQLCODE
4962: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Last_Update_Date'
4963: , p_error_table => l_error_tbl
4964: , x_error_table => x_error_tbl
4965: );
4966: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4967:
4968: end Retrieve_Last_Update_Date;
4969: --
4970:
4981: -- IF either org or time exists then return true here. As it should never
4982: -- happen that, only org got migrated and not time
4983: l_org_time_exists := TRUE;
4984:
4985: IF (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_Id) = FND_API.G_TRUE
4986: OR BIS_UTILITIES_PUB.Value_NULL(p_Org_Dimension_Id) = FND_API.G_TRUE)
4987: THEN
4988: l_org_time_exists := FALSE;
4989: GOTO returnfromproc;
4982: -- happen that, only org got migrated and not time
4983: l_org_time_exists := TRUE;
4984:
4985: IF (BIS_UTILITIES_PUB.Value_Missing(p_Org_Dimension_Id) = FND_API.G_TRUE
4986: OR BIS_UTILITIES_PUB.Value_NULL(p_Org_Dimension_Id) = FND_API.G_TRUE)
4987: THEN
4988: l_org_time_exists := FALSE;
4989: GOTO returnfromproc;
4990: END IF;
4988: l_org_time_exists := FALSE;
4989: GOTO returnfromproc;
4990: END IF;
4991:
4992: IF (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_Id) = FND_API.G_TRUE
4993: OR BIS_UTILITIES_PUB.Value_NULL(p_Time_Dimension_Id) = FND_API.G_TRUE)
4994: THEN
4995: l_org_time_exists := FALSE;
4996: GOTO returnfromproc;
4989: GOTO returnfromproc;
4990: END IF;
4991:
4992: IF (BIS_UTILITIES_PUB.Value_Missing(p_Time_Dimension_Id) = FND_API.G_TRUE
4993: OR BIS_UTILITIES_PUB.Value_NULL(p_Time_Dimension_Id) = FND_API.G_TRUE)
4994: THEN
4995: l_org_time_exists := FALSE;
4996: GOTO returnfromproc;
4997: END IF;
5082: l_pm_count NUMBER := 0;
5083:
5084: BEGIN
5085:
5086: x_return_status := FND_API.G_RET_STS_SUCCESS;
5087:
5088:
5089: FOR i IN c_updt1 LOOP
5090:
5102:
5103: END LOOP;
5104:
5105: if l_pm_count = 0 then
5106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5107: end if;
5108:
5109: EXCEPTION
5110: WHEN OTHERS THEN
5112: CLOSE c_updt1;
5113: END IF;
5114:
5115:
5116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5117: END updt_pm_owner;
5118:
5119: --sawu: bug#3859267: common function to check if a particular ak_region_item is mapped already
5120: FUNCTION isColumnMappedAlready(
5219:
5220: -- mdamle 09/25/2003 - Sync up measures for all installed languages
5221: Procedure Translate_Measure_by_lang
5222: ( p_api_version IN NUMBER
5223: , p_commit IN VARCHAR2 := FND_API.G_FALSE
5224: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
5225: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
5226: , p_lang IN VARCHAR2
5227: , p_source_lang IN VARCHAR2
5251: , SOURCE_LANG = p_source_lang
5252: where INDICATOR_ID = p_Measure_Rec.Measure_Id
5253: and LANGUAGE = p_lang;
5254:
5255: if (p_commit = FND_API.G_TRUE) then
5256: COMMIT;
5257: end if;
5258:
5259: EXCEPTION
5258:
5259: EXCEPTION
5260: WHEN NO_DATA_FOUND THEN
5261: ROLLBACK TO TransMeasByLangPvt;
5262: x_return_status := FND_API.G_RET_STS_ERROR ;
5263: when FND_API.G_EXC_ERROR then
5264: ROLLBACK TO TransMeasByLangPvt;
5265: x_return_status := FND_API.G_RET_STS_ERROR ;
5266: when FND_API.G_EXC_UNEXPECTED_ERROR then
5259: EXCEPTION
5260: WHEN NO_DATA_FOUND THEN
5261: ROLLBACK TO TransMeasByLangPvt;
5262: x_return_status := FND_API.G_RET_STS_ERROR ;
5263: when FND_API.G_EXC_ERROR then
5264: ROLLBACK TO TransMeasByLangPvt;
5265: x_return_status := FND_API.G_RET_STS_ERROR ;
5266: when FND_API.G_EXC_UNEXPECTED_ERROR then
5267: ROLLBACK TO TransMeasByLangPvt;
5261: ROLLBACK TO TransMeasByLangPvt;
5262: x_return_status := FND_API.G_RET_STS_ERROR ;
5263: when FND_API.G_EXC_ERROR then
5264: ROLLBACK TO TransMeasByLangPvt;
5265: x_return_status := FND_API.G_RET_STS_ERROR ;
5266: when FND_API.G_EXC_UNEXPECTED_ERROR then
5267: ROLLBACK TO TransMeasByLangPvt;
5268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5269: when others then
5262: x_return_status := FND_API.G_RET_STS_ERROR ;
5263: when FND_API.G_EXC_ERROR then
5264: ROLLBACK TO TransMeasByLangPvt;
5265: x_return_status := FND_API.G_RET_STS_ERROR ;
5266: when FND_API.G_EXC_UNEXPECTED_ERROR then
5267: ROLLBACK TO TransMeasByLangPvt;
5268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5269: when others then
5270: ROLLBACK TO TransMeasByLangPvt;
5264: ROLLBACK TO TransMeasByLangPvt;
5265: x_return_status := FND_API.G_RET_STS_ERROR ;
5266: when FND_API.G_EXC_UNEXPECTED_ERROR then
5267: ROLLBACK TO TransMeasByLangPvt;
5268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5269: when others then
5270: ROLLBACK TO TransMeasByLangPvt;
5271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5272: --added last two params
5267: ROLLBACK TO TransMeasByLangPvt;
5268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5269: when others then
5270: ROLLBACK TO TransMeasByLangPvt;
5271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5272: --added last two params
5273: l_error_tbl := x_error_tbl;
5274: BIS_UTILITIES_PVT.Add_Error_Message
5275: ( p_error_msg_id => SQLCODE
5348:
5349:
5350: PROCEDURE Load_Measure_Extension
5351: ( p_api_version IN NUMBER
5352: , p_commit IN VARCHAR2 := FND_API.G_FALSE
5353: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
5354: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
5355: , x_return_status OUT NOCOPY VARCHAR2
5356: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
5373: IF (p_Measure_Rec.Func_Area_Short_Name IS NULL ) THEN
5374: -- bug#4447273 Don't call the load_measrue_extension
5375: -- when the p_Measure_Rec.Func_Area_Short_Name is NULL
5376: --l_Measure_Extension_Rec.Func_Area_Short_Name := 'BIS_UNN'; //Commented..
5377: x_return_status := FND_API.G_RET_STS_SUCCESS;
5378: RETURN;
5379: END IF;
5380: --l_Measure_Extension_Rec.Functional_Area_Id := BIS_OBJECT_EXTENSIONS_PVT.Get_FA_Id_By_Short_Name(p_Measure_Rec.Func_Area_Short_Name);
5381:
5408: ,x_Msg_Count => l_Msg_Count
5409: ,x_Msg_Data => l_Msg_Data
5410: );
5411:
5412: IF (l_return_status IS NOT NULL AND l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
5413: l_error_tbl := x_error_tbl;
5414: BIS_UTILITIES_PVT.Add_Error_Message
5415: ( p_error_msg_id => NULL
5416: , p_error_description => l_Msg_Data
5418: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
5419: , p_error_table => l_error_tbl
5420: , x_error_table => x_error_tbl
5421: );
5422: RAISE FND_API.G_EXC_ERROR;
5423: END IF;
5424:
5425: x_return_status := FND_API.G_RET_STS_SUCCESS;
5426:
5421: );
5422: RAISE FND_API.G_EXC_ERROR;
5423: END IF;
5424:
5425: x_return_status := FND_API.G_RET_STS_SUCCESS;
5426:
5427: EXCEPTION
5428: WHEN NO_DATA_FOUND THEN
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5425: x_return_status := FND_API.G_RET_STS_SUCCESS;
5426:
5427: EXCEPTION
5428: WHEN NO_DATA_FOUND THEN
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5430: when FND_API.G_EXC_ERROR then
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5426:
5427: EXCEPTION
5428: WHEN NO_DATA_FOUND THEN
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5430: when FND_API.G_EXC_ERROR then
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5434: when others then
5427: EXCEPTION
5428: WHEN NO_DATA_FOUND THEN
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5430: when FND_API.G_EXC_ERROR then
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5434: when others then
5435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5428: WHEN NO_DATA_FOUND THEN
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5430: when FND_API.G_EXC_ERROR then
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5434: when others then
5435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5436: --added last two params
5429: x_return_status := FND_API.G_RET_STS_ERROR ;
5430: when FND_API.G_EXC_ERROR then
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5434: when others then
5435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5436: --added last two params
5437: l_error_tbl := x_error_tbl;
5431: x_return_status := FND_API.G_RET_STS_ERROR ;
5432: when FND_API.G_EXC_UNEXPECTED_ERROR then
5433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5434: when others then
5435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5436: --added last two params
5437: l_error_tbl := x_error_tbl;
5438: BIS_UTILITIES_PVT.Add_Error_Message
5439: ( p_error_msg_id => SQLCODE
5445: END Load_Measure_Extension;
5446:
5447:
5448: PROCEDURE Update_Measure_Obsolete_Flag(
5449: p_commit IN VARCHAR2 := FND_API.G_FALSE,
5450: p_measure_short_name IN VARCHAR2,
5451: p_obsolete IN VARCHAR2,
5452: x_return_status OUT nocopy VARCHAR2,
5453: x_Msg_Count OUT NOCOPY NUMBER,
5457: SAVEPOINT MeasureObsoleteUpdate;
5458: IF (p_measure_short_name IS NULL OR p_measure_short_name = '') THEN
5459: FND_MESSAGE.SET_NAME('BIS','BIS_PMF_INVALID_MEASURE_VALUE');
5460: FND_MSG_PUB.ADD;
5461: RAISE FND_API.G_EXC_ERROR;
5462: END IF;
5463:
5464: IF (p_obsolete IS NULL OR (p_obsolete <> FND_API.G_TRUE AND p_obsolete <> FND_API.G_FALSE)) THEN
5465: FND_MESSAGE.SET_NAME('BIS','BIS_PMF_INVALID_OBSOLETE_FLAG');
5460: FND_MSG_PUB.ADD;
5461: RAISE FND_API.G_EXC_ERROR;
5462: END IF;
5463:
5464: IF (p_obsolete IS NULL OR (p_obsolete <> FND_API.G_TRUE AND p_obsolete <> FND_API.G_FALSE)) THEN
5465: FND_MESSAGE.SET_NAME('BIS','BIS_PMF_INVALID_OBSOLETE_FLAG');
5466: FND_MSG_PUB.ADD;
5467: RAISE FND_API.G_EXC_ERROR;
5468: END IF;
5463:
5464: IF (p_obsolete IS NULL OR (p_obsolete <> FND_API.G_TRUE AND p_obsolete <> FND_API.G_FALSE)) THEN
5465: FND_MESSAGE.SET_NAME('BIS','BIS_PMF_INVALID_OBSOLETE_FLAG');
5466: FND_MSG_PUB.ADD;
5467: RAISE FND_API.G_EXC_ERROR;
5468: END IF;
5469:
5470: UPDATE bis_indicators
5471: SET
5474: last_updated_by = FND_GLOBAL.USER_ID ,
5475: last_update_login = FND_GLOBAL.USER_ID
5476: WHERE short_name = p_measure_short_name;
5477:
5478: IF(p_Commit = FND_API.G_TRUE) THEN
5479: commit;
5480: END IF;
5481:
5482: x_return_status := FND_API.G_RET_STS_SUCCESS;
5478: IF(p_Commit = FND_API.G_TRUE) THEN
5479: commit;
5480: END IF;
5481:
5482: x_return_status := FND_API.G_RET_STS_SUCCESS;
5483: RETURN;
5484: EXCEPTION
5485: WHEN FND_API.G_EXC_ERROR THEN
5486: IF (x_msg_data IS NULL) THEN
5481:
5482: x_return_status := FND_API.G_RET_STS_SUCCESS;
5483: RETURN;
5484: EXCEPTION
5485: WHEN FND_API.G_EXC_ERROR THEN
5486: IF (x_msg_data IS NULL) THEN
5487: FND_MSG_PUB.Count_And_Get
5488: ( p_encoded => FND_API.G_FALSE
5489: , p_count => x_msg_count
5484: EXCEPTION
5485: WHEN FND_API.G_EXC_ERROR THEN
5486: IF (x_msg_data IS NULL) THEN
5487: FND_MSG_PUB.Count_And_Get
5488: ( p_encoded => FND_API.G_FALSE
5489: , p_count => x_msg_count
5490: , p_data => x_msg_data
5491: );
5492: END IF;
5489: , p_count => x_msg_count
5490: , p_data => x_msg_data
5491: );
5492: END IF;
5493: x_Return_Status := FND_API.G_RET_STS_ERROR;
5494: WHEN OTHERS THEN
5495: ROLLBACK TO MeasureObsoleteUpdate;
5496: IF (x_msg_data IS NOT NULL) THEN
5497: x_msg_data := x_msg_data||' -> BIS_FORM_FUNCTIONS_PUB.Update_Measure_Obsolete_Flag ';