[Home] [Help]
778: END IF;
779:
780: -- Save Prototype Values if NOT NULL (AG)
781: IF (p_Prototype_Values.COUNT > 0) THEN
782: BIS_UTIL.save_prototype_values
783: ( p_dim_object => p_dim_obj_short_name
784: , p_PV_array => p_Prototype_Values
785: );
786: END IF;
876: , x_msg_data OUT NOCOPY VARCHAR2
877: ) IS
878: l_bsc_dim_obj_rec BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type;
879: l_bis_dim_level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
880: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
881: l_level_table_name BIS_LEVELS.LEVEL_VALUES_VIEW_NAME%TYPE;
882: l_bis_short_name BIS_LEVELS.Short_Name%TYPE;
883: l_bis_name BIS_LEVELS_TL.Name%TYPE;
884: l_user_id FND_USER.user_id%TYPE;
2045: , x_return_status OUT NOCOPY VARCHAR2
2046: , x_msg_count OUT NOCOPY NUMBER
2047: , x_msg_data OUT NOCOPY VARCHAR2
2048: ) IS
2049: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2050: l_bis_dim_level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2051: l_bsc_dim_obj_rec BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type;
2052: l_bsc_drop_tables BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type;
2053: l_MTab_Tbl BSC_BIS_DIM_OBJ_PUB.KPI_Dim_Set_Table_Type;
2486: ELSE
2487: l_bis_dim_level_rec.Enabled := p_Dim_Obj_Enabled;
2488: END IF;
2489:
2490: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_hide) = FND_API.G_TRUE ) THEN
2491: l_bis_dim_level_rec.hide := p_hide;
2492: END IF;
2493:
2494: IF (l_bsc_dim_obj_rec.Bsc_Source = 'PMF') THEN
3207: ) IS
3208: l_bsc_dimension_rec BSC_DIMENSION_GROUPS_PUB.Bsc_Dim_Group_Rec_Type;
3209: l_bsc_dim_obj_rec BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type;
3210: l_bis_dim_level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
3211: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3212: l_count NUMBER;
3213: l_dim_short_name VARCHAR2(30);
3214: l_regions VARCHAR2(2000);
3215: l_is_denorm_deleted VARCHAR(1);
3356: environment.Since this file is the part of MD/DD ARU we have made the call to
3357: the PL/SQL procedure "BSC_PMA_APIS_PUB.sync_dimension_table" dynamic so that
3358: the package gets complied on the pure BIS409 enviornments.
3359: /****************************************************/
3360: IF(BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_TRUE) THEN
3361: l_is_denorm_deleted := FND_API.G_TRUE;
3362: BEGIN
3363: l_Sql := 'BEGIN IF(BSC_PMA_APIS_PUB.sync_dimension_table (:2,:3,:4)) THEN :1 :=FND_API.G_TRUE; ELSE :1:=FND_API.G_FALSE; END IF;END;';
3364: EXECUTE IMMEDIATE l_Sql USING IN p_dim_obj_short_name,IN BIS_UTIL.G_DROP_TABLE,OUT x_msg_data,OUT l_is_denorm_deleted;
3360: IF(BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_TRUE) THEN
3361: l_is_denorm_deleted := FND_API.G_TRUE;
3362: BEGIN
3363: l_Sql := 'BEGIN IF(BSC_PMA_APIS_PUB.sync_dimension_table (:2,:3,:4)) THEN :1 :=FND_API.G_TRUE; ELSE :1:=FND_API.G_FALSE; END IF;END;';
3364: EXECUTE IMMEDIATE l_Sql USING IN p_dim_obj_short_name,IN BIS_UTIL.G_DROP_TABLE,OUT x_msg_data,OUT l_is_denorm_deleted;
3365: EXCEPTION
3366: WHEN OTHERS THEN
3367: NULL;
3368: END;
6760: l_true := FALSE;
6761:
6762: -- added to relax checking for mixed type of Dimension Objects within a Dimension
6763: -- for Autogenerated reports and removing the disctiction, BSC 5.3
6764: IF (p_Restrict_Dim_Validate IS NOT NULL OR BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_FALSE) THEN
6765: FOR CTYPE IN C_SOURCE_DIM LOOP
6766: l_dim_name := CTYPE.DIM_NAME;
6767: l_dim_grp_id := CTYPE.DIM_ID;
6768: l_dim_short_name := CTYPE.SHORT_NAME;
7244: WHERE
7245: reg_item.attribute2 = l_Dim_DimObj_Sht_Name
7246: AND reg.region_code = reg_item.region_code
7247: AND bis_dim.short_name = reg.attribute12
7248: AND bis_util.is_seeded(bis_dim.created_by,'T','F') = 'F'
7249: AND NVL(hide_in_design,'F') = 'T';
7250: BEGIN
7251: FND_MSG_PUB.Initialize;
7252: x_Return_Status := FND_API.G_RET_STS_SUCCESS;