使用instead of 触发器 往视图插入数据更新两个基表时失败!!求助~~

Question

基表如下:
/*
2. 创建Department(deptID,deptName)和UserInfo(userID, userName, sex, loginDate,deptid)
其中deptID,userID是自动增长的,并且是主键。deptid是外键。并且插入测试数据
*/
--创建序列
CREATE SEQUENCE seq_Dep
START WITH 1
INCREMENT BY 1
NOMAXVALUE
NOCYCLE
CACHE 30;
--建表Department
CREATE TABLE Department
(
deptID VARCHAR2(10) PRIMARY KEY,
deptName VARCHAR2(20)
);--插入测试数据
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'人事部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'技术部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'后勤部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'经理部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'销售部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'服务部');
INSERT INTO Department VALUES ('D'||seq_Dep.NEXTVAL,'公关部');
COMMIT;--创建序列
CREATE SEQUENCE seq_User
START WITH 1
INCREMENT BY 1
NOMAXVALUE
NOCYCLE
CACHE 30;
--建表UserInfo
CREATE TABLE UserInfo
(
userID VARCHAR2(10) PRIMARY KEY,
userName VARCHAR2(20),
sex VARCHAR2(2),
loginDate DATE,
deptid VARCHAR2(10) REFERENCES Department (deptID)
);--插入测试数据
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Eric Schmidt','男','12-9月-07','D1');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Larry Page','男','12-10月-07','D3');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Sergey Brin','男','12-11月-07','D5');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'W. M. Coughran, Jr.','男','1-12月-07','D4');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'David C. Drummond','女','12-12月-01','D2');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Alan Eustace','男','12-9月-07','D1');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Jeff Huber','男','12-10月-07','D3');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'George Reyes','男','12-11月-07','D5');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Elliot Schrage','男','1-12月-07','D4');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Tim Armstrong','女','12-12月-01','D2');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Nikesh Arora','女','12-12月-01','D2');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Sukhinder','男','12-9月-07','D1');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Vinton G. Cerf','男','12-10月-07','D3');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'George Reyes','男','12-11月-07','D5');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Dave Girouard','男','1-12月-07','D4');
INSERT INTO UserInfo VALUES ('U'||seq_User.NEXTVAL,'Singh Cassidy','女','12-12月-01','D2');
COMMIT;
--3. 在deptid建立索引
CREATE INDEX deptid_index on UserInfo(deptid);--4. 给Department和UserInfo创建同义词，名称分别是dept, sy_user
CREATE OR REPLACE SYNONYM dept FOR Department;
CREATE OR REPLACE SYNONYM sy_user FOR UserInfo;/*
5. 通过同义词dept, user来创建视图，
视图要求能查询出“部门名称，部门编号，用户名，性别，注册时间”
*/
CREATE OR REPLACE VIEW view_dept_user
("部门名称","部门编号","用户名","性别","注册时间")
 AS SELECT d.deptName,d.deptID,u.userName,u.sex,u.loginDate
  FROM dept d ,sy_user u 
  WHERE d.deptID=u.deptid;

Answer 1

以下是创建的触发器--14. 使用Instead Of触发器，往第5题创建的视图中插入数据。
SET SERVEROUTPUT ON;
INSERT INTO view_dept_user ('部门名称','部门编号','用户名','性别','注册时间')
 VALUES('仓储部','D6','Dejan Perkovic','男','1-1月-08');/*
CREATE OR REPLACE VIEW view_dept_user
("部门名称","部门编号","用户名","性别","注册时间")
 AS SELECT d.deptName,d.deptID,u.userName,u.sex,u.loginDate
  FROM dept d ,sy_user u 
  WHERE d.deptID=u.deptid;
*/
CREATE OR REPLACE TRIGGER dept_user_insert
INSTEAD OF INSERT ON view_dept_user
FOR EACH ROW
DECLARE
  CURSOR cur_dept IS SELECT *  FROM Department
    WHERE Department.deptID = :NEW.deptID;
  CURSOR cur_user IS SELECT * FROM sy_user
    WHERE sy_user.userName = :NEW.userName;
  d cur_dept%rowtype;
  u cur_user%rowtype;
  did dept.deptID%TYPE;
  uid sy_user.userID%TYPE;
