ORACLE自学教程

create table testone
(
id number, --序号
username varchar2(50),
password varchar2(50),
sj varchar2(20)
);
--导入命令
load data infile 'd:\whx\testoracle.txt' append into table testone fields terminated by X'09'(id,username,password,sj);

--oracle日志文件

Oracle日志文件管理与查看

　　--1.查询系统使用的是哪一组日志文件：

　　select * from v$log;

　　--2.查询正在使用的组所对应的日志文件：

　　select * from v$logfile;

　　--3.强制日志切换：

　　alter system switch logfile;

　　--4.查询历史日志：

　　select * from v$log_history;

　　--5.查询日志的归档模式：

　　select dbid,name,created,log_mode from v$database;

　　--6.查询归档日志的信息：

　　select recid,stamp,thread#,sequence#,name from v$archived_log;

　　--7.增加与删除日志文件组

　　alter database add logfile group 1 ('/home1/oracle/oradata/ora8i/log1a.log'),'/home2/oracle/oradata/ora8i/log1b.log') size 100M;

　　alter database drop logfile group 1;

　　--8.增加与删除日志成员

　　alter database add logfile member '/home1/oracle/oradata/ora8i/log1a.log' to group 1,'/home1/oracle/oradata/ora8i/log2a.log' to group 2;

　　alter database drop logfile member '/home1/oracle/oradata/ora8i/log1a.log' ;

　　--9.日志文件移动

　　alter database rename file '/home1/oracle/oradata/ora8i/log1a.log' to '/home2/oracle/oradata/ora8i/log1a.log';

　　--执行该命令之前必须保证该日志文件物理上已经移动到新目录

　　--10.清除日志文件

　　alter database clear logfile '/home1/oracle/oradata/ora8i/log1a.log';

　　--该命令用于不能用删除组及组成员命令删除日志时使用

---将文本文件/(excel表中)的内容导入到oracle数据库中---可以利用PL/SQL developer
--首先查看oracle数据库的编码
SQL> select * from nls_database_parameters where parameter ='NLS_CHARACTERSET';

PARAMETER VALUE
------------------------------ --------------------------------------------------------------------------------
NLS_CHARACTERSET ZHS16GBK

--这其来源于props$，这是表示数据库的字符集。
--oracle客户端编码
SQL> select * from nls_instance_parameters where parameter='NLS_LANGUAGE';

PARAMETER VALUE
------------------------------------------------------------ --------------------------------------------------------------------------------
NLS_LANGUAGE AMERICAN

--其来源于v$parameter，表示客户端的字符集的设置，可能是参数文件，环境变量或者是注册表会话字符集环境
SQL>select * from nls_session_parameters;
--其来源于v$nls_parameters，表示会话自己的设置，可能是会话的环境变量或者是alter session完成，如果会话没有特殊的设置，将与nls_instance_parameters一致。
--再来说一下怎么修改oracle的字符集：
--目前我的数据库环境的字符集是AL32UTF8，那么把它改成ZHS16GBK
--1.首先以sysdba的身份登录上去 conn /as sysdba
SQL>conn sys/ych as sysdba;
--2.关闭数据库shutdown immediate;
--3.以mount打来数据库，startup mount
--4.设置session
SQL>ALTER SYSTEM ENABLE RESTRICTED SESSION;
SQL> ALTER SYSTEM SET JOB_QUEUE_PROCESSES=0;
--PL/SQL Developer与Oracle11g远程连接问题
http://zhumeng8337797.blog.163.com/blog/static/10076891420111115104023136/
--Oracle11g编码问题
SQL> ALTER SYSTEM SET AQ_TM_PROCESSES=0;
--5.启动数据库
SQL>alter database open;
--6.修改字符集
SQL>ALTER DATABASE CHARACTER SET ZHS16GBK;
--这会可能会报错，提示我们的字符集：新字符集必须为旧字符集的超集，这时我们可以跳过超集的检查做更改：
SQL>ALTER DATABASE character set INTERNAL_USE ZHS16GBK;
--这条语句就可以了，TERNAL_USE提供的帮助就会使oracle绕过了子集与超集的验证，这条语句和上面的语句内部操作时完全相同的。
--7.关闭，重新启动
SQL>shutdown immediate;
SQL> startup
----------------------------------------------------------------------------------------------------
/*==============================================================*/
/* DBMS name: MySQL 4.0 */
/* Created on: 2007-6-28 15:25:46 */
/*==============================================================*/

drop table if exists admin;

drop table if exists answer;

drop table if exists subitem;

drop table if exists item;

drop table if exists question;

drop table if exists user;

/*==============================================================*/
/* Table: admin */
/*==============================================================*/

SQL>create sequence s_admin increment by 1;
SQL>create table admin
(
   id          INT PRIMARY KEY ,
   adminid     VARCHAR2(50)    not null,
   adminpwd    VARCHAR2(50)
) ;

/*==============================================================*/
/* Table: question                                              */
/*==============================================================*/
SQL>create sequence s_question increment by 1;
SQL>create table question
(
   qid                            int    not null,
   title                          VARCHAR2(50),
   content                        clob,
   itemid                         int,
   subid                          int,
   userid                         VARCHAR2(50),
   grade                          VARCHAR2(50),
   offerscore                     int,
   status                         int,
   questiontime                   date,
   clickcount                     int,
   acceptflag                     int,
   commenflag                     int,
   primary key (qid)
) ;

/*==============================================================*/
/* Table: answer                                                */
/*==============================================================*/
SQL>create table answer
(
   aid                            int not null,
   quesans                        VARCHAR2(50),
   userid                         VARCHAR2(50),
   grade                          VARCHAR2(50),
   anstime                        date,
   status                         int,
   qid                            int,
   primary key (aid) ,
   foreign key (qid) references question(qid) on delete cascade
) ;

/*==============================================================*/
/* Table: item                                                  */
/*==============================================================*/
create table item
(
   itemid                         int                       not null,
   itemname                       VARCHAR2(50),
   itemcode                       int,
   primary key (itemid)
) ;

/*==============================================================*/
/* Table: subitem                                               */
/*==============================================================*/
create table subitem
(
   subid                          int                    not null,
   subname                        varchar2(50),
   itemid                         int,
   subcode                        int,
   primary key (subid) ,
   foreign key (itemid) references item(itemid) on delete cascade
) ;

/*==============================================================*/
/* Table: user                                                  */
/*==============================================================*/
create table table_user
(
   id          INT    PRIMARY KEY ,
   userid                         VARCHAR2(50)                  not null ,
   userpwd                        VARCHAR2(50),
   userques                       VARCHAR2(50),
   userans                        VARCHAR2(50),
   usermail                       VARCHAR2(50),
   integral                       int,
   grade                          int,
   sex                            VARCHAR2(2),
   realname                       VARCHAR2(50)
) ;

----------------------------------------------------------------------------------------------------

SQL>set serveroutput on;
SQL> create table t_student (id number(10,0) not null, name varchar2(255) not null, age number(10,0), sex varchar2(255), good char(1), primary key (id, name));
SQL> create table t_teacher (id number(10,0) not null, birthDate date, gender varchar2(255), good number(1,0) not null, name varchar2(255), title varchar2(255), primary key (id));
SQL> delete from teacher where id=2;
SQL> update use set email='[email protected]' where username='xiaowang';
SQL> drop table userba2;
SQL> create table t1_student(id varchar2(255),name varchar2(255),age varchar2(255),good char(1));
SQL> create table userba2(id number,username varchar2(20),password varchar2(20));
SQL> drop table t_group;
sql> drop table t_user;

--1. 查询Oracle中所有用户信息
SQL> select*from dba_users;

--2. 只查询用户和密码
sql>select username,password from dba_users;

--3. 查询当前用户信息 select*from dba_ustats;

--通过pl/sql中的“浏览器”也可以查看user信息

--查看当前用户的缺省表空间

　　SQL>select username,default_tablespace from user_users;

---查看当前用户的系统权限和表级权限

　　SQL>select * from user_sys_privs;

　　SQL>select * from user_tab_privs;

---查看用户下所有的表

　　SQL>select * from user_tables;

--1、用户

----查看当前用户的缺省表空间

　　SQL>select username,default_tablespace from user_users;

----查看当前用户的角色

　　SQL>select * from user_role_privs;

----查看当前用户的系统权限和表级权限

　　SQL>select * from user_sys_privs;

　　SQL>select * from user_tab_privs;

----显示当前会话所具有的权限

　　SQL>select * from session_privs;

----显示指定用户所具有的系统权限

　　SQL>select * from dba_sys_privs where grantee='GAME';

--2、表

----查看用户下所有的表

　　SQL>select * from user_tables;

----查看名称包含log字符的表

　　SQL>select object_name,object_id from user_objects

　　where instr(object_name,'LOG')>0;

----查看某表的创建时间

　　SQL>select object_name,created from user_objects where object_name=upper('&table_name');

----查看某表的大小

　　SQL>select sum(bytes)/(1024*1024) as "size(M)" from user_segments where segment_name=upper('&table_name');

----查看放在ORACLE的内存区里的表

　　SQL>select table_name,cache from user_tables where instr(cache,'Y')>0;

--3、索引

----查看索引个数和类别

　　SQL>select index_name,index_type,table_name from user_indexes order by table_name;

----查看索引被索引的字段

　　SQL>select * from user_ind_columns where index_name=upper('&index_name');

----查看索引的大小

　　SQL>select sum(bytes)/(1024*1024) as "size(M)" from user_segments

