5.1.txt

来自「delphi renyuanguanlixinxioxitong」· 文本 代码 · 共 11 行

DECLARE
  v_ename varchar2(20);
BEGIN
  SELECT employeename INTO v_ename FROM employee WHERE employeeno=&no;
  dbms_output.put_line('雇员名：'||v_ename);
EXCEPTION
  WHEN no_data_found THEN
    dbms_output.put_line('请输入正确的雇员号！');
END;
/