首页 > 代码库 > ORACLE查询语句

ORACLE查询语句

2024-08-31 22:39:52   220人阅读

--建表FAMILYINF

CREATE  TABLE  FAMILYINFO(
     FNO NUMBER CONSTRAINT FC001 PRIMARY KEY,--把字段fno约束为主键
     FNAME VARCHAR2(20) CONSTRAINT FC002 NOT NULL,--把字段FNAME的约束条件设为“不能为空”
     SEX VARCHAR2(20) DEFAULT ‘MALE‘CONSTRAINT FC003 CHECK(SEX IN(‘MALE‘,‘FEMALE‘)),--把字段’SEX‘的约束条件设为’性别默认条件下为’MALE‘，如果自己填写只能填写’MALE‘或’FEMALE‘
     FAGE NUMBER,
     REL VARCHAR2(20),--家庭成员关系字段
     HOBITNO NUMBER CONSTRAINT FC004 REFERENCES HOBITINFO(HNO) ON DELETE SET NULL --约束条件设为，表’HOBITINFO‘中字段’HNo‘的外键，删除引用表中字段时，设为空值
   
);
--建兴趣表HOBITINF
CREATE TABLE HOBITINFO(
    HNO NUMBER CONSTRAINT HC001 PRIMARY KEY,   --将‘ HNO’设为主键
    HNAME VARCHAR2(20) CONSTRAINT HC002 NOT NULL--将‘HNAME’约束条件设为‘不能为空’
);
--删除表HOBITINFO
DROP TABLE HOBITINFO;
--添加信息
INSERT INTO HOBITINFO VALUES(1,‘MOVIE‘);
INSERT INTO HOBITINFO VALUES(2,‘CG‘);
INSERT INTO HOBITINFO VALUES(3,‘TW‘);
SELECT * FROM HOBITINFO;
DELETE FROM HOBITINFO WHERE HNO=3;
 
SELECT * FROM FAMILYINFO;
TRUNCATE TABLE FAMILYINFO;
DROP TABLE FAMILYINFO;
INSERT INTO FAMILYINFO VALUES(1,‘PHL‘,‘NAN‘,27,‘FATHER‘);
INSERT INTO FAMILYINFO VALUES(2,‘HYQ‘,‘NAN‘,48,‘MATHER‘);
INSERT INTO FAMILYINFO VALUES(3,‘PQ‘,‘NAN‘,27,‘BROTHER‘);
INSERT INTO FAMILYINFO VALUES(4,‘PC‘,‘NAN‘,20,‘MIN‘);
 