　　where segment_name=upper('&index_name');

--4、序列号

　　查看序列号，last_number是当前值

　　SQL>select * from user_sequences;

　　5、视图

----查看视图的名称

　　SQL>select view_name from user_views;

----查看创建视图的select语句

　　SQL>set view_name,text_length from user_views;

　　SQL>set long 2000; 说明：可以根据视图的text_length值设定set long 的大小

　　SQL>select text from user_views where view_name=upper('&view_name');

--6、同义词

----查看同义词的名称

　　SQL>select * from user_synonyms;

--7、约束条件

----查看某表的约束条件

　　SQL>select constraint_name, constraint_type,search_condition, r_constraint_name

　　from user_constraints where table_name = upper('&table_name');

　　SQL>select c.constraint_name,c.constraint_type,cc.column_name

　　from user_constraints c,user_cons_columns cc

　　where c.owner = upper('&table_owner') and c.table_name = upper('&table_name')

　　and c.owner = cc.owner and c.constraint_name = cc.constraint_name

　　order by cc.position;

--8、存储函数和过程

----查看函数和过程以及包的状态

　　SQL>select object_name,status from user_objects where object_type='FUNCTION';
　　SQL>select object_name,status from user_objects where object_type='PROCEDURE';
SQL>select object_name,status from user_objects where object_type='PACKAGE';

----查看函数和过程以及包的源代码

　　SQL>select text from all_source where owner=user and name=upper('&plsql_name');

---ORACLE中数据字典视图分为3大类,用前缀区别，分别为：USER，ALL 和 DBA，许多数据字典视图包含相似的信息。
--USER_*:有关用户所拥有的对象信息，即用户自己创建的对象信息
--ALL_*：有关用户可以访问的对象的信息，即用户自己创建的对象的信息加上其他用户创建的对象但该用户有权访问的信息
--DBA_*：有关整个数据库中对象的信息
--（这里的*可以为TABLES， INDEXES， OBJECTS， USERS等。

--1.查看所有用户：
SQL>select * from dba_user;
SQL>select * from all_users;
SQL>select * from user_users;
2.查看用户系统权限：
select * from dba_sys_privs;
select * from all_sys_privs;
select * from user_sys_privs;
3.查看用户对象权限：
select * from dba_tab_privs;
select * from all_tab_privs;
select * from user_tab_privs;
4.查看所有角色：
select * from dba_roles;
5.查看用户所拥有的角色：
select * from dba_role_privs;
select * from user_role_privs;

6.查看当前用户的缺省表空间
select username,default_tablespace from user_users;

7.查看某个角色的具体权限，如grant connect,resource,create session,create view to TEST;查看RESOURCE具有那些权限，用SELECT * FROM DBA_SYS_PRIVS WHERE GRANTEE='RESOURCE';

例：
限制user1用户只允许100个并发连接
SQL> alter system set resource_limit=true;

System altered

SQL> create profile profile_user1 limit sessions_per_user 100;

Profile created

SQL> ALTER USER user1 profile profile_user1;

User altered

----------------------------------------------------------------------------------------
--案例
create or replace procedure sp_pro2 is begin
--执行部分
delete from mytest where name='王红祥';
end;

--最简单的快

---------分页算法
--1.0
SQL>select * from (select rownum rn,t.* from emp t) where rn>&minnum and rn<&maxmun;

--1.1
SQL>select * from (select rownum rn,t.* from emp t rownum<=&maxnum) where rn>&minnum;

---看似相似的分页语句，在响应速度上其实有很大的差别。来看一个测试过程，首先穿件一个测试表。
SQL>create table test as select * from emp;

----反复插入数据
SQL>insert into test select * from test;

---first_rows对分页的影响
----创建一个测试表，并作关联查询分页
SQL>create table page_test as select rownum id,t.* from test t;

----1.先分析该表
SQL>analyze table page_test compute statistics for table for all columns;

----2.用普通分页
SQL>select * from(select rownum rn,a.object_name from page_test a,page_test b,page_test c where a.id=b.id and b.id=c.id and rownum<=5) where rn>0;
-----------------------------------------------------------------------------------------------------------------------------
begin
dbms_output.put_line('hello');
end;

--有定义和执行部分的块
declare
--定义变量
v_ename varchar2(5);
begin
--执行部分
select ename into v_ename from emp where empno=&aa;
--在控制台显示用户名
dbms_output.put_line('用户名:'||v_ename);
end;

--有定义和执行部分的块
--把用户的工资也显示出来
declare
--定义变量
v_ename varchar2(5);
v_sal number(7,2);
begin
--执行部分
select ename into v_ename from emp where empno=&aa;
select sal into v_sal from emp where emp empno=&aa;
--在控制台显示用户名
dbms_output.put_line('用户名:'||v_ename);
end;

--有定义和执行部分的块
--把用户的工资也显示出来
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);
dbms_output.put_line('薪金:'||v_sal);
end;

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;

--演示4
create procedure sp_pro4(spName varchar2,neSal number) is
begin
   --执行部分---根据用户名修改工资
   update emp set sal=newSal where ename spName;
   end;

--函数案例
--输入雇员的名字，返回该雇员的年薪
create function sp_fun2(spName varchar2) return number is
yearSal number(7,2);
begin
   --执行部分
select sal*12+nvl(comm,0)*12 into yearSal from emp where ename=spName;
return yearSal;
end;
--(1)我们可以使用create package命令来创建
----创建包
---创建一个包sp_package
---声明该抱有一个过程update_sal
---还声明了该包有一个函数annual_income
create package sp_package is
procedure update_sal(name varchar2,newsal number);
function annual_income(name varchar2) return number;
end;
--(2)建立包体可以使用create package body命令
---给包sp_packeage实现包体
create or replace package body sp_package is
procedure update_sal(name varchar2,newsal number) is
begin
update emp set sal=newsal where ename=name;
end;
function annual_income(name varchar2) return number is annual_salary number;
begin
select sal*12+nvl(comm,0) into annual_salary from where ename=name;
return annual_salary;
end;
end;
--(3)如何调用包的过程或是函数
--当调用包的过程或是函数时，在过程和函数前需要带上包名，如果要访问其它方案的包，还需要在包名前加上方案名.
--如:
sql>call sp_package.update_sal('SCOTT',1500);

--下面已输入员工号，显示员工姓名、工资、个人所得税(税率为0.03)为例

--案例
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=&em;
   ---计算所得税
   v_tax_sal:=v_sal*c_tax_rate;
   --输出
   dbms_output.put_line('姓名是:'||v_ename||'工资'||v_sal||'所得税'||v_tax_sal);
end;

declare
c_tax_rate number(3,2):=0.03;
--用户名,工资，税收
v_ename emp.ename%type;
v_sal number(7,2);
v_tax_sal number(7,2);
begin
   --执行部分
   select ename,sal into v_ename,v_sal from emp where empno=&em;
   ---计算所得税
   v_tax_sal:=v_sal*c_tax_rate;
   --输出
   dbms_output.put_line('姓名是:'||v_ename||'工资'||v_sal||'所得税'||v_tax_sal);
end;

declare
c_tax_rate number(3,2):=0.03;
--用户名,工资，税收
v_ename emp.ename%type;
v_sal emp.sal%type;
v_tax_sal number(7,2);
begin
   --执行部分
   select ename,sal into v_ename,v_sal from emp where empno=&em;
   ---计算所得税
   v_tax_sal:=v_sal*c_tax_rate;
   --输出
   dbms_output.put_line('姓名是:'||v_ename||'工资'||v_sal||'所得税'||v_tax_sal);
end;

---pl/sql记录实例
declare
--定义一个pl/sql记录类型emp_record_type,类型包含三个数据name,salary,title;
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('员工名'||emp_record.name);
end;
--复合类型----pl/sql表的实例
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;pl/sql中定义时变量在前，类型在后面
sp_table sp_table_type;
begin
select ename into sp_table(0) from emp where empno=778;
dbms_output.putline('员工名:'||sp_table(0));
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;pl/sql中定义时变量在前，类型在后面
sp_table sp_table_type;
begin
select ename into sp_table(-1) from emp where empno=778;
dbms_output.putline('员工名:'||sp_table(0));
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;pl/sql中定义时变量在前，类型在后面
sp_table sp_table_type;
begin
select ename into sp_table(0) from emp;
dbms_output.putline('员工名:'||sp_table(0));
end;
--参照变量-ref cursor游标变量
--(1)请使用pl/sql编写一个块,可以输入部门号,并显示该部门所有员工的姓名和他的工资。
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
dbns_output.put_line('名字为'||v_ename||'工资'||v_sal);
end loop;
end;
--(2)在(1)的基础上，如果某个员工的工资低于200元，就增加100元。
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;

--判断工资高低，决定是否更新
if v_sal<200 then v_sal=v_sal+100 where deptno=no;
--判断退出条件，是否test_cursor是否为空
exit when test_cursor%notfound
dbns_output.put_line('名字为'||v_ename||'工资'||v_sal);
end loop;
end;

--编写一个过程，可以输入一个雇员名，如果该雇员的工资低于2000，就给该雇员工资增加10%

create or replace procedure sp_pro6(spName varchar2) is
--定义
v_sal emp.sal%type;
begin
--执行
select sal into v_sal from emp where ename=spName;
--判断
if v_sal<2000 then
   update emp set sal=sal+sal*0.1 where ename=spName;
   end if;
