[Home] [Help]
17: REM | |
18: REM | HISTORY |
19: REM | 21-July-2000 amkulkar Creation |
20: REM | 19-apr-01 rmohanty added fix for 1743506
21: REM | 21-Jun-2001 meastmon fix migration for bis_user_ind_selections |
22: REM | 11-FEB-2003 rchandra added a check to see if the target level going |
23: REM | to be migrated already exists in which case it |
24: REM | will not be migrated , in NEEDS_MIGRATION api |
25: REM | for bug 2790164 |
525: SELECT ind_selection_id, target_level_id, org_level_value
526: ,dimension1_level_value, dimension2_level_value
527: ,dimension3_level_value, dimension4_level_value
528: ,dimension5_level_value
529: FROM bis_user_ind_selections
530: WHERE target_level_id = p_target_level_id;
531: l_target_level_rec BIS_PMF_MIGRATION_PVT.target_level_rec;
532: l_reseq_dims BIS_PMF_MIGRATION_PVT.resequenced_dimensions_Array;
533: l_target_rec BIS_PMF_MIGRATION_PVT.dim_Values_rec;
812: l_userind_org_name := 'dimension7_level_value';
813: l_userind_org_value := ''''||c_userind_rec.org_level_value||'''';
814: END IF;
815: --IF ((l_return_status = 0) AND (l_reseq_userind_values.COUNT > 0)) THEN
816: /*l_sqlstmt3 := 'UPDATE bis_user_ind_selections SET '||
817: l_reseq_userind_values(1).dim_level_name ||' = '||
818: NVL(l_reseq_userind_values(1).dim_level_value, 'NULL') ||
819: ' ,'|| l_reseq_userind_values(2).dim_level_name ||' = ' ||
820: NVL(l_reseq_userind_values(2).dim_level_value, 'NULL') ||
832: --meastmon 06/21/2001
833: --If it is null --> Update the record
834: --Else --> dont touch it (It could be a new user selection or the migration was done before)
835: IF (l_userind_current_org_value IS NULL AND l_userind_org_name IS NOT NULL) THEN
836: l_sqlstmt3 := 'UPDATE bis_user_ind_selections SET '||
837: l_userind_org_name ||'= :1 ' ||
838: ' WHERE ind_selection_id = :2 AND target_level_id = :3';
839: EXECUTE IMMEDIATE l_sqlstmt3 USING l_userind_org_value, c_userind_rec.ind_selection_id, c_rec.target_level_id;
840: END IF;