Oracle 练习P297 131026 PL/SQL块程序

原创 2013年12月05日 17:06:35
--1、编写一个PL/SQL块,输出所有员工的员工姓名,员工号、工资和部门号。
begin
  for v_emp in (select * from emp) loop
    dbms_output.put('员工姓名:' || v_emp.ename);
    dbms_output.put(',员工号:' || v_emp.empno);
    dbms_output.put(',工资:' || v_emp.sal);
    dbms_output.put_line(',部门号:' || v_emp.deptno);
  end loop;
end;
--2、编写一个PL/SQL块,输出所有比本部门平均工资高的员工信息。
begin
  for v_emp in (select e.*
                  from emp e
                  join (select deptno, avg(sal) avg_sal
                         from emp
                        group by deptno) t on e.deptno = t.deptno
                 where e.sal > t.avg_sal
                 order by e.deptno) loop
    dbms_output.put('员工姓名:' || v_emp.ename);
    dbms_output.put(',员工号:' || v_emp.empno);
    dbms_output.put(',工资:' || v_emp.sal);
    dbms_output.put_line(',部门号:' || v_emp.deptno);
  end loop;
end;
--3、编写一个PL/SQL块,输出所有员工及其部门领导的姓名、员工号及部门号。
begin
  for v_emp in (select e1.empno a,
                       e1.ename b,
                       e1.deptno c,
                       e2.ename d,
                       e2.empno e,
                       e2.deptno f
                  from emp e1
                  join emp e2 on e1.mgr = e2.empno) loop
    dbms_output.put('员工姓名:' || v_emp.a);
    dbms_output.put('员工员工号:' || v_emp.b);
    dbms_output.put('员工部门号:' || v_emp.c);
    dbms_output.put(',领导姓名:' || v_emp.d);
    dbms_output.put(',领导员工号:' || v_emp.e);
    dbms_output.put_line(',领导部门号:' || v_emp.f);           
  end loop;
end;
--4、查询姓为“SMITH”的员工信息,并输出其员工号、姓名、工资、部门号。
--如果该员工不存在,则插入一条新记录,员工号为2012,员工姓为“SMITH”,工资为7500元,
--入职日期为“2002年3月5日”,部门号为50,如果存在多个名为“SMITH”的员工,
--则输出所有名为“SMITH”的员工号、姓名、工资、入职日期、部门号L。
--delete from emp2 where ename = 'SMITH';
declare
  v_exist number(1);
begin
  select count(*) into v_exist from emp2 where ename = 'SMITH';
  --dbms_output.put_line(v_exist);
  if v_exist = 0 then
    insert into emp2(empno,ename,sal,hiredate,deptno) values('2012','SMITH',7500,to_date('20020305','yyyymmdd'),50);
    commit;
  elsif v_exist >= 1 then
    for v_emp in (select * from emp2 where ename='SMITH') loop
      dbms_output.put_line('员工号:' || v_emp.empno);
      dbms_output.put_line('姓名:' || v_emp.ename);
      dbms_output.put_line('工资:' || v_emp.sal);
      dbms_output.put_line('入职日期:' || v_emp.hiredate);
      dbms_output.put_line('部门号:' || v_emp.deptno);
    end loop;
  else null;
  end if;
end;
版权声明:本文为博主原创文章,未经博主允许不得转载。

oracle中pl/sql编程---存储过程,函数,触发器,包

1.pl/sql编程 pl/sql 指procedure language 过程化/sql. pl/sql 是oracle在标准的sql语句基础上扩展的一种对oracle数据库进行编程的的语言。 ...
  • zhengqiqiqinqin
  • zhengqiqiqinqin
  • 2013年06月13日 22:28
  • 1626

Oracle学习笔记(最重要的是PL/SQL编程)

一:Oracle认证,与其它数据库比较,安装 Oracle安装会自动的生成sys用户和system用户:  (1) sys用户是超级用户,具有最高权限,具有sysdba角色,有create datab...
  • a2459956664
  • a2459956664
  • 2016年10月29日 21:20
  • 3116

如何编写 PL/SQL 程序

本文的操作选用的数据库是oracle 数据库,登陆的用户是自带的scott用户,默认密码:tiger,有不懂得可以相互讨论一下,谢谢. 首先需要了解PL/SQL块的结构,PL/SQL块由定义部门、执...
  • yulei_qq
  • yulei_qq
  • 2013年06月27日 11:17
  • 1898

oracle pl/sql 程序块,游标,生成测试数据

AMORT_DATE:=to_char(add_months(to_date(myemp.Pmt_dt,'yyyy-mm-dd'),-1),'yyyy-mm-dd');--日期减一个月 declare...
  • aq23es
  • aq23es
  • 2016年11月30日 13:55
  • 515

【初识Oracle】⑥PL/SQL基础基本程序块以及存储类型

--PL/SQL基础 Procedure Language & Structured Query Language --PL/SQL的基本组成 --声明部分 DECLARE --执行部分 BE...
  • u011668824
  • u011668824
  • 2014年08月08日 16:42
  • 284

oracle 9i pl/sql程序设计笔记

  • 2008年10月21日 17:48
  • 363KB
  • 下载

Oracle8 PL/SQL程序设计

  • 2006年02月23日 09:05
  • 9.61MB
  • 下载

Oracle PL/SQL程序设计(第5版)书籍源码

  • 2017年10月27日 21:13
  • 1.03MB
  • 下载

数据库程序设计教程:综合运用PowerDesigner,Oracle与PL/SQL Developer,完整扫描版

  • 2013年12月15日 08:48
  • 64.11MB
  • 下载

Oracle8 PL/SQL高级程序设计.rar

  • 2010年07月19日 07:59
  • 5.02MB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Oracle 练习P297 131026 PL/SQL块程序
举报原因:
原因补充:

(最多只允许输入30个字)