end;
--编写一个过程，可以输入一个雇员名，如果该雇员的补助不是0，就给该雇员补助在原来的基础上增加100;如果补助为0就把补助设置为200;
create or replace procedure sp_pro7(spName varchar2) is
--定义
v_comm emp.comm%type;
begin
--执行
select comm into v_comm from emp where ename=spName;
--判断
if v_sal<>0 then
   update emp set comm=comm+100 where ename=spName;
else
   update emp set comm=comm+200 where ename=spName;
   end if;
end;

--编写一个过程，可以输入一个雇员编号，如果该雇员的职位是PRESIDENT，就给该他工资增加1000;如果该雇员是MANAGER,就给他的工资增加500;其他职位的雇员工资增加200;
create or replace procedure sp_pro8(spNO number) is
--定义
v_job emp.job%type;
begin
--执行部分
select job into v_job from emp where empno=spNO;
if v_job='PERSIDENT' then
    update emp set sal=sal+1000 where empno=spNO;
   elsif v_job='MANAGER' then
   update emp set sal=sal+500 where empno=spNO;
   else
    update emp set sal=sal+100 where empno=spNO;
    end if;
end;

sql>exec sp_pro8(7983)
---循环语句loop,新建一张表
create table usersq(num1 number，Name1 varchar2(40));
--请编写一个过程，可输入用户名，并循环添加10个用户到users表中，用户编号从1开始增加。
create or replace procedure sp_prol(spName varchar2) is
--定义:=表示赋值
v_num number:=1;
begin
loop
    insert into usersq values(v_num,spName);
    --判断是否要退出循环
    exit when v_num=10;
    --自增
    v_num:=v_num+1;
   end loop;
end;

sql>exec sp_pro1('你好');
sql>select * from usersq;
---请编写一个过程，可输入用户名，并循环添加10个用户到users表中，用户编号从1开始增加。
create or replace procedure sp_pro2(spName varchar2) is
--定义:=表示赋值
v_num number:=11;
begin
while v_num<=20 loop
--执行部分
    insert into usersq values(v_num,spName);
    --自增
    v_num:=v_num+1;
   end loop;
end;
--for循环
create or replace procedure sp_pro3(spName varchar2) is
--定义:=表示赋值
v_num number:=11;
begin
for i in reverse 1..10 loop
insert into usersq values(i,spName);
end loop;
end;

sql>exec sp_pro3('小王');

goto table,其中table是已经定义好的标号名
declare
i int:=1;
begin
loop
    dbms_output.put_line('输出i='||i);
    if i=10 then
      goto end_loop;
      end if;
      i:=i+1;
      end loop;
      <<end_loop>>
      dbms_output.put_line('循环结束');
      end;

sql>set serveroutput on;

declare
i int:=1;
begin
loop
    dbms_output.put_line('输出i='||i);
    if i=10 then
      goto end_loop;
      end if;
      i:=i+1;
      end loop;
      dbms_output.put_line('循环结束');
      <<end_loop>>
      end;

---新建表
---book表
create table book (bookId number,bookName varchar2(50),publishHouse varchar2(50));

---编写过程
---spBookId (in) number,
--in代表往存储储过程输入，默认为in
--out代表一个输出参数
create or replace procedure sp_pro4(
spBookId in number,spbookName in varchar2,sppulishHouse varchar2) is
begin
insert into book values(spBookId,spbookName,sppulishHouse);
end;

public class TESTfenye;

--案例:编写一个过程，可以输入雇员的编号，返回该雇员的姓名
create or replace procedure sp_pro8(spno in number,spName out varchar2) is
begin
select ename into spName from emp where empno=spno;
end;
--案例扩展:编写一个过程，可以输入雇员的编号，返回该雇员的姓名、工资、和岗位
create or replace procedure sp_pro9(spno in number,spName out varchar2,spSal out number,spJob out varchar2) is
begin
select ename,sal,job into spName,spSal,spJob from emp where empno=spno;
end;

---3.返回结果集的过程
--1.创建包,在该包中定义了一个test_cursor类型
create or replace package testpackage as type test_cursor
is ref cursor;
end testpackage;
--2.创建存储过程
create or replace procedure sp_pro10(spNo in number,p_cursor out testpackage.test_cursor) is
begin
open p_cursor for select * from emp where deptno=spNo;
end;

--3.如何在JAVA中调用该存储过程

--oracle分页
--可以把下面sql语句当做一个模板使用
select t1.*,rownum rn from (select * from emp) t1;

select t1.*,rownum rn from (select * from emp) t1 where rownum<=10;

select * from
(select t1.*,rownum rn from (select * from emp) t1 where rownum<=10) where rn>=6;

--开发一个包
--使用上面的包
create or replace package testpackage as type test_cursor
is ref cursor;
end testpackage;
--开始编写分页的过程
create or replace procedure fenye
(tablename in varchar2,
Psize in number,--3、4、5、一页显示记录
PNow in number,--1、2、3
myrows out number,--总记录数
myPageCount out number,--总页数
p_cursor out testpackage.test_cursor---返回的记录
) is
--定义部分
--定义sql语句字符串
v_sql varchar2(1000);
--
v_begin number:=(PNow-1)*psize+1;
v_end number:=PNow*psize;
begin
--执行部分
v_sql:='select * from (select t1.*,rownum rn from (select * from '||tablename ||') t1 where rownum<='||v_end||') where rn>='||v_begin;
--把游标和sql语句关联
open p_cursor for v_sql;
--关闭游标
--计算myrows和myPageCount
--组织了一个sql语句
v_sql:='select count(*) from'||tablename;
--执行sql语句，并把返回值赋值给myrows;
execute immediate v_sql into myrows;
--计算myPageCount
if mod(myrows,psize)=0 then
myPageCount:=myrows/psize;
else
myPageCount:=myrows/psize+1;
end if;
--关闭游标
close p_cursor;
end;
--使用java测试

---问题---排序需求
create or replace procedure fenye
(tablename in varchar2,
Psize in number,--3、4、5、一页显示记录
PNow in number,--1、2、3
myrows out number,--总记录数
myPageCount out number,--总页数
p_cursor out testpackage.test_cursor---返回的记录
) is
--定义部分
--定义sql语句字符串
v_sql varchar2(1000);
--
v_begin number:=(PNow-1)*psize+1;
v_end number:=PNow*psize;
begin
--执行部分
v_sql:='select * from (select t1.*,rownum rn from (select * from '||tablename ||'order by sal) t1 where rownum<='||v_end||') where rn>='||v_begin;
--把游标和sql语句关联
open p_cursor for v_sql;
--关闭游标
--计算myrows和myPageCount
--组织了一个sql语句
v_sql:='select count(*) from'||tablename;
--执行sql语句，并把返回值赋值给myrows;
execute immediate v_sql into myrows;
--计算myPageCount
if mod(myrows,psize)=0 then
myPageCount:=myrows/psize;
else
myPageCount:=myrows/psize+1;
end if;
--关闭游标
close p_cursor;
end;

---案例:编写一个过程，可接受雇员的编号，并显示该雇员的名字
--问题是，如果输入的雇员的编号不存在，怎样去处理。
declare
v_ename emp.ename%type;
begin
--定义
select ename into v_ename from emp where empno=&no;
dbms_output.put_line('姓名为:'||v_ename);
end;

declare
v_ename emp.ename%type;
--定义
begin
select ename into v_ename from emp where empno=&no;
dbms_output.put_line('姓名为:'||v_ename);
exception
when no_data_found then
dbms_output.put_line('不存在');
end;

---自定义例外
create or replace procedure ex_test(spNo number)
is
begin
--更新用户sal
update emp set sal=sal+1000 where empno=spNo;
end;

--如何自定义例外
create or replace procedure ex_test(spNo number)
is
--定义一个例外
myex exception;
begin
--更新用户sal
update emp set sal=sal+1000 where empno=spNo;
--sql%notfound这里表示没有uodate成功
--raise myex触发例外
if sql%notfound then
    raise myex;
    end if;
    exception
      when myex then
        dbms_output.put_line('没有任何用户更新');
end;

---创建视图，把emp表sal<1000的雇员映射到该视图(view)
--视图创建以后，可以将视图当成一张普通的表
create view myview as select * from emp where sal<1000;

--为了简化操作，用一个视图解决，显示雇员编号，姓名和部门名称
create view myview2 as select emp.ename,emp.sal,dept.deptno from emp,dept where emp.deptno=dept.deptno;

select * from myview2;

--视图和视图之间可以进行联合查询
-------------------------------student数据库------------------------------------------

SQL> create table course( course_no number(8,0) not null,description varchar2(50),cost number(9,2),prerequisite number(8,0),create_by varchar2(30) not null,create_date date,modify_by varchar2(30) not null,modified_date date);

SQL>insert into course values(6300039,'课程设计好',123.52,00000001,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300040,'课程设计好',121.32,00000002,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300041,'课程设计好',173.52,00000003,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300042,'课程设计好',123.52,00000004,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300043,'课程设计好',123.52,00000005,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300044,'课程设计好',121.32,00000006,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300045,'课程设计好',173.52,00000007,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300046,'课程设计好',123.52,00000008,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300047,'课程设计好',123.52,00000009,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300048,'课程设计好',121.32,00000010,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300049,'课程设计好',173.52,00000011,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300050,'课程设计好',123.52,00000012,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300051,'课程设计好',123.52,00000013,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300052,'课程设计好',121.32,00000014,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300053,'课程设计好',173.52,00000015,'scott',sysdate,'scott',sysdate);
SQL>insert into course values(6300054,'课程设计好',123.52,00000016,'scott',sysdate,'scott',sysdate);