BEGIN
  OPEN cur_dept;
  OPEN cur_user;
  FETCH cur_user INTO u;
  FETCH cur_dept INTO d;  
  /*
   如果插入的数据中部门ID不存在,则将 seq_Dep.NEXTVAL 产生的序号赋值给变量did,执行插入语句新增加一个部门。
  */
  IF cur_dept%NOTFOUND THEN
   did := 'D'||seq_Dep.NEXTVAL;
    INSERT INTO Department(deptID,deptName) VALUES(did,:NEW.deptName);
   /*
    如果插入数据中的员工不存在，则执行插入语句增加一个新员工
   */ 
    IF cur_user%NOTFOUND THEN
  uid := 'U'||seq_User.NEXTVAL;
    INSERT INTO UserInfo(userID,userName,sex,loginDate,deptid) VALUES(uid,:NEW.userName,:NEW.sex,:NEW.loginDate,did);
  END IF;
  
  IF cur_dept%FOUND THEN  
  /*
  如果插入的数据中部门ID是已经存在的部门ID,则更新部门名称
  */
    did:=:NEW.deptID;
   UPDATE Department SET Department.deptName WHERE Department.deptID = :NEW.deptID;
   /*
    如果插入数据中的员工不存在，则将seq_User.NEXTVAL 产生的序号赋值给变量uid,执行插入语句增加一个新员工
   */
   IF cur_user%NOTFOUND THEN
   uid := 'U'||seq_User.NEXTVAL;
   INSERT INTO UserInfo VALUES(uid,:NEW.userName,:NEW.sex,:NEW.loginDate,:NEW.deptID);
   ELSE
   /*
       如果插入数据中的员工已存在，则根据部门ID、员工姓名 来更新员工的其他字段的值，员工ID为主键，不用更新。
       考虑到同名员工存在的可能，但员工的ID不可能相同的特点，需要根据插入数据中的部门ID、员工姓名来查询出
   符合要求的员工的ID，用员工ID来进行后续的操作
   */
   SELECT userID INTO uid FROM UserInfo WHERE UserInfo.userName=:NEW.userName AND UserInfo.deptID=did;
  
   UPDATE UserInfo SET UserInfo.sex = :NEW.sex,UserInfo.loginDate = :NEW.loginDate,UserInfo.deptID = :NEW.sex 
   WHERE UserInfo.userID=uid AND UserInfo.userName=:NEW.userName;
   END IF;
  END IF;
  CLOSE ecur;
  CLOSE dcur;
END dept_user_insert;
/
show errors;

Answer 2

出现的错误提示:警告: 创建的触发器带有编译错误。SQL> show errors;
TRIGGER DEPT_USER_INSERT 出现错误:LINE/COL ERROR
-------- -----------------------------------------------------------------
3/31     PLS-00049: 错误的赋值变量 'NEW.DEPTID'
5/30     PLS-00049: 错误的赋值变量 'NEW.USERNAME'
20/56    PLS-00049: 错误的赋值变量 'NEW.DEPTNAME'
26/75    PLS-00049: 错误的赋值变量 'NEW.USERNAME'
26/89    PLS-00049: 错误的赋值变量 'NEW.SEX'
26/98    PLS-00049: 错误的赋值变量 'NEW.LOGINDATE'
33/10    PLS-00049: 错误的赋值变量 'NEW.DEPTID'
34/4     PL/SQL: SQL Statement ignored
34/46    PL/SQL: ORA-00927: 缺少等号
34/72    PLS-00049: 错误的赋值变量 'NEW.DEPTID'
40/37    PLS-00049: 错误的赋值变量 'NEW.USERNAME'LINE/COL ERROR
-------- -----------------------------------------------------------------
40/51    PLS-00049: 错误的赋值变量 'NEW.SEX'
40/60    PLS-00049: 错误的赋值变量 'NEW.LOGINDATE'
40/75    PLS-00049: 错误的赋值变量 'NEW.DEPTID'
47/66    PLS-00049: 错误的赋值变量 'NEW.USERNAME'
49/40    PLS-00049: 错误的赋值变量 'NEW.SEX'
49/70    PLS-00049: 错误的赋值变量 'NEW.LOGINDATE'
49/103   PLS-00049: 错误的赋值变量 'NEW.SEX'
50/53    PLS-00049: 错误的赋值变量 'NEW.USERNAME'
55/5     PLS-00103: 出现符号 "DEPT_USER_INSERT"在需要下列之一时：
         if哪位好心人帮看看,到底是错在哪里啊,谢谢啊