這個是你需要的:
如何用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.   

    谢谢 jiezhi(浪子).不过 spool xxx就生成了外部的文件,对吗? 我不想有中间文件产生.至于grant..., create synonym暂时还不要,只要能把现有的所有表"desc"一下就行了.
      

  2.   

    谢谢jiezhi(浪子).不过spool on.sql就生成了中间文件了.我只要把
      select object_name from user_objects 
       where object_type = 'TABLE'
       order by object_name;
    得到的表名都"desc"一下就行了.至于grant 和create synonym则暂时还用不着.
      

  3.   

    spool c:\on.sql
    select 'desc '||object_name||';' from user_objects 
       where object_type = 'TABLE'
       order by object_name;
    spool off;@c:\on.sql
      

  4.   

    谢谢bzszp(SongZip).还是不要有on.sql为好,能不能放在内存变量(临时变量)中,然后用execute immediate做?我是在UNIX(Solaris)下运行,生成的临时文件还要去删掉,再加上是用cron做...
      

  5.   

    如果没有中间文件的话,同时表又很多的话,desc 表后你怎么能看的清记得住呢?
      

  6.   

    好问题!
    我是用SecureCRT做, 结果只要显示在屏幕上,搜索一下就行了. 再说表并不是太多.
      

  7.   

    不需要中间文件,可以实现吗?coobee关注中.....