PLSQL - 私は次のクエリを実行していますSELECT

Question

に建設された実行クエリ：

SELECT 
'ALTER TABLE '||TABLE_NAME||' MODIFY ' || COLUMN_NAME || ' VARCHAR2('||DATA_LENGTH||' CHAR);' 
FROM 
    USER_TAB_COLUMNS 
WHERE 
    DATA_TYPE LIKE '%CHAR%' 
AND TABLE_NAME NOT LIKE '%VIEW' 
ORDER BY 
    TABLE_NAME, 
    COLUMN_NAME; 

出力は、それ自体であるが、私は「USER_TAB_COLUMNS」から選択テーブルを変更するために照会します。以下のような ：

ALTER TABLE ADM_FILTER_ELEMENT_REF_T MODIFY ELMNT_REF_CONTEXT VARCHAR2(1020 CHAR); 

私はこの出力をキャッチし、クエリを実行する方法を知っていただきたいと思いますか？ クエリは、バッチファイルから呼び出される.sqlスクリプトで実行されるように設計されています。

お知らせください。

Answer 1

クエリの結果を無名ブロックでループし、execute immediateを使用して実行することができます。このような

何か：

begin 
    for q in (SELECT 
       'ALTER TABLE '||TABLE_NAME||' MODIFY (' || COLUMN_NAME || ' VARCHAR2('||DATA_LENGTH||'));' query 
       FROM 
        USER_TAB_COLUMNS 
       WHERE 
        DATA_TYPE LIKE '%CHAR%' 
       AND TABLE_NAME NOT LIKE '%VIEW' 
       ORDER BY 
        TABLE_NAME, 
        COLUMN_NAME 
       ) LOOP 
     execute immediate q.query; 
    end loop; 
end; 
/