基于oracle 的PL/SQL编程 -变量使用

-- Created on 2018/6/3 by ADMINISTRATOR
declare
  -- 声明本地变量的地方，包括游标(结果集类型变量)，如果没有，declare可以去掉
  --相当于java的 public class A{}
  i integer;
begin
  -- 执行部分
  --相当于Java的public static void main(String[] args)
  --异常处理
end;

-- 声明一个人的信息 姓名 薪水 地址
declare
  -- 姓名 不能使用name,这是保留字
  v_name varchar2(50) := ‘张三‘;
  -- 薪水   小数：number(总长度(小数加整数的位数)，小数位数) v_sal number(6,2) --1000.00
  v_sal number;
  --地址
  v_addr varchar2(200);
begin
  --直接赋值
  v_sal := 15000;
  --语句赋值
  select ‘上海市南京路‘ into v_addr from dual; --实际工作中应该是from 某个表
  -- 打印变量  || 是拼接符，相当于java 的+
  dbms_output.put_line(‘姓名：‘ || v_name || ‘,薪水：‘ || v_sal || ‘,地址：‘ || v_addr);
end;

-- 查询emp表中7839号员工的个人信息，打印姓名和薪水
declare
  -- 姓名 定义的是引用变量
  v_ename emp.ename%TYPE;
  -- 薪水
  v_sal emp.sal%TYPE;

begin
  --查询姓名和薪水并赋值给变量，。使用select into 语句赋值
  select ename, sal into v_ename, v_sal from emp where empno = 7839;
  dbms_output.put_line(‘姓名:‘ || v_ename || ‘,薪水:‘ || v_sal);

end;

--记录型变量示例：用该变量接收表中一行sql的信息
declare
  -- 记录型变量
  v_emp emp%ROWTYPE;

begin
  --查询所有字段并赋值给变量，字段名用v_emp.字段名 表示
  select * into v_emp from emp where empno = 7839;
  dbms_output.put_line(‘姓名:‘ || v_emp.ename || ‘,薪水:‘ || v_emp.sal);

end;

-- 判断emp表中记录是否超过20条，10-20 之间，或者10条以下
declare
  --声明变量接收emp表中记录数
  v_count number;
begin
  -- 查询并赋值给变量
  select count(1)  into v_count from emp;
  --判断打印
  if v_count > 20 then
    dbms_output.put_line(‘emp表中的记录数在20条以上为‘ || v_count);
  elsif v_count >= 10 then
    dbms_output.put_line(‘emp表中的记录数在10-20条之间为‘ || v_count);
  else
    dbms_output.put_line(‘emp表中的记录数在10条以下为‘ || v_count);
  end if;

end;

-- 循环打印1-10
declare
  -- 声明一个循环变量并赋初值
  v_num number := 1;
begin
  loop
    exit when v_num > 10;
    dbms_output.put_line(v_num);
    --循环变量的自增长
    v_num := v_num + 1;
  end loop;
end;

-- 使用游标查询emp表中所有员工的姓名和工资，并将其依次打印出来
declare
  -- 声明游标
  cursor c_emp is
    select ename, sal from emp;
  --声明变量接收游标中的数据
  v_ename emp.ename%TYPE;
  v_sal   emp.sal%TYPE;
begin
  -- 打开游标
  open c_emp;
  -- 遍历游标
  loop
    --获取游标中的数据，如果有的话就赋值给变量
    fetch c_emp
      into v_ename, v_sal;
    exit when c_emp%notfound; --c_emp%notfound 没有数据时返回true
    dbms_output.put_line(‘姓名:‘ || v_ename || ‘,薪水:‘ || v_sal);
  end loop;

  --关闭游标
  close c_emp;

end;

-- 使用游标查询emp表中某个部门员工的姓名和工资，并将其依次打印出来
declare
  -- 声明带参数的游标，在声明时加上形参，select语句里面加上查询条件
  cursor c_emp(v_deptno emp.deptno%TYPE) is
    select ename, sal from emp where deptno = v_deptno;
  --声明变量接收游标中的数据
  v_ename emp.ename%TYPE;
  v_sal   emp.sal%TYPE;
begin
  open c_emp(10); -- 打开游标时加上实参
  loop  -- 遍历游标
    fetch c_emp into v_ename, v_sal;  --获取游标中的数据，如果有的话就赋值给变量
    --在判断之前先获取一下数据，看有还是没有
    exit when c_emp%notfound; --c_emp%notfound 没有数据时返回true
    dbms_output.put_line(‘姓名:‘ || v_ename || ‘,薪水:‘ || v_sal);
  end loop;
  close c_emp;  --关闭游标

end;