Oracle dblink job 存储过程Word文档下载推荐.docx

1、创建测试表SQL create table TEST（a date）;表已创建。创建一个自定义过程 create or replace procedure MYPROC as2begin3insert into TEST values（sysdate）;4end;5/过程已创建。创建JOB variable job1 number; begin2dbms_job.submit（:job1,MYPROC;,sysdate,sysdate+1/1440）;-每天1440分钟，即一分钟运行test过程一次3end;4/PL/SQL 过程已成功完成。运行JOB2dbms_job.run（:job1）;

2、 select to_char（a,yyyy/mm/dd hh24:mi:ss） 时间 from TEST;时间-2001/01/07 23:51:2152:2253:24删除JOB2dbms_job.remove（:存储过程1、创建存储过程 create or replace procedure test（var_name_1 in type,var_name_2 out type） as-声明变量（变量名 变量类型）begin-存储过程的执行体end test;打印出输入的时间信息E.g:create or replace procedure test（workDate in Date）

3、isdbms_output.putline（'The input date is:&|to_date（workDate,&yyyy-mm-dd&）;2、变量赋值变量名 := 值;E.g：x number（4,2）;x := 1;3、判断语句:if 比较式 then begin end; end if;E.gcreate or replace procedure test（x in number） isif x 0 then= 0 - x;end;end if;if x = 0 then x: = 1;4、For 循环For . in . LOOP -执行语句 end LOOP;（1）

4、循环遍历游标create or replace procedure test（） asCursor cursor is select name from student; name varchar（20）;for name in cursor LOOP dbms_output.putline（name）;（2）循环遍历数组create or replace procedure test（varArray in myPackage.TestArray） as-（输入参数varArray 是自定义的数组类型，定义方式见标题6）i number;begin i : -存储过程数组是起始位置是从1开始

5、的，与java、C、C+等语言不同。因为在Oracle中本是没有数组的概念的，数组其实就是一张-表（Table）,每个数组元素就是表中的一个记录，所以遍历数组时就相当于从表中的第一条记录开始遍历for i in 1.varArray.count LOOPThe No.&| i | &record in varArray is:|varArray（i）;5、While 循环while 条件语句 LOOP create or replace procedure test（i in number） aswhile i 10 LOOP begini:= i + 1;6、数组首先明确一个概念：Oracl

6、e中本是没有数组的概念的，数组其实就是一张表（Table）,每个数组元素就是表中的一个记录。使用数组时，用户可以使用Oracle已经定义好的数组类型，或可根据自己的需要定义数组类型。（1）使用Oracle自带的数组类型x array; -使用时需要需要进行初始化e.g:create or replace procedure test（y out array） is= new array（）;y := x;（2）自定义的数组类型 （自定义数据类型时，建议通过创建Package的方式实现，以便于管理）E.g （自定义使用参见标题4.2） create or replace package myPa

7、ckage is - Public type declarations type info is record（ name varchar（20）, y number）; type TestArray is table of info index by binary_integer; -此处声明了一个TestArray的类型数据，其实其为一张存储Info数据类型的Table而已，及TestArray 就是一张表，有两个字段，一个是name，一个是y。需要注意的是此处使用了Index by binary_integer 编制该Table的索引项，也可以不写，直接写成：type TestArray

8、 is table of info，如果不写的话使用数组时就需要进行初始化：varArray myPackage.TestArray; varArray := new myPackage.TestArray（）;end TestArray;7.游标的使用 Oracle中Cursor是非常有用的，用于遍历临时表中的查询结果。其相关方法和属性也很多，现仅就常用的用法做一二介绍：（1）Cursor型游标（不能用于参数传递）create or replace procedure test（） iscusor_1 Cursor is select std_name from student where

9、.; -Cursor的使用方式1 cursor_2 Cursor;select class_name into cursor_2 from class where .; -Cursor的使用方式2可使用For x in cursor LOOP . end LOOP; 来实现对Cursor的遍历（2）SYS_REFCURSOR型游标，该游标是Oracle以预先定义的游标，可作出参数进行传递create or replace procedure test（rsCursor out SYS_REFCURSOR） iscursor SYS_REFCURSOR; name varhcar（20）;OPE

10、N cursor FOR select name from student where . -SYS_REFCURSOR只能通过OPEN方法来打开和赋值LOOPfetch cursor into name-SYS_REFCURSOR只能通过fetch into来打开和遍历 exit when cursor%NOTFOUND; -SYS_REFCURSOR中可使用三个状态属性： -%NOTFOUND（未找到记录信息） %FOUND（找到记录信息） -%ROWCOUNT（然后当前游标所指向的行位置）rsCursor := cursor;下面写一个简单的例子来对以上所说的存储过程的用法做一个应用：现

11、假设存在两张表，一张是学生成绩表（studnet），字段为：stdId,math,article,language,music,sport,total,average,step 一张是学生课外成绩表（out_school）,字段为:stdId,parctice,comment通过存储过程自动计算出每位学生的总成绩和平均成绩，同时，如果学生在课外课程中获得的评价为A，就在总成绩上加20分。create or replace procedure autocomputer（step in number） isrsCursor SYS_REFCURSOR;commentArray myPackage.

12、myArray;math number;article number;language number;music number;sport number;total number;average number;stdId varchar（30）;record myPackage.stdInfo;get_comment（commentArray）; -调用名为get_comment（）的存储过程获取学生课外评分信息OPEN rsCursor for select stdId,math,article,language,music,sport from student t where t.step

13、 = step;LOOP fetch rsCursor into stdId,math,article,language,music,sport; exit when rsCursor%NOTFOUND;total := math + article + language + music + sport;for i in mentArray.count LOOPrecord := commentArray（i）;if stdId = record.stdId thenif ment = &A& then= total + 20;go to next; -使用go to跳出for循环 end;a

14、verage := total / 5;update student t set t.total=total and t.average = average where t.stdId = stdId;end autocomputer;-取得学生评论信息的存储过程create or replace procedure get_comment（commentArray out myPackage.myArray） isrs SYS_REFCURSOR；comment varchar（1）;open rs for select stdId,comment from out_schoolfetch

15、rs into stdId,comment; exit when rs%NOTFOUND;record.stdId := stdId;ment := comment;recommentArray（i） := record;=i + 1;end get_comment;-定义数组类型myArray create or replace package myPackage is begintype stdInfo is record（stdId varchar（30）,comment varchar（1）;type myArray is table of stdInfo index by binary_integer;end myPackage;