[Home] [Help]
482:
483: l_Dimension_Rec.Last_Update_Date := NVL(p_Dimension_Rec.Last_Update_Date, SYSDATE);
484:
485: SELECT COUNT(short_name) INTO l_count
486: FROM BIS_DIMENSIONS
487: WHERE short_name = p_Dimension_Rec.Dimension_short_Name;
488:
489: IF (l_count > 0) THEN
490:
490:
491: BIS_UTIL.Validate_For_Update (p_last_update_date => l_Dimension_Rec.Last_Update_Date
492: ,p_owner => p_owner
493: ,p_force_mode => p_force_mode
494: ,p_table_name => 'BIS_DIMENSIONS'
495: ,p_key_value => p_Dimension_Rec.Dimension_short_Name
496: ,x_ret_code => l_ret_code
497: ,x_return_status => x_return_status
498: ,x_msg_data => l_return_msg
703: ,x_msg_data => x_msg_data
704: );
705:
706: IF (l_dim_grp_id IS NOT NULL) THEN
707: UPDATE bis_dimensions
708: SET dim_grp_id = l_dim_grp_id
709: WHERE short_name = l_Bsc_Dim_Group_Rec.Bsc_Dim_Level_Group_Short_Name;
710: END IF;
711:
788: WHERE
789: a.obj_short_name = b.obj_short_name AND
790: a.dim_short_name <> b.dim_short_name AND
791: a.dim_short_name <> 'UNASSIGNED' AND
792: (SELECT NVL(hide_in_design,'F') FROM bis_dimensions WHERE short_name = a.dim_short_name) = 'F' AND
793: (SELECT bis_util.is_Seeded(created_by,'T','F') FROM bis_dimensions WHERE short_name = a.dim_short_name) = 'T') = 0;
794:
795: BEGIN
796: SAVEPOINT DimObsoleteUpdate;
789: a.obj_short_name = b.obj_short_name AND
790: a.dim_short_name <> b.dim_short_name AND
791: a.dim_short_name <> 'UNASSIGNED' AND
792: (SELECT NVL(hide_in_design,'F') FROM bis_dimensions WHERE short_name = a.dim_short_name) = 'F' AND
793: (SELECT bis_util.is_Seeded(created_by,'T','F') FROM bis_dimensions WHERE short_name = a.dim_short_name) = 'T') = 0;
794:
795: BEGIN
796: SAVEPOINT DimObsoleteUpdate;
797: IF (p_dim_short_name IS NULL OR p_dim_short_name = '') THEN