Oracle与MSSQL过程之间的转化(1)

BEGIN
 DECLARE
    tempPoTableName varchar2(50);        --性能对象表名
    tempPoSpName varchar2(50);            --性能过程名
     errorInfo varchar2(200);             --错误信息
     tempSQL    varchar2(1000);
     cnt1   number(1);
     cnt2   number(2);
     
    --定义表名、同步表名和存储过程游标
    Cursor allValues_Cursor is
         select UPPER(TRIM(POTABLENAME)),UPPER(TRIM(POSPNAME)) from 

            PM_NEPODEF_TABLE WHERE POID>110499 and POID<110580;
    BEGIN
    OPEN allValues_Cursor;

    --判断是否由符合游标条件的行，如果没有则关闭和释放游标，异常返回
    
    DBMS_OUTPUT.PUT_LINE('开始更改原有表名……');
    FETCH  allValues_Cursor INTO tempPoTableName,tempPoSpName;
    --根据给定的表名、存储过程名 创建相应的数据存储存储过程
    WHILE allValues_Cursor%found LOOP
    
    cnt1:=0;
    cnt2:=0;
    BEGIN
        SELECT 1 INTO cnt1 FROM dual WHERE exists(SELECT table_name 

           FROM user_tables WHERE table_name = tempPoTableName);
        SELECT 1 INTO cnt2 FROM dual WHERE exists(SELECT OBJECT_NAME 

           FROM user_procedures WHERE OBJECT_NAME = tempPoSpName);
    exception
    WHEN no_data_found  THEN
        null;
    END;
    
    IF cnt1 = 1 THEN
        DBMS_OUTPUT.PUT_LINE(tempPoTableName);
        tempSQL := 'ALTER TABLE '||tempPoTableName||' DROP constraint 

           PK_'||tempPoTableName;
        EXECUTE IMMEDIATE tempSQL;
        tempSQL := 'ALTER TABLE '||tempPoTableName||' RENAME 

           TO '||tempPoTableName||'_TMP';
        EXECUTE IMMEDIATE tempSQL;
    ELSE
        DBMS_OUTPUT.PUT_LINE('没有找到表'||tempPoTableName);
    END IF;
    
    IF cnt2 = 1 THEN
        tempSQL := 'DROP PROCEDURE '||tempPoSpName;
        EXECUTE IMMEDIATE tempSQL;
    ELSE
        DBMS_OUTPUT.PUT_LINE('没有找到过程'||tempPoSpName);
    END IF;
    
        FETCH allValues_Cursor INTO tempPoTableName,tempPoSpName;
    END LOOP;
    CLOSE allValues_Cursor;
    DBMS_OUTPUT.PUT_LINE('结束更改原有表名……');
    DBMS_OUTPUT.PUT_LINE('------------------------');
    END;
END;
/