ORACLE存储过程动态创建视图

浏览： ℃

字体：大中小

发布时间：2013-12-12 14:51:02

来源：

create or replace procedure "CREAR_PF_VIEW" is
pragma AUTONOMOUS_TRANSACTION;
cursor cur is --定义游标
SELECT SPBLX FROM YDS_SHBPDY;
sqlstr varchar2(32767);
sql_ls varchar2(32767);
uid varchar2(32767);
begin
open cur;
fetch cur
into uid;
sqlstr := 'create or replace view V_PF as select * from (select distinct XMBH as XMBH From YDS_SHPB ) X1 ';
while cur%found
loop
sql_ls := ' left join (select B.XMBH as '|| uid || '_BH,B.JBRYJ as '|| uid || '_YJ,B.JBR1 as '|| uid ||
'_QZ, B.JBRQ1 as '|| uid || '_RQ from YDS_SHBPDY A,YDS_SHPB B where A.SPBLX = B.SPBLX and A.SPBLX ='''|| uid|| '''
) '|| uid|| ' on X1.XMBH = '|| uid|| '.'|| uid || '_BH';
sqlstr := sqlstr || sql_ls;
-- dbms_output.put_line(sql_ls);
---执行拼接字符串
-- execute immediate sqlstr;
fetch cur
into uid;
end loop;
close cur;
--dbms_output.enable(100000000);
--dbms_output.put_line(sqlstr);
execute immediate sqlstr;
commit;
end;

>更多相关文章