--DDL ALTER TABLE (修改表)
ALTER TABLE FAMILYINFO RENAME TO PCFAMILY;--将FAMILYINFO的表名重命名为PCFAMILY
ALTER TABLE PCFAMILY ADD(--添加列即字段及其属性
    HEIGH VARCHAR2(5)，
    SX VARCHAR2(10) CONSTRAINT PC002 NOT NULL--字段SX创建“不能为空”的约束条件
);
ALTER TABLE PCFAMILY MODIFY(--修改字段的属性
    HEIGH CHAR(20)
);
ALTER TABLE PCFAMILY DROP COLUMN HEIGH;--删除字段HEIGH
ALTER TABLE PCFAMILY RENAME COLUMN SX TO SX1;--修改约束字段名
ALTER TABLE PCFAMILY DROP COLUMN SX1;--删除约束字段
--DDL 之 DROP TABLE(删除表)
DROP TABLE HOBITINFO CASCADE CONSTRAINTS;
--DDL 之 TRUNCATE TABLE 清空表记录
TRUNCATE TABLE PCFAMILY;
 
 
--DML 之 INSERT(插入，添加记录）
 
INSERT INTO PCFAMILY(FNO,SEX,FNAME,FAGE) VALUES(4,‘NANE‘,‘LIU‘||‘DAYE‘,45+20);--如果指定插入字段顺序，则values里的信息就要对照前面指定的字段填写
INSERT INTO PCFAMILY VALUES();
 
 
--学生表
CREATE TABLE STUDENT(
    SNO NUMBER CONSTRAINT SC001 PRIMARY KEY,
    SNAME VARCHAR2(10) CONSTRAINT SC002 NOT NULL,
    SSEX VARCHAR(10) CONSTRAINT S003 CHECK(SSEX IN (‘M‘,‘F‘))
 
);
--老师表
CREATE TABLE TEACHER(
     TNO NUMBER CONSTRAINT TC001 PRIMARY KEY,
     TNAME VARCHAR2(10) CONSTRAINT TC002 NOT NULL
 
);
--课程表
CREATE TABLE COURSE(
     CNO NUMBER CONSTRAINT CC001 PRIMARY KEY,
     CNAME VARCHAR2(20) CONSTRAINT CC002 NOT NULL,
     TNO NUMBER CONSTRAINT CC003 REFERENCES TEACHER(TNO)
     
);
--成绩表
CREATE TABLE SCORE(
     SNO NUMBER CONSTRAINT SSC001 REFERENCES STUDENT(SNO),
     CNO NUMBER CONSTRAINT SSC002 REFERENCES COURSE(CNO),
     GRADE VARCHAR2(20),
     CONSTRAINT SSC003 PRIMARY KEY(SNO,CNO)
   
);
--查询表是否建立成功已经存在
SELECT * FROM STUDENT;
SELECT * FROM TEACHER;
SELECT * FROM COURSE;
SELECT * FROM SCORE;
--删除表
DROP TABLE STUDENT;
DROP TABLE TEACHER;
DROP TABLE COURSE;
DROP TABLE SCORE;
--向表里添加信息
INSERT INTO STUDENT VALUES(1,‘aaaa‘,‘M‘);
INSERT INTO STUDENT VALUES(2,‘bbbb‘,‘M‘);
INSERT INTO STUDENT VALUES(3,‘cccc‘,‘F‘);
 
INSERT INTO TEACHER VALUES(1,‘AAAA‘);
INSERT INTO TEACHER VALUES(2,‘BBBB‘);
INSERT INTO TEACHER VALUES(3,‘CCCC‘);
 
INSERT INTO COURSE VALUES(1,‘yw‘,2);
INSERT INTO COURSE VALUES(2,‘sx‘,3);
INSERT INTO COURSE VALUES(3,‘yy‘,2);
 
INSERT INTO SCORE VALUES(1,2,89);
INSERT INTO SCORE VALUES(2,3,120);
INSERT INTO SCORE VALUES(3,1,110);
 
--DML 之UPDATE
UPDATE SCORE SET GRADE=GRADE-1;
UPDATE SCORE SET GRADE=GRADE+1 WHERE SNO=2;
UPDATE SCORE SET GRADE=GRADE+1 WHERE SNO=2 AND CNO=3;
 
--------------------------------------------------------------------------------------------
-- DQL 之 SELECT
SELECT CHR(107) HAHA FROM DUAL;
SELECT CURRENT_DATE FROM DUAL;
SELECT TRUNC(ABS(MONTHS_BETWEEN(DATE‘1998-08-08‘,CURRENT_DATE)/12)) AGE FROM DUAL; 
 
SELECT SNO AS 学号, SNAME 学生姓名 FROM STUDENT;
SELECT ALL SSEX FROM STUDENT;
SELECT DISTINCT SSEX FROM STUDENT;
SELECT UNIQUE SSEX FROM STUDENT;
SELECT * FROM SCORE WHERE GRADE < 60;
SELECT ROWID,ROWNUM,STUDENT.* FROM STUDENT;
SELECT * FROM STUDENT WHERE ROWNUM = 1;
SELECT * FROM STUDENT WHERE ROWNUM <= 2;
SELECT * FROM (SELECT ROWNUM AS RN,STUDENT.* FROM STUDENT) WHERE RN = 2;
SELECT CNO,AVG(GRADE) FROM SCORE GROUP BY CNO;
SELECT CNO,AVG(GRADE) FROM SCORE GROUP BY CNO HAVING AVG(GRADE) > 80;
SELECT SSEX,COUNT(SNO) FROM STUDENT GROUP BY SSEX;
 
SELECT SNO FROM SCORE WHERE CNO = ‘C001‘ AND GRADE = (SELECT MAX(GRADE) FROM SCORE WHERE CNO = ‘C001‘);
SELECT SNO FROM SCORE WHERE CNO = ‘C001‘ AND GRADE >= ALL(SELECT GRADE FROM SCORE WHERE CNO = ‘C001‘);
SELECT * FROM SCORE ORDER BY CNO ASC,GRADE DESC;
SELECT * FROM STUDENT,SCORE WHERE STUDENT.SNO = SCORE.SNO;
SELECT SNAME FROM STUDENT,SCORE
WHERE STUDENT.SNO = SCORE.SNO AND CNO = ‘C001‘ AND GRADE = (SELECT MAX(GRADE) FROM SCORE WHERE CNO = ‘C001‘);
SELECT * FROM STUDENT INNER JOIN SCORE ON STUDENT.SNO = SCORE.SNO;
SELECT * FROM STUDENT INNER JOIN SCORE USING(SNO);
SELECT * FROM STUDENT CROSS JOIN SCORE WHERE STUDENT.SNO = SCORE.SNO;
SELECT * FROM STUDENT NATURAL INNER JOIN SCORE;
SELECT * FROM STUDENT LEFT OUTER JOIN SCORE ON STUDENT.SNO = SCORE.SNO;
SELECT * FROM STUDENT RIGHT OUTER JOIN SCORE USING(SNO);
SELECT * FROM STUDENT FULL OUTER JOIN SCORE USING(SNO);
 
-- 查询考试不及格的学生姓名和挂科的科目名称
SELECT SNAME,CNAME
FROM (SCORE LEFT JOIN STUDENT USING(SNO))
     LEFT JOIN COURSE USING(CNO)
WHERE GRADE < 60;
 
-- 查询所有java考试成绩高于平均分的学生的姓名和成绩
SELECT SNAME,GRADE
FROM (SCORE LEFT JOIN STUDENT USING(SNO))
     LEFT JOIN COURSE USING(CNO)
WHERE CNAME = ‘JAVA‘
AND GRADE > (
    SELECT AVG(GRADE) FROM SCORE LEFT JOIN COURSE USING(CNO)
    WHERE CNAME = ‘JAVA‘
);
 
 
select * from (SELECT  *  from   test   RIGHT   JOIN   t_grade  using(ID) )  a  where `数学` > 90
 
 
-- 查询同时参加了C001和C002科目考试的学生编号
SELECT SNO FROM
(SELECT SNO,CNO FROM SCORE WHERE CNO = ‘C001‘)
INNER JOIN
(SELECT SNO,CNO FROM SCORE WHERE CNO = ‘C002‘)
USING(SNO);
 
-- 查询lili同学参加的所有科目考试中成绩最高的那门科目的授课老师名字
SELECT TNAME,CNAME FROM
TEACHER LEFT JOIN COURSE USING(TNO)
WHERE CNO IN (
      SELECT CNO FROM
      SCORE LEFT JOIN STUDENT USING(SNO)
      WHERE SNAME = ‘LILI‘
      AND GRADE = ( SELECT MAX(GRADE) FROM
                    SCORE LEFT JOIN STUDENT USING(SNO)
                    WHERE SNAME = ‘LILI‘
      )
);
 
-- 查询库存目前还有多少
CREATE TABLE CLOTHER_STORE(
    CTYPE VARCHAR2(10),
    STORENUM NUMBER
);
 
CREATE TABLE CLOTHER_SALE(
    CTYPE VARCHAR2(10),
    SALENUM NUMBER
);
INSERT INTO CLOTHER_STORE VALUES(‘T-SHIRT‘,600);
INSERT INTO CLOTHER_STORE VALUES(‘COAT‘,700);
INSERT INTO CLOTHER_SALE VALUES(‘T-SHIRT‘,140);
INSERT INTO CLOTHER_SALE VALUES(‘T-SHIRT‘,165);
INSERT INTO CLOTHER_SALE VALUES(‘COAT‘,90);
INSERT INTO CLOTHER_SALE VALUES(‘COAT‘,78);
 
SELECT CTYPE,STORENUM-SNUM AS KCSY FROM
CLOTHER_STORE LEFT JOIN
(SELECT CTYPE,SUM(SALENUM) SNUM FROM CLOTHER_SALE GROUP BY CTYPE)
USING(CTYPE);
 
-- 切换到scott用户
SELECT * FROM EMP;
SELECT * FROM DEPT;
 
--1． 列出至少有一个员工的所有部门。
SELECT DISTINCT DEPTNO,DNAME FROM
EMP LEFT JOIN DEPT USING(DEPTNO);
 
--2． 列出薪金比"SMITH"多的所有员工。
SELECT * FROM EMP WHERE SAL > (SELECT SAL FROM EMP WHERE ENAME = ‘SMITH‘);
 
--3． 列出所有员工的姓名及其直接上级的姓名。
SELECT E.ENAME 员工姓名,B.ENAME 上级姓名 FROM
EMP E LEFT JOIN EMP B ON E.MGR = B.EMPNO;
 
--4． 列出受雇日期早于其直接上级的所有员工。
SELECT E.ENAME 员工姓名,E.HIREDATE 员工受雇日期,B.ENAME 上级姓名,B.HIREDATE 上级受雇日期
FROM EMP E LEFT JOIN EMP B ON E.MGR = B.EMPNO
WHERE E.HIREDATE < B.HIREDATE;
 
--5． 列出部门名称和这些部门的员工信息，同时列出那些没有员工的部门。
SELECT DNAME,EMP.* FROM EMP RIGHT JOIN DEPT ON EMP.DEPTNO = DEPT.DEPTNO;
 
--6． 列出所有"CLERK"（办事员）的姓名及其部门名称。
SELECT ENAME,DNAME FROM EMP LEFT JOIN DEPT USING(DEPTNO) WHERE JOB = ‘CLERK‘;
 
--7． 列出最低薪金大于1500的各种工作。
SELECT JOB FROM EMP GROUP BY JOB HAVING MIN(SAL) > 1500;
 
--8． 列出在部门"SALES"（销售部）工作的员工的姓名，假定不知道销售部的部门编号。
SELECT ENAME FROM EMP LEFT JOIN DEPT USING(DEPTNO) WHERE DNAME = ‘SALES‘;
 
--9． 列出薪金高于公司平均薪金的所有员工。
SELECT * FROM EMP WHERE SAL > (SELECT AVG(SAL) FROM EMP);
 
--10．列出与"SCOTT"从事相同工作的所有员工。
SELECT * FROM EMP WHERE JOB = (SELECT JOB FROM EMP WHERE ENAME = ‘SCOTT‘) AND ENAME <> ‘SCOTT‘;
 
--11．列出薪金等于部门30中员工的薪金的所有员工的姓名和薪金。
SELECT ENAME,SAL FROM EMP WHERE SAL = ANY(SELECT SAL FROM EMP WHERE DEPTNO = 30) AND DEPTNO <> 30;
 
--12．列出薪金高于在部门30工作的所有员工的薪金的员工姓名和薪金。
SELECT ENAME,SAL FROM EMP WHERE SAL > ALL(SELECT SAL FROM EMP WHERE DEPTNO = 30) AND DEPTNO <> 30;
 
--13．列出在每个部门工作的员工数量、平均工资和平均服务期限。
SELECT DEPTNO,COUNT(EMPNO) 员工数量,ROUND(AVG(SAL),2) 平均工资,
       ROUND(AVG(MONTHS_BETWEEN(CURRENT_DATE,HIREDATE))/12,2) 平均服务年限
FROM EMP RIGHT JOIN DEPT USING(DEPTNO)
GROUP BY DEPTNO;
 
--14．列出所有员工的姓名、部门名称和工资。
SELECT ENAME,DNAME,SAL FROM EMP LEFT JOIN DEPT USING(DEPTNO);
 
--15．列出所有部门的详细信息和部门人数。
SELECT DEPT.DEPTNO,DNAME,LOC,COUNT(EMPNO) FROM
DEPT LEFT JOIN EMP ON EMP.DEPTNO = DEPT.DEPTNO
GROUP BY DEPT.DEPTNO,DNAME,LOC;
 
--16．列出各种工作的最低工资。
SELECT JOB,MIN(SAL) FROM EMP GROUP BY JOB;
 
--17．列出各个部门的MANAGER（经理）的最低薪金。
SELECT MIN(SAL) FROM EMP WHERE JOB = ‘MANAGER‘;
 
--18．列出所有员工的年工资,按年薪从低到高排序。
SELECT ENAME,SAL*12+NVL(COMM,0) 年薪 FROM EMP ORDER BY 年薪;
 
--19．列出经理人的名字。
SELECT ENAME FROM EMP WHERE JOB = ‘MANAGER‘ OR JOB = ‘PRESIDENT‘;
 
--20．不用组函数，求出薪水的最大值。
SELECT SAL FROM (SELECT SAL FROM EMP ORDER BY SAL DESC) WHERE ROWNUM = 1;
 
--21．列出薪资第2高到第8高的员工。
SELECT SAL FROM(
SELECT ROWNUM RN,SAL FROM
(SELECT SAL FROM EMP ORDER BY SAL DESC))
WHERE RN >= 2 AND RN <= 8;
 
-- 切换回普通用户
-- union, INTERSECT,MINUS
CREATE TABLE A1 (
    V1 NUMBER,
    V2 VARCHAR2(10)
);
CREATE TABLE A2 (
    V3 NUMBER,
    V4 VARCHAR2(10),
    V5 VARCHAR2(10)
);
 
INSERT INTO A1 VALUES(10,‘A001‘);
INSERT INTO A1 VALUES(11,‘A002‘);
INSERT INTO A2 VALUES(10,‘A001‘,‘HAHA‘);
INSERT INTO A2 VALUES(12,‘A003‘,‘HEIHEI‘);
INSERT INTO A2 VALUES(13,‘A004‘,‘HOHO‘);
 
SELECT * FROM A1 UNION (SELECT V3，V4 FROM A2);
SELECT * FROM A1 UNION ALL (SELECT V3，V4 FROM A2);
SELECT * FROM A1 INTERSECT (SELECT V3，V4 FROM A2);
SELECT * FROM A1 MINUS (SELECT V3，V4 FROM A2);
 
-- 带锁查询
UPDATE CLOTHER_STORE SET STORENUM = 600 WHERE CTYPE = ‘T-SHIRT‘;
SELECT * FROM CLOTHER_STORE FOR UPDATE WAIT 5;
UPDATE CLOTHER_STORE SET STORENUM = STORENUM - 400 WHERE CTYPE = ‘T-SHIRT‘;
 
-- DCL 之 COMMIT
SELECT * FROM STUDENT;
DELETE FROM STUDENT WHERE SNO = ‘S011‘;
COMMIT;
 
-- DCL 之 ROLLBACK 和 SAVEPOINT
SELECT * FROM CLOTHER_SALE;
UPDATE CLOTHER_SALE SET SALENUM = SALENUM + 10;
ROLLBACK;
 
UPDATE CLOTHER_SALE SET SALENUM = SALENUM + 10;
SAVEPOINT CPD;
UPDATE CLOTHER_SALE SET SALENUM = SALENUM + 10;
ROLLBACK TO SAVEPOINT CPD;
 
-- DCL 之 GRANT
GRANT CREATE VIEW TO LUYY124;
GRANT UPDATE ANY TABLE TO LUYY124;
 
-- DDL 之 REVOKE
REVOKE CREATE VIEW FROM LUYY124;
 
-- CREATE VIEW
CREATE OR REPLACE VIEW STUDENT_VIEW AS
SELECT * FROM (STUDENT LEFT JOIN SCORE USING(SNO)) LEFT JOIN COURSE USING(CNO);
 
SELECT * FROM STUDENT_VIEW;
SELECT SNAME,CNAME FROM STUDENT_VIEW WHERE GRADE < 60;
SELECT * FROM SCORE;
UPDATE SCORE SET GRADE = GRADE + 1 WHERE SNO = ‘S001‘ AND CNO = ‘C001‘;
CREATE OR REPLACE VIEW STUDENT_VIEW AS SELECT * FROM SCORE;
UPDATE STUDENT_VIEW SET GRADE = GRADE - 1 WHERE SNO = ‘S001‘ AND CNO = ‘C001‘;
 
-- CREATE INDEX
CREATE INDEX SNAME_INDEX ON STUDENT(SNAME ASC) ;
SELECT * FROM STUDENT WHERE SNAME = ‘LILI‘;
DROP INDEX SNAME_INDEX;
 
-- PLSQL
-- 匿名块
SELECT * FROM STUDENT;
 
DECLARE
    V_SNO VARCHAR2(4) := ‘S011‘;
    V_SNAME VARCHAR(20) := ‘FANGYUQIN‘;
    V_SSEX VARCHAR2(1) := ‘F‘;
BEGIN
    INSERT INTO STUDENT VALUES(V_SNO, V_SNAME, V_SSEX);
    DBMS_OUTPUT.put_line(‘插入成功‘);
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END;
 
DECLARE
    V_SNO VARCHAR2(4) := ‘S012‘;
    V_SNAME VARCHAR2(20);
BEGIN
    SELECT SNAME INTO V_SNAME FROM STUDENT WHERE SNO = V_SNO;
    DBMS_OUTPUT.put_line(V_SNAME);
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END;
 
-- 练习：
CREATE TABLE FAKEDATA(
       SNO VARCHAR2(4),
       SNAME VARCHAR2(10)
);
SELECT * FROM FAKEDATA;
 
DECLARE
    SNO_PREFIX VARCHAR2(1) := ‘S‘;
    SNAME_PREFIX VARCHAR2(4) := ‘LUYY‘;
    SUFIX VARCHAR2(3);
    I NUMBER;
BEGIN
    FOR I IN 1..100
    LOOP
        IF I < 10 THEN
           SUFIX := ‘00‘ || I;
        ELSIF I < 100 THEN
           SUFIX := ‘0‘ || I;
        ELSE
           SUFIX := ‘‘ || I;
        END IF;
        INSERT INTO FAKEDATA VALUES(SNO_PREFIX || SUFIX, SNAME_PREFIX || SUFIX);
    END LOOP;
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END;
 
-- 记录类型 RECORD
DECLARE
    TYPE STUDENTRECORD IS RECORD(
         V_SNO STUDENT.SNO%TYPE,
         V_SNAME STUDENT.SNAME%TYPE,
         V_SSEX STUDENT.SSEX%TYPE
    );
    SR STUDENTRECORD;
BEGIN
    SELECT * INTO SR FROM STUDENT WHERE SNO = ‘S010‘;
    DBMS_OUTPUT.put_line(SR.V_SNO||‘: ‘||SR.V_SNAME);
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END;
 
DECLARE
    SR STUDENT%ROWTYPE;
BEGIN
    SELECT * INTO SR FROM STUDENT WHERE SNO = ‘S010‘;
    DBMS_OUTPUT.put_line(SR.SNO||‘: ‘||SR.SNAME);
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END;
 
-- 带名块
-- PROCEDURE
CREATE OR REPLACE PROCEDURE P1(
    V_SNO IN VARCHAR2,
    V_SNAME OUT VARCHAR2
)
IS
BEGIN
    SELECT SNAME INTO V_SNAME FROM STUDENT WHERE SNO = V_SNO;
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.put_line(SQLERRM);
END P1;
 
DECLARE
    V1 VARCHAR2(4) := ‘S003‘;
    V2 VARCHAR2(20);
BEGIN
    P1(V1,V2);
    DBMS_OUTPUT.put_line(V2);
END;
 
DROP PROCEDURE P1;
 
-- FUNCTION
CREATE OR REPLACE FUNCTION F1(
    V_CNAME IN VARCHAR2
)
RETURN VARCHAR2
IS
    V_TNAME VARCHAR2(20);
BEGIN
    SELECT TNAME INTO V_TNAME FROM COURSE LEFT JOIN TEACHER USING(TNO) WHERE CNAME = V_CNAME;
    RETURN V_TNAME;
END F1;
 
DECLARE
    V1 VARCHAR2(10) := ‘JAVA‘;
    V2 VARCHAR2(20);
BEGIN
    V2 := F1(V1);
    DBMS_OUTPUT.put_line(V2);
END;
 
SELECT F1(‘RJZL‘) FROM DUAL;
 
DROP FUNCTION F1;
 
-- 游标 CURSOR
DECLARE
    CURSOR MYCURSOR(V_SNO VARCHAR2) IS
           SELECT * FROM SCORE WHERE SNO = V_SNO;
    SR SCORE%ROWTYPE;
BEGIN
    IF MYCURSOR%ISOPEN = FALSE THEN
       OPEN MYCURSOR(‘S002‘);
    END IF;
    LOOP
        FETCH MYCURSOR INTO SR;
        EXIT WHEN MYCURSOR%NOTFOUND;
        DBMS_OUTPUT.put_line(SR.CNO||‘: ‘||SR.GRADE);
    END LOOP;
    DBMS_OUTPUT.put_line(‘共计‘||MYCURSOR%ROWCOUNT||‘条记录‘);
    CLOSE MYCURSOR;
END;
 
-- 触发器 TRIGGER
CREATE TABLE MEMBERINFO(
       MID VARCHAR2(4) CONSTRAINT MC001 PRIMARY KEY,
       QCOIN NUMBER(10)
);
 
CREATE TABLE RECHARGE(
       RNO VARCHAR2(4) CONSTRAINT RC001 PRIMARY KEY,
       MID VARCHAR2(4) CONSTRAINT RC002 REFERENCES MEMBERINFO(MID),
       REQCOIN NUMBER(10)
);
 
CREATE TABLE CONSUME(
       CNO VARCHAR2(4) CONSTRAINT CC001 PRIMARY KEY,
       MID VARCHAR2(4) CONSTRAINT CC002 REFERENCES MEMBERINFO(MID),
       CQCOIN NUMBER(10)
);
 
INSERT INTO MEMBERINFO VALUES(‘M001‘,400);
INSERT INTO MEMBERINFO VALUES(‘M002‘,700);
INSERT INTO MEMBERINFO VALUES(‘M003‘,1400);
 
SELECT * FROM MEMBERINFO;
SELECT * FROM RECHARGE;
SELECT * FROM CONSUME;
 
CREATE OR REPLACE TRIGGER RECHARGE_INSERT
AFTER INSERT
ON RECHARGE
FOR EACH ROW
BEGIN
    UPDATE MEMBERINFO SET QCOIN = QCOIN + :NEW.REQCOIN WHERE MID = :NEW.MID;
END RECHARGE_INSERT;
 
CREATE OR REPLACE TRIGGER CONSUME_INSERT
BEFORE INSERT
ON CONSUME
FOR EACH ROW
DECLARE
    V_QCOIN NUMBER(10);
BEGIN
    SELECT QCOIN INTO V_QCOIN FROM MEMBERINFO WHERE MID = :NEW.MID;
    IF V_QCOIN >= :NEW.CQCOIN THEN
       UPDATE MEMBERINFO SET QCOIN = QCOIN - :NEW.CQCOIN WHERE MID = :NEW.MID;
    ELSE
       RAISE_APPLICATION_ERROR(-20001,‘余额不足‘);
    END IF;
END CONSUME_INSERT;
 
INSERT INTO RECHARGE VALUES(‘R001‘,‘M002‘,500);
INSERT INTO CONSUME VALUES(‘C002‘,‘M002‘,200);
INSERT INTO CONSUME VALUES(‘C003‘,‘M003‘,2000);
 

ORACLE查询语句


联系
我们