select語句的pl/sql顯示結果

Question

Set ServerOutput on size 100000; 
declare 
countTab number := 0; 
countCol number := 0; 
currDate varchar2(30); 
scale number := 0; 


Begin 

select count(*) into countCol from USER_TAB_COLUMNS where TABLE_NAME = 'EVAPP_INTERFACE' and COLUMN_NAME = 'TARGET_AMNT_LTV_NUM' and DATA_SCALE is null; 
IF (countCol <> 0) then 

DBMS_OUTPUT.put_line(' EVAPP_INTERFACE.TARGET_AMNT_LTV_NUM values begin'); 
execute immediate 'select APPSEQNO, TARGET_AMNT_LTV_NUM from evapp_interface where TARGET_AMNT_LTV_NUM > 999999999999'; 

END IF; 
END; 
\ 

我試圖顯示select查詢的結果。我試圖按照原樣運行select語句，但它提供了一個例外，說它找不到提到的列。所以，我試着把列名稱放在列的前面，它抱怨我需要使用INTO，我也使用它，但它仍然不喜歡語法。

Answer 1

假設你正在使用SQL * Plus，最簡單的方法可能是如果你想顯示從PL/SQL結果做類似的東西

Set ServerOutput on size 100000; 
variable rc refcursor; 
declare 
    countTab number := 0; 
    countCol number := 0; 
    currDate varchar2(30); 
    scale number := 0; 
Begin 
    select count(*) 
    into countCol 
    from USER_TAB_COLUMNS 
    where TABLE_NAME = 'EVAPP_INTERFACE' 
    and COLUMN_NAME = 'TARGET_AMNT_LTV_NUM' 
    and DATA_SCALE is null; 
    IF (countCol <> 0) then 
    DBMS_OUTPUT.put_line(' EVAPP_INTERFACE.TARGET_AMNT_LTV_NUM values begin'); 
    open :rc 
    FOR 'select APPSEQNO, TARGET_AMNT_LTV_NUM ' || 
     ' from evapp_interface ' || 
     ' where TARGET_AMNT_LTV_NUM > 999999999999'; 
    END IF; 
END; 
/

PRINT rc; 

，你需要打開遊標，取結果導入局部變量，然後用局部變量做一些事情，比如將它們寫入DBMS_OUTPUT。