从SQL SERVER 向ORACLE 8迁移的技术实现方案(3)

在程序中，三次定义同一游标cur_yp 　　在迁移过程中，最好先定义一游标变量，在程序中用open打开，如下： declare type cur_type is ref cur_type; cur_yp cur_type; … begin open cur_yp for select * from yp; loop fetch cur_yp into yp,mc … Exit When cur_yp%NotFound; …. end loop; close cur_yp; open cur_yp for select * from yp where condition1; loop fetch cur_yp into yp,mc … Exit When cur_yp%NotFound; …. end loop; close cur_yp; open cur_yp for select * from yp where condition2; loop fetch cur_yp into yp,mc … Exit When cur_yp%NotFound; …. end loop; close cur_yp; end; 　　(7)请注意，游标循环中中一定要退出语名，要不然执行时会出现死循环。 　　返回首页 　　<五> 存储过程/函数 　　<1>、SQL SERVER端语法说明 　　1、语法： CREATE PROC[EDURE] [owner.]procedure_name [;number] [ (parameter1[, parameter2]…[, parameter255])] [ {FOR REPLICATION} | {WITH RECOMPILE} [ {[WITH] | [ , ] } ENCRYPTION ] ] AS sql_statement [...n] 　　其中，Parameter = @parameter_name datatype [=default] [output] 　　说明：T-SQL中存储过程的结构大致如下 CREATE PROCEDURE procedure_name /*输入、输出参数的声明部分*/ AS DECLARE /*局部变量的声明部分*/ BEGIN /*主体SQL语句部分*/ /*游标声明、使用语句在此部分*/ END 2、示例： IF EXISTS(SELECT 1 FROM sysobjects WHERE name = 'titles_sum' AND type = 'P') DROP PROCEDURE titles_sum GO CREATE PROCEDURE titles_sum @TITLE varchar(40) = '%', @SUM money OUTPUT AS BEGIN SELECT 'Title Name' = title FROM titles WHERE title LIKE @TITLE SELECT @SUM = SUM(price) FROM titles WHERE title LIKE @TITLE END 　　<2>、ORACLE端PROCEDURE语法说明 　　1、语法： CREATE [OR REPLACE] PROCEDURE procedure_name [ (parameter1 [ {IN | OUT | IN OUT } ] type , … parametern [ {IN | OUT | IN OUT } ] type ) ] { IS | AS } [BEGIN] sql_statement [...n] ; [END] ; 　　说明：PL/SQL中存储过程的结构大致如下 CREATE OR REPLACE PROCEDURE procedure_name （ /*输入、输出参数的声明部分*/ ) AS /*局部变量、游标等的声明部分*/ BEGIN /*主体SQL语句部分*/ /*游标使用语句在此部分*/ EXCEPTION /*异常处理部分*/ END ； 　　2、示例： CREATE OR REPLACE PROCEDURE drop_class ( arg_student_id IN varchar2, arg_class_id IN varchar2, status OUT number ) AS counter number ; BEGIN status := 0 ; -- Verify that this class really is part of the student’s schedule. select count (*) into counter from student_schedule where student_id = arg_student_id and class_id = arg_class_id ; IF counter = 1 THEN delete from student_schedule where student_id = arg_student_id and class_id = arg_class_id ; status := -1 ; END IF ; END ; <3>ORACLE端FUNCTION语法说明 　　(1) 语法 CREATE [OR REPLACE] FUNCTION function_name [(argument [{IN | OUT | IN OUT }] ) type, … [(argument [{IN | OUT | IN OUT }] ) type RETURN return_type {IS | AS} BEGIN … END; 　　关键字return 指定了函数返回值的数据类型。它可以是任何合法的PL/SQL数据类型。每个函数都必须有一个return 子句，因为在定义上函数必须返回一个值给调用环境。 　　（2）示例 CREATE OR REPLACE FUNCTION blanace_check(Person_Name IN varchar2) RETURN NUMBER IS Balance NUMBER(10,2); BEGIN Select sum(decode(acton,’BOUGHT’,Amount,0)) INTO balance FROM ledger WHERE Person = Person_name; RETURN (balance); END; 　　(3)过程与函数的区别 　　函数可以返回一个值给调用环境；而过程不能，过程只能通过返回参数（带“OUT”或“IN OUT”）传回去数据。 　　<4>从SQL SERVER向ORACLE的迁移方案 　　通过比较上述SQL语法的差异，在迁移时必须注意以下几点： 　　1、对于有返回单值的MSSQL存储过程，在数据库移值最好转换成ORALCE的函数；对于MSSQL有大量数据的处理而又不需返回值的存储过程转换成ORACLE的过程 　　2、在T-SQL中，输入、输出参数定义部分在“CREATE…”和“AS”之间，前后 　　没有括号；而在PL/SQL中必须有“（”和“）”与其他语句隔开。 　　3、在T-SQL中，声明局部变量时，前面要有DECLARE关键字； 而在PL/SQL中不用DECLARE关键字。 　　4、在T-SQL中，参数名的第一个字符必须是“@”，并符合标识符的规定； 　　而在PL/SQL中，参数名除符合标识符的规定外没有特殊说明,T-SQL中,对于参数可其数据类型及其长度和精度;但是PL/SQL中除了引用%TYPE和%ROWTYPE之外,不能在定义参数数据类型时给出长度和精度,如下: CREATE OR REPLACE PROCEDURE PROC_SELE_YS (YSDM CHAR(6),GZ NUMBER(14,4)) AS BEGIN … END; 　　是错误的,应如下定义 CREATE OR REPLACE PROCEDURE PROC_SELE_YS (YSDM CHAR,GZ NUMBER) AS BEGIN … END; 　　或者 CREATE OR REPLACE PROCEDURE PROC_SELE_YS (YSDM YSDMB.YSDM%TYPE,GZ YSDMB.GZ%TYPE) AS BEGIN … END; 　　5、对于T-SQL，游标声明在主体SQL语句中，即声明与使用语句同步； 　　而在PL/SQL中，游标声明在主体SQL语句之前，与局部变量声明同步。 　　6、对于T-SQL，在主体SQL语句中用如下语句对局部变量赋值（初始值或 　　数据库表的字段值或表达式）： 　　“SELECT 局部变量名 = 所赋值（初始值或数据库表的字段值或表达式）”； 　　而在PL/SQL中，将初始值赋给局部变量时，用如下语句： 　　“局部变量名 : = 所赋值（初始值或表达式）;” ， 　　将检索出的字段值赋给局部变量时，用如下语句： 　　“SELECT 数据库表的字段值 INTO 局部变量名 …” 。 　　7、在PL/SQL中，可以使用%TYPE来定义局部变量的数据类型。说明如下： 　　例如，students表的first_name列拥有类型VARCHAR2(20)，基于这点， 我们可以按照下述方式声明一个变量： 　　V_FirstName VARCHAR2(20) ; 　　但是如果改变了first_name列的数据类型则必须修改该声明语句，因此可以采 　　用%TYPE进行变量数据类型声明： 　　V_FirstName students.first_name%TYPE ; 　　这样，该变量在存储过程编译时将由系统自动确定其相应数据类型。 　　8、对于T-SQL，没有定义语句结束标志，而PL/SQL用“END <过程名>；”结束语句。 　　9、存储过程的调用要注意：在MSSQLSERVER中的格式为“EXEC Procedure_Name {arg1,arg2,…}，但在ORACLE中直接引用过程名即可，如要执行存储过程DefaltNo，其参数为“9”，则执行时为 Default(“9”)。 　　10、ORACLE 数据库的存储过程不支持用select 子句直接返回一个数据集，要做到通过程产生一记录集有两种方案： 　　方案一：采用包和游标变量 　　第一步,创建一个包，定义一个游标变量 create package p_name is type cursor_name is ref cursor; end; 　　第二步，创建过程，但是基返回参数用包中的游标类型 create procedure procedure_name(s in out p_name.cursor_name) is begin open s for select * from table_name...; end; 　　这样，通过存储过程就可以返回一个数据集了，但用到这种情况，过程的参数中只这返回结果的游标参数可以带关键字”OUT”,其它不能带”out”，否则，系统会出现导常。 　　方案二：通过中间表，建一中间表，其表格的列为所需数据列再加上一个序列字段。过程的处理为将数据插入到中间表中，同时通过 　　select userenv(‘sessionid’) from dual;取得当前连接会话的序号，将取得的序号值放置到序列字段中，同时存储过程返回连接会话的序号，前台PB程序直接访问中间表，数据窗口在检索时通过序号参数可将所需的数据检索出来。 <六> 触发器 　　<1>、SQL SERVER端语法说明 　　1、语法： CREATE TRIGGER [owner.]trigger_name ON [owner.]table_name FOR { INSERT, UPDATE, DELETE } [WITH ENCRYPTION] AS sql_statement [...n] 　　或者使用IF UPDATE子句： CREATE TRIGGER [owner.]trigger_name ON [owner.]table_name FOR { INSERT, UPDATE } [WITH ENCRYPTION] AS IF UPDATE (column_name) [{AND | OR} UPDATE (column_name)…] sql_statement [ ...n] 　　2、示例： IF EXISTS (SELECT 1 FROM sysobjects WHERE name = 'reminder' AND type = 'TR') DROP TRIGGER reminder GO CREATE TRIGGER employee_insupd ON employee FOR INSERT, UPDATE AS /* Get the range of level for this job type from the jobs table. */ DECLARE @min_lvl tinyint, @max_lvl tinyint, @emp_lvl tinyint, @job_id smallint SELECT @min_lvl = min_lvl, @max_lvl = max_lvl, @emp_lvl = i.job_lvl, @job_id = i.job_id FROM employee e, jobs j, inserted i WHERE e.emp_id = i.emp_id AND i.job = j.job_id IF (@job_id = 1) and (@emp_lvl <> 10) BEGIN RAISERROR ('Job id 1 expects the default level of 10.', 16, 1) ROLLBACK TRANSACTION END ELSE IF NOT (@emp_lvl BETWEEN @min_lvl AND @max_lvl) BEGIN RAISERROR ('The level for job_id:%d should be between %d and %d.', 16, 1, @job_id, @min_lvl, @max_lvl) ROLLBACK TRANSACTION END GO <2>、ORACLE端语法说明 　　1、语法： CREATE [OR REPLACE] TRIGGER trigger_name { BEFORE | AFTER } triggering_event ON table_name [ FOR EACH ROW ] [ WHEN trigger_condition ] trigger_body ; 　　2、使用说明与示例： 　　（1）、上语法中，trigger_event 是对应于DML的三条语句INSERT、UPDATE、 　　DELETE；table_name是与触发器相关的表名称；FOR EACH ROW是可选 　　子句，当使用时，对每条相应行将引起触发器触发；condition是可选的 　　ORACLE BOOLEAN条件，当条件为真时触发器触发；trigger_body是触发 　　器触发时执行的PL/SQL块。 　　（2）、ORACLE触发器有以下两类： 　　1> 语句级（Statement-level）触发器，在CREATE TRIGGER语句中不 　　包含FOR EACH ROW子句。语句级触发器对于触发事件只能触发一次， 　　而且不能访问受触发器影响的每一行的列值。一般用语句级触发器处理 　　有关引起触发器触发的SQL语句的信息——例如，由谁来执行和什么时 　　间执行。 　　2> 行级（Row-level）触发器，在CREATE TRIGGER语句中 　　包含FOR EACH ROW子句。行级触发器可对受触发器影响的每一行触 　　发，并且能够访问原列值和通过SQL语句处理的新列值。行级触发器的 　　典型应用是当需要知道行的列值时，执行一条事务规则。 　　（3）在触发器体内，行级触发器可以引用触发器触发时已存在的行的列值，这些 　　值倚赖于引起触发器触发的SQL语句。 　　1> 对于INSERT语句，要被插入的数值包含在new.column_name，这里的 　　column_name是表中的一列。 　　2> 对于UPDATE语句，列的原值包含在old.column_name中，数据列的新 　　值在new.column_name中。 　　3> 对于DELETE语句，将要删除的行的列值放在old.column_name中。 　　触发语句 　　：old 　　：new 　　INSERT 　　无定义——所有字段都是NULL 　　当该语句完成时将要插入的数值 　　UPDATE 　　在更新以前的该行的原始取值 　　当该语句完成时将要更新的新值 　　DELETE 　　在删除行以前的该行的原始取值 　　未定义——所有字段都是NULL 　　4> 在触发器主体中，在new和old前面的“：”是必需的。而在触发器的 　　WHEN子句中，:new和:old记录也可以在WHEN子句的condition内部 　　引用，但是不需要使用冒号。例如，下面CheckCredits触发器的主体仅 　　当学生的当前成绩超过20时才会被执行： CREATE OR REPLACE TRIGGER CheckCredits BEFORE INSERT OR UPDATE OF current_credits ON students FOR EACH ROW WHEN (new.current_credits > 20) BEGIN /*Trigger body goes here. */ END ; 　　但CheckCredits也可以按下面方式改写： CREATE OR REPLACE TRIGGER CheckCredits BEFORE INSERT OR UPDATE OF current_credits ON students FOR EACH ROW BEGIN IF :new.current_credits > 20 THEN /*Trigger body goes here. */ END IF ; END ; 　　注意，WHEN子句仅能用于行级触发器，如果使用了它，那么触发器主体 　　仅仅对那些满足WHEN子句指定的条件的行进行处理。