Oracle 语句收集

declare
--定义变量
v_ename varchar2(5);
 v_sal  number(7,2);
begin
--执行部分
select ename,sal into v_ename,v_sal from emp where empno=&aa;
 --在控制台显示用户名
dbms_output.put_line(‘用户名是：‘||v_ename||‘ 工资：‘||v_sal);
--异常处理
exception
when no_data_found then
    dbms_output.put_line(‘朋友，你的编号输入有误！‘)；
end;   

  --输入雇员的姓名，返回该雇员的年薪
  create function annual_incomec(name varchar2)
  return number is
  annual_salazy number(7,2);
  begin
      --执行部分
      select sal*12+nvl(comm, 0) into annual_salazy from emp where ename=name;
      return annual_salazy;
  end;  

  create package sp_package is
    procedure update_sal(name varchar2, newsal number);
    function annual_income(name varchar2) return number;
  end; 

declare
    c_tax_rate number(3,2):=0.03;
    --用户名
    v_ename varchar2(5);
    v_sal number(7,2);
    v_tax_sal number(7,2);
  begin
  --执行
      select ename,sal into v_ename,v_sal from emp where empno=&no;
--计算所得税
    v_tax_sal := v_sal*c_tax_rate;
--输出
   dbms_output.put_line(‘姓名是：‘||v_ename||‘工资：‘||v_sal||‘ 交税：‘||v_tax_sal);
end;    

  declare
    --定义一个pl/sql记录类型emp_record_type,类型包含3个数据name,salary,title。说白了，就是一个类型可以存放3个数据，主要是为了好管理
    type emp_record_type is record(
      name   emp.ename%type,
      salary emp.sal%type,
      title  emp.job%type);
  --定义了一个sp_record变量，这个变量的类型是emp_record_type
    sp_record emp_record_type;
  begin
  select ename, sal, job into sp_record from emp where empno =7788;
  dbms_output.put_line (‘员工名:‘ || sp_record.name);
end;   

  declare
  --定义了一个pl/sql表类型sp_table_type，该类型是用于存放
emp.ename%type
  --index by binary_integer 表示下标是整数
    type sp_table_type is table of emp.ename%type
    index by binary_integer;
  --定义了一个sp_table变量，这个变量的类型是sp_table_type
    sp_table sp_table_type;
  begin
    select ename into sp_table(-1) from emp where empno = 7788;  

  dbms_output.put_line(‘员工名:‘ || sp_table(-1));
end; 

  declare
  --定义游标sp_emp_cursor
      type sp_emp_cursor is ref cursor;
  --定义一个游标变量
      test_cursor sp_emp_cursor;
  --定义变量
  v_ename emp.ename%type;
  v_sal emp.sal%type;
  begin
--执行
--把test_cursor和一个select结合
open test_cursor for select ename,sal from emp where deptno=&no;
--循环取出
loop
    fetch test_cursor into v_ename,v_sal;
    --判断是否test_cursor为空
    exit when test_cursor%notfound;
    dbms_output.put_line(‘名字：‘||v_ename||‘ 工资：‘||v_sal);
end loop;
end;
/