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

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

 1 -- 查询emp表中7839号员工的个人信息，打印姓名和薪水
 2 declare
 3   -- 姓名 定义的是引用变量
 4   v_ename emp.ename%TYPE;
 5   -- 薪水
 6   v_sal emp.sal%TYPE;
 7
 8 begin
 9   --查询姓名和薪水并赋值给变量，。使用select into 语句赋值
10   select ename, sal into v_ename, v_sal from emp where empno = 7839;
11   dbms_output.put_line('姓名:' || v_ename || ',薪水:' || v_sal);
12
13 end;

 1 --记录型变量示例：用该变量接收表中一行sql的信息
 2 declare
 3   -- 记录型变量
 4   v_emp emp%ROWTYPE;
 5
 6 begin
 7   --查询所有字段并赋值给变量，字段名用v_emp.字段名 表示
 8   select * into v_emp from emp where empno = 7839;
 9   dbms_output.put_line('姓名:' || v_emp.ename || ',薪水:' || v_emp.sal);
10
11 end;

 1 -- 判断emp表中记录是否超过20条，10-20 之间，或者10条以下
 2 declare
 3   --声明变量接收emp表中记录数
 4   v_count number;
 5 begin
 6   -- 查询并赋值给变量
 7   select count(1)  into v_count from emp;
 8   --判断打印
 9   if v_count > 20 then
10     dbms_output.put_line('emp表中的记录数在20条以上为' || v_count);
11   elsif v_count >= 10 then
12     dbms_output.put_line('emp表中的记录数在10-20条之间为' || v_count);
13   else
14     dbms_output.put_line('emp表中的记录数在10条以下为' || v_count);
15   end if;
16
17 end;

 1 -- 循环打印1-10
 2 declare
 3   -- 声明一个循环变量并赋初值
 4   v_num number := 1;
 5 begin
 6   loop
 7     exit when v_num > 10;
 8     dbms_output.put_line(v_num);
 9     --循环变量的自增长
10     v_num := v_num + 1;
11   end loop;
12 end;

 1 -- 使用游标查询emp表中所有员工的姓名和工资，并将其依次打印出来
 2 declare
 3   -- 声明游标
 4   cursor c_emp is
 5     select ename, sal from emp;
 6   --声明变量接收游标中的数据
 7   v_ename emp.ename%TYPE;
 8   v_sal   emp.sal%TYPE;
 9 begin
10   -- 打开游标
11   open c_emp;
12   -- 遍历游标
13   loop
14     --获取游标中的数据，如果有的话就赋值给变量
15     fetch c_emp
16       into v_ename, v_sal;
17     exit when c_emp%notfound; --c_emp%notfound 没有数据时返回true
18     dbms_output.put_line('姓名:' || v_ename || ',薪水:' || v_sal);
19   end loop;
20
21   --关闭游标
22   close c_emp;
23
24 end;

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