5.52.txt

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

DECLARE
 emp_record employee%ROWTYPE;
 sql_stat VARCHAR2(100);
begin
 sql_stat:='SELECT * FROM employee WHERE employeeno=:eno';
 EXECUTE IMMEDIATE sql_stat INTO emp_record USING &1;
 dbms_output.put_line('雇员：'||emp_record.employeename||'的工资为：'||emp_record.sal);
END;
/