用视图能昄��单行��过255个字�W�的例子

dsy — Thu, 11 Sep 2008 01:53:00 GMT

/*
说明:
     在调试sql脚本�Ӟ��如果要用Dbms_Output.Put_Line昄��脚本中的变量�Q�如果变量中的内容单行长度   �?br />     ��过�?55个字�W�，会提�C�Z��面错误：
     ORA-20000: ORU-10028: line length overflow, limit of 255 chars per line
     所以我们可以用下面的已�l�创建好的包和视图来实现。   �?br />
     ��单点说就是也可以创徏一个表�Q�其中一个字�D��ؓlong�Q�将变量插入后再用select��L��看。上面方式省略了创徏表的�q�程。   �?br /> */
-- �W�一步   �?/span>
create or replace package my_output
as
      procedure put( s in varchar2 );
      procedure put_line( s in varchar2 );
      procedure new_line;

      function get_line( n in number ) return varchar2 ;
     pragma restrict_references( get_line, wnds, rnds );

      function get_line_count return number ;
     pragma restrict_references( get_line_count, wnds, rnds, wnps );

     pragma restrict_references( my_output, wnds, rnds, wnps, rnps );
end ;

-- �W�二步     �?/span>
create or replace package body my_output
as
     type Array is table of varchar2 ( 4000 ) index by binary_integer;
     g_data        array;
     g_cnt         number default 1 ;

      procedure put( s in varchar2 )
      is
      begin
          if ( g_data.last is not null ) then
             g_data(g_data.last) : = g_data(g_data.last) || s;
          else
             g_data( 1 ) : = s;
          end if ;
      end ;

      procedure put_line( s in varchar2 )
      is
      begin
         put( s );
         g_data(g_data.last + 1 ) : = null ;
      end ;

      procedure new_line
      is
      begin
         put( null );
         g_data(g_data.last + 1 ) : = null ;
      end ;

      function get_line( n in number ) return varchar2
      is
         l_str varchar2 ( 4000 ) default g_data(n);
      begin
         g_data. delete (n);
          return l_str;
      end ;

      function get_line_count return number
      is
      begin
          return g_data. count + 1 ;
      end ;

end ;

-- �W�三步   �?/span>
create or replace view my_output_view
as
select rownum lineno , my_output.get_line( rownum ) text
    from all_objects
   where rownum < ( select my_output.get_line_count from dual );

-- ---------------------------------------------------------------
-- 实现
-- 1 写入要查看的内容
declare
  QuerySql varchar2 ( 4000 );
begin
  Dbms_Output.enable( 4000 );
  QuerySql   : = ' IIDD AS ID, IsDel AS 已删�? AnJianID AS 案�g�~�号, BaoGaoRenXM AS 报案人姓�? JieBaoRenXM AS 接报人姓�? JieBaoShiJian AS 接报旉��, BM_MingCheng AS 办案单位名称  From XZ_ShouLiDengJi a WHERE  (exists (Select '' S '' from GG_AnJianBanLi  where AnJianID=a.AnJianID) and not exists (Select '' S '' From GG_AnJian Where AnJianID=a.AnJianID and HuiBiRenYuan_BH like '' %admin% '' )) ORDER BY AddDateTime DESC ' ;
  Dbms_Output.Put_Line( ' LENGTH : ' || Length(QuerySql));
  my_output.put_line(QuerySql);
end ;
-- 2 查看�l�果
select * from my_output_view

dsy 2008-09-11 09:53 发表评论

Oracle10g__安装手记(头一��?

dsy — Thu, 11 Sep 2008 01:19:00 GMT

发表日期:2007-06-27

头一�ơ安装oracle10g,�q�真是有点头�?
           1.��M��出现�|�络配置需�?未通过错误!所�q�第二次安装没在出现�q�个问题
1.在DOS下运行片刻进入ORACLE 10G安装
             安装�Ҏ��界面在这里你要指定自��q��安装�Ҏ��
             ORACLE提供了两�U�安装方法：基本安装�Q�I�Q�和高��安装�Q�A�Q?br />                      ORACLE默认的�ؓ基本安装。选择相应的安装方法后�Q�下一步�?br />2.�q�入产品特定先决条�g的检查界面：
           在这里要��查安装ORACLE所需的操作系�l�需求、物理内存需求、网�l�配�|�需求等�{��?br />          ��查后的结果就在该界面下边的下拉框中。可能个别的��查结果会��p�|�Q�但不会影响安装�?不明白这里�ؓ什么会发生
                  �q?�U�情�?
3.选择数据库配�|�即选择你要创徏的数据库�c�d��Q�（一般用途、事务处理、数据仓库、高�U�）�?br />4.指定数据库配�|�选项�Q�数据库命名�Q�全局数据库名和系�l�标�C�符SID、数据库字符集、数据库�C�Z��是否创徏带样本的数据
          库）�?br />-------------------------看了�?别�h的�ȝ��,自己留下的一点心�?以留备用

dsy 2008-09-11 09:19 发表评论

亚洲三级一区,91在线网址,99精品国产热久久91蜜凸

用视图能昄���单行���过255个字�W�的例子

Oracle10g__安装手记(头一��?

用视图能昄��单行��过255个字�W�的例子