参考如下如何用SQL生成SQL批处理文件?  
软件环境: 
1、Windows NT4.0+ORACLE 8.0.4
2、ORACLE安装路径为:C:\ORANT问题提出: 
1、用户需要对数据库用户下的每一张表都执行一个相同的SQL操作,这时,一遍、一遍的键入SQL语句是很麻烦的实现方法: 
SQL> set heading off --禁止输出列标题
SQL> set feedback off --禁止显示最后一行的计数反馈信息列出当前用户下所有同义词的定义,可用来测试同义词的真实存在性
select 'desc '||tname from tab where tabtype='SYNONYM';查询当前用户下所有表的记录数
select 'select '''||tname||''',count(*) from '||tname||';' from tab where tabtype='TABLE';把所有符合条件的表的select权限授予为public
select 'grant select on '||table_name||' to public;' from user_tables where 《条件》;删除用户下各种对象
select 'drop '||tabtype||' '||tname from tab;删除符合条件用户
select 'drop user '||username||' cascade;' from all_users where user_id>25;快速编译所有视图 
----当在把数据库倒入到新的服务器上后(数据库重建),需要将视图重新编译一遍,
----因为该表空间视图到其它表空间的表的连接会出现问题,可以利用PL/SQL的语言特性,快速编译。 SQL> SPOOL ON.SQL
SQL> SELECT'ALTER VIEW '||TNAME||' COMPILE;' FROM TAB;
SQL> SPOOL OFF
然后执行ON.SQL即可。
SQL> @ON.SQL
当然,授权和创建同义词也可以快速进行,如:
SQL> SELECT 'GRANT SELECT ON '||TNAME||' TO 用户名;' FROM TAB;
SQL> SELECT 'CREATE SYNONYM '||TNAME||' FOR 用户名.'||TNAME||';' FROM TAB;
 

解决方案 »

  1.   

    in delphi:
    vl_month=formatedatetime(now(),'yyyymm");
    cds.close;
    cds.commandtext:='select * from '+vl_month+' where ...';
    cds.open;
    ...
    I do not try it;if you want to use pl/sql,you can use store procedure,that will be easy.
      

  2.   

    select * from &a
    a是一变量。每次执行输入
      

  3.   

    使用动态SQL,至于如何用DBMS_SQL包获取得到的结果,自己查随机文档吧,好久没写了,记不清了.DECLARE
      v_str      VARCHAR2(2000); 
      v_CurID         INT;
      v_Ret           INT;
    begin
          v_str := 'select * from '+vl_month;
          v_CurID := DBMS_SQL.OPEN_CURSOR;
          DBMS_SQL.PARSE(v_CurID, v_str, DBMS_SQL.V7);
          v_Ret := DBMS_SQL.EXECUTE(v_CurID);
          DBMS_SQL.CLOSE_CURSOR(v_CurID);
    end;
    /
      

  4.   

    sql="select * from   a_" & 变量名
      

  5.   

    用动态Sql语句,在Oracle8i中:
    create or replace procedure myproc 
    (tablename IN varchar2)
    as
    declare 
        v_tmp varchar2(2000);
    begin
        v_tmp:='select * from a_'||tablename ;
        execute immediate :v_tmp;
    end;
    /
      

  6.   

    支持楼上的观点。
    动态SQL是个比较简单的办法!
    哈哈!
    用程序实现自咱更简单,但是受到一定的局限!
      

  7.   

    存储过程非常不错,支持zhangshunshi(宇轩)兄
      

  8.   

    zhangshunshi(宇轩)兄如何看到结果呢?