TYPE XSCUR IS REF CURSOR;
PROCEDURE SEARCH(CUR OUT XSCUR) IS
BEGIN
OPEN CUR FOR 'select ...';
END