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 块*/

[Declare 定义语句块 //定义参数,定义数据类型 ] 可省略 Begin 程序块 //写执行语句 不可省略 [Exception] 异常处理语句块 //可...

oracle pl/sql实例练习

第一部分:oracle pl/sql实例练习(1) 一、使用scott/tiger用户下的emp表和dept表完成下列练习,表的结构说明如下 emp员工表(empno员工号/ename员工姓名...

精选:深入理解 Docker 内部原理及网络配置

网络绝对是任何系统的核心,对于容器而言也是如此。Docker 作为目前最火的轻量级容器技术,有很多令人称道的功能,如 Docker 的镜像管理。然而,Docker的网络一直以来都比较薄弱,所以我们有必要深入了解Docker的网络知识,以满足更高的网络需求。

oracle pl/sql实例练习

第一部分:oracle pl/sql实例练习(1) 一、使用scott/tiger用户下的emp表和dept表完成下列练习,表的结构说明如下 emp员工表(empno员工号/ename员工姓名...

PL/SQL 练习题

1.部门10和30中工资超过1500的雇员名及工资SQL> select ename,sal 2 from scott.emp 3 where sal>1500 4 and d...
  • edcvf3
  • edcvf3
  • 2012-08-28 12:55
  • 2316

ORACLE 匿名PL/SQL块

ORACLE 匿名PL/SQL块PL/SQL块分为3个部分: 1.声明部分 声明变量 declare; 2.执行部分 执行sql语句 begin end; 3.异常部分 处理异常 excepti...

Oracle学习笔记——PL/SQL块

匿名块: 例子: 前提有一张student表,有一个name 的字段。 /*匿名块*/ DECLARE v_name VARCHAR2(50); BEGIN SELECT na...

pl/sql习题加练习

1、100内的素数 declare   fag BOOLEAN := TRUE; begin   FOR i IN 1..100 LOOP   FOR k IN 2..i-1 LOOP ...

Oracle PL/SQL复习

这是很早以前写在javaeye的,现在搬过来。 DESC STUDENTTABLE SET SERVEROUTPUT ON; declare v_str1 VARCHAR2(10); v_str...

Oracle(19)pl/sql编程 块(block)

①块(block)是pl/sql的基本程序单元,编写pl/sql程序实际上就是编写pl/sql块。要完成相对简单的应用功能,可能只需要编写一个pl/sql块;但是如果要想实现复杂的功能,可能需要在一个...

Oracle(PL/SQL编程基础(PL/SQL程序块与PL/SQL语句)、异常、游标、数据类型)

PL/SQL编程、异常、游标、数据类型
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

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