oracle练习03

declare
v_deptname department.部门名称%type;
no_deptname exception;
pragma exception_init(no_deptname,-20005);
begin
dbms_output.put_line('请输入部门名称: ');
v_deptname:='&x';
if v_deptname not in ('开发部','市场部','工业部') then
raise no_deptname;
else
dbms_output.put_line('你输入的部门名称:  '||v_deptname||', 数据库有！');
end if;
exception
when no_deptname then
dbms_output.put_line('你输入的部门名称不存在！');
dbms_output.put_line(sqlcode||sqlerrm);
end;
 

SQL> declare
  2  v_deptname department.部门名称%type;
  3  no_deptname exception;
  4  pragma exception_init(no_deptname,-20005);
  5  begin
  6  dbms_output.put_line('请输入部门名称: ');
  7  v_deptname:='&x';
  8  if v_deptname not in ('开发部','市场部','工业部') then
  9  raise no_deptname;
 10  else
 11  dbms_output.put_line('你输入的部门名称:  '||v_deptname||', 数据库有！');
 12  end if;
 13  exception
 14  when no_deptname then
 15  dbms_output.put_line('你输入的部门名称不存在！');
 16  dbms_output.put_line(sqlcode||sqlerrm);
 17  end;
 18  /
输入 x 的值:   工业部
原值    7: v_deptname:='&x';
新值    7: v_deptname:=' 工业部';
请输入部门名称:
你输入的部门名称不存在！
-20005ORA-20005:

PL/SQL 过程已成功完成。

SQL>