[Home] [Help]
248:
249: IF(l_Count>0) THEN
250: FND_MESSAGE.SET_NAME('BIS','BIS_MEASURE_NAME_UNIQUE');
251: FND_MSG_PUB.ADD;
252: RAISE FND_API.G_EXC_ERROR;
253: END IF;
254: ELSE
255: FOR cd IN c_Create_Measure LOOP
256: l_Flag := BSC_BIS_MEASURE_PUB.Validate_Conditions
260: );
261: IF (NOT l_Flag) THEN
262: FND_MESSAGE.SET_NAME('BIS','BIS_MEASURE_NAME_UNIQUE');
263: FND_MSG_PUB.ADD;
264: RAISE FND_API.G_EXC_ERROR;
265: END IF;
266: END LOOP;
267: END IF;
268: ELSE -- called from create API
278:
279: IF(l_Count>0) THEN
280: FND_MESSAGE.SET_NAME('BIS','BIS_MEASURE_NAME_UNIQUE');
281: FND_MSG_PUB.ADD;
282: RAISE FND_API.G_EXC_ERROR;
283: END IF;
284: ELSE
285: FOR cd IN c_Update_Measure LOOP
286: l_Flag := BSC_BIS_MEASURE_PUB.Validate_Conditions
290: );
291: IF (NOT l_Flag) THEN
292: FND_MESSAGE.SET_NAME('BIS','BIS_MEASURE_NAME_UNIQUE');
293: FND_MSG_PUB.ADD;
294: RAISE FND_API.G_EXC_ERROR;
295: END IF;
296: END LOOP;
297: END IF;
298: END IF;
303: /************************************************************************/
304: -- wrapper of Create_Measure that takes in p_default_short_name parameter
305: /************************************************************************/
306: procedure Create_Measure(
307: p_commit IN VARCHAR2 := FND_API.G_FALSE
308: ,x_dataset_id OUT NOCOPY NUMBER
309: ,p_dataset_source IN VARCHAR2
310: ,p_dataset_name IN VARCHAR2
311: ,p_dataset_help IN VARCHAR2 := NULL
339: ,p_measure_type IN NUMBER := NULL
340: ,p_measure_apply_rollup IN VARCHAR2 := NULL
341: ,p_measure_function_name IN VARCHAR2 := NULL
342: ,p_measure_enable_link IN VARCHAR2 := NULL
343: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
344: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
345: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
346: ,p_dimension1_id IN NUMBER
347: ,p_dimension2_id IN NUMBER
341: ,p_measure_function_name IN VARCHAR2 := NULL
342: ,p_measure_enable_link IN VARCHAR2 := NULL
343: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
344: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
345: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
346: ,p_dimension1_id IN NUMBER
347: ,p_dimension2_id IN NUMBER
348: ,p_dimension3_id IN NUMBER
349: ,p_dimension4_id IN NUMBER
366: l_count NUMBER;
367: begin
368: SAVEPOINT SP_CREATE_MEASURE;
369:
370: x_return_status := FND_API.G_RET_STS_SUCCESS;
371: fnd_msg_pub.initialize;
372:
373: l_measure_short_name := p_measure_short_name;
374: IF (UPPER(p_is_default_short_name) = 'T') THEN
446: ,x_msg_count => x_msg_count
447: ,x_msg_data => x_msg_data
448: );
449: EXCEPTION
450: WHEN FND_API.G_EXC_ERROR THEN
451: IF (x_msg_data IS NULL) THEN
452: FND_MSG_PUB.Count_And_Get
453: ( p_encoded => FND_API.G_FALSE
454: , p_count => x_msg_count
449: EXCEPTION
450: WHEN FND_API.G_EXC_ERROR THEN
451: IF (x_msg_data IS NULL) THEN
452: FND_MSG_PUB.Count_And_Get
453: ( p_encoded => FND_API.G_FALSE
454: , p_count => x_msg_count
455: , p_data => x_msg_data
456: );
457: END IF;
455: , p_data => x_msg_data
456: );
457: END IF;
458: ROLLBACK TO SP_CREATE_MEASURE;
459: x_return_status := FND_API.G_RET_STS_ERROR;
460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
461: IF (x_msg_data IS NULL) THEN
462: FND_MSG_PUB.Count_And_Get
463: ( p_encoded => FND_API.G_FALSE
456: );
457: END IF;
458: ROLLBACK TO SP_CREATE_MEASURE;
459: x_return_status := FND_API.G_RET_STS_ERROR;
460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
461: IF (x_msg_data IS NULL) THEN
462: FND_MSG_PUB.Count_And_Get
463: ( p_encoded => FND_API.G_FALSE
464: , p_count => x_msg_count
459: x_return_status := FND_API.G_RET_STS_ERROR;
460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
461: IF (x_msg_data IS NULL) THEN
462: FND_MSG_PUB.Count_And_Get
463: ( p_encoded => FND_API.G_FALSE
464: , p_count => x_msg_count
465: , p_data => x_msg_data
466: );
467: END IF;
465: , p_data => x_msg_data
466: );
467: END IF;
468: ROLLBACK TO SP_CREATE_MEASURE;
469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
470: WHEN NO_DATA_FOUND THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: IF (x_msg_data IS NOT NULL) THEN
473: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
467: END IF;
468: ROLLBACK TO SP_CREATE_MEASURE;
469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
470: WHEN NO_DATA_FOUND THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: IF (x_msg_data IS NOT NULL) THEN
473: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
474: ELSE
475: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
475: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
476: END IF;
477: ROLLBACK TO SP_CREATE_MEASURE;
478: WHEN OTHERS THEN
479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
480: IF (x_msg_data IS NOT NULL) THEN
481: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
482: ELSE
483: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
487: /************************End Create_Measure wrapper****************************/
488:
489:
490: procedure Create_Measure(
491: p_commit IN VARCHAR2 := FND_API.G_FALSE
492: ,x_dataset_id OUT NOCOPY NUMBER
493: ,p_dataset_source IN VARCHAR2
494: ,p_dataset_name IN VARCHAR2
495: ,p_dataset_help IN VARCHAR2 := NULL
523: ,p_measure_type IN NUMBER := NULL
524: ,p_measure_apply_rollup IN VARCHAR2 := NULL
525: ,p_measure_function_name IN VARCHAR2 := NULL
526: ,p_measure_enable_link IN VARCHAR2 := NULL
527: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
528: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
529: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
530: ,p_dimension1_id IN NUMBER
531: ,p_dimension2_id IN NUMBER
525: ,p_measure_function_name IN VARCHAR2 := NULL
526: ,p_measure_enable_link IN VARCHAR2 := NULL
527: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
528: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
529: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
530: ,p_dimension1_id IN NUMBER
531: ,p_dimension2_id IN NUMBER
532: ,p_dimension3_id IN NUMBER
533: ,p_dimension4_id IN NUMBER
544: ) is
545: begin
546: SAVEPOINT SP_CREATE_MEASURE;
547:
548: x_return_status := FND_API.G_RET_STS_SUCCESS;
549: fnd_msg_pub.initialize;
550:
551: --dispatch create_measure
552: BSC_BIS_MEASURE_PUB.Create_Measure(
605: ,x_msg_count => x_msg_count
606: ,x_msg_data => x_msg_data
607: );
608: EXCEPTION
609: WHEN FND_API.G_EXC_ERROR THEN
610: IF (x_msg_data IS NULL) THEN
611: FND_MSG_PUB.Count_And_Get
612: ( p_encoded => FND_API.G_FALSE
613: , p_count => x_msg_count
608: EXCEPTION
609: WHEN FND_API.G_EXC_ERROR THEN
610: IF (x_msg_data IS NULL) THEN
611: FND_MSG_PUB.Count_And_Get
612: ( p_encoded => FND_API.G_FALSE
613: , p_count => x_msg_count
614: , p_data => x_msg_data
615: );
616: END IF;
614: , p_data => x_msg_data
615: );
616: END IF;
617: ROLLBACK TO SP_CREATE_MEASURE;
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: IF (x_msg_data IS NULL) THEN
621: FND_MSG_PUB.Count_And_Get
622: ( p_encoded => FND_API.G_FALSE
615: );
616: END IF;
617: ROLLBACK TO SP_CREATE_MEASURE;
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: IF (x_msg_data IS NULL) THEN
621: FND_MSG_PUB.Count_And_Get
622: ( p_encoded => FND_API.G_FALSE
623: , p_count => x_msg_count
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: IF (x_msg_data IS NULL) THEN
621: FND_MSG_PUB.Count_And_Get
622: ( p_encoded => FND_API.G_FALSE
623: , p_count => x_msg_count
624: , p_data => x_msg_data
625: );
626: END IF;
624: , p_data => x_msg_data
625: );
626: END IF;
627: ROLLBACK TO SP_CREATE_MEASURE;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: WHEN NO_DATA_FOUND THEN
630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
631: IF (x_msg_data IS NOT NULL) THEN
632: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
626: END IF;
627: ROLLBACK TO SP_CREATE_MEASURE;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: WHEN NO_DATA_FOUND THEN
630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
631: IF (x_msg_data IS NOT NULL) THEN
632: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
633: ELSE
634: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
634: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
635: END IF;
636: ROLLBACK TO SP_CREATE_MEASURE;
637: WHEN OTHERS THEN
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: IF (x_msg_data IS NOT NULL) THEN
640: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
641: ELSE
642: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
645: end CREATE_MEASURE;
646:
647: --Bug#4045278: Wrapper for Create_Measure that takes in last_update_date
648: procedure Create_Measure(
649: p_commit IN VARCHAR2 := FND_API.G_FALSE
650: ,x_dataset_id OUT NOCOPY NUMBER
651: ,p_dataset_source IN VARCHAR2
652: ,p_dataset_name IN VARCHAR2
653: ,p_dataset_help IN VARCHAR2 := NULL
681: ,p_measure_type IN NUMBER := NULL
682: ,p_measure_apply_rollup IN VARCHAR2 := NULL
683: ,p_measure_function_name IN VARCHAR2 := NULL
684: ,p_measure_enable_link IN VARCHAR2 := NULL
685: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
686: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
687: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
688: ,p_dimension1_id IN NUMBER
689: ,p_dimension2_id IN NUMBER
683: ,p_measure_function_name IN VARCHAR2 := NULL
684: ,p_measure_enable_link IN VARCHAR2 := NULL
685: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
686: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
687: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
688: ,p_dimension1_id IN NUMBER
689: ,p_dimension2_id IN NUMBER
690: ,p_dimension3_id IN NUMBER
691: ,p_dimension4_id IN NUMBER
710: l_last_update_date BIS_INDICATORS.LAST_UPDATE_DATE%TYPE;
711: begin
712: SAVEPOINT SP_CREATE_MEASURE;
713:
714: x_return_status := FND_API.G_RET_STS_SUCCESS;
715: fnd_msg_pub.initialize;
716:
717: l_Dataset_Rec.Bsc_Source := p_dataset_source;
718: l_Dataset_Rec.Bsc_Dataset_Help := p_dataset_help;
761: FND_MESSAGE.SET_NAME('BSC','BSC_ALPHA_NUM_REQUIRED');
762: FND_MESSAGE.SET_TOKEN('VALUE', l_Dataset_Rec.Bsc_Measure_Short_Name);
763: FND_MESSAGE.SET_TOKEN('NAME', BSC_APPS.Get_Lookup_Value('BSC_UI_BUILDER', 'MEASURE_SHORT_NAME'), TRUE);
764: FND_MSG_PUB.ADD;
765: RAISE FND_API.G_EXC_ERROR;
766: END IF;
767:
768: SELECT COUNT(Short_Name) INTO l_count
769: FROM BIS_INDICATORS
770: WHERE UPPER(TRIM(Short_Name)) = l_Dataset_Rec.Bsc_Measure_Short_Name;
771: IF (l_count > 0) THEN
772: FND_MESSAGE.SET_NAME('BIS','BIS_MEASURE_SHORT_NAME_UNIQUE');
773: FND_MSG_PUB.ADD;
774: RAISE FND_API.G_EXC_ERROR;
775: END IF;
776: END IF;
777:
778:
848: ,x_Dataset_Id => x_Dataset_Id
849: ,x_return_status => x_return_status
850: ,x_msg_count => x_msg_count
851: ,x_msg_data => x_msg_data);
852: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
853: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Measures');
854: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
855: END IF;
856:
850: ,x_msg_count => x_msg_count
851: ,x_msg_data => x_msg_data);
852: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
853: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Measures');
854: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
855: END IF;
856:
857: else
858: -- START Granular Locking
868: ,x_msg_count => x_msg_count
869: ,x_msg_data => x_msg_data
870: ) ;
871:
872: if ((x_return_status = FND_API.G_RET_STS_ERROR) or (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) then
873: raise FND_API.G_EXC_UNEXPECTED_ERROR;
874: end if;
875: end if;
876:
869: ,x_msg_data => x_msg_data
870: ) ;
871:
872: if ((x_return_status = FND_API.G_RET_STS_ERROR) or (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) then
873: raise FND_API.G_EXC_UNEXPECTED_ERROR;
874: end if;
875: end if;
876:
877: -- Lock the second Data Source
882: ,x_return_status => x_return_status
883: ,x_msg_count => x_msg_count
884: ,x_msg_data => x_msg_data
885: ) ;
886: if ((x_return_status = FND_API.G_RET_STS_ERROR) or (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) then
887: raise FND_API.G_EXC_UNEXPECTED_ERROR;
888: end if;
889: end if;
890:
883: ,x_msg_count => x_msg_count
884: ,x_msg_data => x_msg_data
885: ) ;
886: if ((x_return_status = FND_API.G_RET_STS_ERROR) or (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) then
887: raise FND_API.G_EXC_UNEXPECTED_ERROR;
888: end if;
889: end if;
890:
891: -- END Granular Locking
892:
893:
894: -- Now, create the dataset.
895: BSC_DATASETS_PUB.Create_Dataset(
896: p_commit => FND_API.G_FALSE
897: ,p_Dataset_Rec => l_Dataset_Rec
898: ,x_Dataset_Id => x_Dataset_Id
899: ,x_return_status => x_return_status
900: ,x_msg_count => x_msg_count
898: ,x_Dataset_Id => x_Dataset_Id
899: ,x_return_status => x_return_status
900: ,x_msg_count => x_msg_count
901: ,x_msg_data => x_msg_data);
902: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
903: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Dataset');
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906:
900: ,x_msg_count => x_msg_count
901: ,x_msg_data => x_msg_data);
902: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
903: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Dataset');
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906:
907: -- POSCO Bug#3817894
908: -- Update the measure column if a different source column
915: , x_Return_Status => x_return_status
916: , x_Msg_Count => x_msg_count
917: , x_Msg_Data => x_msg_data
918: );
919: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922: END IF;
923:
916: , x_Msg_Count => x_msg_count
917: , x_Msg_Data => x_msg_data
918: );
919: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922: END IF;
923:
924: -- START Granular Locking
932: ,x_msg_count => x_msg_count
933: ,x_msg_data => x_msg_data
934: ) ;
935:
936: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END IF;
939: END IF;
940:
933: ,x_msg_data => x_msg_data
934: ) ;
935:
936: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END IF;
939: END IF;
940:
941: -- Change the time stamp of the Current Datasource (2)
947: ,x_msg_count => x_msg_count
948: ,x_msg_data => x_msg_data
949: ) ;
950:
951: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
953: END IF;
954: END IF;
955:
948: ,x_msg_data => x_msg_data
949: ) ;
950:
951: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
953: END IF;
954: END IF;
955:
956: -- END Granular Locking
1024: ,p_owner => p_owner
1025: ,x_return_status => x_return_status
1026: ,x_error_tbl => l_error_tbl);
1027:
1028: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1029: IF (l_error_tbl.COUNT > 0) THEN
1030: x_msg_data := l_error_tbl(l_error_tbl.COUNT).Error_Description;
1031: IF(INSTR(x_msg_data, ' ') = 0 ) THEN
1032: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
1032: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
1033: FND_MSG_PUB.ADD;
1034: x_msg_data := NULL;
1035: END IF;
1036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1037: END IF;
1038: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1039: END IF;
1040:
1034: x_msg_data := NULL;
1035: END IF;
1036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1037: END IF;
1038: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1039: END IF;
1040:
1041:
1042: BSC_UTILITY.Add_To_Fnd_Msg_Stack(
1059: end if;
1060:
1061:
1062: EXCEPTION
1063: WHEN FND_API.G_EXC_ERROR THEN
1064: IF (x_msg_data IS NULL) THEN
1065: FND_MSG_PUB.Count_And_Get
1066: ( p_encoded => FND_API.G_FALSE
1067: , p_count => x_msg_count
1062: EXCEPTION
1063: WHEN FND_API.G_EXC_ERROR THEN
1064: IF (x_msg_data IS NULL) THEN
1065: FND_MSG_PUB.Count_And_Get
1066: ( p_encoded => FND_API.G_FALSE
1067: , p_count => x_msg_count
1068: , p_data => x_msg_data
1069: );
1070: END IF;
1068: , p_data => x_msg_data
1069: );
1070: END IF;
1071: ROLLBACK TO SP_CREATE_MEASURE;
1072: x_return_status := FND_API.G_RET_STS_ERROR;
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074: IF (x_msg_data IS NULL) THEN
1075: FND_MSG_PUB.Count_And_Get
1076: ( p_encoded => FND_API.G_FALSE
1069: );
1070: END IF;
1071: ROLLBACK TO SP_CREATE_MEASURE;
1072: x_return_status := FND_API.G_RET_STS_ERROR;
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074: IF (x_msg_data IS NULL) THEN
1075: FND_MSG_PUB.Count_And_Get
1076: ( p_encoded => FND_API.G_FALSE
1077: , p_count => x_msg_count
1072: x_return_status := FND_API.G_RET_STS_ERROR;
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074: IF (x_msg_data IS NULL) THEN
1075: FND_MSG_PUB.Count_And_Get
1076: ( p_encoded => FND_API.G_FALSE
1077: , p_count => x_msg_count
1078: , p_data => x_msg_data
1079: );
1080: END IF;
1078: , p_data => x_msg_data
1079: );
1080: END IF;
1081: ROLLBACK TO SP_CREATE_MEASURE;
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083: WHEN NO_DATA_FOUND THEN
1084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1085: IF (x_msg_data IS NOT NULL) THEN
1086: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
1080: END IF;
1081: ROLLBACK TO SP_CREATE_MEASURE;
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083: WHEN NO_DATA_FOUND THEN
1084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1085: IF (x_msg_data IS NOT NULL) THEN
1086: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
1087: ELSE
1088: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
1088: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
1089: END IF;
1090: ROLLBACK TO SP_CREATE_MEASURE;
1091: WHEN OTHERS THEN
1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1093: IF (x_msg_data IS NOT NULL) THEN
1094: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Create_Measure ';
1095: ELSE
1096: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Create_Measure ';
1099: end CREATE_MEASURE;
1100:
1101:
1102: procedure Update_Measure(
1103: p_commit IN VARCHAR2 := FND_API.G_FALSE
1104: ,p_dataset_id IN NUMBER
1105: ,p_dataset_source IN VARCHAR2
1106: ,p_dataset_name IN VARCHAR2
1107: ,p_dataset_help IN VARCHAR2 := NULL
1135: ,p_measure_type IN NUMBER := NULL
1136: ,p_measure_apply_rollup IN VARCHAR2 := NULL
1137: ,p_measure_function_name IN VARCHAR2 := NULL
1138: ,p_measure_enable_link IN VARCHAR2 := NULL
1139: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
1140: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
1141: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
1142: ,p_time_stamp IN VARCHAR2 := NULL -- Added for Granular Locking
1143: ,p_dimension1_id IN NUMBER
1137: ,p_measure_function_name IN VARCHAR2 := NULL
1138: ,p_measure_enable_link IN VARCHAR2 := NULL
1139: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
1140: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
1141: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
1142: ,p_time_stamp IN VARCHAR2 := NULL -- Added for Granular Locking
1143: ,p_dimension1_id IN NUMBER
1144: ,p_dimension2_id IN NUMBER
1145: ,p_dimension3_id IN NUMBER
1156: ,x_msg_data OUT NOCOPY VARCHAR2
1157: ) is
1158: begin
1159: SAVEPOINT SP_UPDATE_MEASURE;
1160: x_return_status := FND_API.G_RET_STS_SUCCESS;
1161: fnd_msg_pub.initialize;
1162:
1163: Update_Measure(
1164: p_commit => p_commit
1217: ,x_msg_count => x_msg_count
1218: ,x_msg_data => x_msg_data
1219: );
1220: EXCEPTION
1221: WHEN FND_API.G_EXC_ERROR THEN
1222: IF (x_msg_data IS NULL) THEN
1223: FND_MSG_PUB.Count_And_Get
1224: ( p_encoded => FND_API.G_FALSE
1225: , p_count => x_msg_count
1220: EXCEPTION
1221: WHEN FND_API.G_EXC_ERROR THEN
1222: IF (x_msg_data IS NULL) THEN
1223: FND_MSG_PUB.Count_And_Get
1224: ( p_encoded => FND_API.G_FALSE
1225: , p_count => x_msg_count
1226: , p_data => x_msg_data
1227: );
1228: END IF;
1226: , p_data => x_msg_data
1227: );
1228: END IF;
1229: ROLLBACK TO SP_UPDATE_MEASURE;
1230: x_return_status := FND_API.G_RET_STS_ERROR;
1231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1232: IF (x_msg_data IS NULL) THEN
1233: FND_MSG_PUB.Count_And_Get
1234: ( p_encoded => FND_API.G_FALSE
1227: );
1228: END IF;
1229: ROLLBACK TO SP_UPDATE_MEASURE;
1230: x_return_status := FND_API.G_RET_STS_ERROR;
1231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1232: IF (x_msg_data IS NULL) THEN
1233: FND_MSG_PUB.Count_And_Get
1234: ( p_encoded => FND_API.G_FALSE
1235: , p_count => x_msg_count
1230: x_return_status := FND_API.G_RET_STS_ERROR;
1231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1232: IF (x_msg_data IS NULL) THEN
1233: FND_MSG_PUB.Count_And_Get
1234: ( p_encoded => FND_API.G_FALSE
1235: , p_count => x_msg_count
1236: , p_data => x_msg_data
1237: );
1238: END IF;
1236: , p_data => x_msg_data
1237: );
1238: END IF;
1239: ROLLBACK TO SP_UPDATE_MEASURE;
1240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1241: WHEN NO_DATA_FOUND THEN
1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1243: IF (x_msg_data IS NOT NULL) THEN
1244: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Update_measure ';
1238: END IF;
1239: ROLLBACK TO SP_UPDATE_MEASURE;
1240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1241: WHEN NO_DATA_FOUND THEN
1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1243: IF (x_msg_data IS NOT NULL) THEN
1244: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Update_measure ';
1245: ELSE
1246: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Update_measure ';
1246: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Update_measure ';
1247: END IF;
1248: ROLLBACK TO SP_UPDATE_MEASURE;
1249: WHEN OTHERS THEN
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: IF (x_msg_data IS NOT NULL) THEN
1252: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Update_measure ';
1253: ELSE
1254: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Update_measure ';
1313: RETURN FALSE;
1314: END Is_Src_Col_In_Formulas;
1315:
1316: PROCEDURE Update_Single_To_Formula(
1317: p_commit IN VARCHAR2 := FND_API.G_FALSE
1318: ,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
1319: ,p_Dataset_Rec_db IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
1320: ,x_return_status OUT NOCOPY VARCHAR2
1321: ,x_msg_count OUT NOCOPY NUMBER
1400: ,x_msg_count
1401: ,x_msg_data);
1402:
1403:
1404: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1405: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Measures');
1406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1407: END IF;
1408:
1402:
1403:
1404: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1405: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Create_Measures');
1406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1407: END IF;
1408:
1409: --Need to update Dataset Info with the new Measure Id generated
1410:
1415: ,x_return_status => x_return_status
1416: ,x_msg_count => x_msg_count
1417: ,x_msg_data => x_msg_data);
1418:
1419: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1420: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Update_Measures');
1421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1422: END IF;
1423:
1417: ,x_msg_data => x_msg_data);
1418:
1419: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1420: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Update_Measures');
1421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1422: END IF;
1423:
1424: /*Checking for Structural changes in indicators*/
1425: l_kpi_flag := BSC_DESIGNER_PVT.G_ActionFlag.GAA_Structure;
1433: end loop;
1434:
1435: EXCEPTION
1436:
1437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1438:
1439: IF(indicators_cursor%ISOPEN) THEN
1440: CLOSE indicators_cursor;
1441: END IF;
1441: END IF;
1442:
1443: IF (x_msg_data IS NULL) THEN
1444: FND_MSG_PUB.Count_And_Get
1445: ( p_encoded => FND_API.G_FALSE
1446: , p_count => x_msg_count
1447: , p_data => x_msg_data
1448: );
1449: END IF;
1447: , p_data => x_msg_data
1448: );
1449: END IF;
1450: ROLLBACK TO SP_UPD_TO_FORMULA;
1451: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1452:
1453: WHEN OTHERS THEN
1454:
1455: IF(indicators_cursor%ISOPEN) THEN
1455: IF(indicators_cursor%ISOPEN) THEN
1456: CLOSE indicators_cursor;
1457: END IF;
1458:
1459: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1460:
1461: IF (x_msg_data IS NOT NULL) THEN
1462: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Upd_Sing_To_Formula ';
1463: ELSE
1468: END Update_Single_To_Formula;
1469:
1470:
1471: procedure Update_Measure(
1472: p_commit IN VARCHAR2 := FND_API.G_FALSE
1473: ,p_dataset_id IN NUMBER
1474: ,p_dataset_source IN VARCHAR2
1475: ,p_dataset_name IN VARCHAR2
1476: ,p_dataset_help IN VARCHAR2 := NULL
1504: ,p_measure_type IN NUMBER := NULL
1505: ,p_measure_apply_rollup IN VARCHAR2 := NULL
1506: ,p_measure_function_name IN VARCHAR2 := NULL
1507: ,p_measure_enable_link IN VARCHAR2 := NULL
1508: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
1509: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
1510: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
1511: ,p_time_stamp IN VARCHAR2 := NULL -- Added for Granular Locking
1512: ,p_dimension1_id IN NUMBER
1506: ,p_measure_function_name IN VARCHAR2 := NULL
1507: ,p_measure_enable_link IN VARCHAR2 := NULL
1508: ,p_measure_obsolete IN VARCHAR2 := FND_API.G_FALSE
1509: ,p_type IN VARCHAR2 := NULL -- This is used for weighted kpis,This can take values CDS_SCORE,CDS_PERF or Null
1510: ,p_measure_is_validate IN VARCHAR2 := FND_API.G_TRUE -- ankgoel: bug#3557236
1511: ,p_time_stamp IN VARCHAR2 := NULL -- Added for Granular Locking
1512: ,p_dimension1_id IN NUMBER
1513: ,p_dimension2_id IN NUMBER
1514: ,p_dimension3_id IN NUMBER
1589: AND M.MEASURE_ID = D.MEASURE_ID1;
1590:
1591: begin
1592: SAVEPOINT SP_UPDATE_MEASURE;
1593: x_return_status := FND_API.G_RET_STS_SUCCESS;
1594: fnd_msg_pub.initialize;
1595:
1596: l_Dataset_Rec.Bsc_dataset_id := p_dataset_id;
1597: l_Dataset_Rec.Bsc_Source := p_dataset_source;
1725: IF (l_Report_Objectives IS NOT NULL) THEN
1726: FND_MESSAGE.SET_NAME('BIS','BIS_KPI_NON_FORMULA_FOR_AGRPT');
1727: FND_MESSAGE.SET_TOKEN('OBJECTIVES', l_Report_Objectives);
1728: FND_MSG_PUB.ADD;
1729: RAISE FND_API.G_EXC_ERROR;
1730: END IF;
1731: END IF ;
1732:
1733: -- START Granular Locking
1741: ) ;
1742:
1743: -- The APIs should check for return status ...
1744: -- Raising an unexpected error.
1745: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1746: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.LOCK_UPDATE_MEASURE');
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: END IF;
1749: -- END Granular Locking
1743: -- The APIs should check for return status ...
1744: -- Raising an unexpected error.
1745: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1746: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.LOCK_UPDATE_MEASURE');
1747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1748: END IF;
1749: -- END Granular Locking
1750:
1751: -- Fix for Bug#3781176
1801: ,x_msg_count => x_msg_count
1802: ,x_msg_data => x_msg_data
1803: );
1804:
1805: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1807: END IF;
1808: -- added an additional condition 'Is_Src_Col_In_Formulas' for Bug#5071121
1809: IF ((NOT isFormula(l_Dataset_Rec_db.Bsc_Measure_Col)) AND
1802: ,x_msg_data => x_msg_data
1803: );
1804:
1805: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1807: END IF;
1808: -- added an additional condition 'Is_Src_Col_In_Formulas' for Bug#5071121
1809: IF ((NOT isFormula(l_Dataset_Rec_db.Bsc_Measure_Col)) AND
1810: (isFormula(l_Dataset_Rec.Bsc_Measure_Col)) AND
1819: ,x_return_status => x_return_status
1820: ,x_msg_count => x_msg_count
1821: ,x_msg_data => x_msg_data
1822: );
1823: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1824: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1825: END IF;
1826:
1827:
1820: ,x_msg_count => x_msg_count
1821: ,x_msg_data => x_msg_data
1822: );
1823: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1824: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1825: END IF;
1826:
1827:
1828: ELSE
1836: ,x_return_status => x_return_status
1837: ,x_msg_count => x_msg_count
1838: ,x_msg_data => x_msg_data);
1839:
1840: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1841: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Update_Measures');
1842: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1843: END IF;
1844: END IF;
1838: ,x_msg_data => x_msg_data);
1839:
1840: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1841: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_DATASETS_PUB.Update_Measures');
1842: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1843: END IF;
1844: END IF;
1845:
1846: -- Fix for Bug#3781176
1854: ,x_return_status => x_return_status
1855: ,x_msg_count => x_msg_count
1856: ,x_msg_data => x_msg_data
1857: );
1858: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1860: END IF;
1861: END IF;
1862:
1855: ,x_msg_count => x_msg_count
1856: ,x_msg_data => x_msg_data
1857: );
1858: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1860: END IF;
1861: END IF;
1862:
1863: -- relaxed update condition for DB columns for all types of measures
1894: , x_Projection_Id => NVL(l_Dataset_Rec.Bsc_Measure_Projection_Id,l_projection_id)
1895: , x_Measure_Type => NVL(p_Measure_Type, l_measure_type)
1896: , x_Help => NVL(l_measure_col_help, l_Dataset_Rec.Bsc_Measure_Col)
1897: );
1898: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1899: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at bsc_db_measure_cols_pkg.update_row');
1900: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1901: END IF;
1902: else
1896: , x_Help => NVL(l_measure_col_help, l_Dataset_Rec.Bsc_Measure_Col)
1897: );
1898: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1899: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at bsc_db_measure_cols_pkg.update_row');
1900: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1901: END IF;
1902: else
1903: IF NOT (isFormula(l_Dataset_Rec.Bsc_Measure_Col) OR l_Dataset_Rec.Bsc_Source = c_CDS) THEN
1904: --DBMS_OUTPUT.PUT_LINE('calling bsc_db_measure_cols_pkg.insert_row');
1907: ,p_measure_group_id
1908: ,l_Dataset_Rec.Bsc_Measure_Projection_Id
1909: ,p_Measure_Type
1910: ,l_measure_col_help);
1911: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1912: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at bsc_db_measure_cols_pkg.insert_row');
1913: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1914: END IF;
1915: end if;
1909: ,p_Measure_Type
1910: ,l_measure_col_help);
1911: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1912: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at bsc_db_measure_cols_pkg.insert_row');
1913: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1914: END IF;
1915: end if;
1916: end if;
1917:
1980: ,p_Measure_Rec => l_measure_rec
1981: ,p_owner => p_owner
1982: ,x_return_status => x_return_status
1983: ,x_error_tbl => l_error_tbl);
1984: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
1985: IF (l_error_tbl.COUNT > 0) THEN
1986: x_msg_data := l_error_tbl(l_error_tbl.COUNT).Error_Description;
1987: IF(INSTR(x_msg_data, ' ') = 0 ) THEN
1988: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
1988: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
1989: FND_MSG_PUB.ADD;
1990: x_msg_data := NULL;
1991: END IF;
1992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1993: END IF;
1994: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BIS_MEASURE_PUB.Update_Measure');
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;
1991: END IF;
1992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1993: END IF;
1994: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BIS_MEASURE_PUB.Update_Measure');
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;
1997: else
1998: -- Normally, PMF measure should always exist once BSC measure was created.
1999: -- Code should not reach here under normal circumstances.
2004: ,p_Measure_Rec => l_measure_rec
2005: ,p_owner => p_owner
2006: ,x_return_status => x_return_status
2007: ,x_error_tbl => l_error_tbl);
2008: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2009: IF (l_error_tbl.COUNT > 0) THEN
2010: x_msg_data := l_error_tbl(l_error_tbl.COUNT).Error_Description;
2011: IF(INSTR(x_msg_data, ' ') = 0 ) THEN
2012: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
2012: FND_MESSAGE.SET_NAME('BIS',x_msg_data);
2013: FND_MSG_PUB.ADD;
2014: x_msg_data := NULL;
2015: END IF;
2016: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2017: END IF;
2018: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BIS_MEASURE_PUB.Create_Measure');
2019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2020: END IF;
2015: END IF;
2016: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2017: END IF;
2018: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BIS_MEASURE_PUB.Create_Measure');
2019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2020: END IF;
2021: end if;
2022:
2023: -- At this point, the Measures would have been updated.
2036: ,x_msg_count => x_msg_count
2037: ,x_msg_data => x_msg_data
2038: ) ;
2039:
2040: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2041: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASET');
2042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044: END IF;
2038: ) ;
2039:
2040: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2041: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASET');
2042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044: END IF;
2045: -- Change the time stamp of the Current Datasource (1)
2046: IF (l_Dataset_Rec.Bsc_Measure_Id is not null) THEN
2052: ,x_msg_count => x_msg_count
2053: ,x_msg_data => x_msg_data
2054: ) ;
2055:
2056: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2057: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASOURCE');
2058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2059: END IF;
2060: END IF;
2054: ) ;
2055:
2056: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2057: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASOURCE');
2058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2059: END IF;
2060: END IF;
2061: -- Change the time stamp of the Current Datasource (2)
2062: IF (l_Dataset_Rec.Bsc_Measure_Id2 is not null) THEN
2067: ,x_return_status => x_return_status
2068: ,x_msg_count => x_msg_count
2069: ,x_msg_data => x_msg_data
2070: ) ;
2071: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2072: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASOURCE');
2073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2074: END IF;
2075: END IF;
2069: ,x_msg_data => x_msg_data
2070: ) ;
2071: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2072: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_BIS_LOCKS_PUB.SET_TIME_STAMP_DATASOURCE');
2073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2074: END IF;
2075: END IF;
2076: -- END Granular Locking
2077:
2080: p_error_tbl => l_error_tbl
2081: ,x_return_status => x_return_status
2082: ,x_msg_count => x_msg_count
2083: ,x_msg_data => x_msg_data);
2084: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2085: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_UTILITY.Add_To_Fnd_Msg_Stack');
2086: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2087: END IF;
2088: EXCEPTION
2082: ,x_msg_count => x_msg_count
2083: ,x_msg_data => x_msg_data);
2084: IF ((x_return_status IS NOT NULL) AND (x_return_status <> FND_API.G_RET_STS_SUCCESS)) THEN
2085: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_UTILITY.Add_To_Fnd_Msg_Stack');
2086: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2087: END IF;
2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: IF ( c_measure_col_cur%ISOPEN) THEN
2085: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.BSC_BIS_MEASURE_PUB Failed: at BSC_UTILITY.Add_To_Fnd_Msg_Stack');
2086: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2087: END IF;
2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: IF ( c_measure_col_cur%ISOPEN) THEN
2091: CLOSE c_measure_col_cur;
2092: END IF;
2093: IF ( c_Bsc_Measure_Color_Formula%ISOPEN) THEN
2094: CLOSE c_Bsc_Measure_Color_Formula;
2095: END IF;
2096: IF (x_msg_data IS NULL) THEN
2097: FND_MSG_PUB.Count_And_Get
2098: ( p_encoded => FND_API.G_FALSE
2099: , p_count => x_msg_count
2100: , p_data => x_msg_data
2101: );
2102: END IF;
2100: , p_data => x_msg_data
2101: );
2102: END IF;
2103: ROLLBACK TO SP_UPDATE_MEASURE;
2104: x_return_status := FND_API.G_RET_STS_ERROR;
2105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2106: IF ( c_measure_col_cur%ISOPEN) THEN
2107: CLOSE c_measure_col_cur;
2108: END IF;
2101: );
2102: END IF;
2103: ROLLBACK TO SP_UPDATE_MEASURE;
2104: x_return_status := FND_API.G_RET_STS_ERROR;
2105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2106: IF ( c_measure_col_cur%ISOPEN) THEN
2107: CLOSE c_measure_col_cur;
2108: END IF;
2109: IF ( c_Bsc_Measure_Color_Formula%ISOPEN) THEN
2110: CLOSE c_Bsc_Measure_Color_Formula;
2111: END IF;
2112: IF (x_msg_data IS NULL) THEN
2113: FND_MSG_PUB.Count_And_Get
2114: ( p_encoded => FND_API.G_FALSE
2115: , p_count => x_msg_count
2116: , p_data => x_msg_data
2117: );
2118: END IF;
2116: , p_data => x_msg_data
2117: );
2118: END IF;
2119: ROLLBACK TO SP_UPDATE_MEASURE;
2120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2121: WHEN NO_DATA_FOUND THEN
2122: IF ( c_measure_col_cur%ISOPEN) THEN
2123: CLOSE c_measure_col_cur;
2124: END IF;
2124: END IF;
2125: IF ( c_Bsc_Measure_Color_Formula%ISOPEN) THEN
2126: CLOSE c_Bsc_Measure_Color_Formula;
2127: END IF;
2128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2129: IF (x_msg_data IS NOT NULL) THEN
2130: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Update_measure ';
2131: ELSE
2132: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Update_measure ';
2138: END IF;
2139: IF ( c_Bsc_Measure_Color_Formula%ISOPEN) THEN
2140: CLOSE c_Bsc_Measure_Color_Formula;
2141: END IF;
2142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2143: IF (x_msg_data IS NOT NULL) THEN
2144: x_msg_data := x_msg_data||' -> BSC_BIS_MEASURE_PUB.Update_measure ';
2145: ELSE
2146: x_msg_data := SQLERRM||' at BSC_BIS_MEASURE_PUB.Update_measure ';
2149: end Update_measure;
2150:
2151:
2152: procedure Delete_measure(
2153: p_commit IN VARCHAR2 := FND_API.G_FALSE
2154: ,p_dataset_id IN NUMBER
2155: ,p_time_stamp IN VARCHAR2 := NULL -- Added for Granular Locking
2156: ,x_return_status OUT NOCOPY VARCHAR2
2157: ,x_msg_count OUT NOCOPY NUMBER
2190:
2191:
2192: -- The APIs should check for return status ...
2193: -- Raising an unexpected error.
2194: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2195: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2197: END IF;
2198:
2192: -- The APIs should check for return status ...
2193: -- Raising an unexpected error.
2194: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2195: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2197: END IF;
2198:
2199: -- END : Granular Locking
2200:
2204: ,x_return_status => x_return_status
2205: ,x_msg_count => x_msg_count
2206: ,x_msg_data => x_msg_data);
2207:
2208: IF ( (x_return_status = FND_API.G_RET_STS_SUCCESS) OR (x_return_status IS NULL) ) THEN
2209: -- Delete from PMF tables
2210: IF (l_Measure_Rec.Measure_Id IS NOT NULL) THEN
2211: BIS_MEASURE_PUB.Delete_Measure(
2212: p_api_version => 1.0
2240: ,x_Msg_Data => x_Msg_Data
2241: );
2242: END IF;
2243: EXCEPTION
2244: WHEN FND_API.G_EXC_ERROR THEN
2245: x_return_status := FND_API.G_RET_STS_ERROR;
2246: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2247: ,p_data => x_msg_data);
2248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2241: );
2242: END IF;
2243: EXCEPTION
2244: WHEN FND_API.G_EXC_ERROR THEN
2245: x_return_status := FND_API.G_RET_STS_ERROR;
2246: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2247: ,p_data => x_msg_data);
2248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2244: WHEN FND_API.G_EXC_ERROR THEN
2245: x_return_status := FND_API.G_RET_STS_ERROR;
2246: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2247: ,p_data => x_msg_data);
2248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2250: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2251: ,p_data => x_msg_data);
2252: WHEN NO_DATA_FOUND THEN
2245: x_return_status := FND_API.G_RET_STS_ERROR;
2246: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2247: ,p_data => x_msg_data);
2248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2250: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2251: ,p_data => x_msg_data);
2252: WHEN NO_DATA_FOUND THEN
2253: x_return_status := FND_API.G_RET_STS_ERROR;
2249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2250: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2251: ,p_data => x_msg_data);
2252: WHEN NO_DATA_FOUND THEN
2253: x_return_status := FND_API.G_RET_STS_ERROR;
2254: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2255: ,p_data => x_msg_data);
2256: WHEN OTHERS THEN
2257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2253: x_return_status := FND_API.G_RET_STS_ERROR;
2254: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2255: ,p_data => x_msg_data);
2256: WHEN OTHERS THEN
2257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2258: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2259: ,p_data => x_msg_data);
2260: if (x_msg_data is null) then
2261: x_msg_data := SQLERRM;
2267: -- API name : Cascade_Disable_Calculation
2268: -- Type : Private
2269: ************************************************************************************/
2270: PROCEDURE Cascade_Disable_Calculation(
2271: p_commit IN VARCHAR2 := FND_API.G_FALSE
2272: ,p_dataset_id IN NUMBER
2273: ,p_disabled_calculation IN NUMBER
2274: ,x_return_status OUT NOCOPY VARCHAR2
2275: ,x_msg_count OUT NOCOPY NUMBER
2298:
2299: BEGIN
2300:
2301: SAVEPOINT Cascade_Disable_Calc_PUB;
2302: x_return_status := FND_API.G_RET_STS_SUCCESS;
2303: FND_MSG_PUB.Initialize;
2304:
2305: FOR cd IN c_kpis LOOP
2306: BSC_KPI_SERIES_PUB.Save_Default_Calculation(
2303: FND_MSG_PUB.Initialize;
2304:
2305: FOR cd IN c_kpis LOOP
2306: BSC_KPI_SERIES_PUB.Save_Default_Calculation(
2307: p_commit => FND_API.G_FALSE
2308: ,p_Indicator => cd.indicator
2309: ,p_Analysis_Option0 => cd.analysis_option0
2310: ,p_Analysis_Option1 => cd.analysis_option1
2311: ,p_Analysis_Option2 => cd.analysis_option2
2314: ,x_return_status => x_return_status
2315: ,x_msg_count => x_msg_count
2316: ,x_msg_data => x_msg_data
2317: );
2318: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2320: END IF;
2321: END LOOP;
2322:
2315: ,x_msg_count => x_msg_count
2316: ,x_msg_data => x_msg_data
2317: );
2318: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2320: END IF;
2321: END LOOP;
2322:
2323: IF FND_API.To_Boolean(p_Commit) THEN
2319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2320: END IF;
2321: END LOOP;
2322:
2323: IF FND_API.To_Boolean(p_Commit) THEN
2324: COMMIT;
2325: END IF;
2326: EXCEPTION
2327: WHEN FND_API.G_EXC_ERROR THEN
2323: IF FND_API.To_Boolean(p_Commit) THEN
2324: COMMIT;
2325: END IF;
2326: EXCEPTION
2327: WHEN FND_API.G_EXC_ERROR THEN
2328: ROLLBACK TO Cascade_Disable_Calc_PUB;
2329: IF (x_msg_data IS NULL) THEN
2330: FND_MSG_PUB.Count_And_Get
2331: ( p_encoded => FND_API.G_FALSE
2327: WHEN FND_API.G_EXC_ERROR THEN
2328: ROLLBACK TO Cascade_Disable_Calc_PUB;
2329: IF (x_msg_data IS NULL) THEN
2330: FND_MSG_PUB.Count_And_Get
2331: ( p_encoded => FND_API.G_FALSE
2332: , p_count => x_msg_count
2333: , p_data => x_msg_data
2334: );
2335: END IF;
2332: , p_count => x_msg_count
2333: , p_data => x_msg_data
2334: );
2335: END IF;
2336: x_return_status := FND_API.G_RET_STS_ERROR;
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: ROLLBACK TO Cascade_Disable_Calc_PUB;
2339: IF (x_msg_data IS NULL) THEN
2340: FND_MSG_PUB.Count_And_Get
2333: , p_data => x_msg_data
2334: );
2335: END IF;
2336: x_return_status := FND_API.G_RET_STS_ERROR;
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: ROLLBACK TO Cascade_Disable_Calc_PUB;
2339: IF (x_msg_data IS NULL) THEN
2340: FND_MSG_PUB.Count_And_Get
2341: ( p_encoded => FND_API.G_FALSE
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: ROLLBACK TO Cascade_Disable_Calc_PUB;
2339: IF (x_msg_data IS NULL) THEN
2340: FND_MSG_PUB.Count_And_Get
2341: ( p_encoded => FND_API.G_FALSE
2342: , p_count => x_msg_count
2343: , p_data => x_msg_data
2344: );
2345: END IF;
2342: , p_count => x_msg_count
2343: , p_data => x_msg_data
2344: );
2345: END IF;
2346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2347: WHEN NO_DATA_FOUND THEN
2348: ROLLBACK TO Cascade_Disable_Calc_PUB;
2349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2350: IF (x_msg_data IS NOT NULL) THEN
2345: END IF;
2346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2347: WHEN NO_DATA_FOUND THEN
2348: ROLLBACK TO Cascade_Disable_Calc_PUB;
2349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2350: IF (x_msg_data IS NOT NULL) THEN
2351: x_msg_data := x_msg_data||' ->BSC_KPI_SERIES_PUB.Cascade_Disable_Calculation ';
2352: ELSE
2353: x_msg_data := SQLERRM||'BSC_KPI_SERIES_PUB.Cascade_Disable_Calculation ';
2353: x_msg_data := SQLERRM||'BSC_KPI_SERIES_PUB.Cascade_Disable_Calculation ';
2354: END IF;
2355: WHEN OTHERS THEN
2356: ROLLBACK TO Cascade_Disable_Calc_PUB;
2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2358: IF (x_msg_data IS NOT NULL) THEN
2359: x_msg_data := x_msg_data||' ->BSC_KPI_SERIES_PUB.Cascade_Disable_Calculation ';
2360: ELSE
2361: x_msg_data := SQLERRM||' at BSC_KPI_SERIES_PUB.Cascade_Disable_Calculation ';
2362: END IF;
2363: END Cascade_Disable_Calculation;
2364:
2365: procedure Apply_Dataset_Calc(
2366: p_commit IN VARCHAR2 := FND_API.G_FALSE
2367: ,p_dataset_id IN NUMBER
2368: ,p_disabled_calc_table IN BSC_NUM_LIST
2369: ,x_return_status OUT NOCOPY VARCHAR2
2370: ,x_msg_count OUT NOCOPY NUMBER
2396: ,x_msg_count => x_msg_count
2397: ,x_msg_data => x_msg_data);
2398:
2399: Cascade_Disable_Calculation(
2400: p_commit => FND_API.G_FALSE
2401: ,p_dataset_id => p_dataset_id
2402: ,p_disabled_calculation => p_disabled_calc_table(i)
2403: ,x_return_status => x_return_status
2404: ,x_msg_count => x_msg_count
2403: ,x_return_status => x_return_status
2404: ,x_msg_count => x_msg_count
2405: ,x_msg_data => x_msg_data
2406: );
2407: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2409: END IF;
2410: end loop;
2411: end if;
2404: ,x_msg_count => x_msg_count
2405: ,x_msg_data => x_msg_data
2406: );
2407: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2409: END IF;
2410: end loop;
2411: end if;
2412:
2418: ,x_msg_count => x_msg_count
2419: ,x_msg_data => x_msg_data
2420: ) ;
2421:
2422: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2423: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2425: END IF;
2426: END IF;
2420: ) ;
2421:
2422: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2423: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2425: END IF;
2426: END IF;
2427:
2428:
2426: END IF;
2427:
2428:
2429: EXCEPTION
2430: WHEN FND_API.G_EXC_ERROR THEN
2431: x_return_status := FND_API.G_RET_STS_ERROR;
2432: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2433: ,p_data => x_msg_data);
2434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2427:
2428:
2429: EXCEPTION
2430: WHEN FND_API.G_EXC_ERROR THEN
2431: x_return_status := FND_API.G_RET_STS_ERROR;
2432: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2433: ,p_data => x_msg_data);
2434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2430: WHEN FND_API.G_EXC_ERROR THEN
2431: x_return_status := FND_API.G_RET_STS_ERROR;
2432: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2433: ,p_data => x_msg_data);
2434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2437: ,p_data => x_msg_data);
2438: WHEN NO_DATA_FOUND THEN
2431: x_return_status := FND_API.G_RET_STS_ERROR;
2432: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2433: ,p_data => x_msg_data);
2434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2437: ,p_data => x_msg_data);
2438: WHEN NO_DATA_FOUND THEN
2439: x_return_status := FND_API.G_RET_STS_ERROR;
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2437: ,p_data => x_msg_data);
2438: WHEN NO_DATA_FOUND THEN
2439: x_return_status := FND_API.G_RET_STS_ERROR;
2440: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2441: ,p_data => x_msg_data);
2442: WHEN OTHERS THEN
2443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2439: x_return_status := FND_API.G_RET_STS_ERROR;
2440: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2441: ,p_data => x_msg_data);
2442: WHEN OTHERS THEN
2443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2444: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2445: ,p_data => x_msg_data);
2446: if (x_msg_data is null) then
2447: x_msg_data := SQLERRM;
2449: end Apply_Dataset_Calc;
2450:
2451:
2452: PROCEDURE Apply_Cause_Effect_Rels(
2453: p_commit IN VARCHAR2 := FND_API.G_FALSE
2454: ,p_dataset_id IN NUMBER
2455: ,p_causes_table IN BSC_NUM_LIST
2456: ,p_effects_table IN BSC_NUM_LIST
2457: ,x_return_status OUT NOCOPY VARCHAR2
2512: if l_measure_names is not null then
2513: FND_MESSAGE.SET_NAME('BSC','BSC_CAE_USED_AT_SAME_TIME');
2514: FND_MESSAGE.SET_TOKEN('LIST', l_measure_names);
2515: FND_MSG_PUB.ADD;
2516: RAISE FND_API.G_EXC_ERROR;
2517: end if;
2518: end if;
2519:
2520: OPEN c_cause_list ;
2620: ,x_msg_count => x_msg_count
2621: ,x_msg_data => x_msg_data
2622: ) ;
2623:
2624: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2625: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2626: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2627: END IF;
2628: END IF;
2622: ) ;
2623:
2624: IF ((x_return_status = FND_API.G_RET_STS_ERROR) OR (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR)) THEN
2625: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_DIM_SET_PUB.CREATE_DIM_SET Failed: at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl');
2626: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2627: END IF;
2628: END IF;
2629:
2630:
2628: END IF;
2629:
2630:
2631: EXCEPTION
2632: WHEN FND_API.G_EXC_ERROR THEN
2633: x_return_status := FND_API.G_RET_STS_ERROR;
2634: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2635: ,p_data => x_msg_data);
2636: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2629:
2630:
2631: EXCEPTION
2632: WHEN FND_API.G_EXC_ERROR THEN
2633: x_return_status := FND_API.G_RET_STS_ERROR;
2634: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2635: ,p_data => x_msg_data);
2636: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2632: WHEN FND_API.G_EXC_ERROR THEN
2633: x_return_status := FND_API.G_RET_STS_ERROR;
2634: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2635: ,p_data => x_msg_data);
2636: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2638: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2639: ,p_data => x_msg_data);
2640: WHEN NO_DATA_FOUND THEN
2633: x_return_status := FND_API.G_RET_STS_ERROR;
2634: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2635: ,p_data => x_msg_data);
2636: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2638: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2639: ,p_data => x_msg_data);
2640: WHEN NO_DATA_FOUND THEN
2641: x_return_status := FND_API.G_RET_STS_ERROR;
2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2638: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2639: ,p_data => x_msg_data);
2640: WHEN NO_DATA_FOUND THEN
2641: x_return_status := FND_API.G_RET_STS_ERROR;
2642: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2643: ,p_data => x_msg_data);
2644: WHEN OTHERS THEN
2645: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2641: x_return_status := FND_API.G_RET_STS_ERROR;
2642: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2643: ,p_data => x_msg_data);
2644: WHEN OTHERS THEN
2645: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2646: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2647: ,p_data => x_msg_data);
2648: if (x_msg_data is null) then
2649: x_msg_data := SQLERRM;
2672: if (p_Dataset_Rec.Bsc_Measure_operation = c_AVGL_CODE) and isFormula(p_Dataset_Rec.Bsc_Measure_Col) then
2673: -- Do not allow this condition
2674: FND_MESSAGE.SET_NAME('BSC','BSC_AVGLOWESTLEVEL_ERR_TXT');
2675: FND_MSG_PUB.ADD;
2676: RAISE FND_API.G_EXC_ERROR;
2677: end if;
2678: end if;
2679:
2680: -- Insert pAvgL=...
2846: END GET_SERIES_COUNT;
2847:
2848: --=============================================================================
2849: Procedure Load_Measure
2850: ( p_commit IN VARCHAR2 := FND_API.G_FALSE
2851: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
2852: ,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
2853: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
2854: , p_custom_mode IN VARCHAR2 := NULL
2960: -- Call to BIS_MEASURE_PVT.Measure_Value_ID_Conversion is used to check
2961: -- if the measure should be created/updated during the upload of measure
2962:
2963: IF (BIS_UTILITIES_PUB.Value_Missing
2964: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
2965: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
2966: = FND_API.G_TRUE) THEN
2967: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
2968: ( p_api_version => 1.0
2962:
2963: IF (BIS_UTILITIES_PUB.Value_Missing
2964: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
2965: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
2966: = FND_API.G_TRUE) THEN
2967: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
2968: ( p_api_version => 1.0
2969: , p_Measure_Rec => l_Measure_Rec_new
2970: , x_Measure_Rec => l_Measure_Rec
2973: );
2974: END IF;
2975:
2976: --bug#4045278: perform upload test before any data is changed in the system
2977: IF ((x_return_status <> FND_API.G_RET_STS_SUCCESS) AND
2978: (l_dataset_id IS NULL)) THEN
2979: l_is_create := TRUE;
2980: ELSE
2981: l_is_create := FALSE;
2992: IF (l_upload_test = FALSE) THEN
2993: FND_MESSAGE.SET_NAME('BIS','BIS_MEA_UPLOAD_TEST_FAILED');
2994: FND_MESSAGE.SET_TOKEN('SHORT_NAME', p_Measure_Rec.Measure_Short_Name);
2995: FND_MSG_PUB.ADD;
2996: RAISE FND_API.G_EXC_ERROR;
2997: END IF;
2998: END IF;
2999:
3000: --bug#4045278: moved this portion to here so that we allow modifying measure_group tables if upload_test passed:
3026: IF (l_is_create) THEN
3027: -- call create measure
3028:
3029: BSC_BIS_MEASURE_PUB.Create_Measure(
3030: p_commit => FND_API.G_FALSE
3031: ,x_dataset_id => l_dataset_id
3032: ,p_dataset_source => nvl(l_dataset_rec.Bsc_Source, 'PMF')
3033: ,p_dataset_name => l_dataset_rec.Bsc_Dataset_Name
3034: ,p_dataset_help => l_dataset_rec.Bsc_Dataset_Help
3106:
3107: -- Call the Update API
3108:
3109: BSC_BIS_MEASURE_PUB.Update_Measure(
3110: p_commit => FND_API.G_FALSE
3111: ,p_dataset_id => l_dataset_id
3112: ,p_dataset_source => NVL(l_dataset_rec.Bsc_Source, 'PMF') -- :SOURCE
3113: ,p_dataset_name => NVL(l_dataset_rec.Bsc_Dataset_Name, l_dataset_rec_db.Bsc_Dataset_Name)
3114: ,p_dataset_help => NVL(l_dataset_rec.Bsc_Dataset_Help, l_dataset_rec_db.Bsc_Dataset_Help)
3163:
3164: EXCEPTION
3165: WHEN NO_DATA_FOUND THEN
3166: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3167: x_return_status := FND_API.G_RET_STS_ERROR ;
3168: IF(x_msg_data IS NULL) THEN
3169: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3170: ,p_count => x_msg_count
3171: ,p_data => x_msg_data);
3170: ,p_count => x_msg_count
3171: ,p_data => x_msg_data);
3172: END IF;
3173: RAISE;
3174: WHEN FND_API.G_EXC_ERROR THEN
3175: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3176: x_return_status := FND_API.G_RET_STS_ERROR ;
3177: IF(x_msg_data IS NULL) THEN
3178: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3172: END IF;
3173: RAISE;
3174: WHEN FND_API.G_EXC_ERROR THEN
3175: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3176: x_return_status := FND_API.G_RET_STS_ERROR ;
3177: IF(x_msg_data IS NULL) THEN
3178: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3179: ,p_count => x_msg_count
3180: ,p_data => x_msg_data);
3179: ,p_count => x_msg_count
3180: ,p_data => x_msg_data);
3181: END IF;
3182: RAISE;
3183: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3184: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3186: IF(x_msg_data IS NULL) THEN
3187: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3181: END IF;
3182: RAISE;
3183: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3184: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3186: IF(x_msg_data IS NULL) THEN
3187: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3188: ,p_count => x_msg_count
3189: ,p_data => x_msg_data);
3190: END IF;
3191: RAISE;
3192: WHEN others THEN
3193: -- BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
3194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3195: IF(x_msg_data IS NULL) THEN
3196: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3197: ,p_count => x_msg_count
3198: ,p_data => x_msg_data);
3200: RAISE;
3201: END Load_Measure;
3202: --=============================================================================
3203: PROCEDURE Translate_Measure
3204: (p_commit IN VARCHAR2 := FND_API.G_FALSE
3205: ,p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
3206: , p_custom_mode IN VARCHAR2 := NULL
3207: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
3208: , p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
3218: l_Dataset_Id NUMBER;
3219: l_upload_test BOOLEAN := FALSE;
3220: BEGIN
3221:
3222: x_return_status := FND_API.G_RET_STS_SUCCESS;
3223:
3224: FND_MSG_PUB.Initialize;
3225:
3226: --bug#4045278: data versioning
3236: IF (l_upload_test = FALSE) THEN
3237: FND_MESSAGE.SET_NAME('BIS','BIS_MEA_UPLOAD_TEST_FAILED');
3238: FND_MESSAGE.SET_TOKEN('SHORT_NAME', p_Measure_Rec.Measure_Short_Name);
3239: FND_MSG_PUB.ADD;
3240: RAISE FND_API.G_EXC_ERROR;
3241: END IF;
3242:
3243: l_dataset_rec := p_Dataset_Rec;
3244: l_measure_rec := p_Measure_Rec;
3263: l_measure_rec.Last_Updated_By := BIS_UTILITIES_PUB.Get_Owner_Id(p_owner);
3264: l_measure_rec.Last_Update_Login := fnd_global.LOGIN_ID;
3265:
3266: BSC_DATASETS_PUB.Translate_Measure(
3267: p_commit => FND_API.G_FALSE
3268: ,p_measure_rec => l_measure_rec
3269: ,p_Dataset_Rec => l_Dataset_Rec
3270: ,x_return_status => x_return_status
3271: ,x_msg_count => x_msg_count
3281: , x_error_Tbl => l_error_Tbl
3282: );
3283:
3284: EXCEPTION
3285: WHEN FND_API.G_EXC_ERROR THEN
3286: x_return_status := FND_API.G_RET_STS_ERROR;
3287: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3288: ,p_count => x_msg_count
3289: ,p_data => x_msg_data);
3282: );
3283:
3284: EXCEPTION
3285: WHEN FND_API.G_EXC_ERROR THEN
3286: x_return_status := FND_API.G_RET_STS_ERROR;
3287: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3288: ,p_count => x_msg_count
3289: ,p_data => x_msg_data);
3290: RAISE;
3287: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3288: ,p_count => x_msg_count
3289: ,p_data => x_msg_data);
3290: RAISE;
3291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3292: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3293: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3294: ,p_count => x_msg_count
3295: ,p_data => x_msg_data);
3288: ,p_count => x_msg_count
3289: ,p_data => x_msg_data);
3290: RAISE;
3291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3292: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3293: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3294: ,p_count => x_msg_count
3295: ,p_data => x_msg_data);
3296: RAISE;
3294: ,p_count => x_msg_count
3295: ,p_data => x_msg_data);
3296: RAISE;
3297: WHEN NO_DATA_FOUND THEN
3298: x_return_status := FND_API.G_RET_STS_ERROR;
3299: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3300: ,p_count => x_msg_count
3301: ,p_data => x_msg_data);
3302: RAISE;
3300: ,p_count => x_msg_count
3301: ,p_data => x_msg_data);
3302: RAISE;
3303: WHEN OTHERS THEN
3304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3305: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
3306: ,p_count => x_msg_count
3307: ,p_data => x_msg_data);
3308: RAISE;
3334: , x_return_status => x_return_status
3335: , x_error_Tbl => l_error_Tbl
3336: );
3337:
3338: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342: IF (BIS_UTILITIES_PUB.Value_Not_Missing
3335: , x_error_Tbl => l_error_Tbl
3336: );
3337:
3338: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342: IF (BIS_UTILITIES_PUB.Value_Not_Missing
3343: (p_Org_Dimension_Short_Name) = FND_API.G_TRUE
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342: IF (BIS_UTILITIES_PUB.Value_Not_Missing
3343: (p_Org_Dimension_Short_Name) = FND_API.G_TRUE
3344: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
3345: = FND_API.G_TRUE) THEN
3346: BIS_DIMENSION_PVT.Value_ID_Conversion
3347: ( p_api_version => 1.0
3341:
3342: IF (BIS_UTILITIES_PUB.Value_Not_Missing
3343: (p_Org_Dimension_Short_Name) = FND_API.G_TRUE
3344: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
3345: = FND_API.G_TRUE) THEN
3346: BIS_DIMENSION_PVT.Value_ID_Conversion
3347: ( p_api_version => 1.0
3348: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
3349: , p_Dimension_Name => FND_API.G_MISS_CHAR
3345: = FND_API.G_TRUE) THEN
3346: BIS_DIMENSION_PVT.Value_ID_Conversion
3347: ( p_api_version => 1.0
3348: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
3349: , p_Dimension_Name => FND_API.G_MISS_CHAR
3350: , x_Dimension_ID => l_Org_Dimension_ID
3351: , x_return_status => x_return_status
3352: , x_error_Tbl => l_error_Tbl
3353: );
3351: , x_return_status => x_return_status
3352: , x_error_Tbl => l_error_Tbl
3353: );
3354:
3355: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3356: RAISE FND_API.G_EXC_ERROR;
3357: END IF;
3358:
3359: END IF;
3352: , x_error_Tbl => l_error_Tbl
3353: );
3354:
3355: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3356: RAISE FND_API.G_EXC_ERROR;
3357: END IF;
3358:
3359: END IF;
3360:
3357: END IF;
3358:
3359: END IF;
3360:
3361: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
3362: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
3363: = FND_API.G_TRUE) THEN
3364: BIS_DIMENSION_PVT.Value_ID_Conversion
3365: ( p_api_version => 1.0
3359: END IF;
3360:
3361: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
3362: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
3363: = FND_API.G_TRUE) THEN
3364: BIS_DIMENSION_PVT.Value_ID_Conversion
3365: ( p_api_version => 1.0
3366: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
3367: , p_Dimension_Name => FND_API.G_MISS_CHAR
3363: = FND_API.G_TRUE) THEN
3364: BIS_DIMENSION_PVT.Value_ID_Conversion
3365: ( p_api_version => 1.0
3366: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
3367: , p_Dimension_Name => FND_API.G_MISS_CHAR
3368: , x_Dimension_ID => l_Time_Dimension_ID
3369: , x_return_status => x_return_status
3370: , x_error_Tbl => l_error_Tbl
3371: );
3369: , x_return_status => x_return_status
3370: , x_error_Tbl => l_error_Tbl
3371: );
3372:
3373: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3374: RAISE FND_API.G_EXC_ERROR;
3375: END IF;
3376:
3377: END IF;
3370: , x_error_Tbl => l_error_Tbl
3371: );
3372:
3373: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
3374: RAISE FND_API.G_EXC_ERROR;
3375: END IF;
3376:
3377: END IF;
3378:
3382: l_Measure_Rec
3383: ,l_Org_Dimension_ID
3384: ,l_Time_Dimension_ID)) THEN
3385:
3386: l_flag := FND_API.G_FALSE;
3387: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension1_ID) = FND_API.G_TRUE)) THEN
3388: l_measure_rec_new.Dimension1_ID := l_Org_Dimension_ID;
3389: l_measure_rec_new.Dimension1_Short_Name := p_Org_Dimension_Short_Name;
3390: l_measure_rec_new.Dimension1_Name := NULL; -- Retrieve Org dimension name later
3383: ,l_Org_Dimension_ID
3384: ,l_Time_Dimension_ID)) THEN
3385:
3386: l_flag := FND_API.G_FALSE;
3387: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension1_ID) = FND_API.G_TRUE)) THEN
3388: l_measure_rec_new.Dimension1_ID := l_Org_Dimension_ID;
3389: l_measure_rec_new.Dimension1_Short_Name := p_Org_Dimension_Short_Name;
3390: l_measure_rec_new.Dimension1_Name := NULL; -- Retrieve Org dimension name later
3391:
3391:
3392: l_measure_rec_new.Dimension2_ID := l_Time_Dimension_ID;
3393: l_measure_rec_new.Dimension2_Short_Name := p_Time_Dimension_Short_Name;
3394: l_measure_rec_new.Dimension2_Name := NULL; -- Retrieve Time dimension name later
3395: l_flag := FND_API.G_TRUE;
3396: END IF;
3397: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension2_ID) = FND_API.G_TRUE)) THEN
3398: l_measure_rec_new.Dimension2_ID := l_Org_Dimension_ID;
3399: l_measure_rec_new.Dimension2_Short_Name := p_Org_Dimension_Short_Name;
3393: l_measure_rec_new.Dimension2_Short_Name := p_Time_Dimension_Short_Name;
3394: l_measure_rec_new.Dimension2_Name := NULL; -- Retrieve Time dimension name later
3395: l_flag := FND_API.G_TRUE;
3396: END IF;
3397: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension2_ID) = FND_API.G_TRUE)) THEN
3398: l_measure_rec_new.Dimension2_ID := l_Org_Dimension_ID;
3399: l_measure_rec_new.Dimension2_Short_Name := p_Org_Dimension_Short_Name;
3400: l_measure_rec_new.Dimension2_Name := NULL; -- Retrieve Org dimension name later
3401:
3401:
3402: l_measure_rec_new.Dimension3_ID := l_Time_Dimension_ID;
3403: l_measure_rec_new.Dimension3_Short_Name := p_Time_Dimension_Short_Name;
3404: l_measure_rec_new.Dimension3_Name := NULL; -- Retrieve Time dimension name later
3405: l_flag := FND_API.G_TRUE;
3406: END IF;
3407: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension3_ID) = FND_API.G_TRUE)) THEN
3408: l_measure_rec_new.Dimension3_ID := l_Org_Dimension_ID;
3409: l_measure_rec_new.Dimension3_Short_Name := p_Org_Dimension_Short_Name;
3403: l_measure_rec_new.Dimension3_Short_Name := p_Time_Dimension_Short_Name;
3404: l_measure_rec_new.Dimension3_Name := NULL; -- Retrieve Time dimension name later
3405: l_flag := FND_API.G_TRUE;
3406: END IF;
3407: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension3_ID) = FND_API.G_TRUE)) THEN
3408: l_measure_rec_new.Dimension3_ID := l_Org_Dimension_ID;
3409: l_measure_rec_new.Dimension3_Short_Name := p_Org_Dimension_Short_Name;
3410: l_measure_rec_new.Dimension3_Name := NULL; -- Retrieve Org dimension name later
3411:
3411:
3412: l_measure_rec_new.Dimension4_ID := l_Time_Dimension_ID;
3413: l_measure_rec_new.Dimension4_Short_Name := p_Time_Dimension_Short_Name;
3414: l_measure_rec_new.Dimension4_Name := NULL; -- Retrieve Time dimension name later
3415: l_flag := FND_API.G_TRUE;
3416: END IF;
3417: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension4_ID) = FND_API.G_TRUE)) THEN
3418: l_measure_rec_new.Dimension4_ID := l_Org_Dimension_ID;
3419: l_measure_rec_new.Dimension4_Short_Name := p_Org_Dimension_Short_Name;
3413: l_measure_rec_new.Dimension4_Short_Name := p_Time_Dimension_Short_Name;
3414: l_measure_rec_new.Dimension4_Name := NULL; -- Retrieve Time dimension name later
3415: l_flag := FND_API.G_TRUE;
3416: END IF;
3417: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension4_ID) = FND_API.G_TRUE)) THEN
3418: l_measure_rec_new.Dimension4_ID := l_Org_Dimension_ID;
3419: l_measure_rec_new.Dimension4_Short_Name := p_Org_Dimension_Short_Name;
3420: l_measure_rec_new.Dimension4_Name := NULL; -- Retrieve Org dimension name later
3421:
3421:
3422: l_measure_rec_new.Dimension5_ID := l_Time_Dimension_ID;
3423: l_measure_rec_new.Dimension5_Short_Name := p_Time_Dimension_Short_Name;
3424: l_measure_rec_new.Dimension5_Name := NULL; -- Retrieve Time dimension name later
3425: l_flag := FND_API.G_TRUE;
3426: END IF;
3427: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension5_ID) = FND_API.G_TRUE)) THEN
3428: l_measure_rec_new.Dimension5_ID := l_Org_Dimension_ID;
3429: l_measure_rec_new.Dimension5_Short_Name := p_Org_Dimension_Short_Name;
3423: l_measure_rec_new.Dimension5_Short_Name := p_Time_Dimension_Short_Name;
3424: l_measure_rec_new.Dimension5_Name := NULL; -- Retrieve Time dimension name later
3425: l_flag := FND_API.G_TRUE;
3426: END IF;
3427: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension5_ID) = FND_API.G_TRUE)) THEN
3428: l_measure_rec_new.Dimension5_ID := l_Org_Dimension_ID;
3429: l_measure_rec_new.Dimension5_Short_Name := p_Org_Dimension_Short_Name;
3430: l_measure_rec_new.Dimension5_Name := NULL; -- Retrieve Org dimension name later
3431:
3431:
3432: l_measure_rec_new.Dimension6_ID := l_Time_Dimension_ID;
3433: l_measure_rec_new.Dimension6_Short_Name := p_Time_Dimension_Short_Name;
3434: l_measure_rec_new.Dimension6_Name := NULL; -- Retrieve Time dimension name later
3435: l_flag := FND_API.G_TRUE;
3436: END IF;
3437: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension6_ID) = FND_API.G_TRUE)) THEN
3438: l_measure_rec_new.Dimension6_ID := l_Org_Dimension_ID;
3439: l_measure_rec_new.Dimension6_Short_Name := p_Org_Dimension_Short_Name;
3433: l_measure_rec_new.Dimension6_Short_Name := p_Time_Dimension_Short_Name;
3434: l_measure_rec_new.Dimension6_Name := NULL; -- Retrieve Time dimension name later
3435: l_flag := FND_API.G_TRUE;
3436: END IF;
3437: IF((l_flag = FND_API.G_FALSE) AND (BIS_UTILITIES_PVT.Value_Missing_Or_Null(l_measure_rec.Dimension6_ID) = FND_API.G_TRUE)) THEN
3438: l_measure_rec_new.Dimension6_ID := l_Org_Dimension_ID;
3439: l_measure_rec_new.Dimension6_Short_Name := p_Org_Dimension_Short_Name;
3440: l_measure_rec_new.Dimension6_Name := NULL; -- Retrieve Org dimension name later
3441:
3441:
3442: l_measure_rec_new.Dimension7_ID := l_Time_Dimension_ID;
3443: l_measure_rec_new.Dimension7_Short_Name := p_Time_Dimension_Short_Name;
3444: l_measure_rec_new.Dimension7_Name := NULL; -- Retrieve Time dimension name later
3445: l_flag := FND_API.G_TRUE;
3446: END IF;
3447:
3448: END IF;
3449: x_measure_rec := l_measure_rec_new;
3448: END IF;
3449: x_measure_rec := l_measure_rec_new;
3450:
3451: EXCEPTION
3452: WHEN FND_API.G_EXC_ERROR THEN
3453: x_return_status := FND_API.G_RET_STS_ERROR;
3454: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3455: ,p_data => x_msg_data);
3456: RAISE;
3449: x_measure_rec := l_measure_rec_new;
3450:
3451: EXCEPTION
3452: WHEN FND_API.G_EXC_ERROR THEN
3453: x_return_status := FND_API.G_RET_STS_ERROR;
3454: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3455: ,p_data => x_msg_data);
3456: RAISE;
3457: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3453: x_return_status := FND_API.G_RET_STS_ERROR;
3454: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3455: ,p_data => x_msg_data);
3456: RAISE;
3457: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3459: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3460: ,p_data => x_msg_data);
3461: RAISE;
3454: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3455: ,p_data => x_msg_data);
3456: RAISE;
3457: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3459: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3460: ,p_data => x_msg_data);
3461: RAISE;
3462: WHEN OTHERS THEN
3459: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3460: ,p_data => x_msg_data);
3461: RAISE;
3462: WHEN OTHERS THEN
3463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3464: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3465: ,p_data => x_msg_data);
3466: RAISE;
3467: END Order_Dimensions_For_Ldt;
3610: ***************************************************
3611: */
3612:
3613: procedure Get_Incr_Trigger(
3614: p_commit in varchar2 := fnd_api.g_false
3615: ,p_dataset_id in number
3616: ,p_measure_projection_id in number := -1
3617: ,p_measure_type in number := -1
3618: ,p_is_ytd_enabled in varchar2 := null
3716: l_measure_group_id := cd.measure_group_id;
3717: END LOOP;
3718: END IF;
3719:
3720: x_return_status := FND_API.G_RET_STS_SUCCESS;
3721:
3722: IF (p_Check_Autogen_Only = 'Y') THEN
3723: l_kpis := getMeasureAutoGenKpis(p_dataset_id);
3724: ELSE
3730: if((upper(p_is_xtd_enabled) <> l_is_xtd_enabled) and (p_is_xtd_enabled is not null)) then -- l_is_xtd_enabled is always caps.
3731: fnd_message.set_name('BSC','BSC_PMD_KPI_STRUCT_INVALID');
3732: fnd_message.set_token('INDICATORS', l_kpis);
3733: fnd_msg_pub.ADD;
3734: -- raise fnd_api.g_exc_error;
3735: end if;
3736:
3737: if((upper(p_formula) <> upper(l_formula)) and (p_formula is not null)) then
3738: IF (BSC_DATASETS_PVT.Is_Structure_change(upper(p_formula), upper(l_formula))) THEN
3738: IF (BSC_DATASETS_PVT.Is_Structure_change(upper(p_formula), upper(l_formula))) THEN
3739: fnd_message.set_name('BSC','BSC_PMD_KPI_STRUCT_INVALID');
3740: fnd_message.set_token('INDICATORS', l_kpis);
3741: fnd_msg_pub.ADD;
3742: raise fnd_api.g_exc_error;
3743: ELSE
3744: fnd_message.set_name('BIS','BIS_PMD_KPI_NONSTRUCT_INVALID');
3745: fnd_message.set_token('OBJECTIVES', l_kpis);
3746: fnd_msg_pub.ADD;
3743: ELSE
3744: fnd_message.set_name('BIS','BIS_PMD_KPI_NONSTRUCT_INVALID');
3745: fnd_message.set_token('OBJECTIVES', l_kpis);
3746: fnd_msg_pub.ADD;
3747: raise fnd_api.g_exc_error;
3748: END IF;
3749: end if;
3750:
3751: IF((p_Measure_Group_Id IS NOT NULL ) AND (l_measure_group_id IS NOT NULL)) THEN
3752: IF(p_Measure_Group_Id <> l_measure_group_id) THEN
3753: FND_MESSAGE.SET_NAME('BSC','BSC_PMD_KPI_STRUCT_INVALID');
3754: FND_MESSAGE.SET_TOKEN('INDICATORS', l_kpis);
3755: FND_MSG_PUB.ADD;
3756: RAISE FND_API.G_EXC_ERROR;
3757: END IF;
3758: END IF;
3759:
3760: if ((l_measure_type <> p_measure_type) and (p_measure_type <> -1)) then
3760: if ((l_measure_type <> p_measure_type) and (p_measure_type <> -1)) then
3761: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
3762: fnd_message.set_token('INDICATORS', l_kpis);
3763: fnd_msg_pub.ADD;
3764: raise fnd_api.g_exc_error;
3765: end if;
3766:
3767: -- color changes is a sub-set change for structural changes, hence comes next
3768:
3770: if((upper(p_rollup_calc) <> upper(l_rollup_calc)) and (p_rollup_calc is not null)) then
3771: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
3772: fnd_message.set_token('INDICATORS', l_kpis);
3773: fnd_msg_pub.ADD;
3774: raise fnd_api.g_exc_error;
3775: end if;
3776:
3777:
3778: if ((l_proj_id <> p_measure_projection_id) and (p_measure_projection_id <> -1)) then
3778: if ((l_proj_id <> p_measure_projection_id) and (p_measure_projection_id <> -1)) then
3779: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
3780: fnd_message.set_token('INDICATORS', l_kpis);
3781: fnd_msg_pub.ADD;
3782: raise fnd_api.g_exc_error;
3783: end if;
3784:
3785: -- l_is_ytd_enabled is always caps.
3786: if((upper(p_is_ytd_enabled) <> l_is_ytd_enabled) and (p_is_ytd_enabled is not null)) then
3786: if((upper(p_is_ytd_enabled) <> l_is_ytd_enabled) and (p_is_ytd_enabled is not null)) then
3787: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
3788: fnd_message.set_token('INDICATORS', l_kpis);
3789: fnd_msg_pub.ADD;
3790: raise fnd_api.g_exc_error;
3791: end if;
3792:
3793: -- l_is_qtd_enabled is always caps.
3794: if((upper(p_is_qtd_enabled) <> l_is_qtd_enabled) and (p_is_qtd_enabled is not null)) then
3794: if((upper(p_is_qtd_enabled) <> l_is_qtd_enabled) and (p_is_qtd_enabled is not null)) then
3795: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
3796: fnd_message.set_token('INDICATORS', l_kpis);
3797: fnd_msg_pub.ADD;
3798: raise fnd_api.g_exc_error;
3799: end if;
3800: END IF;-- END L_KPIS IS NOT NULL
3801: END IF;
3802: EXCEPTION
3799: end if;
3800: END IF;-- END L_KPIS IS NOT NULL
3801: END IF;
3802: EXCEPTION
3803: WHEN FND_API.G_EXC_ERROR THEN
3804:
3805: if (x_msg_data is null) then
3806: fnd_msg_pub.count_and_get
3807: ( p_encoded => fnd_api.g_false
3803: WHEN FND_API.G_EXC_ERROR THEN
3804:
3805: if (x_msg_data is null) then
3806: fnd_msg_pub.count_and_get
3807: ( p_encoded => fnd_api.g_false
3808: , p_count => x_msg_count
3809: , p_data => x_msg_data
3810: );
3811: end if;
3810: );
3811: end if;
3812:
3813: when others then
3814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3815: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
3816: ,p_data => x_msg_data);
3817:
3818: -- fixed for Bug#3296451
4178: if (l_indicators is not null) then
4179: fnd_message.set_name('BSC','BSC_PMD_KPI_COLOR_INVALID');
4180: fnd_message.set_token('INDICATORS', l_indicators);
4181: fnd_msg_pub.ADD;
4182: raise fnd_api.g_exc_error;
4183: end if;
4184:
4185: end if; -- end isBscInProductionMode
4186:
4184:
4185: end if; -- end isBscInProductionMode
4186:
4187: exception
4188: when fnd_api.g_exc_error then
4189: if (x_msg_data is null) then
4190: fnd_msg_pub.count_and_get
4191: ( p_encoded => fnd_api.g_false
4192: , p_count => x_msg_count
4187: exception
4188: when fnd_api.g_exc_error then
4189: if (x_msg_data is null) then
4190: fnd_msg_pub.count_and_get
4191: ( p_encoded => fnd_api.g_false
4192: , p_count => x_msg_count
4193: , p_data => x_msg_data
4194: );
4195: end if;
4195: end if;
4196:
4197:
4198: when others then
4199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4200: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
4201: ,p_data => x_msg_data);
4202:
4203: x_msg_data := x_msg_data || sqlerrm;
4519: (instr(p_measure_col, '-') > 0) or
4520: (instr(p_measure_col, '*') > 0) or
4521: (instr(p_measure_col, ',') > 0) or
4522: (instr(p_measure_col, ' ') > 0) then
4523: RETURN FND_API.G_TRUE;
4524: ELSE
4525: RETURN FND_API.G_FALSE;
4526: END IF;
4527: EXCEPTION
4521: (instr(p_measure_col, ',') > 0) or
4522: (instr(p_measure_col, ' ') > 0) then
4523: RETURN FND_API.G_TRUE;
4524: ELSE
4525: RETURN FND_API.G_FALSE;
4526: END IF;
4527: EXCEPTION
4528: WHEN OTHERS THEN
4529: RETURN FND_API.G_FALSE;
4525: RETURN FND_API.G_FALSE;
4526: END IF;
4527: EXCEPTION
4528: WHEN OTHERS THEN
4529: RETURN FND_API.G_FALSE;
4530: END Is_Formula_Type;
4531:
4532: -- added for Bug#4617140
4533: FUNCTION Get_Report_Objectives (