6.3.8.txt

来自「PowerBuilder数据库开发自学教程 课本源代码 最初由于作者的倏忽」· 文本 代码 · 共 14 行

DECLARE Emp_cur CURSOR FOR
SELECT employee.emp_number, employee.emp_name
FROM employee
WHERE employee.emp_salary > :Sal_var ;

OPEN Emp_cur;

int		Emp_num
string	Emp_name
FETCH Emp_cur INTO :Emp_num, :Emp_name ;

CLOSE CursorName;

CLOSE Emp_cursor;