[Home] [Help]
43: -- 1. transform old fc recs to new cx rule data: cz_func_comp_specs => cz_rules
44: -- 2. update cz_rule_folders's id and type: func_comp_id, FNC => rule_id, CXT
45: -- 3. convert old ui fc data to new cx form
46: -- cz_ui_nodes: func_comp_id => cx_command_name
47: -- cz_ui_node_props: old value_str type (5,6) => new value_str type (31,32)
48: -- Note: event binding expression trees are created by Java program after
49: -- the above three tasks are finished. At the end of migration process, old fc
50: -- recs will be logically deleted by the same java program.
51: --
69: l_dummy NUMBER;
70: l_stat NUMBER := 0;
71:
72: l_command_name VARCHAR2(255);
73: l_value_str cz_ui_node_props.value_str%TYPE;
74:
75: no_source_model_exc EXCEPTION;
76: no_ui_fc_exc EXCEPTION;
77:
185: -- convert fc to cx
186: FOR i IN model_tbl.FIRST .. model_tbl.LAST LOOP
187: FOR ui_rec IN (SELECT def.ui_def_id, node.ui_node_id,
188: node.func_comp_id, prop.value_str
189: FROM cz_ui_defs def, cz_ui_nodes node, cz_ui_node_props prop
190: WHERE def.devl_project_id = model_tbl(i)
191: AND def.deleted_flag = '0'
192: AND def.ui_def_id = node.ui_def_id
193: AND node.deleted_flag = '0'
223: SET cx_command_name = l_command_name, func_comp_id = NULL
224: WHERE ui_node_id = ui_rec.ui_node_id;
225: l_stat := 5.2;
226:
227: UPDATE cz_ui_node_props
228: SET value_str = l_value_str
229: WHERE ui_def_id = ui_rec.ui_def_id
230: AND ui_node_id = ui_rec.ui_node_id
231: AND key_str = 'ActionType';
241: SET deleted_flag='1'
242: WHERE ui_def_id=deluinodes_uidefids_tbl(k) AND ui_node_id=deluinodes_ids_tbl(k);
243:
244: FORALL k IN deluinodes_ids_tbl.First..deluinodes_ids_tbl.Last
245: UPDATE CZ_UI_NODE_PROPS
246: SET deleted_flag='1'
247: WHERE ui_def_id=deluinodes_uidefids_tbl(k) AND ui_node_id=deluinodes_ids_tbl(k);
248: END IF;
249: