如何访问游标中的数据项？？？菜鸟

[goodhy]

由于游标是根据输入参数传入的sql语句利用open..for ..语句动态产生的，所以在访问游标中的数据
就存在问题：因为产生游标的sql语句是变化的，因此游标中的数据项也是变化的，那么怎么样写菜能够访问游标中的数据项，而不用理会sql语句的变化。

[ORARichard]

好象不太可能，帮你UP吧。

楼主这个问题和ATGC的那个存储过程是连起来的吧。我觉得还是通过临时表的方法比较好

[CodeMagic]

CREATE PACKAGE cv_types AS
TYPE LibCurTyp IS REF CURSOR;
...
END cv_types;

CREATE PROCEDURE find_item (title VARCHAR2(100),lib_cv IN OUT cv_types.LibCurTyp) AS
code BINARY_INTEGER;
BEGIN
SELECT item_code FROM titles INTO code WHERE item_title = title;
IF code = 1 THEN
OPEN lib_cv FOR SELECT * FROM books WHERE book_title = title;
ELSIF code = 2 THEN
OPEN lib_cv FOR SELECT * FROM periodicals WHERE periodical_title = title;
ELSIF code = 3 THEN
OPEN lib_cv FOR SELECT * FROM tapes WHERE tape_title = title;
END IF;
END find_item;

DECLARE
lib_cv cv_types.LibCurTyp;
book_rec books%ROWTYPE;
periodical_rec periodicals%ROWTYPE;
tape_rec tapes%ROWTYPE;
BEGIN
get_title(:title); -- title is a host variable
find_item(:title, lib_cv);
FETCH lib_cv INTO book_rec;
display_book(book_rec);
EXCEPTION
WHEN ROWTYPE_MISMATCH THEN
BEGIN
FETCH lib_cv INTO periodical_rec;
display_periodical(periodical_rec);
EXCEPTION
WHEN ROWTYPE_MISMATCH THEN
FETCH lib_cv INTO tape_rec;
display_tape(tape_rec);
END;
END;