[Home] [Help]
55:
56: PROCEDURE Initialize IS
57: BEGIN
58: numRecords:=0;
59: Sequences(1).name:='CZ_PS_NODES_S';
60: Sequences(2).name:='CZ_FILTER_SETS_S';
61: Sequences(3).name:='CZ_SUB_CON_SETS_S';
62: Sequences(4).name:='CZ_EXPRESSIONS_S';
63: Sequences(5).name:='CZ_RULES_S';
220: var_intl_text_id CZ_INTL_TEXTS.intl_text_id%TYPE;
221:
222: BEGIN
223:
224: SELECT CZ_PS_NODES_S.NEXTVAL INTO NEW_PROJECT_ID FROM dual;
225: SELECT * INTO i FROM CZ_DEVL_PROJECTS
226: WHERE DEVL_PROJECT_ID=OLD_PROJECT_ID AND deleted_flag=NO_FLAG;
227:
228: GLOBAL_ORIG_SYS_REF:=i.ORIG_SYS_REF;
652: new_id INTEGER;
653:
654: BEGIN
655:
656: FOR i IN (SELECT ps_node_id FROM CZ_PS_NODES
657: WHERE devl_project_id=OLD_PROJECT_ID AND deleted_flag=NO_FLAG)
658: LOOP
659: get_Next_Val(new_id,'CZ_PS_NODES_S');
660: FlowId_PS_NODE(i.ps_node_id):=new_id;
655:
656: FOR i IN (SELECT ps_node_id FROM CZ_PS_NODES
657: WHERE devl_project_id=OLD_PROJECT_ID AND deleted_flag=NO_FLAG)
658: LOOP
659: get_Next_Val(new_id,'CZ_PS_NODES_S');
660: FlowId_PS_NODE(i.ps_node_id):=new_id;
661: END LOOP;
662:
663: FlowId_PS_NODE(OLD_PROJECT_ID):=NEW_PROJECT_ID;
661: END LOOP;
662:
663: FlowId_PS_NODE(OLD_PROJECT_ID):=NEW_PROJECT_ID;
664:
665: FOR i IN (SELECT * FROM CZ_PS_NODES WHERE devl_project_id=OLD_PROJECT_ID AND deleted_flag=NO_FLAG)
666: LOOP
667: BEGIN
668: IF i.parent_id IS NOT NULL THEN
669: new_parent:=FlowId_PS_NODE(i.parent_id);
682:
683: get_Next_Val(new_sub_cons_id,'CZ_SUB_CON_SETS_S');
684: Copy_SUB_CON_SET(i.sub_cons_id,new_sub_cons_id);
685:
686: INSERT INTO CZ_PS_NODES
687: (PS_NODE_ID,
688: DEVL_PROJECT_ID,
689: FROM_POPULATOR_ID,
690: PROPERTY_BACKPTR,
924:
925: get_Next_Val(new_id,'CZ_POPULATORS_S');
926:
927: FOR i IN (SELECT * FROM CZ_POPULATORS a WHERE deleted_flag=NO_FLAG
928: AND EXISTS(SELECT NULL FROM CZ_PS_NODES WHERE devl_project_id=OLD_PROJECT_ID
929: AND ps_node_id=a.owned_by_node_id AND deleted_flag=NO_FLAG))
930: LOOP
931: BEGIN
932: SELECT CZ_POPULATORS_S.NEXTVAL INTO new_id FROM dual;
992: LOOP
993: IF k IS NULL THEN
994: EXIT;
995: END IF;
996: UPDATE CZ_PS_NODES SET from_populator_id=FlowId_POPULATOR(k)
997: WHERE from_populator_id=k AND devl_project_id=NEW_PROJECT_ID;
998: k:=FlowId_POPULATOR.NEXT(k);
999: END LOOP;
1000: END IF;
2270: ELSE
2271: NEW_PROJECT_ID:=p_new_project_id;
2272: END IF;
2273:
2274: FOR i IN (SELECT * FROM CZ_PS_NODES
2275: WHERE devl_project_id=p_project_id AND deleted_flag=NO_FLAG
2276: START WITH parent_id=p_parent_id
2277: CONNECT BY PRIOR ps_node_id=parent_id)
2278: LOOP
2275: WHERE devl_project_id=p_project_id AND deleted_flag=NO_FLAG
2276: START WITH parent_id=p_parent_id
2277: CONNECT BY PRIOR ps_node_id=parent_id)
2278: LOOP
2279: get_Next_Val(new_id,'CZ_PS_NODES_S');
2280: FlowId_PS_NODE(i.ps_node_id):=new_id;
2281:
2282: IF i.parent_id=p_parent_id THEN
2283: p_out_new_root:=new_id;
2285: END LOOP;
2286:
2287: ind:=FlowId_PS_NODE.First;
2288: LOOP
2289: FOR i IN (SELECT * FROM CZ_PS_NODES
2290: WHERE ps_node_id=ind AND deleted_flag=NO_FLAG)
2291: LOOP
2292: IF i.parent_id IS NOT NULL THEN
2293: new_parent:=FlowId_PS_NODE(i.parent_id);
2308: ELSE
2309: new_intl_text_id:=NULL;
2310: END IF;
2311:
2312: INSERT INTO CZ_PS_NODES
2313: (PS_NODE_ID,
2314: DEVL_PROJECT_ID,
2315: FROM_POPULATOR_ID,
2316: PROPERTY_BACKPTR,
3006:
3007: FOR i IN(SELECT * FROM CZ_DES_CHART_COLUMNS WHERE rule_id IN
3008: (SELECT rule_id FROM CZ_RULES WHERE devl_project_id=OLD_PROJECT_ID
3009: AND deleted_flag=NO_FLAG) AND option_id IN
3010: (SELECT ps_node_id FROM CZ_PS_NODES WHERE devl_project_id=OLD_PROJECT_ID
3011: AND deleted_flag=NO_FLAG))
3012: LOOP
3013: BEGIN
3014: