BGEIN
~~~~~BEGIN??
sSQL := 'SELECT * FROM MST_PRODUCT';
OPEN cCUR for sSQL;
IF cCUR%NOTFOUND  THEN
DBMS_OUTPUT.PUT_LINE('HAVE DATA!');
END IF;
END PRC_SEARCH;
end PKG_SEARCH;

解决方案 »

  1.   

    create or replace package PKG_SEARCH is
        TYPE c_REFCUR IS REF CURSOR;    PROCEDURE PRC_SEARCH;end PKG_SEARCH;create or replace package body PKG_SEARCH is
        PROCEDURE PRC_SEARCH IS
            sSQL  VARCHAR2(200);
            cCUR  c_REFCUR;
        BEGIN
                sSQL := 'SELECT * FROM MST_PRODUCT';
                OPEN cCUR for sSQL;
                IF cCUR%NOTFOUND  THEN
                    DBMS_OUTPUT.PUT_LINE('HAVE DATA!');
                END IF;
        END PRC_SEARCH;
    end PKG_SEARCH;