[Home] [Help]
652: -- 1. This change relies on ps_nodes to be done after devl_projects
653: -- 2. With this change ps_nodes will only be deleted if they belong to
654: -- deleted projects. Other logically deleted ps_nodes will be left around.
655: exec('cz_ps_nodes', 'where deleted_flag = ''1'' and not exists (select 1 from '||
656: 'cz_devl_projects where '||
657: 'devl_project_id = cz_ps_nodes.devl_project_id and deleted_flag = ''0'')',
658: 'ps_node_id', TRUE);
659:
660: WRITE_TO_DB_LOGS('CZ_PURGE_LOG','After physical delete of CZ_PS_NODES : 2','CZ_PS_NODES',0,2);
752: begin
753: get_TABLE_NAMES(Subschema_Name,Tables);
754: Proc_Name:='CZ_'||Subschema_Name||'_MGR.RESET_CLEAR';
755: delete from CZ_PS_NODES where ps_node_id>0;
756: delete from CZ_DEVL_PROJECTS where devl_project_id>0;
757: i:=1;
758: loop
759: if Tables(i).name not in ('CZ_PS_NODES','CZ_DEVL_PROJECTS') then
760: dsql('DELETE FROM '||Tables(i).name);
755: delete from CZ_PS_NODES where ps_node_id>0;
756: delete from CZ_DEVL_PROJECTS where devl_project_id>0;
757: i:=1;
758: loop
759: if Tables(i).name not in ('CZ_PS_NODES','CZ_DEVL_PROJECTS') then
760: dsql('DELETE FROM '||Tables(i).name);
761: end if;
762: i:=i+1;
763: if i>Tables.Last then
905:
906: begin
907:
908: if upper(SubSchema)='PS' then
909: Tables(1).name:='CZ_DEVL_PROJECTS'; Tables(1).pk_name:='DEVL_PROJECT_ID';
910: Tables(2).name:='CZ_DEVL_PRJ_USER_GROUPS'; Tables(2).pk_name:=NULL;
911: Tables(3).name:='CZ_FUNC_COMP_SPECS'; Tables(3).pk_name:='FUNC_COMP_ID';
912: Tables(4).name:='CZ_FUNC_COMP_REFS'; Tables(4).pk_name:=NULL;
913: Tables(5).name:='CZ_PS_PROP_VALS'; Tables(5).pk_name:=NULL;
1036: /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
1037: <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
1038: begin
1039: select TABLE_OWNER into CZ_SCHEMA from user_synonyms
1040: where SYNONYM_NAME='CZ_DEVL_PROJECTS';
1041: exception
1042: when NO_DATA_FOUND then
1043: CZ_SCHEMA:=USER;
1044: when OTHERS then