oracle之cursor小例子

-- Created on 2014/3/10 by EX_ZHANGKENAN
declare
-- Local variables here
v_name VARCHAR2(50);
v_len INTEGER;
CURSOR cursor_name IS SELECT role_name INTO v_name FROM t_role WHERE role_id IN (SELECT role_id FROM T_USER_ROLE WHERE user_id = '2' ) ;
begin
-- Test statements here
FOR current_name IN cursor_name LOOP
v_name := v_name||current_name.ROLE_NAME||',';
END LOOP;
SELECT length(v_name) INTO v_len FROM dual;
SELECT substr(v_name,1,v_len-1) INTO v_name FROM dual;

end;