PLSQL入门教程

  • 格式:doc
  • 大小:169.00 KB
  • 文档页数:6

PL/SQL入门教程1.1 PL/SQL简介PL/SQL是ORACLE的过程化语言,包括一整套的数据类型、条件结构、循环结构和异常处理结构,PL/SQL可以执行SQL语句,SQL语句中也可以使用PL/SQL函数。

1.2 创建PL/SQL程序块DECLARE…BEGIN…EXCEPTIONEND;1.3 PL/SQL数据类型例子:DECLAREORDER_NO NUMBER(3);CUST_NAME VARCHAR2(20);ORDER_DATE DATE;EMP_NO INTEGER:=25;PI CONSTANT NUMBER:=3.1416;BEGINNULL;END;1.4 处理PL/SQL的异常1.4.1 PL/SQL的异常例如:DECLAREX NUMBER;BEGINX:= 'yyyy';--Error HereEXCEPTION WHEN V ALUE_ERROR THENDBMS_OUTPUT.PUT_LINE('EXCEPTION HANDED');END;实现技术:EXCEPTION WHEN first_exception THEN…WHEN second_exception THEN…WHEN OTHERS THEN/*THERS异常处理器必须排在最后,它处理所有没有明确列出的异常。

*/ …END;1.4.2 预定义异常1.4.3 自定义异常处理DECLAREBAD_ROWID EXCEPTION;X ROWID;PRAGMA EXCEPTION_INIT(BAD_ROWID,-01445);BEGINSELECT ROWID INTO X FROM TABWHERE ROWNUM=1;EXCEPTION WHEN BAD_ROWID THENDBMS_OUTPUT.PUT_LINE('CANNOT QUERY ROWID FROM THIS VIEW');END;注意:-01445 因为PRAGMA EXCEPTION_INIT命令把这个变量(-01455)连接到这个ORACLE错误,该语句的语法如下:PRAGMA EXCEPTION_INIT(exception_name, error_number);其中error_number是负数,因为错误号被认为负数,当定义错误时记住使用负号1.4.4 自定义异常异常不一定必须是oracle返回的系统错误,用户可以在自己的应用程序中创建可触发及可处理的自定义异常DECLARESALARY_CODE V ARCHAR2(1);INV ALID_SALARY_CODE EXCEPTION;BEGINSALARY_CODE:='X';IF SALARY_CODE NOT IN('A', 'B', 'C') THENRAISE INV ALID_SALARY_CODE;END IF;EXCEPTION WHEN INV ALID_SALARY_CODE THENDBMS_OUTPUT.PUT_LINE('INV ALID SALARY CODE');END;1.5 在PL/SQL中单条记录的查询在PL/SQL内,有时在没有定义显式光标的情况下需要查询单条记录,并把记录的数据赋给变量。

DECLAREln_dno NUMBER;lvs_dname VARCHAR2(40);BEGINSELECT DEPT_NO,DEPT_NAMEINTO ln_dno,lvs_dnameFROM deptWHERE DEPT_NO=1;DBMS_OUTPUT.PUT_LINE(TO_CHAR(ln_dno)||'.'||lvs_dname);EXCEPTION WHEN NO_DA TA_FOUND THENDBMS_OUTPUT.PUT_LINE('NO DA TA_FOUND');WHEN TOO_MANY_ROWS THENDBMS_OUTPUT.PUT_LINE('TOO_MANY_ROWS');END;1.6 用光标查询多条记录光标(CURSOR)是指向一个称为上下文相关区的区域的指针,这个区域在服务器的处理过程全局区(PGA)内,当服务器上执行了一个查询后,查询返回的记录集存放在上下文相关区,通过光标上的操作可以把这些记录检索到客户端的应用程序。

1.6.1 使用光标的基本方法DECLARECURSOR C1 IS SELECT VIEW_NAME FROM ALL_VIEWSWHERE ROWNUM<=10ORDER BY VIEW_NAME;VNAME V ARCHAR2(40);BEGINOPEN C1;FETCH C1 INTO VNAME;WHILE C1%FOUND LOOPDBMS_OUTPUT.PUT_LINE(TO_CHAR(C1%ROWCOUNT)||' '||VNAME);FETCH C1 INTO VNAME;END LOOP;END;1.6.2 使用光标FOR循环DECLARECURSOR C1 ISSELECT VIEW_NAMEFROM ALL_VIEWSWHERE ROWNUM<=10ORDER BY VIEW_NAME;BEGINFOR I IN C1 LOOPDBMS_OUTPUT.PUT_LINE(I.VIEW_NAME);END LOOP;END LOOP;EXCEPTION WHEN OTHERS THENNULL;END;1.6.3 带参数的光标DECLARECURSOR C1(VIEW_PATTERN V ARCHAR2) ISSELECT VIEW_NAMEFROM ALL_VIEWSWHERE VIEW_NAME LIKE VIEW_PATTERN||'%' ANDROWNUM<=10ORDER BY VIEW_NAME;VNAME V ARCHAR2(40);BEGINFOR I IN C1('USER_AR') LOOPDBMS_OUTPUT.PUT_LINE(I.VIEW_NAME);END LOOP;DBMS_OUTPUT.PUT_LINE( );FOR I IN C1('USER') LOOPDBMS_OUTPUT.PUT_LINE(I.VIEW_NAME);END LOOP;EXCEPTION WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('AAA');END;1.7 创建代表数据库记录和列的变量变量名基表名.列名%TYPEDECLARED_NO DEPT.DEPT_NO%TYPE;D_NAME DEPT.DEPT_NAME%TYPE;BEGINSELECT DEPT_NO,DEPT_NAME INTO D_NO,D_NAMEFROM DEPT;DBMS_OUTPUT.PUT_LINE(TO_CHAR(D_NO));EXCEPTION WHEN NO_DA TA_FOUND THENNULL;END;变量名基表名%ROWTYPEDECLARED VEQU12%ROWTYPE;BEGINSELECT ASSET12ID,ASSET12NAMEINTO D.ASSET12ID, D.ASSET12NAMEFROM VEQU12;DBMS_OUTPUT.PUT_LINE(D.ASSET12ID);EXCEPTIONWHEN NO_DATA_FOUND THENNULL;WHEN TOO_MANY_ROWS THENDBMS_OUTPUT.PUT_LINE('TOO_MANY_ROWS');END;说明:当用户要创建一个变量来表示一个基表列或者要创建多个变量来代表一整条记录时,可以实际使用%TYPE属性和%ROWTYPE属性,使用%TYPE属性和%ROWTYPE属性可以保证当基表的结构或者其中某列的数据类型改变了时,用户的PL/SQL代码仍可正常工作。

1.9 怎样用PL/SQL表实现数组功能PL/SQL表与其他过程化语言(如C语言)的一维数组类似。

实现PL/SQL表需要创建一个数据类型并另外进行变量说明。

Type <类型名> IsTable Of <数据类型>Index by Binary_Integer;以下为一个例子:DeclareType Array_type isTable Of NumberIndex by Binary_Integer;My_Array Array_type;BeginFor I In 1..10 LoopMy_Array(I) := I*2;End Loop;For I In 1..10 LoopDbms_Output.Put_line(To_char(My_Array(I))); End Loop;End;。