--------------创建一个过程
create or replace procedure sp_pro01 is
begin
insert into course values(6300039,'西欧字幕越',123.54,00000001,user,sysdate,user,sysdate);
insert into course values(6300040,'课程设计好',121.32,00000002,'scott',sysdate,'scott',sysdate);
insert into course values(6300041,'课程设计好',173.52,00000003,'scott',sysdate,'scott',sysdate);
insert into course values(6300042,'课程设计好',123.52,00000004,'scott',sysdate,'scott',sysdate);
insert into course values(6300043,'课程设计好',123.52,00000005,'scott',sysdate,'scott',sysdate);
insert into course values(6300044,'课程设计好',121.32,00000006,'scott',sysdate,'scott',sysdate);
insert into course values(6300045,'课程设计好',173.52,00000007,'scott',sysdate,'scott',sysdate);
insert into course values(6300046,'课程设计好',123.52,00000008,'scott',sysdate,'scott',sysdate);
insert into course values(6300047,'课程设计好',123.52,00000009,'scott',sysdate,'scott',sysdate);
insert into course values(6300048,'课程设计好',121.32,00000010,'scott',sysdate,'scott',sysdate);
insert into course values(6300049,'课程设计好',173.52,00000011,'scott',sysdate,'scott',sysdate);
insert into course values(6300050,'课程设计好',123.52,00000012,'scott',sysdate,'scott',sysdate);
insert into course values(6300051,'课程设计好',123.52,00000013,'scott',sysdate,'scott',sysdate);
insert into course values(6300052,'课程设计好',121.32,00000014,'scott',sysdate,'scott',sysdate);
insert into course values(6300053,'课程设计好',173.52,00000015,'scott',sysdate,'scott',sysdate);
insert into course values(6300054,'课程设计好',123.52,00000016,'scott',sysdate,'scott',sysdate);
insert into course values(6300055,'课程设计好',123.52,00000017,'scott',sysdate,'scott',sysdate);
end;

--------------------执行该过程
SQL>exec sp_pro01;

-----------------------------------------------------------------------------------------

SQL>create table section(
   section_id number(8,0) primary key not null,
   course_no number(8,0) not null,
   section_no number(3) not null,
   start_date_time date,
   locate varchar2(50),
   instructor_id number(8,0) references instructor(instructor_id) not null,
   capacity number(3,0),
   create_by varchar2(30) not null,
   created_date date not null,
   modified_by varchar2(30) not null,
   modified_date date not null);


--------------创建一个过程
create or replace procedure sp_pro02 is
begin
insert into section values(191,6300040,1,sysdate,'北京',150,100,'scott',sysdate,'scott',sysdate);
insert into section values(192,6300041,2,sysdate,'北京',190,100,'scott',sysdate,'scott',sysdate);
insert into section values(193,6300042,3,sysdate,'天津',100,100,'scott',sysdate,'scott',sysdate);
insert into section values(194,6300043,4,sysdate,'上海',170,100,'scott',sysdate,'scott',sysdate);
insert into section values(195,6300044,5,sysdate,'广州',130,100,'scott',sysdate,'scott',sysdate);
insert into section values(196,6300045,6,sysdate,'武汉',160,100,'scott',sysdate,'scott',sysdate);
insert into section values(197,6300046,7,sysdate,'成都',110,100,'scott',sysdate,'scott',sysdate);
insert into section values(198,6300047,8,sysdate,'重庆',134,100,'scott',sysdate,'scott',sysdate);
end;

--------------------执行该过程
SQL>exec sp_pro02;

