pp打打的

Question

瓦斯打算的卡数据库的

Answer 1

　　--1．列出至少有一个员工的所有部门。
　　select * from dept where deptno in(select distinct deptno from emp);
　　select count(*),deptno from emp group by deptno having count(*)>1;

　　--2．列出薪金比“SMITH”多的所有员工。
　　select * from emp where sal>(select sal from emp where ename='SMITH');

　　--3.列出所有员工的姓名及其直接上级的姓名
　　select ename,(select ename from emp where empno=a.mgr) from emp a;
　　select a.ename,b.ename from emp a,emp b where a.mgr=b.empno(+);

　　--4．列出受雇日期早于其直接上级的所有员工。
　　select ename from emp e where hiredate < (select hiredate from emp where empno=e.mgr);

　　--5．列出部门名称和这些部门的员工信息，同时列出那些没有员工的部门。
　　select dname,ename from dept left join emp on dept.deptno=emp.deptno;
　　select dname,ename from dept a,emp b where a.deptno = b.deptno(+);

　　--6．列出所有“CLERK”（办事员）的姓名及其部门名称。
　　select dname,ename from dept a,emp b where a.deptno=b.deptno and job='CLERK';

　　select (select dname from dept where deptno=a.deptno) as dname ,ename from emp a where job='CLERK';

　　--7．列出最低薪金大于1500的各种工作。
　　select job from emp group by job having min(sal)>1500;
　　select job,min(sal) msal from emp group by job having min(sal)>1500;

　　--8．列出在部门“SALES”（销售部）工作的员工的姓名，假定不知道销售部的部门编号。
　　select ename from emp where deptno=(select deptno from dept where dname='SALES');

　　--9．列出薪金高于公司平均薪金的所有员工。
　　select ename from emp where sal>(select avg(sal) from emp);

　　--10．列出与“SCOTT”从事相同工作的所有员工。
　　select * from emp where job=(select job from emp where ename='SCOTT');

　　--11．列出薪金等于部门30中员工的薪金的所有员工的姓名和薪金。
　　select ename,sal from emp where sal=any(select sal from emp where deptno=30);
　　select * from emp where sal in (select sal from emp where deptno=30);

　　--12．列出薪金高于在部门30工作的所有员工的薪金的员工姓名和薪金。
　　select ename,sal from emp where sal>all(select sal from emp where deptno=30);

　　--13．列出在每个部门工作的员工数量、平均工资和平均服务期限。
　　select deptno,count(*),
　　trunc(avg(sal+nvl(comm,0))) avgsal,
　　trunc(avg(sysdate-hiredate)) avgday
　　from emp group by deptno;

　　--14．列出所有员工的姓名、部门名称和工资。
　　select ename,dname,(nvl(comm,0)+sal) as 工资 from emp,dept where emp.deptno=dept.deptno;

　　--15．列出从事同一种工作但属于不同部门的员工的一种组合。
　　select distinct a.ename,a.job,a.deptno from emp a,emp b
　　where (a.job=b.job)and(a.deptno!=b.deptno) order by a.job;

　　--16．列出所有部门的详细信息和部门人数。
　　select a.*,(select count(*) from emp where deptno=a.deptno) as 人数 from dept a;

　　--17．列出各种工作的最低工资。
　　select job, min(sal+nvl(comm,0)) from emp group by job;

　　--18．列出各个部门的MANAGER（经理）的最低薪金。
　　select deptno,min(sal) from emp where job='MANAGER' group by deptno;

　　--19．列出所有员工的年工资,按年薪从低到高排序。
　　select empno,ename,(sal+nvl(comm,0))*12 as 年薪 from emp order by 年薪;

　　三、编程题

　　1、创建一个匿名块，实现如下功能：
　　使用游标查询并在控制台输出如下信息；员工姓名、工资、补贴（COMM）、月收入(SAL+COMM)、与公司平均工资的差值。
　　declare
　　v_ename emp.ename%type;
　　v_sal emp.sal%type;
　　v_comm emp.comm%type;
　　v_income emp.sal%type;
　　v_davg emp.sal%type;
　　cursor emp_cursor is select ename,sal,nvl(comm,0),nvl(comm,0)+sal,sal-(select avg(sal) from emp) from emp;
　　begin
　　open emp_cursor;
　　dbms_output.put_line('姓名'||' '||'工资'||' '||'奖金'||' '||'月工资'||' '||'差值');
　　fetch emp_cursor into v_ename,v_sal,v_comm,v_income,v_davg;
　　while emp_cursor%found loop
　　dbms_output.put_line(v_ename||' '||v_sal||' '||v_comm||' '||v_income||' '||v_davg);
　　fetch emp_cursor into v_ename,v_sal,v_comm,v_income,v_davg;
　　end loop;
　　close emp_cursor;
　　end;

　　2、创建一个过程，实现工资调整的功能：
　　create or replace procedure change_sal(p_empno in number,p_raise number)
　　as
　　v_ename emp.ename%type;
　　v_sal emp.sal%type;
　　begin
　　select ename,sal into v_ename,v_sal from emp where empno=p_empno;
　　update emp set sal=sal+p_raise where empno=p_empno;
　　dbms_output.put_line('雇员'||v_ename||'的工资被改为'||to_char(v_sal+p_raise));
　　commit;
　　exception
　　when others then
　　dbms_output.put_line('error.....');
　　rollback;
　　end;

　　3、创建一个触发器，限制EMP表的SAL+COMM必须大于100元。

　　create or replace trigger dml_salcomm
　　before
　　delete or update or insert on emp --of sal,comm
　　for each row
　　begin
　　if nvl(:new.sal,0)+nvl(:new.comm,0)<100 then
　　raise_application_error(-20001,'SAL+COMM必须大于100元!');
　　end if;
　　end;
　　4、实现一个所得税计算的函数的实现，并当工资和奖金总和小于0时候抛出异常。

　　CREATE OR REPLACE function taxes( sal number,comm number ) return number
　　as
　　v_taxes number := 0;
　　begin
　　if sal+nvl(comm,0)<0 then
　　raise_application_error(-20002,'工资和奖金总和小于0！');
　　elsif sal+nvl(comm,0) > 3000 then
　　v_taxes := (sal+nvl(comm,0))*0.3;
　　elsif sal+nvl(comm,0) > 2000 then
　　v_taxes := (sal+nvl(comm,0))*0.2;
　　else
　　v_taxes := (sal+nvl(comm,0))*0.2;
　　end if;
　　return(v_taxes);
　　end;