[Home] [Help]
1: package body BSC_KPI_PVT as
2: /* $Header: BSCVKPPB.pls 120.7 2007/03/20 06:38:30 vtulasi ship $ */
3: /*
4: +======================================================================================+
5: | Copyright (c) 2001 Oracle Corporation, Redwood Shores, CA, USA |
48: | 16-NOV-2006 vtulasi Color By KPI enh#5244136 |
49: | 09-feb-2007 ashankar Simulation Tree Enhacement 5386112 |
50: +======================================================================================+
51: */
52: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_KPI_PVT';
53:
54: procedure Create_Kpi(
55: p_commit IN varchar2 := FND_API.G_FALSE
56: ,p_Bsc_Kpi_Entity_Rec IN BSC_KPI_PUB.Bsc_Kpi_Entity_Rec
253: WHEN NO_DATA_FOUND THEN
254: ROLLBACK TO BscKpiPvt_CrtKPI;
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256: IF (x_msg_data IS NOT NULL) THEN
257: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi ';
258: ELSE
259: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi ';
260: END IF;
261: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256: IF (x_msg_data IS NOT NULL) THEN
257: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi ';
258: ELSE
259: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi ';
260: END IF;
261: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
262: RAISE;
263: WHEN OTHERS THEN
269: FND_MSG_PUB.ADD;
270: RAISE FND_API.G_EXC_ERROR;
271: end if;
272: IF (x_msg_data IS NOT NULL) THEN
273: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi ';
274: ELSE
275: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi ';
276: END IF;
277: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
271: end if;
272: IF (x_msg_data IS NOT NULL) THEN
273: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi ';
274: ELSE
275: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi ';
276: END IF;
277: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
278: RAISE;
279: end Create_Kpi;
395: RAISE FND_API.G_EXC_ERROR;
396: WHEN OTHERS THEN
397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
398: IF (x_msg_data IS NOT NULL) THEN
399: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi ';
400: ELSE
401: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi ';
402: END IF;
403: RAISE;
397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
398: IF (x_msg_data IS NOT NULL) THEN
399: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi ';
400: ELSE
401: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi ';
402: END IF;
403: RAISE;
404: end Retrieve_Kpi;
405:
600: WHEN NO_DATA_FOUND THEN
601: ROLLBACK TO BscKpiPvt_UptKPI;
602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
603: IF (x_msg_data IS NOT NULL) THEN
604: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi ';
605: ELSE
606: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi ';
607: END IF;
608: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
603: IF (x_msg_data IS NOT NULL) THEN
604: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi ';
605: ELSE
606: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi ';
607: END IF;
608: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
609: RAISE;
610: WHEN OTHERS THEN
610: WHEN OTHERS THEN
611: ROLLBACK TO BscKpiPvt_UptKPI;
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: IF (x_msg_data IS NOT NULL) THEN
614: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi ';
615: ELSE
616: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi ';
617: END IF;
618: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: IF (x_msg_data IS NOT NULL) THEN
614: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi ';
615: ELSE
616: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi ';
617: END IF;
618: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
619: RAISE;
620: end Update_Kpi;
711: WHEN NO_DATA_FOUND THEN
712: ROLLBACK TO BscKpiPvt_DelKPI;
713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
714: IF (x_msg_data IS NOT NULL) THEN
715: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi ';
716: ELSE
717: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi ';
718: END IF;
719: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
714: IF (x_msg_data IS NOT NULL) THEN
715: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi ';
716: ELSE
717: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi ';
718: END IF;
719: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
720: RAISE;
721: WHEN OTHERS THEN
721: WHEN OTHERS THEN
722: ROLLBACK TO BscKpiPvt_DelKPI;
723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
724: IF (x_msg_data IS NOT NULL) THEN
725: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi ';
726: ELSE
727: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi ';
728: END IF;
729: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
724: IF (x_msg_data IS NOT NULL) THEN
725: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi ';
726: ELSE
727: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi ';
728: END IF;
729: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
730: RAISE;
731: end Delete_Kpi;
874: FND_MSG_PUB.ADD;
875: RAISE FND_API.G_EXC_ERROR;
876: end if;
877: IF (x_msg_data IS NOT NULL) THEN
878: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Defaults ';
879: ELSE
880: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Defaults ';
881: END IF;
882: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
876: end if;
877: IF (x_msg_data IS NOT NULL) THEN
878: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Defaults ';
879: ELSE
880: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Defaults ';
881: END IF;
882: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
883: RAISE;
884: WHEN OTHERS THEN
884: WHEN OTHERS THEN
885: ROLLBACK TO BscKpiPvt_CrtKPIDef;
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: IF (x_msg_data IS NOT NULL) THEN
888: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Defaults ';
889: ELSE
890: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Defaults ';
891: END IF;
892: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: IF (x_msg_data IS NOT NULL) THEN
888: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Defaults ';
889: ELSE
890: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Defaults ';
891: END IF;
892: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
893: RAISE;
894: end Create_Kpi_Defaults;
970: RAISE FND_API.G_EXC_ERROR;
971: WHEN OTHERS THEN
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: IF (x_msg_data IS NOT NULL) THEN
974: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Defaults ';
975: ELSE
976: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Defaults ';
977: END IF;
978: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: IF (x_msg_data IS NOT NULL) THEN
974: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Defaults ';
975: ELSE
976: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Defaults ';
977: END IF;
978: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
979: RAISE;
980: end Retrieve_Kpi_Defaults;
1022: RAISE;
1023: WHEN NO_DATA_FOUND THEN
1024: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1025: IF (x_msg_data IS NOT NULL) THEN
1026: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Defaults ';
1027: ELSE
1028: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Defaults ';
1029: END IF;
1030: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1024: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1025: IF (x_msg_data IS NOT NULL) THEN
1026: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Defaults ';
1027: ELSE
1028: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Defaults ';
1029: END IF;
1030: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1031: RAISE;
1032: WHEN OTHERS THEN
1031: RAISE;
1032: WHEN OTHERS THEN
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: IF (x_msg_data IS NOT NULL) THEN
1035: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Defaults ';
1036: ELSE
1037: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Defaults ';
1038: END IF;
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: IF (x_msg_data IS NOT NULL) THEN
1035: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Defaults ';
1036: ELSE
1037: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Defaults ';
1038: END IF;
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1040: RAISE;
1041: end Update_Kpi_Defaults;
1080: RAISE;
1081: WHEN NO_DATA_FOUND THEN
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083: IF (x_msg_data IS NOT NULL) THEN
1084: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1085: ELSE
1086: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1087: END IF;
1088: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083: IF (x_msg_data IS NOT NULL) THEN
1084: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1085: ELSE
1086: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1087: END IF;
1088: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1089: RAISE;
1090: WHEN OTHERS THEN
1089: RAISE;
1090: WHEN OTHERS THEN
1091: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1092: IF (x_msg_data IS NOT NULL) THEN
1093: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1094: ELSE
1095: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1096: END IF;
1097: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1091: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1092: IF (x_msg_data IS NOT NULL) THEN
1093: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1094: ELSE
1095: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1096: END IF;
1097: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1098: RAISE;
1099: end Delete_Kpi_Defaults;
1175: WHEN NO_DATA_FOUND THEN
1176: ROLLBACK TO BscKpiPvt_CrtKPIProp;
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178: IF (x_msg_data IS NOT NULL) THEN
1179: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1180: ELSE
1181: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1182: END IF;
1183: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178: IF (x_msg_data IS NOT NULL) THEN
1179: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Defaults ';
1180: ELSE
1181: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Defaults ';
1182: END IF;
1183: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1184: RAISE;
1185: WHEN OTHERS THEN
1191: FND_MSG_PUB.ADD;
1192: RAISE FND_API.G_EXC_ERROR;
1193: end if;
1194: IF (x_msg_data IS NOT NULL) THEN
1195: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Properties ';
1196: ELSE
1197: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Properties ';
1198: END IF;
1199: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1193: end if;
1194: IF (x_msg_data IS NOT NULL) THEN
1195: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Properties ';
1196: ELSE
1197: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Properties ';
1198: END IF;
1199: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1200: RAISE;
1201: end Create_Kpi_Properties;
1261: RAISE FND_API.G_EXC_ERROR;
1262: WHEN OTHERS THEN
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: IF (x_msg_data IS NOT NULL) THEN
1265: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Properties ';
1266: ELSE
1267: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Properties ';
1268: END IF;
1269: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: IF (x_msg_data IS NOT NULL) THEN
1265: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Properties ';
1266: ELSE
1267: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Properties ';
1268: END IF;
1269: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1270: RAISE;
1271: end Retrieve_Kpi_Properties;
1365: WHEN NO_DATA_FOUND THEN
1366: ROLLBACK TO BscKpiPvt_UptKPIProp;
1367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1368: IF (x_msg_data IS NOT NULL) THEN
1369: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Properties ';
1370: ELSE
1371: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Properties ';
1372: END IF;
1373: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1368: IF (x_msg_data IS NOT NULL) THEN
1369: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Properties ';
1370: ELSE
1371: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Properties ';
1372: END IF;
1373: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1374: RAISE;
1375: WHEN OTHERS THEN
1375: WHEN OTHERS THEN
1376: ROLLBACK TO BscKpiPvt_UptKPIProp;
1377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1378: IF (x_msg_data IS NOT NULL) THEN
1379: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Properties ';
1380: ELSE
1381: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Properties ';
1382: END IF;
1383: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1378: IF (x_msg_data IS NOT NULL) THEN
1379: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Properties ';
1380: ELSE
1381: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Properties ';
1382: END IF;
1383: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1384: RAISE;
1385: end Update_Kpi_Properties;
1450: WHEN NO_DATA_FOUND THEN
1451: ROLLBACK TO BscKpiPvt_DelKPIProp;
1452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1453: IF (x_msg_data IS NOT NULL) THEN
1454: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1455: ELSE
1456: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1457: END IF;
1458: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1453: IF (x_msg_data IS NOT NULL) THEN
1454: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1455: ELSE
1456: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1457: END IF;
1458: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1459: RAISE;
1460: WHEN OTHERS THEN
1460: WHEN OTHERS THEN
1461: ROLLBACK TO BscKpiPvt_DelKPIProp;
1462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1463: IF (x_msg_data IS NOT NULL) THEN
1464: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1465: ELSE
1466: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1467: END IF;
1468: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1463: IF (x_msg_data IS NOT NULL) THEN
1464: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1465: ELSE
1466: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1467: END IF;
1468: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1469: RAISE;
1470: end Delete_Kpi_Properties;
1605: WHEN NO_DATA_FOUND THEN
1606: ROLLBACK TO BscKpiPvt_CrtKPIAnal;
1607: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1608: IF (x_msg_data IS NOT NULL) THEN
1609: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1610: ELSE
1611: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1612: END IF;
1613: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1607: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1608: IF (x_msg_data IS NOT NULL) THEN
1609: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Properties ';
1610: ELSE
1611: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Properties ';
1612: END IF;
1613: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1614: RAISE;
1615: WHEN OTHERS THEN
1621: FND_MSG_PUB.ADD;
1622: RAISE FND_API.G_EXC_ERROR;
1623: end if;
1624: IF (x_msg_data IS NOT NULL) THEN
1625: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Analysis ';
1626: ELSE
1627: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Analysis ';
1628: END IF;
1629: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1623: end if;
1624: IF (x_msg_data IS NOT NULL) THEN
1625: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Analysis ';
1626: ELSE
1627: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Analysis ';
1628: END IF;
1629: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1630: RAISE;
1631: end Create_Kpi_Analysis;
1719: RAISE FND_API.G_EXC_ERROR;
1720: WHEN OTHERS THEN
1721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1722: IF (x_msg_data IS NOT NULL) THEN
1723: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Analysis ';
1724: ELSE
1725: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Analysis ';
1726: END IF;
1727: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1722: IF (x_msg_data IS NOT NULL) THEN
1723: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Analysis ';
1724: ELSE
1725: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Analysis ';
1726: END IF;
1727: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1728: RAISE;
1729: end Retrieve_Kpi_Analysis;
1865: WHEN NO_DATA_FOUND THEN
1866: ROLLBACK TO BscKpiPvt_UpdKPIAnal;
1867: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1868: IF (x_msg_data IS NOT NULL) THEN
1869: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Analysis ';
1870: ELSE
1871: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Analysis ';
1872: END IF;
1873: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1867: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1868: IF (x_msg_data IS NOT NULL) THEN
1869: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Analysis ';
1870: ELSE
1871: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Analysis ';
1872: END IF;
1873: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1874: RAISE;
1875: WHEN OTHERS THEN
1875: WHEN OTHERS THEN
1876: ROLLBACK TO BscKpiPvt_UpdKPIAnal;
1877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1878: IF (x_msg_data IS NOT NULL) THEN
1879: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Analysis ';
1880: ELSE
1881: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Analysis ';
1882: END IF;
1883: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1878: IF (x_msg_data IS NOT NULL) THEN
1879: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Analysis ';
1880: ELSE
1881: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Analysis ';
1882: END IF;
1883: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1884: RAISE;
1885: end Update_Kpi_Analysis;
1972: WHEN NO_DATA_FOUND THEN
1973: ROLLBACK TO BscKpiPvt_DelKPIAnal;
1974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1975: IF (x_msg_data IS NOT NULL) THEN
1976: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Analysis ';
1977: ELSE
1978: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Analysis ';
1979: END IF;
1980: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1975: IF (x_msg_data IS NOT NULL) THEN
1976: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Analysis ';
1977: ELSE
1978: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Analysis ';
1979: END IF;
1980: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1981: RAISE;
1982: WHEN OTHERS THEN
1982: WHEN OTHERS THEN
1983: ROLLBACK TO BscKpiPvt_DelKPIAnal;
1984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1985: IF (x_msg_data IS NOT NULL) THEN
1986: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Analysis ';
1987: ELSE
1988: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Analysis ';
1989: END IF;
1990: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1985: IF (x_msg_data IS NOT NULL) THEN
1986: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Analysis ';
1987: ELSE
1988: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Analysis ';
1989: END IF;
1990: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
1991: RAISE;
1992: end Delete_Kpi_Analysis;
2088: WHEN NO_DATA_FOUND THEN
2089: ROLLBACK TO BscKpiPvt_DelObjColo;
2090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2091: IF (x_msg_data IS NOT NULL) THEN
2092: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Objective_Color_Data ';
2093: ELSE
2094: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Objective_Color_Data ';
2095: END IF;
2096: RAISE;
2090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2091: IF (x_msg_data IS NOT NULL) THEN
2092: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Objective_Color_Data ';
2093: ELSE
2094: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Objective_Color_Data ';
2095: END IF;
2096: RAISE;
2097: WHEN OTHERS THEN
2098: ROLLBACK TO BscKpiPvt_DelObjColo;
2097: WHEN OTHERS THEN
2098: ROLLBACK TO BscKpiPvt_DelObjColo;
2099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2100: IF (x_msg_data IS NOT NULL) THEN
2101: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Objective_Color_Data ';
2102: ELSE
2103: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Objective_Color_Data ';
2104: END IF;
2105: RAISE;
2099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2100: IF (x_msg_data IS NOT NULL) THEN
2101: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Objective_Color_Data ';
2102: ELSE
2103: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Objective_Color_Data ';
2104: END IF;
2105: RAISE;
2106: end Delete_Objective_Color_Data;
2107:
2230: WHEN NO_DATA_FOUND THEN
2231: ROLLBACK TO BscKpiPvt_CrtKPIPerid;
2232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2233: IF (x_msg_data IS NOT NULL) THEN
2234: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Periodicity ';
2235: ELSE
2236: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Periodicity ';
2237: END IF;
2238: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2233: IF (x_msg_data IS NOT NULL) THEN
2234: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Periodicity ';
2235: ELSE
2236: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Periodicity ';
2237: END IF;
2238: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2239: RAISE;
2240: WHEN OTHERS THEN
2246: FND_MSG_PUB.ADD;
2247: RAISE FND_API.G_EXC_ERROR;
2248: end if;
2249: IF (x_msg_data IS NOT NULL) THEN
2250: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Periodicity ';
2251: ELSE
2252: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Periodicity ';
2253: END IF;
2254: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2248: end if;
2249: IF (x_msg_data IS NOT NULL) THEN
2250: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Periodicity ';
2251: ELSE
2252: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Periodicity ';
2253: END IF;
2254: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2255: RAISE;
2256: end Create_Kpi_Periodicity;
2335: RAISE FND_API.G_EXC_ERROR;
2336: WHEN OTHERS THEN
2337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2338: IF (x_msg_data IS NOT NULL) THEN
2339: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Periodicity ';
2340: ELSE
2341: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Periodicity ';
2342: END IF;
2343: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2338: IF (x_msg_data IS NOT NULL) THEN
2339: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Periodicity ';
2340: ELSE
2341: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Periodicity ';
2342: END IF;
2343: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2344: RAISE;
2345: end Retrieve_Kpi_Periodicity;
2479: WHEN NO_DATA_FOUND THEN
2480: ROLLBACK TO BscKpiPvt_UptKPIPerid;
2481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2482: IF (x_msg_data IS NOT NULL) THEN
2483: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Periodicity ';
2484: ELSE
2485: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Periodicity ';
2486: END IF;
2487: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2482: IF (x_msg_data IS NOT NULL) THEN
2483: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Periodicity ';
2484: ELSE
2485: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Periodicity ';
2486: END IF;
2487: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2488: RAISE;
2489: WHEN OTHERS THEN
2489: WHEN OTHERS THEN
2490: ROLLBACK TO BscKpiPvt_UptKPIPerid;
2491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2492: IF (x_msg_data IS NOT NULL) THEN
2493: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Periodicity ';
2494: ELSE
2495: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Periodicity ';
2496: END IF;
2497: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2492: IF (x_msg_data IS NOT NULL) THEN
2493: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Periodicity ';
2494: ELSE
2495: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Periodicity ';
2496: END IF;
2497: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2498: RAISE;
2499: end Update_Kpi_Periodicity;
2564: WHEN NO_DATA_FOUND THEN
2565: ROLLBACK TO BscKpiPvt_DelKPIPerid;
2566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2567: IF (x_msg_data IS NOT NULL) THEN
2568: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2569: ELSE
2570: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2571: END IF;
2572: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2567: IF (x_msg_data IS NOT NULL) THEN
2568: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2569: ELSE
2570: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2571: END IF;
2572: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2573: RAISE;
2574: WHEN OTHERS THEN
2574: WHEN OTHERS THEN
2575: ROLLBACK TO BscKpiPvt_DelKPIPerid;
2576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2577: IF (x_msg_data IS NOT NULL) THEN
2578: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2579: ELSE
2580: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2581: END IF;
2582: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2577: IF (x_msg_data IS NOT NULL) THEN
2578: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2579: ELSE
2580: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Periodicity ';
2581: END IF;
2582: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2583: RAISE;
2584:
2665: WHEN NO_DATA_FOUND THEN
2666: ROLLBACK TO BscKpiPvt_CrtKPIDaTab;
2667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2668: IF (x_msg_data IS NOT NULL) THEN
2669: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2670: ELSE
2671: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2672: END IF;
2673: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2668: IF (x_msg_data IS NOT NULL) THEN
2669: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2670: ELSE
2671: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2672: END IF;
2673: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2674: RAISE;
2675: WHEN OTHERS THEN
2681: FND_MSG_PUB.ADD;
2682: RAISE FND_API.G_EXC_ERROR;
2683: end if;
2684: IF (x_msg_data IS NOT NULL) THEN
2685: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2686: ELSE
2687: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2688: END IF;
2689: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2683: end if;
2684: IF (x_msg_data IS NOT NULL) THEN
2685: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2686: ELSE
2687: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Data_Tables ';
2688: END IF;
2689: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2690: RAISE;
2691: end Create_Kpi_Data_Tables;
2753: RAISE FND_API.G_EXC_ERROR;
2754: WHEN OTHERS THEN
2755: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2756: IF (x_msg_data IS NOT NULL) THEN
2757: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Data_Tables ';
2758: ELSE
2759: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Data_Tables ';
2760: END IF;
2761: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2755: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2756: IF (x_msg_data IS NOT NULL) THEN
2757: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Data_Tables ';
2758: ELSE
2759: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Data_Tables ';
2760: END IF;
2761: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2762: RAISE;
2763: end Retrieve_Kpi_Data_Tables;
2862: WHEN NO_DATA_FOUND THEN
2863: ROLLBACK TO BscKpiPvt_UptKPIDaTab;
2864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2865: IF (x_msg_data IS NOT NULL) THEN
2866: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2867: ELSE
2868: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2869: END IF;
2870: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2865: IF (x_msg_data IS NOT NULL) THEN
2866: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2867: ELSE
2868: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2869: END IF;
2870: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2871: RAISE;
2872: WHEN OTHERS THEN
2872: WHEN OTHERS THEN
2873: ROLLBACK TO BscKpiPvt_UptKPIDaTab;
2874: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2875: IF (x_msg_data IS NOT NULL) THEN
2876: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2877: ELSE
2878: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2879: END IF;
2880: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2874: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2875: IF (x_msg_data IS NOT NULL) THEN
2876: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2877: ELSE
2878: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Data_Tables ';
2879: END IF;
2880: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2881: RAISE;
2882: end Update_Kpi_Data_Tables;
2969: WHEN NO_DATA_FOUND THEN
2970: ROLLBACK TO BscKpiPvt_DelKPIDaTab;
2971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2972: IF (x_msg_data IS NOT NULL) THEN
2973: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2974: ELSE
2975: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2976: END IF;
2977: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2972: IF (x_msg_data IS NOT NULL) THEN
2973: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2974: ELSE
2975: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2976: END IF;
2977: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2978: RAISE;
2979: WHEN OTHERS THEN
2979: WHEN OTHERS THEN
2980: ROLLBACK TO BscKpiPvt_DelKPIDaTab;
2981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2982: IF (x_msg_data IS NOT NULL) THEN
2983: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2984: ELSE
2985: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2986: END IF;
2987: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2982: IF (x_msg_data IS NOT NULL) THEN
2983: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2984: ELSE
2985: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Data_Tables ';
2986: END IF;
2987: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
2988: RAISE;
2989: end Delete_Kpi_Data_Tables;
3072: WHEN NO_DATA_FOUND THEN
3073: ROLLBACK TO BscKpiPvt_CrtKPICalc;
3074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3075: IF (x_msg_data IS NOT NULL) THEN
3076: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Calculations ';
3077: ELSE
3078: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Calculations ';
3079: END IF;
3080: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3075: IF (x_msg_data IS NOT NULL) THEN
3076: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Calculations ';
3077: ELSE
3078: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Calculations ';
3079: END IF;
3080: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3081: RAISE;
3082: WHEN OTHERS THEN
3088: FND_MSG_PUB.ADD;
3089: RAISE FND_API.G_EXC_ERROR;
3090: end if;
3091: IF (x_msg_data IS NOT NULL) THEN
3092: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Calculations ';
3093: ELSE
3094: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Calculations ';
3095: END IF;
3096: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3090: end if;
3091: IF (x_msg_data IS NOT NULL) THEN
3092: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Calculations ';
3093: ELSE
3094: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Calculations ';
3095: END IF;
3096: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3097: RAISE;
3098: end Create_Kpi_Calculations;
3164: RAISE FND_API.G_EXC_ERROR;
3165: WHEN OTHERS THEN
3166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3167: IF (x_msg_data IS NOT NULL) THEN
3168: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Calculations ';
3169: ELSE
3170: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Calculations ';
3171: END IF;
3172: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3167: IF (x_msg_data IS NOT NULL) THEN
3168: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Calculations ';
3169: ELSE
3170: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Calculations ';
3171: END IF;
3172: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3173: RAISE;
3174: end Retrieve_Kpi_Calculations;
3300: WHEN NO_DATA_FOUND THEN
3301: ROLLBACK TO BscKpiPvt_UptKPICalc;
3302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3303: IF (x_msg_data IS NOT NULL) THEN
3304: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Calculations ';
3305: ELSE
3306: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Calculations ';
3307: END IF;
3308: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3303: IF (x_msg_data IS NOT NULL) THEN
3304: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Calculations ';
3305: ELSE
3306: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Calculations ';
3307: END IF;
3308: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3309: RAISE;
3310: WHEN OTHERS THEN
3310: WHEN OTHERS THEN
3311: ROLLBACK TO BscKpiPvt_UptKPICalc;
3312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3313: IF (x_msg_data IS NOT NULL) THEN
3314: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Calculations ';
3315: ELSE
3316: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Calculations ';
3317: END IF;
3318: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3313: IF (x_msg_data IS NOT NULL) THEN
3314: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Calculations ';
3315: ELSE
3316: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Calculations ';
3317: END IF;
3318: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3319: RAISE;
3320: end Update_Kpi_Calculations;
3390: WHEN NO_DATA_FOUND THEN
3391: ROLLBACK TO BscKpiPvt_DelKPICalc;
3392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3393: IF (x_msg_data IS NOT NULL) THEN
3394: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Calculations ';
3395: ELSE
3396: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Calculations ';
3397: END IF;
3398: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3393: IF (x_msg_data IS NOT NULL) THEN
3394: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Calculations ';
3395: ELSE
3396: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Calculations ';
3397: END IF;
3398: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3399: RAISE;
3400: WHEN OTHERS THEN
3400: WHEN OTHERS THEN
3401: ROLLBACK TO BscKpiPvt_DelKPICalc;
3402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3403: IF (x_msg_data IS NOT NULL) THEN
3404: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Calculations ';
3405: ELSE
3406: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Calculations ';
3407: END IF;
3408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3403: IF (x_msg_data IS NOT NULL) THEN
3404: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Calculations ';
3405: ELSE
3406: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Calculations ';
3407: END IF;
3408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3409: RAISE;
3410: end Delete_Kpi_Calculations;
3506: FND_MSG_PUB.ADD;
3507: RAISE FND_API.G_EXC_ERROR;
3508: end if;
3509: IF (x_msg_data IS NOT NULL) THEN
3510: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_User_Access ';
3511: ELSE
3512: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_User_Access ';
3513: END IF;
3514: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3508: end if;
3509: IF (x_msg_data IS NOT NULL) THEN
3510: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_User_Access ';
3511: ELSE
3512: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_User_Access ';
3513: END IF;
3514: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3515: RAISE;
3516: WHEN OTHERS THEN
3516: WHEN OTHERS THEN
3517: ROLLBACK TO BscKpiPvt_CrtKPIUsrAcc;
3518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3519: IF (x_msg_data IS NOT NULL) THEN
3520: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_User_Access ';
3521: ELSE
3522: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_User_Access ';
3523: END IF;
3524: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3519: IF (x_msg_data IS NOT NULL) THEN
3520: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_User_Access ';
3521: ELSE
3522: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_User_Access ';
3523: END IF;
3524: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3525: RAISE;
3526: end Create_Kpi_User_Access;
3598: RAISE FND_API.G_EXC_ERROR;
3599: WHEN OTHERS THEN
3600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3601: IF (x_msg_data IS NOT NULL) THEN
3602: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_User_Access ';
3603: ELSE
3604: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_User_Access ';
3605: END IF;
3606: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3601: IF (x_msg_data IS NOT NULL) THEN
3602: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_User_Access ';
3603: ELSE
3604: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_User_Access ';
3605: END IF;
3606: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3607: RAISE;
3608: end Retrieve_Kpi_User_Access;
3722: WHEN NO_DATA_FOUND THEN
3723: ROLLBACK TO BscKpiPvt_UptKPIUsrAcc;
3724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3725: IF (x_msg_data IS NOT NULL) THEN
3726: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_User_Access ';
3727: ELSE
3728: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_User_Access ';
3729: END IF;
3730: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3725: IF (x_msg_data IS NOT NULL) THEN
3726: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_User_Access ';
3727: ELSE
3728: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_User_Access ';
3729: END IF;
3730: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3731: RAISE;
3732: WHEN OTHERS THEN
3732: WHEN OTHERS THEN
3733: ROLLBACK TO BscKpiPvt_UptKPIUsrAcc;
3734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3735: IF (x_msg_data IS NOT NULL) THEN
3736: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_User_Access ';
3737: ELSE
3738: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_User_Access ';
3739: END IF;
3740: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3735: IF (x_msg_data IS NOT NULL) THEN
3736: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_User_Access ';
3737: ELSE
3738: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_User_Access ';
3739: END IF;
3740: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3741: RAISE;
3742: end Update_Kpi_User_Access;
3807: WHEN NO_DATA_FOUND THEN
3808: ROLLBACK TO BscKpiPvt_DelKPIUsrAcc;
3809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3810: IF (x_msg_data IS NOT NULL) THEN
3811: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_User_Access ';
3812: ELSE
3813: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_User_Access ';
3814: END IF;
3815: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3810: IF (x_msg_data IS NOT NULL) THEN
3811: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_User_Access ';
3812: ELSE
3813: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_User_Access ';
3814: END IF;
3815: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
3816: RAISE;
3817: WHEN OTHERS THEN
3817: WHEN OTHERS THEN
3818: ROLLBACK TO BscKpiPvt_DelKPIUsrAcc;
3819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3820: IF (x_msg_data IS NOT NULL) THEN
3821: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_User_Access ';
3822: ELSE
3823: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_User_Access ';
3824: END IF;
3825: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3820: IF (x_msg_data IS NOT NULL) THEN
3821: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_User_Access ';
3822: ELSE
3823: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_User_Access ';
3824: END IF;
3825: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
3826: RAISE;
3827: end Delete_Kpi_User_Access;
4003: WHEN NO_DATA_FOUND THEN
4004: ROLLBACK TO BscKpiPvt_CrtKPIDefVals;
4005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4006: IF (x_msg_data IS NOT NULL) THEN
4007: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Default_Values ';
4008: ELSE
4009: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Default_Values ';
4010: END IF;
4011: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4006: IF (x_msg_data IS NOT NULL) THEN
4007: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Default_Values ';
4008: ELSE
4009: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Default_Values ';
4010: END IF;
4011: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4012: RAISE;
4013: WHEN OTHERS THEN
4019: FND_MSG_PUB.ADD;
4020: RAISE FND_API.G_EXC_ERROR;
4021: end if;
4022: IF (x_msg_data IS NOT NULL) THEN
4023: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Default_Values ';
4024: ELSE
4025: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Default_Values ';
4026: END IF;
4027: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4021: end if;
4022: IF (x_msg_data IS NOT NULL) THEN
4023: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_Default_Values ';
4024: ELSE
4025: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_Default_Values ';
4026: END IF;
4027: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4028: RAISE;
4029: end Create_Kpi_Default_Values;
4164: RAISE FND_API.G_EXC_ERROR;
4165: WHEN OTHERS THEN
4166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4167: IF (x_msg_data IS NOT NULL) THEN
4168: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Default_Values ';
4169: ELSE
4170: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Default_Values ';
4171: END IF;
4172: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4167: IF (x_msg_data IS NOT NULL) THEN
4168: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_Default_Values ';
4169: ELSE
4170: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_Default_Values ';
4171: END IF;
4172: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4173: RAISE;
4174: end Retrieve_Kpi_Default_Values;
4418: WHEN NO_DATA_FOUND THEN
4419: ROLLBACK TO BscKpiPvt_UpdKPIDefVals;
4420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4421: IF (x_msg_data IS NOT NULL) THEN
4422: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Default_Values ';
4423: ELSE
4424: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Default_Values ';
4425: END IF;
4426: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4421: IF (x_msg_data IS NOT NULL) THEN
4422: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Default_Values ';
4423: ELSE
4424: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Default_Values ';
4425: END IF;
4426: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4427: RAISE;
4428: WHEN OTHERS THEN
4428: WHEN OTHERS THEN
4429: ROLLBACK TO BscKpiPvt_UpdKPIDefVals;
4430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4431: IF (x_msg_data IS NOT NULL) THEN
4432: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Default_Values ';
4433: ELSE
4434: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Default_Values ';
4435: END IF;
4436: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4431: IF (x_msg_data IS NOT NULL) THEN
4432: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Default_Values ';
4433: ELSE
4434: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Default_Values ';
4435: END IF;
4436: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4437: RAISE;
4438:
4507: WHEN NO_DATA_FOUND THEN
4508: ROLLBACK TO BscKpiPvt_DelKPIDefVals;
4509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4510: IF (x_msg_data IS NOT NULL) THEN
4511: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4512: ELSE
4513: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4514: END IF;
4515: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4510: IF (x_msg_data IS NOT NULL) THEN
4511: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4512: ELSE
4513: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4514: END IF;
4515: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4516: RAISE;
4517: WHEN OTHERS THEN
4517: WHEN OTHERS THEN
4518: ROLLBACK TO BscKpiPvt_DelKPIDefVals;
4519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4520: IF (x_msg_data IS NOT NULL) THEN
4521: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4522: ELSE
4523: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4524: END IF;
4525: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4520: IF (x_msg_data IS NOT NULL) THEN
4521: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4522: ELSE
4523: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_Default_Values ';
4524: END IF;
4525: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4526: RAISE;
4527: end Delete_Kpi_Default_Values;
4544:
4545: l_count number;
4546:
4547: begin
4548: --DBMS_OUTPUT.PUT_LINE('-- Begin BSC_KPI_PVT.Create_Kpi_In_Tab');
4549: FND_MSG_PUB.Initialize;
4550: x_return_status := FND_API.G_RET_STS_SUCCESS;
4551: SAVEPOINT BscKpiPvt_CrtKPIInTab;
4552: -- Assign passed records to local record.
4570: FND_MSG_PUB.ADD;
4571: RAISE FND_API.G_EXC_ERROR;
4572: end if;
4573:
4574: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 1');
4575:
4576: -- Check that valid id was entered.
4577: if l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id is not null then
4578: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 2');
4574: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 1');
4575:
4576: -- Check that valid id was entered.
4577: if l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id is not null then
4578: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 2');
4579:
4580: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_TABS_B'
4581: ,'tab_id'
4582: ,l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
4579:
4580: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_TABS_B'
4581: ,'tab_id'
4582: ,l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
4583: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 3');
4584:
4585: if l_count = 0 then
4586: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_TAB_ID');
4587: FND_MESSAGE.SET_TOKEN('BSC_TAB', l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
4593: FND_MESSAGE.SET_TOKEN('BSC_TAB', l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
4594: FND_MSG_PUB.ADD;
4595: RAISE FND_API.G_EXC_ERROR;
4596: end if;
4597: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 4');
4598:
4599:
4600: -- Check that this Group has not been assigned to the tab yet.
4601: select count(*)
4603: from BSC_TAB_IND_GROUPS_B
4604: where tab_id = l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id
4605: and ind_group_id = l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Group_Id;
4606:
4607: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 5');
4608:
4609: -- if group and tab combination does not exist then assign group to Tab.
4610: if l_count < 1 then
4611:
4608:
4609: -- if group and tab combination does not exist then assign group to Tab.
4610: if l_count < 1 then
4611:
4612: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 6');
4613: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Group_Rec.Bsc_Tab_Id = ' || l_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
4614:
4615: --populate appropriate values into Record.
4616: l_Bsc_Kpi_Group_Rec.Bsc_Csf_Id := l_Bsc_Kpi_Entity_Rec.Bsc_Csf_Id;
4630: l_Bsc_Kpi_Group_Rec.Bsc_Source_Language := l_Bsc_Kpi_Entity_Rec.Bsc_Source_Language;
4631:
4632: l_db_object := 'Update_Kpi_Group';
4633:
4634: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 7');
4635: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Group_Rec.Bsc_Tab_Id = ' || l_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
4636: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Group_Rec.Bsc_Left_Position_In_Tab = ' || l_Bsc_Kpi_Group_Rec.Bsc_Left_Position_In_Tab);
4637: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Group_Rec.Bsc_Top_Position_In_Tab = ' || l_Bsc_Kpi_Group_Rec.Bsc_Top_Position_In_Tab);
4638: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Group_Rec.Bsc_Group_Width = ' || l_Bsc_Kpi_Group_Rec.Bsc_Group_Width);
4645: ,x_msg_data);
4646:
4647: end if;
4648:
4649: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 8');
4650:
4651:
4652: -- Call procedure to update KPI with tab information. Set some values.
4653: l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Model_Flag := 0;
4657: l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Backcolor := null;
4658:
4659: l_db_object := 'BSC_TAB_INDICATORS';
4660:
4661: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 9');
4662:
4663: insert into BSC_TAB_INDICATORS( tab_id
4664: ,indicator
4665: ,bsc_model_flag
4676: ,l_Bsc_Kpi_Entity_Rec.Bsc_Group_Width
4677: ,l_Bsc_Kpi_Entity_Rec.Bsc_Group_Height
4678: ,l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Backcolor);
4679:
4680: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Kpi_In_Tab - Flag 10');
4681:
4682: Update_Kpi_In_Tab( p_commit
4683: ,l_Bsc_Kpi_Entity_Rec
4684: ,x_return_status
4689: if (p_commit = FND_API.G_TRUE) then
4690: commit;
4691: end if;
4692:
4693: --DBMS_OUTPUT.PUT_LINE(' -- End BSC_KPI_PVT.Create_Kpi_In_Tab');
4694:
4695:
4696: EXCEPTION
4697: WHEN FND_API.G_EXC_ERROR THEN
4717: WHEN NO_DATA_FOUND THEN
4718: ROLLBACK TO BscKpiPvt_CrtKPIInTab;
4719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4720: IF (x_msg_data IS NOT NULL) THEN
4721: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_In_Tab ';
4722: ELSE
4723: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_In_Tab ';
4724: END IF;
4725: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4720: IF (x_msg_data IS NOT NULL) THEN
4721: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_In_Tab ';
4722: ELSE
4723: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_In_Tab ';
4724: END IF;
4725: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4726: RAISE;
4727: WHEN OTHERS THEN
4733: FND_MSG_PUB.ADD;
4734: RAISE FND_API.G_EXC_ERROR;
4735: end if;
4736: IF (x_msg_data IS NOT NULL) THEN
4737: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_In_Tab ';
4738: ELSE
4739: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_In_Tab ';
4740: END IF;
4741: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4735: end if;
4736: IF (x_msg_data IS NOT NULL) THEN
4737: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Kpi_In_Tab ';
4738: ELSE
4739: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Kpi_In_Tab ';
4740: END IF;
4741: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4742: RAISE;
4743: end Create_Kpi_In_Tab;
4815: RAISE FND_API.G_EXC_ERROR;
4816: WHEN OTHERS THEN
4817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4818: IF (x_msg_data IS NOT NULL) THEN
4819: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_In_Tab ';
4820: ELSE
4821: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_In_Tab ';
4822: END IF;
4823: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4818: IF (x_msg_data IS NOT NULL) THEN
4819: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Retrieve_Kpi_In_Tab ';
4820: ELSE
4821: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Retrieve_Kpi_In_Tab ';
4822: END IF;
4823: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4824: RAISE;
4825: end Retrieve_Kpi_In_Tab;
4840: begin
4841: FND_MSG_PUB.Initialize;
4842: x_return_status := FND_API.G_RET_STS_SUCCESS;
4843: SAVEPOINT BscKpiPvt_UpdKPIInTab;
4844: --DBMS_OUTPUT.PUT_LINE(' -- Begin BSC_KPI_PVT.Update_Kpi_In_Tab');
4845:
4846: -- Check that valid id was entered.
4847: if p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id is not null then
4848: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_KPIS_B'
4860: FND_MSG_PUB.ADD;
4861: RAISE FND_API.G_EXC_ERROR;
4862: end if;
4863:
4864: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Update_Kpi_In_Tab - Flag 1');
4865: --DBMS_OUTPUT.PUT_LINE(' p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Prototype_Flag = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Prototype_Flag);
4866:
4867: -- Update prototype flag.
4868:
4870: set prototype_flag = nvl(p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Prototype_Flag,7)
4871: where indicator = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id
4872: and decode(prototype_flag, 0, 8, prototype_flag) > 7;
4873:
4874: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Update_Kpi_In_Tab - Flag 2');
4875:
4876: -- Update Kpi defaults.
4877: update BSC_KPI_DEFAULTS_B
4878: set tab_id = p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id
4877: update BSC_KPI_DEFAULTS_B
4878: set tab_id = p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id
4879: where indicator = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
4880:
4881: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Update_Kpi_In_Tab - Flag 3');
4882:
4883: update BSC_KPI_DEFAULTS_TL
4884: set tab_id = p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id
4885: where indicator = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
4883: update BSC_KPI_DEFAULTS_TL
4884: set tab_id = p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id
4885: where indicator = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
4886:
4887: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Update_Kpi_In_Tab - Flag 4');
4888:
4889: -- Update Kpi Dim Level Information
4890: update BSC_KPI_DIM_LEVELS_B
4891: set default_value = 'T'
4895: if (p_commit = FND_API.G_TRUE) then
4896: commit;
4897: end if;
4898:
4899: --DBMS_OUTPUT.PUT_LINE(' -- End BSC_KPI_PVT.Update_Kpi_In_Tab ');
4900:
4901: EXCEPTION
4902: WHEN FND_API.G_EXC_ERROR THEN
4903: ROLLBACK TO BscKpiPvt_UpdKPIInTab;
4922: WHEN NO_DATA_FOUND THEN
4923: ROLLBACK TO BscKpiPvt_UpdKPIInTab;
4924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4925: IF (x_msg_data IS NOT NULL) THEN
4926: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_In_Tab ';
4927: ELSE
4928: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_In_Tab ';
4929: END IF;
4930: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4925: IF (x_msg_data IS NOT NULL) THEN
4926: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_In_Tab ';
4927: ELSE
4928: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_In_Tab ';
4929: END IF;
4930: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
4931: RAISE;
4932: WHEN OTHERS THEN
4932: WHEN OTHERS THEN
4933: ROLLBACK TO BscKpiPvt_UpdKPIInTab;
4934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4935: IF (x_msg_data IS NOT NULL) THEN
4936: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_In_Tab ';
4937: ELSE
4938: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_In_Tab ';
4939: END IF;
4940: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4935: IF (x_msg_data IS NOT NULL) THEN
4936: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_In_Tab ';
4937: ELSE
4938: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_In_Tab ';
4939: END IF;
4940: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
4941: RAISE;
4942: end Update_Kpi_In_Tab;
5010: WHEN NO_DATA_FOUND THEN
5011: ROLLBACK TO BscKpiPvt_DelKPIInTab;
5012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5013: IF (x_msg_data IS NOT NULL) THEN
5014: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5015: ELSE
5016: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5017: END IF;
5018: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5013: IF (x_msg_data IS NOT NULL) THEN
5014: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5015: ELSE
5016: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5017: END IF;
5018: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5019: RAISE;
5020: WHEN OTHERS THEN
5020: WHEN OTHERS THEN
5021: ROLLBACK TO BscKpiPvt_DelKPIInTab;
5022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5023: IF (x_msg_data IS NOT NULL) THEN
5024: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5025: ELSE
5026: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5027: END IF;
5028: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5023: IF (x_msg_data IS NOT NULL) THEN
5024: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5025: ELSE
5026: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Kpi_In_Tab ';
5027: END IF;
5028: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5029: RAISE;
5030:
5077: WHEN NO_DATA_FOUND THEN
5078: ROLLBACK TO BscKpiPvt_UptKPITimSta;
5079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5080: IF (x_msg_data IS NOT NULL) THEN
5081: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5082: ELSE
5083: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5084: END IF;
5085: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5080: IF (x_msg_data IS NOT NULL) THEN
5081: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5082: ELSE
5083: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5084: END IF;
5085: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5086: RAISE;
5087: WHEN OTHERS THEN
5087: WHEN OTHERS THEN
5088: ROLLBACK TO BscKpiPvt_UptKPITimSta;
5089: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5090: IF (x_msg_data IS NOT NULL) THEN
5091: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5092: ELSE
5093: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5094: END IF;
5095: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5089: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5090: IF (x_msg_data IS NOT NULL) THEN
5091: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5092: ELSE
5093: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Update_Kpi_Time_Stamp ';
5094: END IF;
5095: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5096: RAISE;
5097: end Update_Kpi_Time_Stamp;
5122: begin
5123: FND_MSG_PUB.Initialize;
5124: x_return_status := FND_API.G_RET_STS_SUCCESS;
5125: SAVEPOINT BscKpiPvt_CrtMastKPI;
5126: --DBMS_OUTPUT.PUT_LINE('-- Begin BSC_KPI_PVT.Create_Master_Kpi');
5127:
5128: -- Check that valid id was entered.
5129: if p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id is not null then
5130: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_KPIS_B'
5142: FND_MSG_PUB.ADD;
5143: RAISE FND_API.G_EXC_ERROR;
5144: end if;
5145:
5146: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 1');
5147:
5148: -- Check that valid tab id was entered.
5149: if p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id is not null then
5150: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 2');
5146: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 1');
5147:
5148: -- Check that valid tab id was entered.
5149: if p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id is not null then
5150: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 2');
5151:
5152: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_TABS_B'
5153: ,'tab_id'
5154: ,p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
5151:
5152: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_TABS_B'
5153: ,'tab_id'
5154: ,p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
5155: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 3');
5156:
5157: if l_count = 0 then
5158: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_TAB_ID');
5159: FND_MESSAGE.SET_TOKEN('BSC_TAB', p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
5165: FND_MESSAGE.SET_TOKEN('BSC_TAB', p_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id);
5166: FND_MSG_PUB.ADD;
5167: RAISE FND_API.G_EXC_ERROR;
5168: end if;
5169: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 4');
5170:
5171:
5172: -- set all values of the local record equal to the record passed.
5173: l_Bsc_Kpi_Entity_Rec := p_Bsc_Kpi_Entity_Rec;
5177: l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Source_Ind := null;
5178:
5179: -- Call update procedure (this will update the shared flag).
5180:
5181: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 5');
5182:
5183: Update_Kpi( p_commit
5184: ,l_Bsc_Kpi_Entity_Rec
5185: ,x_return_status
5185: ,x_return_status
5186: ,x_msg_count
5187: ,x_msg_data);
5188:
5189: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 6');
5190:
5191: --DBMS_OUTPUT.PUT_LINE(' l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Prototype_Flag = ' || l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Prototype_Flag );
5192:
5193:
5198: ,x_return_status
5199: ,x_msg_count
5200: ,x_msg_data);
5201:
5202: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 7');
5203:
5204: -- show All the analysis options.
5205: update BSC_KPI_ANALYSIS_OPTIONS_B
5206: set USER_LEVEL1 = USER_LEVEL0
5205: update BSC_KPI_ANALYSIS_OPTIONS_B
5206: set USER_LEVEL1 = USER_LEVEL0
5207: where indicator = l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
5208:
5209: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Master_Kpi Flag 10');
5210:
5211: if (p_commit = FND_API.G_TRUE) then
5212: commit;
5213: end if;
5211: if (p_commit = FND_API.G_TRUE) then
5212: commit;
5213: end if;
5214:
5215: --DBMS_OUTPUT.PUT_LINE('-- End BSC_KPI_PVT.Create_Master_Kpi');
5216:
5217:
5218: EXCEPTION
5219: WHEN FND_API.G_EXC_ERROR THEN
5239: WHEN NO_DATA_FOUND THEN
5240: ROLLBACK TO BscKpiPvt_CrtMastKPI;
5241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5242: IF (x_msg_data IS NOT NULL) THEN
5243: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Master_Kpi ';
5244: ELSE
5245: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Master_Kpi ';
5246: END IF;
5247: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5242: IF (x_msg_data IS NOT NULL) THEN
5243: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Master_Kpi ';
5244: ELSE
5245: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Master_Kpi ';
5246: END IF;
5247: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5248: RAISE;
5249: WHEN OTHERS THEN
5249: WHEN OTHERS THEN
5250: ROLLBACK TO BscKpiPvt_CrtMastKPI;
5251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5252: IF (x_msg_data IS NOT NULL) THEN
5253: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Master_Kpi ';
5254: ELSE
5255: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Master_Kpi ';
5256: END IF;
5257: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5252: IF (x_msg_data IS NOT NULL) THEN
5253: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Master_Kpi ';
5254: ELSE
5255: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Master_Kpi ';
5256: END IF;
5257: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5258: RAISE;
5259: end Create_Master_Kpi;
5310: begin
5311: FND_MSG_PUB.Initialize;
5312: x_return_status := FND_API.G_RET_STS_SUCCESS;
5313: SAVEPOINT BscKpiPvt_CrtShaKPI;
5314: --DBMS_OUTPUT.PUT_LINE('-- Begin BSC_KPI_PVT.Create_Shared_Kpi');
5315:
5316: -- set the local RECORD equal to the passed RECORD.
5317: l_Bsc_Kpi_Entity_Rec := p_Bsc_Kpi_Entity_Rec;
5318:
5323:
5324: -- Get the next id available for the current Kpi.
5325: l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id := BSC_DIMENSION_LEVELS_PVT.Get_Next_Value( 'BSC_KPIS_B'
5326: ,'indicator');
5327: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 1');
5328: --DBMS_OUTPUT.PUT_LINE(' New KPI code := ' || l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
5329:
5330: Retrieve_Kpi( p_commit
5331: ,p_Bsc_Kpi_Entity_Rec
5333: ,x_return_status
5334: ,x_msg_count
5335: ,x_msg_data);
5336:
5337: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 2');
5338:
5339: l_x_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id := l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
5340: l_x_Bsc_Kpi_Entity_Rec.Bsc_Language := p_Bsc_Kpi_Entity_Rec.Bsc_Language;
5341: l_x_Bsc_Kpi_Entity_Rec.Bsc_Source_Language := p_Bsc_Kpi_Entity_Rec.Bsc_Source_Language;
5364: ,x_return_status
5365: ,x_msg_count
5366: ,x_msg_data);
5367:
5368: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 3');
5369: --DBMS_OUTPUT.PUT_LINE(' p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id := ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
5370:
5371: /*Retrieve_Kpi_Defaults( p_commit
5372: ,p_Bsc_Kpi_Entity_Rec
5380: l_x_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id := l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id;
5381: l_x_Bsc_Kpi_Entity_Rec.Bsc_Language := p_Bsc_Kpi_Entity_Rec.Bsc_Language;
5382: l_x_Bsc_Kpi_Entity_Rec.Bsc_Source_Language := p_Bsc_Kpi_Entity_Rec.Bsc_Source_Language;
5383:
5384: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 4');
5385: --DBMS_OUTPUT.PUT_LINE('l_x_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id := ' || l_x_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
5386:
5387: Create_Kpi_Defaults( p_commit
5388: ,l_x_Bsc_Kpi_Entity_Rec
5389: ,x_return_status
5390: ,x_msg_count
5391: ,x_msg_data);
5392:
5393: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 5');*/
5394:
5395: Retrieve_Kpi_In_Tab( p_commit
5396: ,p_Bsc_Kpi_Entity_Rec
5397: ,l_x_Bsc_Kpi_Entity_Rec
5398: ,x_return_status
5399: ,x_msg_count
5400: ,x_msg_data);
5401:
5402: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 6');
5403:
5404: l_x_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id := l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
5405: l_x_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id := l_Bsc_Kpi_Entity_Rec.Bsc_Tab_Id;
5406: l_x_Bsc_Kpi_Entity_Rec.Bsc_Language := p_Bsc_Kpi_Entity_Rec.Bsc_Language;
5412: ,x_return_status
5413: ,x_msg_count
5414: ,x_msg_data);
5415:
5416: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 7');
5417:
5418: BSC_DESIGNER_PVT.Duplicate_KPI_Metadata( p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id
5419: ,l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id
5420: ,0
5442: END IF;
5443: END IF;
5444:
5445:
5446: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 8');
5447:
5448: select decode(property_value,1,1,3)
5449: into l_prototype_flag
5450: from bsc_sys_init
5449: into l_prototype_flag
5450: from bsc_sys_init
5451: where property_code = 'SYSTEM_STAGE';
5452:
5453: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 9');
5454:
5455: -- Set shared flag values.
5456: update BSC_KPIS_B
5457: set share_flag = 2
5458: ,prototype_flag = l_prototype_flag
5459: ,source_indicator = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id
5460: where indicator = l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
5461:
5462: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 10');
5463:
5464: BSC_DESIGNER_PVT.ActionFlag_Change(l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id, BSC_DESIGNER_PVT.G_ActionFlag.Prototype);
5465:
5466: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 11');
5462: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 10');
5463:
5464: BSC_DESIGNER_PVT.ActionFlag_Change(l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id, BSC_DESIGNER_PVT.G_ActionFlag.Prototype);
5465:
5466: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 11');
5467:
5468: -- show All the analysis options.
5469: update BSC_KPI_ANALYSIS_OPTIONS_B
5470: set USER_LEVEL1 = USER_LEVEL0
5479: WHERE INDICATOR = l_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
5480: -- Fix issue in bug 3248729
5481:
5482:
5483: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 12');
5484:
5485: -- Get a responsibility id for BSC_MANAGER
5486: select responsibility_id
5487: into l_Bsc_Kpi_Entity_Rec.Bsc_Responsibility_Id
5493: l_Bsc_Kpi_Entity_Rec.Last_Updated_By:= 0;
5494: l_Bsc_Kpi_Entity_Rec.Last_Update_Login:= 0;
5495: l_Bsc_Kpi_Entity_Rec.Last_Update_Login:= 0;
5496:
5497: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Create_Shared_Kpi - Flag 13');
5498:
5499: -- Grant access
5500: BSC_KPI_PUB.Create_Kpi_User_Access( p_commit
5501: ,l_Bsc_Kpi_Entity_Rec
5522: if (p_commit = FND_API.G_TRUE) then
5523: commit;
5524: end if;
5525:
5526: --DBMS_OUTPUT.PUT_LINE('-- End BSC_KPI_PVT.Create_Shared_Kpi');
5527:
5528: EXCEPTION
5529: WHEN FND_API.G_EXC_ERROR THEN
5530: ROLLBACK TO BscKpiPvt_CrtShaKPI;
5549: WHEN NO_DATA_FOUND THEN
5550: ROLLBACK TO BscKpiPvt_CrtShaKPI;
5551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5552: IF (x_msg_data IS NOT NULL) THEN
5553: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Shared_Kpi ';
5554: ELSE
5555: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Shared_Kpi ';
5556: END IF;
5557: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5552: IF (x_msg_data IS NOT NULL) THEN
5553: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Shared_Kpi ';
5554: ELSE
5555: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Shared_Kpi ';
5556: END IF;
5557: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5558: RAISE;
5559: WHEN OTHERS THEN
5559: WHEN OTHERS THEN
5560: ROLLBACK TO BscKpiPvt_CrtShaKPI;
5561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5562: IF (x_msg_data IS NOT NULL) THEN
5563: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Shared_Kpi ';
5564: ELSE
5565: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Shared_Kpi ';
5566: END IF;
5567: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5562: IF (x_msg_data IS NOT NULL) THEN
5563: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Create_Shared_Kpi ';
5564: ELSE
5565: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Create_Shared_Kpi ';
5566: END IF;
5567: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5568: RAISE;
5569: end Create_Shared_Kpi;
5658: WHEN NO_DATA_FOUND THEN
5659: ROLLBACK TO BscKpiPvt_MoveTab;
5660: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5661: IF (x_msg_data IS NOT NULL) THEN
5662: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Move_Tab ';
5663: ELSE
5664: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Move_Tab ';
5665: END IF;
5666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5660: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5661: IF (x_msg_data IS NOT NULL) THEN
5662: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Move_Tab ';
5663: ELSE
5664: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Move_Tab ';
5665: END IF;
5666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5667: RAISE;
5668: WHEN OTHERS THEN
5668: WHEN OTHERS THEN
5669: ROLLBACK TO BscKpiPvt_MoveTab;
5670: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5671: IF (x_msg_data IS NOT NULL) THEN
5672: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Move_Tab ';
5673: ELSE
5674: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Move_Tab ';
5675: END IF;
5676: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5670: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5671: IF (x_msg_data IS NOT NULL) THEN
5672: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Move_Tab ';
5673: ELSE
5674: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Move_Tab ';
5675: END IF;
5676: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5677: RAISE;
5678:
5913: WHEN NO_DATA_FOUND THEN
5914: ROLLBACK TO BscKpiPvt_SetDefOption;
5915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5916: IF (x_msg_data IS NOT NULL) THEN
5917: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option ';
5918: ELSE
5919: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option ';
5920: END IF;
5921: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5916: IF (x_msg_data IS NOT NULL) THEN
5917: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option ';
5918: ELSE
5919: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option ';
5920: END IF;
5921: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
5922: RAISE;
5923: WHEN OTHERS THEN
5923: WHEN OTHERS THEN
5924: ROLLBACK TO BscKpiPvt_SetDefOption;
5925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5926: IF (x_msg_data IS NOT NULL) THEN
5927: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option ';
5928: ELSE
5929: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option ';
5930: END IF;
5931: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5926: IF (x_msg_data IS NOT NULL) THEN
5927: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option ';
5928: ELSE
5929: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option ';
5930: END IF;
5931: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
5932: RAISE;
5933:
6288: WHEN NO_DATA_FOUND THEN
6289: ROLLBACK TO BscKpiPvt_SetDefOptionMG;
6290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6291: IF (x_msg_data IS NOT NULL) THEN
6292: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option_MG ';
6293: ELSE
6294: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option_MG ';
6295: END IF;
6296: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6291: IF (x_msg_data IS NOT NULL) THEN
6292: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option_MG ';
6293: ELSE
6294: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option_MG ';
6295: END IF;
6296: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6297: RAISE;
6298: WHEN OTHERS THEN
6298: WHEN OTHERS THEN
6299: ROLLBACK TO BscKpiPvt_SetDefOptionMG;
6300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6301: IF (x_msg_data IS NOT NULL) THEN
6302: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option_MG ';
6303: ELSE
6304: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option_MG ';
6305: END IF;
6306: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6301: IF (x_msg_data IS NOT NULL) THEN
6302: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Set_Default_Option_MG ';
6303: ELSE
6304: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Set_Default_Option_MG ';
6305: END IF;
6306: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6307: RAISE;
6308: end Set_Default_Option_MG;
6325: Begin
6326: FND_MSG_PUB.Initialize;
6327: x_return_status := FND_API.G_RET_STS_SUCCESS;
6328: SAVEPOINT BscKpiPvt_AssAnaOpts;
6329: --DBMS_OUTPUT.PUT_LINE('Begin BSC_KPI_PVT.Assign_Analysis_Option');
6330:
6331: l_parent_option_id := 0;
6332: l_grandparent_option_id := 0;
6333:
6341: l_parent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option1;
6342: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6343: end if;
6344:
6345: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6342: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6343: end if;
6344:
6345: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6350: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6343: end if;
6344:
6345: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6350: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6351:
6344:
6345: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6350: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6351:
6352:
6345: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6350: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6351:
6352:
6353: -- Update the Analysis Option Set the option visible
6346: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6347: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6348: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6349: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6350: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6351:
6352:
6353: -- Update the Analysis Option Set the option visible
6354: update BSC_KPI_ANALYSIS_OPTIONS_B
6377: ,x_msg_count
6378: ,x_msg_data);
6379: end if;
6380:
6381: --DBMS_OUTPUT.PUT_LINE('End BSC_KPI_PVT.Assign_Analysis_Option');
6382:
6383:
6384: EXCEPTION
6385: WHEN FND_API.G_EXC_ERROR THEN
6405: WHEN NO_DATA_FOUND THEN
6406: ROLLBACK TO BscKpiPvt_AssAnaOpts;
6407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6408: IF (x_msg_data IS NOT NULL) THEN
6409: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Assign_Analysis_Option ';
6410: ELSE
6411: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Assign_Analysis_Option ';
6412: END IF;
6413: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6408: IF (x_msg_data IS NOT NULL) THEN
6409: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Assign_Analysis_Option ';
6410: ELSE
6411: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Assign_Analysis_Option ';
6412: END IF;
6413: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6414: RAISE;
6415: WHEN OTHERS THEN
6415: WHEN OTHERS THEN
6416: ROLLBACK TO BscKpiPvt_AssAnaOpts;
6417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6418: IF (x_msg_data IS NOT NULL) THEN
6419: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Assign_Analysis_Option ';
6420: ELSE
6421: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Assign_Analysis_Option ';
6422: END IF;
6423: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6418: IF (x_msg_data IS NOT NULL) THEN
6419: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Assign_Analysis_Option ';
6420: ELSE
6421: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Assign_Analysis_Option ';
6422: END IF;
6423: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6424: RAISE;
6425: End Assign_Analysis_Option;
6441: Begin
6442: FND_MSG_PUB.Initialize;
6443: x_return_status := FND_API.G_RET_STS_SUCCESS;
6444: SAVEPOINT BscKpiPvt_UnAssAnaOpts;
6445: --DBMS_OUTPUT.PUT_LINE('Begin BSC_KPI_PVT.Unassign_Analysis_Option');
6446:
6447: l_parent_option_id := 0;
6448: l_grandparent_option_id := 0;
6449:
6457: l_parent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option1;
6458: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6459: end if;
6460:
6461: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6458: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6459: end if;
6460:
6461: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6466: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6459: end if;
6460:
6461: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6466: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6467:
6460:
6461: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6466: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6467:
6468: -- Update the Analysis Option to hide the option
6461: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id = ' || p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id);
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6466: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6467:
6468: -- Update the Analysis Option to hide the option
6469: update BSC_KPI_ANALYSIS_OPTIONS_B
6462: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id);
6463: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_option_id = ' || l_option_id);
6464: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_parent_option_id = ' || l_parent_option_id);
6465: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id);
6466: --DBMS_OUTPUT.PUT_LINE('--BSC_KPI_PVT.Assign_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag = ' || p_Bsc_kpi_Entity_Rec.Bsc_Dependency_Flag);
6467:
6468: -- Update the Analysis Option to hide the option
6469: update BSC_KPI_ANALYSIS_OPTIONS_B
6470: set user_level1 = 0
6510: end if;
6511:
6512: end if;
6513:
6514: --DBMS_OUTPUT.PUT_LINE('End BSC_KPI_PVT.Unassign_Analysis_Option');
6515:
6516: EXCEPTION
6517: WHEN FND_API.G_EXC_ERROR THEN
6518: ROLLBACK TO BscKpiPvt_UnAssAnaOpts;
6537: WHEN NO_DATA_FOUND THEN
6538: ROLLBACK TO BscKpiPvt_UnAssAnaOpts;
6539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6540: IF (x_msg_data IS NOT NULL) THEN
6541: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Unassign_Analysis_Option ';
6542: ELSE
6543: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Unassign_Analysis_Option ';
6544: END IF;
6545: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6540: IF (x_msg_data IS NOT NULL) THEN
6541: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Unassign_Analysis_Option ';
6542: ELSE
6543: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Unassign_Analysis_Option ';
6544: END IF;
6545: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6546: RAISE;
6547: WHEN OTHERS THEN
6547: WHEN OTHERS THEN
6548: ROLLBACK TO BscKpiPvt_UnAssAnaOpts;
6549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6550: IF (x_msg_data IS NOT NULL) THEN
6551: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Unassign_Analysis_Option ';
6552: ELSE
6553: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Unassign_Analysis_Option ';
6554: END IF;
6555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6550: IF (x_msg_data IS NOT NULL) THEN
6551: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Unassign_Analysis_Option ';
6552: ELSE
6553: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Unassign_Analysis_Option ';
6554: END IF;
6555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6556: RAISE;
6557: End Unassign_Analysis_Option;
6583: -- p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option1
6584: -- p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option2
6585:
6586:
6587: --DBMS_OUTPUT.PUT_LINE('Begin BSC_KPI_PVT.Is_Analysis_Option_Selected ');
6588:
6589: l_parent_option_id := 0;
6590: l_grandparent_option_id := 0;
6591:
6638: end if;
6639:
6640: end if;
6641:
6642: --DBMS_OUTPUT.PUT_LINE('End BSC_KPI_PVT.Is_Analysis_Option_Selected - return ' || l_temp );
6643:
6644: return l_temp ;
6645:
6646: EXCEPTION
6664: RAISE;
6665: WHEN NO_DATA_FOUND THEN
6666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6667: IF (x_msg_data IS NOT NULL) THEN
6668: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6669: ELSE
6670: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6671: END IF;
6672: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6667: IF (x_msg_data IS NOT NULL) THEN
6668: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6669: ELSE
6670: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6671: END IF;
6672: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6673: RAISE;
6674: WHEN OTHERS THEN
6673: RAISE;
6674: WHEN OTHERS THEN
6675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6676: IF (x_msg_data IS NOT NULL) THEN
6677: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6678: ELSE
6679: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6680: END IF;
6681: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6676: IF (x_msg_data IS NOT NULL) THEN
6677: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6678: ELSE
6679: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Analysis_Option_Selected ';
6680: END IF;
6681: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6682: RAISE;
6683: end Is_Analysis_Option_Selected;
6703: Begin
6704: FND_MSG_PUB.Initialize;
6705: x_return_status := FND_API.G_RET_STS_SUCCESS;
6706:
6707: --DBMS_OUTPUT.PUT_LINE('Begin BSC_KPI_PVT.Is_Leaf_Analysis_Option ');
6708:
6709: -- Get the paramters :
6710:
6711: l_parent_option_id := 0;
6721: l_parent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option1;
6722: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6723: end if;
6724:
6725: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_option_id = ' || l_option_id );
6726: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_parent_option_id = ' || l_parent_option_id );
6727: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id );
6728: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id );
6729:
6722: l_grandparent_option_id := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Analysis_Option0;
6723: end if;
6724:
6725: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_option_id = ' || l_option_id );
6726: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_parent_option_id = ' || l_parent_option_id );
6727: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id );
6728: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id );
6729:
6730: -- Evaluate the parameter to know if the option is a leaf :
6723: end if;
6724:
6725: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_option_id = ' || l_option_id );
6726: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_parent_option_id = ' || l_parent_option_id );
6727: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id );
6728: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id );
6729:
6730: -- Evaluate the parameter to know if the option is a leaf :
6731:
6724:
6725: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_option_id = ' || l_option_id );
6726: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_parent_option_id = ' || l_parent_option_id );
6727: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - l_grandparent_option_id = ' || l_grandparent_option_id );
6728: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = ' || p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id );
6729:
6730: -- Evaluate the parameter to know if the option is a leaf :
6731:
6732: if p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id = 2 then
6742:
6743: if l_count = 0 then
6744: -- l_count = 0 means there is not any dependency group from the current one
6745: -- then the current Option is a Leaf
6746: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - NO Child Group ' );
6747: l_temp := FND_API.G_TRUE;
6748: else
6749: -- if l_count <> 0 means there is a dependency group
6750: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - Child Group ' );
6746: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - NO Child Group ' );
6747: l_temp := FND_API.G_TRUE;
6748: else
6749: -- if l_count <> 0 means there is a dependency group
6750: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - Child Group ' );
6751:
6752: -- get the dependency group which is the next one
6753: l_child_analysis_group := p_Bsc_kpi_Entity_Rec.Bsc_kpi_Group_Id + 1 ;
6754:
6763:
6764: if l_count_child_options = 0 then
6765: -- l_count_child_options = 0 means there is not dependency option from
6766: -- the current one, then current option is a leaft
6767: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - NO Child Options ' );
6768:
6769: l_temp := FND_API.G_TRUE;
6770: else
6771: -- l_count_child_options > 0 means there are dependency option from
6769: l_temp := FND_API.G_TRUE;
6770: else
6771: -- l_count_child_options > 0 means there are dependency option from
6772: -- the current one then the current option is not a leaft
6773: --DBMS_OUTPUT.PUT_LINE(' BSC_KPI_PVT.Is_Leaf_Analysis_Option - Child Options ' );
6774:
6775: l_temp := FND_API.G_FALSE;
6776: end if;
6777: end if;
6777: end if;
6778:
6779: end if;
6780:
6781: --DBMS_OUTPUT.PUT_LINE('End BSC_KPI_PVT.Is_Leaf_Analysis_Option - return ' || l_temp );
6782:
6783: return l_temp ;
6784:
6785: EXCEPTION
6803: RAISE;
6804: WHEN NO_DATA_FOUND THEN
6805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6806: IF (x_msg_data IS NOT NULL) THEN
6807: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6808: ELSE
6809: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6810: END IF;
6811: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6806: IF (x_msg_data IS NOT NULL) THEN
6807: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6808: ELSE
6809: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6810: END IF;
6811: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6812: RAISE;
6813: WHEN OTHERS THEN
6812: RAISE;
6813: WHEN OTHERS THEN
6814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6815: IF (x_msg_data IS NOT NULL) THEN
6816: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6817: ELSE
6818: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6819: END IF;
6820: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6815: IF (x_msg_data IS NOT NULL) THEN
6816: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6817: ELSE
6818: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Is_Leaf_Analysis_Option ';
6819: END IF;
6820: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6821: RAISE;
6822:
6904: WHEN NO_DATA_FOUND THEN
6905: ROLLBACK TO DelIndCauseEffectRels;
6906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6907: IF (x_msg_data IS NOT NULL) THEN
6908: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6909: ELSE
6910: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6911: END IF;
6912: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6907: IF (x_msg_data IS NOT NULL) THEN
6908: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6909: ELSE
6910: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6911: END IF;
6912: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
6913: RAISE;
6914: WHEN OTHERS THEN
6914: WHEN OTHERS THEN
6915: ROLLBACK TO DelIndCauseEffectRels;
6916: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6917: IF (x_msg_data IS NOT NULL) THEN
6918: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6919: ELSE
6920: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6921: END IF;
6922: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6916: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6917: IF (x_msg_data IS NOT NULL) THEN
6918: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6919: ELSE
6920: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Cause_Effect_Rels ';
6921: END IF;
6922: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
6923: RAISE;
6924: END Delete_Ind_Cause_Effect_Rels;
7003: WHEN NO_DATA_FOUND THEN
7004: ROLLBACK TO DeleteIndShellCmds;
7005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7006: IF (x_msg_data IS NOT NULL) THEN
7007: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7008: ELSE
7009: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7010: END IF;
7011: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7006: IF (x_msg_data IS NOT NULL) THEN
7007: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7008: ELSE
7009: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7010: END IF;
7011: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7012: RAISE;
7013: WHEN OTHERS THEN
7013: WHEN OTHERS THEN
7014: ROLLBACK TO DeleteIndShellCmds;
7015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7016: IF (x_msg_data IS NOT NULL) THEN
7017: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7018: ELSE
7019: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7020: END IF;
7021: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7016: IF (x_msg_data IS NOT NULL) THEN
7017: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7018: ELSE
7019: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Shell_Cmds ';
7020: END IF;
7021: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7022: RAISE;
7023: END Delete_Ind_Shell_Cmds;
7098: WHEN NO_DATA_FOUND THEN
7099: ROLLBACK TO DeleteIndMMControls;
7100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7101: IF (x_msg_data IS NOT NULL) THEN
7102: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7103: ELSE
7104: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7105: END IF;
7106: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7101: IF (x_msg_data IS NOT NULL) THEN
7102: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7103: ELSE
7104: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7105: END IF;
7106: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7107: RAISE;
7108: WHEN OTHERS THEN
7108: WHEN OTHERS THEN
7109: ROLLBACK TO DeleteIndMMControls;
7110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7111: IF (x_msg_data IS NOT NULL) THEN
7112: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7113: ELSE
7114: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7115: END IF;
7116: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7111: IF (x_msg_data IS NOT NULL) THEN
7112: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7113: ELSE
7114: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_MM_Controls ';
7115: END IF;
7116: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7117: RAISE;
7118: END Delete_Ind_MM_Controls;
7191: WHEN NO_DATA_FOUND THEN
7192: ROLLBACK TO DeleteIndSubtitles;
7193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7194: IF (x_msg_data IS NOT NULL) THEN
7195: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Subtitles ';
7196: ELSE
7197: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Subtitles ';
7198: END IF;
7199: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7194: IF (x_msg_data IS NOT NULL) THEN
7195: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Subtitles ';
7196: ELSE
7197: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Subtitles ';
7198: END IF;
7199: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7200: RAISE;
7201: WHEN OTHERS THEN
7201: WHEN OTHERS THEN
7202: ROLLBACK TO DeleteIndSubtitles;
7203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7204: IF (x_msg_data IS NOT NULL) THEN
7205: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Subtitles ';
7206: ELSE
7207: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Subtitles ';
7208: END IF;
7209: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7204: IF (x_msg_data IS NOT NULL) THEN
7205: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Subtitles ';
7206: ELSE
7207: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Subtitles ';
7208: END IF;
7209: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7210: RAISE;
7211: END Delete_Ind_Subtitles;
7285: WHEN NO_DATA_FOUND THEN
7286: ROLLBACK TO DeleteIndSeriesColors;
7287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7288: IF (x_msg_data IS NOT NULL) THEN
7289: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7290: ELSE
7291: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7292: END IF;
7293: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7288: IF (x_msg_data IS NOT NULL) THEN
7289: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7290: ELSE
7291: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7292: END IF;
7293: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7294: RAISE;
7295: WHEN OTHERS THEN
7295: WHEN OTHERS THEN
7296: ROLLBACK TO DeleteIndSeriesColors;
7297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7298: IF (x_msg_data IS NOT NULL) THEN
7299: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7300: ELSE
7301: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7302: END IF;
7303: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7298: IF (x_msg_data IS NOT NULL) THEN
7299: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7300: ELSE
7301: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_SeriesColors ';
7302: END IF;
7303: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7304: RAISE;
7305: END Delete_Ind_SeriesColors;
7390: WHEN NO_DATA_FOUND THEN
7391: ROLLBACK TO DeleteIndImages;
7392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7393: IF (x_msg_data IS NOT NULL) THEN
7394: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Images ';
7395: ELSE
7396: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Images ';
7397: END IF;
7398: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7393: IF (x_msg_data IS NOT NULL) THEN
7394: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Images ';
7395: ELSE
7396: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Images ';
7397: END IF;
7398: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7399: RAISE;
7400: WHEN OTHERS THEN
7400: WHEN OTHERS THEN
7401: ROLLBACK TO DeleteIndImages;
7402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7403: IF (x_msg_data IS NOT NULL) THEN
7404: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Images ';
7405: ELSE
7406: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Images ';
7407: END IF;
7408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7403: IF (x_msg_data IS NOT NULL) THEN
7404: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Images ';
7405: ELSE
7406: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Images ';
7407: END IF;
7408: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7409: RAISE;
7410: END Delete_Ind_Images;
7512: WHEN NO_DATA_FOUND THEN
7513: ROLLBACK TO DeleteIndSysProp;
7514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7515: IF (x_msg_data IS NOT NULL) THEN
7516: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7517: ELSE
7518: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7519: END IF;
7520: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7515: IF (x_msg_data IS NOT NULL) THEN
7516: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7517: ELSE
7518: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7519: END IF;
7520: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7521: RAISE;
7522: WHEN OTHERS THEN
7522: WHEN OTHERS THEN
7523: ROLLBACK TO DeleteIndSysProp;
7524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7525: IF (x_msg_data IS NOT NULL) THEN
7526: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7527: ELSE
7528: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7529: END IF;
7530: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7525: IF (x_msg_data IS NOT NULL) THEN
7526: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7527: ELSE
7528: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Sys_Prop ';
7529: END IF;
7530: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7531: RAISE;
7532: END Delete_Ind_Sys_Prop;
7606: WHEN NO_DATA_FOUND THEN
7607: ROLLBACK TO DeleteIndComments;
7608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7609: IF (x_msg_data IS NOT NULL) THEN
7610: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Comments ';
7611: ELSE
7612: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Comments ';
7613: END IF;
7614: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7609: IF (x_msg_data IS NOT NULL) THEN
7610: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Comments ';
7611: ELSE
7612: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Comments ';
7613: END IF;
7614: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7615: RAISE;
7616: WHEN OTHERS THEN
7616: WHEN OTHERS THEN
7617: ROLLBACK TO DeleteIndComments;
7618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7619: IF (x_msg_data IS NOT NULL) THEN
7620: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Comments ';
7621: ELSE
7622: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Comments ';
7623: END IF;
7624: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7619: IF (x_msg_data IS NOT NULL) THEN
7620: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Comments ';
7621: ELSE
7622: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Comments ';
7623: END IF;
7624: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7625: RAISE;
7626: END Delete_Ind_Comments;
7703: WHEN NO_DATA_FOUND THEN
7704: ROLLBACK TO DeleteIndTreeNodes;
7705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7706: IF (x_msg_data IS NOT NULL) THEN
7707: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7708: ELSE
7709: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7710: END IF;
7711: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7706: IF (x_msg_data IS NOT NULL) THEN
7707: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7708: ELSE
7709: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7710: END IF;
7711: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7712: RAISE;
7713: WHEN OTHERS THEN
7713: WHEN OTHERS THEN
7714: ROLLBACK TO DeleteIndTreeNodes;
7715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7716: IF (x_msg_data IS NOT NULL) THEN
7717: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7718: ELSE
7719: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7720: END IF;
7721: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7716: IF (x_msg_data IS NOT NULL) THEN
7717: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7718: ELSE
7719: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_Tree_Nodes ';
7720: END IF;
7721: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7722: RAISE;
7723: END Delete_Ind_Tree_Nodes;
7797: WHEN NO_DATA_FOUND THEN
7798: ROLLBACK TO DeleteIndUserAccess;
7799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7800: IF (x_msg_data IS NOT NULL) THEN
7801: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7802: ELSE
7803: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7804: END IF;
7805: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7800: IF (x_msg_data IS NOT NULL) THEN
7801: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7802: ELSE
7803: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7804: END IF;
7805: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7806: RAISE;
7807: WHEN OTHERS THEN
7807: WHEN OTHERS THEN
7808: ROLLBACK TO DeleteIndUserAccess;
7809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7810: IF (x_msg_data IS NOT NULL) THEN
7811: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7812: ELSE
7813: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7814: END IF;
7815: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7810: IF (x_msg_data IS NOT NULL) THEN
7811: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7812: ELSE
7813: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7814: END IF;
7815: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7816: RAISE;
7817: END Delete_Ind_User_Access;
7885: WHERE indicator=p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
7886:
7887: DELETE
7888: FROM BSC_TAB_VIEW_LABELS_B
7889: WHERE tab_id =BSC_KPI_PVT.c_SIM_TAB_ID
7890: AND tab_view_id = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
7891:
7892:
7893: DELETE
7891:
7892:
7893: DELETE
7894: FROM BSC_TAB_VIEW_LABELS_TL
7895: WHERE tab_id =BSC_KPI_PVT.c_SIM_TAB_ID
7896: AND tab_view_id = p_Bsc_Kpi_Entity_Rec.Bsc_Kpi_Id;
7897:
7898:
7899: DELETE
7983: WHEN NO_DATA_FOUND THEN
7984: ROLLBACK TO DeleteSimTreeData;
7985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7986: IF (x_msg_data IS NOT NULL) THEN
7987: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7988: ELSE
7989: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7990: END IF;
7991: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7986: IF (x_msg_data IS NOT NULL) THEN
7987: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7988: ELSE
7989: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
7990: END IF;
7991: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
7992: RAISE;
7993: WHEN OTHERS THEN
7993: WHEN OTHERS THEN
7994: ROLLBACK TO DeleteSimTreeData;
7995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7996: IF (x_msg_data IS NOT NULL) THEN
7997: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7998: ELSE
7999: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
8000: END IF;
8001: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
7995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7996: IF (x_msg_data IS NOT NULL) THEN
7997: x_msg_data := x_msg_data||' -> BSC_KPI_PVT.Delete_Ind_User_Access ';
7998: ELSE
7999: x_msg_data := SQLERRM||' at BSC_KPI_PVT.Delete_Ind_User_Access ';
8000: END IF;
8001: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
8002: RAISE;
8003: END Delete_Sim_Tree_Data;
8001: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
8002: RAISE;
8003: END Delete_Sim_Tree_Data;
8004:
8005: END BSC_KPI_PVT;