PL/SQL编程

  PL/SQL是一种程序语言,叫做过程化SQL语言(Procedural Language/SQL)。PL/SQL是Oracle数据库对SQL语句的扩展,在普通SQL语句的使用上增加了编程语言的特点,所以PL/SQL把数据操作和查询语句组织在PL/SQL代码的过程性单元中,通过逻辑判断、循环等操作实现复杂的功能或者计算,MySQL不支持PL/SQL,但支持Navicat Premium。

  SQL可以编写程序PL,可以定义变量,可以使用语句流程(if、else、case、for、while),打印信息,处理异常等。

一、 开发窗口

二、 输出

  dbms_output是数据库定义的程序包,类似于Java中的类,put_line是输出信息,还有一个函数put也是输出,但是信息在缓存中不输出,当put_line时把缓存中的数据一起输出。

BEGIN
  dbms_output.put(1); -- 
  dbms_output.put(2); -- 
  -- 注掉此行代码程序不会输出内容
  dbms_output.put_line(3); -- 123
end;

三、 定义变量

declare 
  -- declare和begin中间是定义变量的地方,其他地方不能定义变量
  -- firstName是变量名,varchar是数据类型
  -- 定义变量赋初始值用 :=赋值
  firstName VARCHAR(2) :='张';

  -- 定义变量赋初始值用default赋值
  age INTEGER DEFAULT 18;

  -- 用表中的字段来定义变量,变量的数据类型和该字段保持一致
  -- 这样的好处是:字段数据类型改变时,变量不用修改,变量
  -- 的长度和精度随着字段来定义
  v_empno emp.empno%TYPE

  -- 用户emp表的记录作为类型定义变量
  -- 通过变量可以获取变量中的各字段信息
  v_emp%ROWTYPE
  
BEGIN
  -- 赋值不能用等号,等号用来判断,:=才是赋值
  firstName:='张';
  -- 两个内容拼接时用||
  dbms_output.put_line(firstName||'-'||age); -- 张-18
end;

四、 if语句

declare 
  -- Local variables here
  i integer;
begin
  -- if判断要写then和end if,某个变量是否为null不能用等号,要用is
  -- 不等于要用is not
  IF i IS NULL THEN
    dbms_output.put_line('i is null');-- i is null
  END IF;
end;

else if的使用:

declare 
  -- Local variables here
  i integer;
begin
  i:=65;
  IF i >= 90 THEN
    dbms_output.put_line('优秀');
  ELSIF i >= 80 THEN
    -- elsif是else if的缩写
    dbms_output.put_line('良好');
  ELSIF i >= 60 THEN
    dbms_output.put_line('及格');  -- 及格
  ELSE
    dbms_output.put_line('不及格');  
  END IF;  
end;

五、 for循环

例题:求100以内的质数(用到了嵌套循环)

declare 
  -- i和j是循环变量
  i integer;
  j INTEGER;
  flag INTEGER;-- 是否质数的标记
  prime CONSTANT INTEGER :=1;-- constant定义常量,表示是质数
BEGIN
  -- 质数是大于1的自然数 
  FOR i IN 2..100 LOOP
    flag:=prime;-- 初始值为prime,默认是质数
    -- 质数是除1和自身外,不能被其它数整除,排除1后,其它一但能整除就不是质数
    -- in是关键字,说明变量是在此范围内
    FOR j IN 2..sqrt(i) LOOP
      -- MOD是数学函数,求余 
      IF MOD(i,j)=0 THEN
        flag := 0;
        -- 如果取余为0,证明能整除,不是质数,exit跳出循环
        EXIT;
      END IF;
    END LOOP;
    IF flag = prime THEN
      dbms_output.put_line(i||'是质数');
    END IF;
  END LOOP; 
end;

六、 while循环

declare 
  -- Local variables here
  i INTEGER DEFAULT 0;
  random_num INTEGER; 
BEGIN
  -- DBMS_RANDOM程序包可以生成随机数,这个包中的value函数
  -- 可以生成[0-1)之间的小数
  random_num:=DBMS_RANDOM.value()*10;
  -- while加循环条件
  WHILE i < random_num LOOP
    dbms_output.put_line(i);
    i:=i+1; 
  END LOOP; 
end;

七、 loop...end loop

loop…end loop格式的循环条件是在循环体中进行判断,当达到某一条件时退出循环。

declare 
  -- Local variables here
  i INTEGER DEFAULT 0;
  random_num INTEGER; 
BEGIN
  -- DBMS_RANDOM程序包可以生成随机数,这个包中的value函数
  -- 可以生成[0-1)之间的小数
  random_num:=DBMS_RANDOM.value()*10;
  LOOP
    IF i > random_num THEN
      EXIT;-- 退出循环
    END IF;
    dbms_output.put_line(i);
    i:= i +1;
  END LOOP;  
end;

八、 异常处理

declare 
  -- Local variables here
  i integer;
  myex EXCEPTION;-- 定义异常对象
   PRAGMA EXCEPTION_INIT(myex,-20000);-- 给异常对象赋值错误号标识
   myex2 EXCEPTION;
begin
 dbms_output.put_line(1);
 RAISE myex;-- 抛出异常
 -- 定义加抛出,指定错误号和错误提示信息
 --raise_application_error (-20000/*-20000——-20999*/, '自定义错误信息');
 EXCEPTION
   WHEN myex OR myex2 THEN -- 处理多个异常
      dbms_output.put_line('eore');
   --WHEN myex THEN myex只能处理一次,和上面的二选一
   --  dbms_output.put_line(2||'-'||SQLCODE||'-'||SQLERRM);
   WHEN OTHERS THEN -- 其他未处理的异常打印错误号和错误信息
       dbms_output.put_line(3||'-'||SQLCODE||'-'||SQLERRM);
end;
原文地址:https://www.cnblogs.com/zbh355376/p/14326757.html