5.7.txt

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

DECLARE
  v_job VARCHAR2(10);
  v_sal NUMBER(6,2);
BEGIN
  SELECT postno,sal into v_job,v_sal 
  FROM employee WHERE employeeno=&&no;
  IF v_job='001' THEN
    UPDATE employee SET sal=v_sal+200 WHERE employeeno=&no;
  ELSIF v_job='002' THEN
    UPDATE employee SET sal=v_sal+100 WHERE employeeno=&no;
  ELSE
    UPDATE employee SET sal=v_sal+50 WHERE employeeno=&no;
  END IF;
END;