-----------------------------------------------------------------------------------------
SQL>create table stud(
student_id number(8,0) primary key,
salutation varchar2(5),
first_name varchar2(25),
last_Name varchar2(25) not null,
street_address varchar2(50) not null,
zip varchar2(10) not null,
phone char(11),
employer varchar2(50),
registration_date date not null,
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

--------------创建一个过程
create or replace procedure sp_pro03 is
begin
insert into stud values(80605301,'朱','浩桥','朱','湖北','100001','02887720301','西华大学',sysdate,'scott',sysdate,'sys',sysdate);
insert into stud values(80605302,'李','龙','李','吉林','100002','02887720302','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605303,'祝','智发','祝','四川','100003','02887720303','西华大学',sysdate,'scott',sysdate,'sys',sysdate);
insert into stud values(80605304,'李','玥','李','重庆','100004','02887720304','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605305,'宋','雪剿','宋','浙江','100005','02887720305','西华大学',sysdate,'scott',sysdate,'sys',sysdate);
insert into stud values(80605310,'杜','忆东','杜','四川','100003','02887720306','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605311,'张','航','张','四川','100003','02887720307','西华大学',sysdate,'scott',sysdate,'scott',sysdate);
insert into stud values(80605312,'莫','逸杨','莫','四川','100003','02887720308','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605314,'戴','子仪','戴','湖北','100001','02887720309','西华大学',sysdate,'scott',sysdate,'scott',sysdate);
insert into stud values(80605315,'杨','勇','杨','吉林','100002','02887720310','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605316,'郭','荣华','郭','四川','100003','02887720313','西华大学',sysdate,'scott',sysdate,'sys',sysdate);
insert into stud values(80605317,'杨','银辉','杨','重庆','100004','02887720314','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605318,'李','昆霖','李','浙江','100005','02887720315','西华大学',sysdate,'scott',sysdate,'scott',sysdate);
insert into stud values(80605319,'赵','虎','赵','四川','100003','02887720316','西华大学',sysdate,'scott',sysdate,'system',sysdate);
insert into stud values(80605320,'黄','友志','黄','四川','100003','02887720317','西华大学',sysdate,'scott',sysdate,'sys',sysdate);
insert into stud values(80605321,'陈','光春','陈','四川','100003','02887720318','西华大学',sysdate,'scott',sysdate,'system',sysdate);

end;

--------------------执行该过程
SQL>exec sp_pro03;

create table enrollment(student_id number(8,0) references stud(student_id) not null,section_id number(8,0) references section(section_id) not null,enroll_date date not null,final_date number(3,0) not null,create_by varchar2(30),create_date date not null,modified_by varchar2(30) not null,modified_date date not null);
-----------------------------------------------------------------------------------------------------------------------------
SQL>create table enrollment(
student_id number(8,0) references stud(student_id) not null,
section_id number(8,0) references section(section_id) not null,
enroll_date date not null,
final_grade number(3,0),
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

--------------创建一个过程
create or replace procedure sp_pro04 is
begin
insert into enrollment values(80605301,191,sysdate,98,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605302,192,sysdate,78,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605303,193,sysdate,68,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605304,194,sysdate,90,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605305,195,sysdate,77,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605310,196,sysdate,76,'scott',sysdate,'system',sysdate);
insert into enrollment values(80605311,197,sysdate,98,'scott',sysdate,'sys',sysdate);
insert into enrollment values(80605312,198,sysdate,78,'scott',sysdate,'scott',sysdate);
end;

--------------------执行该过程
SQL>exec sp_pro04;

-----------------------------------------------------------------------------------------------------------------------------

SQL>create table instructor(
instructor_id number(8,0) primary key not null,
salutation varchar2(5),
first_name varchar2(25),
last_Name varchar2(25) not null,
street_address varchar2(50) not null,
zip varchar2(10) not null,
phone char(11),
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);
--------------创建一个过程
create or replace procedure sp_pro05 is
begin
insert into instructor values(150,'石','红','石','四川','100001','02887720011','scott',sysdate,'sys',sysdate);
insert into instructor values(190,'高','勤','高','北京','100002','02887720012','scott',sysdate,'sys',sysdate);
insert into instructor values(170,'周','玲','周','四川','100001','02887720013','scott',sysdate,'sys',sysdate);
insert into instructor values(100,'朱','雯','朱','上海','100004','02887720014','scott',sysdate,'sys',sysdate);
insert into instructor values(130,'程','娜','程','四川','100001','02887720011','scott',sysdate,'sys',sysdate);
insert into instructor values(110,'廖','燕','廖','北京','100002','02887720012','scott',sysdate,'sys',sysdate);
insert into instructor values(160,'周','琼','周','四川','100001','02887720013','scott',sysdate,'sys',sysdate);
insert into instructor values(134,'严','常龙','严','上海','100004','02887720014','scott',sysdate,'sys',sysdate);
end;

--------------------执行该过程
SQL>exec sp_pro05;

-----------------------------------------------------------------------------------------------------------------------------

SQL>create table zipcode(
zip varchar2(10) not null,
city varchar2(25) not null,
state varchar2(2),
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

SQL>create table grade_type(
grade_type_code char(2),
description varchar2(50),
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

SQL>create table grade_type_wight(
section_id char(2) not null,
grade_type_code char(2) not null,
number_per_section number(3) not null,
percent_of_final_grade number(3) not null,
drop_lowest char(1) not null,
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

SQL>create table grade(
student_id number(8,0) references stud(student_id) not null,
section_id number(8,0) references section(section_id) not null,
grade_type_code char(2),
grade_code_occurence number(38) not null,
numeric_grade number(3) not null,
comments varchar2(2000),
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);

SQL>create table gradte_conversion(
letter_grade varchar2(2) not null,
grade_point number(3,2) not null,
max_grade number(3) not null,
min_grade number(3) not null,
create_by varchar2(30) not null,
created_date date not null,
modified_by varchar2(30) not null,
modified_date date not null);
---------------------------------------------------------------------
---------------------------------第11章游标简介
declare
   v_first_name stud.first_name%type;
   v_last_name stud.last_name%type;
begin
select first_name,last_name into v_first_name,v_last_name from stud where student=123;
dbms_output.put_line('student name:'||v_first_name||''||v_last_name);
exception
when no_data_found then
    dbms_output.put_line('there is no student with student ID 123');
end;

----------记录类型
declare
vr_student stud%rowtype;-------创建一个基于表的游标
begin
    select * into vr_stud from stud where student_id=156;
    dbms_output.put_line(vr_student.first_name||''||vr_student.last_name||'has an ID of 156');
exception
    when no_data_found then
      raise_application_erroe(-2001,'the student'||'is not in the database');
end;

---===================================================================================================
---============================第1章 PL/SQL概念
declare
       declaration statements
begin
       Exectable statements
exception
       Exception-handling statements
end;

---1.1
declare
   v_first_name varchar2(35);
   v_last_name varchar2(35);
   c_counter constant number:=0;

---1.2
declare
   v_first_name varchar2(35);
   v_last_name varchar2(35);
   c_counter constant number:=0;
begin
select first_name,last_name
into v_first_name,v_last_name
from student where student_id=123;
dbms_output.put_line('student name:'||v_first_name||''||v_last_name);
end;

---1.3

declare
   v_first_name varchar2(35);
   v_last_name varchar2(35);
   c_counter constant number:=0;
begin
select first_name,last_name
into v_first_name,v_last_name
from student where student_id=123;
dbms_output.put_line('student name:'||v_first_name||''||v_last_name);
exception
when no_data_found then
    dbms_output.put_line('there is not student with'||'student id equals 123');
end;

--------------------------------时尚购物网------------------------------------------
drop database testdb
go
create database testdb;
go
use testdb;
go
---存储过程
create Sequence sequ_stationinfo_id
increment by 1
start with 1
nomaxvalue
nocycle
cache

-------------------创建一个序列
create sequence seqmax increment by 1;
-----------------
--普通用户的表
create table users(
userid number(10) primary key,--用户id
username varchar2(30) not null unique,--用户名
truename varchar2(30) not null,--真实姓名
passwd   varchar2(30) not null,--密码
email varchar2(40) not null,--电子邮件
phone   varchar2(20) not null, --电话号码
address varchar2(30) not null, --用户地址
postcode char(6) not null,--邮编
grade int   default 5 --用户的级别
)

--管理员表admin

--货物表
create table goods (
goodsId number(10) primary key identity(1,1),--货物id
goodsName varchar2(40) ,--名称
goodsIntro varchar2(500),--介绍
goodsPrice float ,--价格
goodsNum int ,--数量
publisher varchar2(40),--发行商
photo varchar2(40),--照片
type varchar2(10)--类型
)

--直接向数据库添加货物
insert into goods values(seqmax.nextval, '黑白森林','这是一部好片', 59, 1, '香港嘉禾出品','01.jpg','香港电影')
insert into goods values(seqmax.nextval, '金鸡II','这是一部好片', 45, 1, '香港嘉禾出品','02.jpg','香港电影')
insert into goods values(seqmax.nextval, '靓女菜馆', '这是一部好片',99, 1, '香港嘉禾出品','03.jpg','香港电影')
insert into goods values(seqmax.nextval, '布衣神相','这是一部好片', 10, 1, '香港嘉禾出品','04.jpg','香港电影')
insert into goods values(seqmax.nextval, '洛神', '这是一部好片',68, 1, '香港嘉禾出品','05.jpg','香港电影')
insert into goods values(seqmax.nextval, '黑白森林', '这是一部好片',56, 1, '香港嘉禾出品','01.jpg','香港电影')
insert into goods values(seqmax.nextval, '黑白森林', '这是一部好片',56, 1, '香港嘉禾出品','01.jpg','香港电影')
insert into goods values(seqmax.nextval, '金鸡II', '这是一部好片',55, 1, '香港嘉禾出品','02.jpg','香港电影')

-----------------存储过程
create or replace procedure sp_pro18 is
begin
insert into goods values(seqmax.nextval, '黑白森林','这是一部好片', 59, 1, '香港嘉禾出品','01.jpg','香港电影');
insert into goods values(seqmax.nextval, '金鸡II','这是一部好片', 45, 1, '香港嘉禾出品','02.jpg','香港电影');
insert into goods values(seqmax.nextval, '靓女菜馆', '这是一部好片',99, 1, '香港嘉禾出品','03.jpg','香港电影');
insert into goods values(seqmax.nextval, '布衣神相','这是一部好片', 10, 1, '香港嘉禾出品','04.jpg','香港电影');
insert into goods values(seqmax.nextval, '洛神', '这是一部好片',68, 1, '香港嘉禾出品','05.jpg','香港电影');
insert into goods values(seqmax.nextval, '黑白森林', '这是一部好片',56, 1, '香港嘉禾出品','01.jpg','香港电影');
insert into goods values(seqmax.nextval, '黑白森林', '这是一部好片',56, 1, '香港嘉禾出品','01.jpg','香港电影');
insert into goods values(seqmax.nextval, '金鸡II', '这是一部好片',55, 1, '香港嘉禾出品','02.jpg','香港电影');
end;

------------------------执行存储过程
sql>exec sp_pro18;

--向用户表中初始化一个用户，将来是通过注册界面加入的

insert into users values('shunping','韩顺平','shunping','[email protected]','010-88888888','星星小区哈哈楼嘻嘻单元123房间','123456',1);

-------------------创建一个序列
create sequence seqmax1 increment by 1;
-----------------创建一个存储过程
create or replace procedure sp_pro19 is
begin
insert into users values(seqmax1.nextval,'shunping','王红祥','shunping','[email protected]','028-87720557','星星小区哈哈楼嘻嘻单元123房间','123456',1);
insert into users values(seqmax1.nextval,'whx','whx','wxh','[email protected]','028-87720033','星星小区哈哈楼嘻嘻单元123房间','123456',1)
end;

---------执行存储过程
sql>exec sp_pro19;
sql>

--学生可能这样设计订单表(错误)
--create table orders(
ordersId bigint primary key identity(1,1),--订单号
userId bigint constraint fk_client_id references users(userid),--哪个用户订的
goodsId bigint constraint fk_shangpin_id references goods(goodsId),--商品号
nums int not null,--数量
orderDate datetime default getdate(),--下订单的时间
payMode varchar2(20)check (payMode in('货到付款','支付宝付款')) default '货到付款',--付款的方式
isPayed bit check ( isPayed in (0 ,1)),--(0,表示还没有付款 1:表示已经付款了)
totalPrice float not null,--总价格
)

--应该这样去设计订单表
create table orders(
ordersId number(10) primary key,--订单号
userId number(10) constraint fk_client_id references users(userid),--哪个用户订的
orderDate datetime default getdate(),--下订单的时间
payMode varchar2(20) check (payMode in('货到付款','支付宝付款')) default '货到付款',--付款的方式
isPayed bit check ( isPayed in (0 ,1)),--(0,表示还没有付款 1:表示已经付款了)
totalPrice float not null--总价格
)

--订单细节表
create table orderDetail(

ordesIid bigint constraint fk_order_id references orders(ordersId),--订单号(并是一个外键) 指向orders表的主键
goodsId bigint constraint fk_shangpin_id references goods(goodsId),--商品号(并是一个外键) 指向goods表的主键
nums int not null--数量
)

--显示一下各个表的初始化信息
select * from users;
select * from goods;
select * from orders

select * from orderDetail

-------Hibernate HelloWorld-------------------------
--建立新java 项目,名为hibernate_0100_HelloWorld
--学习建User-library-hibernate,并加入相应的jar包
--项目右键-buildpath-configure build path-add library—
--选择User-library,在其中新建 libraray,命名为 hibernate
--在该library中加入hibernate所需jar包
--hibernate core
--/required
--slf-nop jar
--引入mysql的JDBC驱动包
--在mysql中建立对应的数据库以及表
--create database hibernate；
--use hibernate；
--create table Student (id int primary key, namevarchar(20), age int)；
--建立hibernate 配置文件hibernate.cfg.xml
--从参考文档中copy
--修改对应的数据库连接
--注释掉暂时用不上的内容
--建立Student 类
--建立Student 映射文件 Student.hbm.xml
--参考文档
--将映射文件加入到hibernate.cfg.xml中
--参考文档
--写测试类Main,在Main中对Student对象进行直接的存储测试
--参考文挡
--FAQ：
--要调用 new Configuration().configure().buildSessionFactory(),而不是
-- 要省略 configure，否则会出 hibernate dialect must be set 的异常
--Note:
--请务必建立自己动手査文挡的能力
--重要的是:
--要建立自己动手查一手文档的信心
--还有建立自己动手查一手文档的习惯！
--主动学习，砍弃被动接受灌输的习惯！
--建立能力
--错误读完整
--读—昔误的关键行
--排除法
--比较法
--google

-----------------建立 Annotation 版本的 HelloWorld-------------------
--创建teacher 表，
sql>create table teacher (id number(3) primary key,name varchar2(20),title varchar2(10));
--创建Teacher 类
--在hibernate lib 中加入annotation的jar包
--hibernate annotaion jar
--ejb3 persistence jar
--hibernate common-annotations.jar
--注意文裆中没有提到hibernate-common-annotations.jar 文件
--参考Annotaion文档建立对应的注解
--在hibernate.cfg.xml中建立映射<mapping class:.../〉
--参考文裆进行测试（注意文裆中缺少configure()的小bug)
--FAQ: @不给提示
--配置eclipse属性信息content assist-activation--加上@
----------------------------------------------------------------------------------------------------
----------------------------------------------第19章
--ch19_01.sql
SQL>create or replace procedure Discount as
    cursor c_group_discount is
    select distinct s.course_no,c.description from section s,enrollment e,course c where s.section_id=e.section_id and c.course_no=s.course_no group by s.course_no,c.description,e.section_id,s.section_id having count(*)>=8;
    begin
      for r_group_discount in c_group_discount
        loop
          update course set cost=cost*.95 where course_no=r_group_discount.course_no;
          dbms_output.put_line('A_5% discount has been given to'||r_group_discount.course_no||''||r_group_discount.description);
        end loop;
    end;

SQL>execute Discount;
--编写一个select语句，以便于使用user_source视图来显示discount过程的源代码
SQL>column text format a770 select to_char(line,99)||'>',text from user_source where name='DISCOUNT';
--ch19_02.sql
SQL>create or replace procedure find_name(i_student_id in number,o_first_name out varchar2,o_last_name out varchar2) as
    begin
      select first_name,last_name into o_first_name,o_last_name from stud where student_id=i_student_id;
    exception
      when others then
       dbms_output.put_line('error in finding student_id'||i_student_id);
    end find_name;

SQL>declare
      v_local_first_name stud.first_name%type;
      v_local_last_name stud.last_name%type;
     begin
       find_name(80605304,v_local_first_name,v_local_last_name);
       dbms_output.put_line('student 80605304 is:'||v_local_first_name||''||v_local_last_name);
     end;

--ch20_01.sql
SQL>create or replace function show_description(i_course_no course.course_no%type) return varchar2 as
    v_description varchar2(50);
    begin
      select description into v_description from course where course_no=i_course_no;
      return v_description;
    exception
      when no_data_found then
        return('the course is not in the database');
      when others then
        return('error in running show_description');
    end;

--ch20_01b.sql
SQL>create or replace function id_is_good(i_student_id in number) return boolean as
    v_id_cnt number;
    begin
      select count(*) into v_id_cnt from stud where student_id=i_student_id;
      return 1=v_id_cnt;
      exception
        when others then
          return false;
      end id_is_good;

set serveroutput on;
SQL>declare
      v_description varchar2(50);
    begin
      v_description:=show_description(&sv_number);
      dbms_output.put_line(v_description);
    end;

--测试id_is_good函数的一个方法
SQL>declare
      v_id number;
      begin
        v_id:=&id;
        if id_is_good(v_id) then
          dbms_output.put_line('student id:'||v_id||'is a valid');
        else
          dbms_output.put_line('student id:'||v_id||'is not valid');
        end if;
     end;
--ch20_01c.sql version 1.0
SQL>create or replace function new_instructor_id return instructor.instructor_id%type as
    v_new_instid instructor.instructor_id%type;
    begin
      select instructor_id_SEQ.nextval into v_new_instid from dual where v_new_instid;
    exception
      when others then
        declare
        v_sqlerrm varchar2(250):=substr(SQLERRM,1,250);
        begin
          raise_application_error(-20003,'error in instructor_id:'||v_sqlerrm);
        end;
    end new_instructor_id;
---------------------------------------------------------------------------------------
SQL>declare
      cons_zip constant zipcode.zip%type:='&sv_zipcode';
      e_zipcode_is_not_valid exception;
    begin
      if zipcode_does_not_exist(cons_zip) then
        raise e_zipcode_is_not_valid;
      else
        null;
      end if;
    exception
      when e_zipcode_is_not_valid then
        raise_application_error(-20003,'could not find zipcode'||cons_zip||'.');
    end;
---=============================================================================================
-------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------
-------------------------------第21章包-------------------------------------------------------
-------------------------------------------------------------------------------------------------
----ch21_1.sql
SQL>create or replace package manage_students as
    procedure find_name(i_student_id in stud.student_id%type,o_first_name out stud.first_name%type,o_last_name out stud.last_name%type);
    function id_is_good(i_student_id in stud.student_id%type) return boolean;
    end manage_students;
-----ch21_2.sql
SQL>declare
      v_first_name stud.first_name%type;
      v_last_name stud.last_name%type;
    begin
      manage_students.find_name(125,v_first_name,v_last_name);
      dbms_output.put_line(v_first_name||''||v_last_name);
    end;
-------ch21_4a.sql
SQL>create or replace package body manage_students as
     procedure find_name(i_student_id in stud.student_id%type,
       o_first_name out stud.first_name%type,
       o_last_name out stud.last_name%type)
       is
       v_student_id stud.student_id%type;
     begin
       select first_name,last_name into o_first_name,o_last_name from stud where student_id=i_student_id;
     exception
       when others then
         dbms_output.put_line('error in finding student_id:'||v_student_id);
     end find_name;
     function id_is_good(i_student_id in stud.student_id%type) return boolean is
       v_id_cnt number;
     begin
       select count(*) into v_id_cnt from stud where stud.student_id=i_student_id;
       return 1=v_id_cnt;
     exception
       when others then
         return false;
     end id_is_good;
    end manage_students;
---------------------------------------------------------------------------
---第一步创建包头
SQL>create or replace package school_api as
       procedure discount_cost;
       function new_instructor_id return instructor.instructor_id%type;
    end school_api;
---第二步实现包体
--------ch21_5a.sql
SQL>create or replace package body school_api as
      procedure discount_cost is
        cursor c_group_discount is
        select distinct s.course_no,c.description
        from section s,enrollment e,course c
        where s.section_id=e.section_id and c.course_no=s.course_no
        group by s.course_no,c.description,e.section_id,s.section_id having count(*)>=8;
      begin
        for r_group_discount in c_group_discount
          loop
            update course set cost=cost*.95 where course_no=r_group_discount.course_no;
            dbms_output.put_line('A_5% discount has been given to'
            ||r_group_discount.course_no||'
            '||r_group_discount.description);
          end loop;
      end discount_cost;
      function new_instructor_id
        return instructor.instructor_id%type
      is
        v_new_instid instructor.instructor_id%type;
        begin
          select instructor_id_SEQ.nextval into v_new_instid from dual;
          return v_new_instid;
        exception
          when others then
            declare
               v_sqlerrm varchar2(250):=substr(SQLERRM,1,250);
            begin
               raise_application_error(-20003,'error in instructor_id:'||v_sqlerrm);
            end;
        end new_instructor_id;
      end school_api;
--------------ch21_6a.SQL
SQL>set serveroutput on;
SQL>declare
      v_first_name stud.first_name%type;
      v_last_name stud.last_name%type;
    begin
       if manage_students.id_is_good(&&v_id);
       then manage_students.find_name(&&v_id,v_first_name,v_last_name);
       dbms_output.put_line(v_first_name||''||v_last_name);
       else
         dbms_output.put_line('Student ID:'||&&v_id||'is not in the database');
       end if;
     end;

---ch21_7a.sql
SQL>declare
      v_instructor_id instructor.instructor_id%type;
    begin
      school_api.discount_cost;
      v_instructor_id:=school_api.new_instructor_id;
      dbms_output.put_line('the new id is :'||v_instructor_id);
    end;
--——ch21_9a.sql
--第一步创建包头
SQL>create or replace package course_pkg as
      type course_rec_typ is record(first_name stud.first_name%type,last_name stud.last_name%type,course_no course.course_no%type,description course.description%type,section_no section.section_no%type);
      type course_cur is ref cursor return course_rec_typ;
      procedure get_course_list(p_student_id number,p_instructor_id number,course_list_cv in out course_cur);
    end course_pkg;
---第二部创建包体
SQL>create or replace package body course_pkg as
      procedure get_course_list(p_student number,p_instructor number,course_lsit_cv in out course_cur)
        is
        begin
          if p_student_id is null and p_instructor_id is null then
            open course_list_cv for
              select 'please choose a student-'first_name,'instructor combination' last_name,null course_no,null description,null section_no from dual;
          elsif p_student_id is null then
            open course_list_cv for
              select s.first_name first_name,s.last_name last_name,c.course_no course_no,c.description description,se.section_no section_no from instructor i,stud s,section se,course c,enrollment e
              where i.instructor_id=p_instructor_id and i.instructor_id=se.instructor_id and se.course_no=c.course_no and e.student_id=s.student_id and e.section_id=se.section_id order by c.course_no,se.course_no;
          elsif p_instructor_id is null then
            open course_list_cv for
              select i.last_name last_name,c.course_no course_no,c.description description,se.section_no section_no from instructor i,stud s,section se,course c,enrollment e
              where s.student_id=p_student_id and i.instructor_id=se.instructor_id and se.course_no=c.course_no and e.student_id=s.student_id and e.section_id=se.section_id order by c.course_no,se.section_no;
          end if;
        end get_course_lsit;
    end course_pkg;
---ch21_10a.sql
--第一步创建包头
SQL>create or replace package student_info_pkg as
      type student_details is ref cursor;
      procedure get_student_info(p_student_id number,p_choice number,details_cv in out stud_details);
    end student_info_pkg;
--第二部创建包体
SQL>create or replace package body student_info_pkg as
      procedure get_student_info(p_student_id number,p_choice number,detail_cv in out stud_details)
        is
        begin
          if p_choice=1 then
            open details_cv for
              select s.first_name first_name,s.last_name last_name,s.street_address address,z.city city,z.state state,z.zip zip from stud s,zipcode z where s.student_id=p_student_id and z.zip=s.zip;
          elsif p_choice=2 then
            open details_cv for
              select from stud s,section se,course c,enrollment e
              where se.course_no=c.course_no and e.student_id=s.student_id and e.section_id=se.section_id and se.section_id in(select e.section_id from stud s,enrollment e where s.student_id=p_student_id and s.student_id=e.student_id) order by c.course_no;
          elsif p_choice=3 then
            open details_cv for
              select i.first_name first_name,i.last_name last_name,c.course_no course_no,c.description description,se.section_no section_no from instructor i,stud s,section se,course c,enrollment e
              where s.student_id=p_student_id and i.instructor_id=se.instructor_id and se.course_no=c.course_no and e.student_id=s.student_id and e.section_id=se.section_id order by c.course_no,se.section_no;
          end if;
        end get_student_info;
    end student_info_pkg;

create or replace procedure sp_pro_21 is
begin
insert into J values('J1','三建','北京');
insert into J values('J2','一汽','长春');
insert into J values('J3','弹簧厂','天津');
insert into J values('J4','造船厂','天津');
insert into J values('J5','机车厂','唐山');
insert into J values('J6','无线电厂','常州');
insert into J values('J7','半导体厂','南京');
end;

create or replace procedure sp_pro22 is
begin
insert into P values('P1','螺母','红',12);
insert into P values('P2','螺栓','绿',17);
insert into P values('P3','螺丝刀','蓝',14);
insert into P values('P4','螺丝刀','红',14);
insert into P values('P5','凸轮','蓝',40);
insert into P values('P6','齿轮','红',30);
end;

create or replace procedure sp_pro23 is
begin
insert into SPJ values('S1','P1','J1',200);
insert into SPJ values('S1','P1','J3',100);
insert into SPJ values('S1','P1','J4',700);
insert into SPJ values('S1','P2','J2',100);
insert into SPJ values('S1','P3','J1',400);
insert into SPJ values('S2','P3','J2',200);
insert into SPJ values('S2','P3','J4',500);
insert into SPJ values('S2','P3','J5',400);
insert into SPJ values('S2','P5','J1',400);
insert into SPJ values('S2','P5','J2',100);

insert into SPJ values('S3','P1','J1',200);
insert into SPJ values('S3','P3','J1',200);
insert into SPJ values('S4','P5','J1',100);
insert into SPJ values('S4','P6','J3',300);
insert into SPJ values('S4','P6','J4',200);
insert into SPJ values('S5','P2','J4',100);
insert into SPJ values('S5','P3','J1',200);
insert into SPJ values('S5','P6','J2',200);
insert into SPJ values('S5','P6','J4',500);
end;
------------
------------------------------------------------------------------------------
------------第三步
exec sp_pro20;
exec sp_pro21;
exec sp_pro_22;
exec sp_pro23;
---------------------------
----------------------
------------第四步
SQL>select * from S;
SQL>select * from J;
SQL>select * from P;
SQL>select * from SPJ;

-------------
--------------
------------第五步，完成作业
--1.找出所有供应商的姓名和所在城市
SQL>select SNAME,CITY from S;
--2.找出所有零件的名称、颜色、重量
SQL>select PNAME,COLOR,WEIGHT from P;
--3.找出使用供应商S1所供应零件的工程号码
SQL>select distinct JNO from SPJ where SNO='S1' order by JNO;
--4.找出工程项目J2使用的各种名称及其数量
SQL>select PNAME,WEIGHT from P where P.PNO in(select PNO from SPJ where JNO='J2');
SQL>select P.PNAME,count(*) from P where P.PNO in(select PNO from SPJ where JNO='J2');

--5.找出上海厂商供应的所有零件号码
SQL>select distinct SPJ.PNO from SPJ where SPJ.SNO in (select S.SNO from S where S.CITY='上海');
--6.找出使用上海产的零件的工程名称
SQL>select J.JNAME from J where J.JNO in (select distinct SPJ.JNO from SPJ where SPJ.SNO in (select S.SNO from S where S.CITY='上海'));
---7.找出没有使用天津厂的零件的工程号码
SQL>select distinct SPJ.JNO from SPJ where SPJ.SNO in(select S.SNO from S where S.CITY!='天津')
---8.把全部红色零件的颜色改成蓝色
SQL>update P set P.COLOR='蓝'where P.COLOR='红';
--9.由S5供应J4的零件P6改成S3供应，请做必要的修改
SQL>select SPJ.JNO from SPJ where SPJ.SNO='S5';
SQL>select * from (select SPJ.JNO from SPJ where SPJ.SNO='S5') where JNO='J4';
SQL>select SPJ.PNO,SPJ.SNO from SPJ where SPJ.JNO in(select * from (select SPJ.JNO from SPJ where SPJ.SNO='S5') where JNO='J4') and SPJ.PNO='P6';
SQL>select SPJ.SNO from SPJ group by SPJ.SNO;
SQL>select SPJ.SNO from SPJ group by SPJ.SNO having SPJ.SNO='S5';
SQL>select SPJ.JNO from SPJ where SPJ.SNO=(select SPJ.SNO from SPJ group by SPJ.SNO having SPJ.SNO='S5');

---答案
SQL>select * from SPJ where SPJ.PNO='P6';
SQL>select * from (select * from SPJ where SPJ.PNO='P6') where JNO='J4';
SQL>select * from (select * from (select * from SPJ where SPJ.PNO='P6') where JNO='J4') where SNO='S5';
SQL>update (select * from (select * from (select * from SPJ where SPJ.PNO='P6') where JNO='J4') where SNO='S5') set SNO='S3';
----或者
SQL>update spj set sno='S3' where sno='S5' AND JNO='J4' AND PNO='P6';
---10.从供应商关系中删除S2的记录，并从供应情况关系中删除对应的记录
SQL>delete from SPJ where SPJ.SNO='S2';
SQL>delete from S where S.SNO='S2';

---请将(S2,J6,P4,200)插入供应情况关系
SQL>insert into SPJ values('S2','J6','P4',200);

---标准答案
--1
select sname,city from s;
--2
select pname,color,weight from p;
--3
select jno from spj where sno='s1';
--4
select p.pname,spj.qty from spj,p   where jno='j2' and p.pno=spj.pno;
--5
select pno from spj where sno in(select sno from s where city='上海');
--6
select jname from j where jno in (select jno from spj where sno in(select sno from s where city='上海'));
--7
select jno from j where jno not in (select jno from spj where city='天津');
--8
select * from p;
update p set color='蓝' where color='红';
select * from p;
--9
update spj set sno='s3' where sno='s5' and pno='p6' and jno='j4';
--10
select * from spj;
delete from s where sno='s2';
delete from spj where sno='s2';
select * from spj;
---------------------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------
----ORA-08002: 序列 INSTRUCTOR_ID_SEQ.CURRVAL 尚未在此会话中定义
ORA-8002 When Selecting CURRVAL From Sequence [ID 1019173.102]
--------------------------------------------------------------------------------
   Modified 09-SEP-2010     Type PROBLEM     Status PUBLISHED

Problem Description:
--------------------

You have created the following sequence:

    CREATE SEQUENCE some_sequence
       START WITH 1000;

Later, in your code, you try to access the current value of the sequence
using the CURRVAL pseudo column:

    SELECT some_sequence.CURRVAL
     from dual;

You get the following error:

    ORA-08002: sequence SOME_SEQUENCE.CURRVAL is not yet defined in this session

Solution Description:
---------------------

The NEXTVAL function acts as a sequence initializer. This can be misleading
since in our example when we create the sequence we START WITH 1000. This does
not however initialize the sequence. The first call to NEXTVAL initializes the
sequence to the START WITH value. (Note that it does NOT increment the value.)

See the output below for a complete example:

SQL> CREATE SEQUENCE some_sequence
     2 START WITH 1000;

Sequence created.

/* Use CURRVAL here before NEXTVAL and the error is thrown */
   SQL> SELECT some_sequence.CURRVAL "Value"
    2 FROM DUAL;
   FROM DUAL
        *
   ERROR at line 2:
   ORA-08002: sequence SOME_SEQUENCE.CURRVAL is not yet defined in this session

/* Now call NEXTVAL and initialize the sequence .. */
   SQL> SELECT some_sequence.NEXTVAL "Value"
     2 FROM DUAL;

      Value
   ---------
        1000

/* Now we have access to the current value CURRVAL */
   SQL> SELECT some_sequence.CURRVAL "Value"
     2 FROM DUAL;

      Value
   ---------
        1000

/* Now that the sequence has been initialized with the first call
   to NEXTVAL, the 2nd call to NEXTVAL increments as it should.. */

SQL> SELECT some_sequence.NEXTVAL "Value"
     2 FROM DUAL;

      Value
   ---------
        1001

SQL> SELECT some_sequence.CURRVAL "Value"
     2 FROM DUAL;

      Value
   ---------
        1001

Solution Explanation:
---------------------

Before you can access CURRVAL for a sequence, you must first initialize the
sequence with NEXTVAL.

References:
-----------

Oracle Server SQL Reference, Pseudocolumns CURRVAL and NEXTVAL.

Search Words:
-------------

ORA-8002
-------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------
---------------------------第四次作业
---创建两张表
SQL>create table employer(
    empno varchar2(20) primary key,
    empname varchar2(20) not null,
    empage numeric(3,0) not null check(empage>=16 and empage <=100),
    empjob varchar2(20) not null,
    empsalary numeric(9,2) not null check(empsalary>=0),
    empdeptno varchar2(20) not null,
    foreign key(empdeptno) references department(deptno)
    );
SQL>create table department(
    deptno varchar2(20) primary key,
    deptname varchar2(20) not null unique,
    deptmanager varchar2(20) not null,
    deptaddress varchar2(20) not null,
    deptphone varchar2(11) not null unique
    );
--------------------------------------------------------------------------------------------------
------------------
--------------创建用户
SQL>create user wangming with resource,connect;
SQL>create user liyong with resource,connect;
SQL>create user liuxing with resource,connect;
SQL>create user zhangxin with resource,connect;
SQL>create user zhouping with resource,connect;
SQL>create user yanglan with resource,connect;
--创建过程
SQL>create or replace procedure sp_pro21 is
    begin
      create user wangming with resource,connect;
      create user liyong with resource,connect;
      create user liuxing with resource,connect;
      create user zhangxin with resource,connect;
      create user zhouping with resource,connect;
      create user yanglan with resource,connect;
   end;
-----------------------------------------------------------------------------------------------
--a.用户王明对两张表有select权力
SQL>grant select on employer,department to wangming;
--b.用户李勇对两张表有insert和delete权力
SQL>grant insert,delete on employer,department to liyong;
--c.每个职工对自己的记录有select权力
SQL>grant select on employer where empname=user to public;
--d.用户刘星对职工表有select权力，对工资字段具有更新权力
SQL>grant select,update(empsalary) on employer to liuxing;
--e.用户张新具有修改这两张表的结构的权力
SQL>grant alter on employer,department to zhangxin;
--f.用户周平具有对两张表所有权利(读、插、改、删数据),并具有给其他用户授权的权力
SQL>grant all privileges on employer,department to zhouping with grant option;
--g.用户杨兰具有从每个部门职工中select最高工资，最低工资，平均工资的权力,他不能查看每个人的工资
SQL>create view deptsalary as select department.deptname,max(empsalary),min(empsalary),avg(empsalary) from employer,department where employer.empdeptno=department.deptno group by employer.empdeptno;
SQL>grant select on deptsalary to yanglan;

---撤销个用户所授予的权力
--a
SQL>revoke select on employer,department from wangming;
--b
SQL>revoke insert,delete on employer,department from liyong;
--c
SQL>revoke select on employer where empname=user from public;
--d
SQL>revoke select,update(empsalary) on employer from liuxing;
--e
SQL>revoke all privileges on employer,department from zhouping cascade;
--f
SQL>revoke select on deptsalary from yanglan;
SQL>drop view deptsalary;

------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------
--------------------------标准答案
--a 、用户王明对两个表有SELECT 权力。
SQL>GRANT SELECT ON 职工,部门 TO 王明
--b 、用户李勇对两个表有INSERT 和DELETE 权力。
SQL>GRANT INSERT,DELETE ON 职工,部门 TO 李勇
--c 、每个职工只对自己的记录有SELECT 权力。
SQL>GRANT SELECT ON 职工 WHEN USER()=NAME TO ALL;
--d 、用户刘星对职工表有SELECT 权力，对工资字段具有更新权力。
SQL>GRANT SELECT,UPDATE(工资) ON 职工 TO 刘星
--e 、用户张新具有修改这两个表的结构的权力。
SQL>GRANT ALTER TABLE ON 职工,部门 TO 张新;
--f 、用户周平具有对两个表所有权力（读，插，改，删数据），并具有给其他用户授权的权力。
SQL>GRANT ALL PRIVILIGES ON 职工,部门 TO 周平 WITH GRANT OPTION;
--g、用户杨兰具有从每个部门职工中SELECT 最高工资、最低工资、平均工资的权力，他不能查看每个人的工资。
SQL>CREATE VIEW 部门工资 AS SELECT 部门.名称,MAX(工资),MIN(工资),AVG(工资) FROM 职工,部门 WHERE 职工.部门号=部门.部门号 GROUP BY 职工.部门号 GRANT SELECT ON 部门工资 TO 杨兰;
--9 ．把习题8 中（1）---（7）的每一种情况，撤销各用户所授予的权力
--1
SQL>REVOKE SELECT ON 职工，部门 FROM 王明;
--2
SQL>REVOKE INSERT , DELETE ON 职工，部门 FROM 李勇;
--3
SQL>REOVKE SELECT ON 职工 WHEN USER ( ) =NAME FROM ALl;
--4
SQL>REVOKE SELECT , UPDATE ON 职工 FROM 刘星;
--5
SQL>REVOKE ALTER TABLE ON 职工,部门 FROM 张新;
--6
SQL>REVOKE ALL PRIVILIGES ON 职工,部门 FROM 周平;
--7
SQL>REVOKE SELECT ON 部门工资 FROM 杨兰;
SQL>DROP VIEW 部门工资;
-------------------------------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------
------------------5.4完整性约束命名子句
---例10
SQL>create table stu(
    sno numeric(6) constraint c1 check (sno between 90000 and 99999),
    sname varchar2(20) constraint c2 not null,
    sage numeric(3) constraint c3 check(sage<30),
    ssex char(2) constraint c4 check(ssex in ('男','女')),
    constraint studkey primary key (sno)
    );
---例11
SQL>create table teach(
    eno numeric(4) priamry key,
    ename varchar2(20),
    job varchar2(8),
    sal numeric(7,2),
    deduct numeric(7,2),
    deptno numeric(2),
    constraint empkey foreign key(deptno) references dept(deptno),
    constraint c1 check(sal+deduct>=30000)
    );

---
SQL>alter table stu drop constraint c1;
SQL>alter table stu add constraint c1 check(sno between 900000 and 999999999);
SQL>alter table stu drop constraint c3;
SQL alter table stu add constraint c3 check(sage<40);

---------5.6触发器
-----定义触发器
SQL>create trigger <触发器名>
    {before|after} <触发事件> on <表名>
    for each {row|statement}
      [when <触发条件>]
      <触发动作体>


SQL>create or replace trigger insert_or_uodate_sal
    before insert or update on teach
    for each row
      as
      begin
        if (new.job='教授')and (new.sal<4000) then
          new.sal:=4000;
        end if;
      end;
SQL>create or replace trigger insert_sal
    after insert teach
    for each row
      as
      begin
        insert into sal_log values(new.eno,new.sal,current_user,sysdate);
      end;

SQL>create or replace trigger uodate_sal
    after uodate on tach
    for each row
      as
      begin
        if new.sal<>old.sal) then
          insert into sal_log values(new.eno,new.sal,current_user,sysdate);
        end if;
    end;

--------------------------------------------------------------------------------------------
----------------------------------------------------------
----------------第5次作业
--假设有下面的关系模式：

-- 科室（科名，科地址，科电话）

-- 病房（病房号，床位号，科室名）

-- 医生（工作证号，姓名，职称，科室名，年龄）

-- 病人（病历号，姓名，性别，诊断，主管医生，病房号）

--其中，一个科室有多个病房、多个医生，一个病房只能属于一个科室，一个医生只属于一个科室，
--但可负责多个病人的诊治，一个病人的主管医生只有一个。使用SQL语言定义上面的关系模式，
--要求在模式中使用完整性约束命名子名完成以下完整性约束命名条件的定义：

--1）定义每个模式的主码；

--2）定义相关关系模式的实体完整性和参照完整性；

--3）定义病人的性别只能是”男”或”女”；

--4）定义医生的年龄只能在20到80岁之间；

--5）对病人表定义创建一个after行级触发器，当进行插入操作时未指定主管医生时，自动改为王医生。

-- 科室（科名，科地址，科电话）
SQL>create table 科室(
    科名 varchar2(20) primary key,
    科地址 varchar2(20) not null unique,
    科电话 varchar2(20) not null unique
    );

-- 病房（病房号，床位号，科室名）
SQL>create table 病房(
    病房号 varchar2(20) primary key,
    床位号 numeric(2) not null unique,
    科室名 varchar2(20) not null unique,
    constraint c11 foreign key(科室名) references 科室(科名)
    );

-- 医生（工作证号，姓名，职称，科室名，年龄）
SQL>create table 医生(
    工作证号 varchar2(20) primary key,
    姓名 varchar2(10) not null,
    职称 varchar2(10) not null,
    科室名 varchar2(20) not null,
    constraint c21 foreign key(科室名) references 科室(科名),
    年龄 numeric(3) check (年龄 between 20 and 80)
    );


-- 病人（病历号，姓名，性别，诊断，主管医生，病房号）
SQL>create table 病人(
    病历号 varchar2(20) primary key,
    姓名 varchar2(20) not null,
    性别 char(2) default '男' check (性别 in ('男','女')),
    诊断 varchar2(255) not null,
    主管医生 varchar2(10) not null,
    constraint c31 foreign key(主管医生) references 医生(姓名),
    病房号 varchar2(20) not null,
    constraint c41 foreign key(病房号) references 病房(病房号)
    );

--5）对病人表定义创建一个after行级触发器，当进行插入操作时未指定主管医生时，自动改为王医生。
SQL>create or replace trigger after_insert
    after insert on 病人
    for each row
      as
      begin
        if new.主管医生 is null then
          new.主管医生='王医生';
        end if;
      end;

猜你喜欢