中国IT动力,最新最全的IT技术教程
最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像
首 页 | 程序开发 | 操作系统 | 软件应用 | 图形图象 | 网络应用 | 精文荟萃 | 教育认证 | 硬件维护 | 未整理篇 | 站长教程
ASP JS PHP工程 ASP.NET 网站建设 UML J2EESUN .NET VC VB VFP 网络维护 数据库 DB2 SQL2000 Oracle Mysql
服务器 Win2000 Office C DreamWeaver FireWorks Flash PhotoShop 上网宝典 CorelDraw 协议大全 网络安全 微软认证
硬件维护  CPU  主板  硬盘  内存  显卡  显示器  键盘鼠标  声卡音箱  打印机  机箱电源  BIOS  网卡  C#  Java  Delphi  vs.net2005
  当前位置:> 程序开发 > 数据库开发 > Oracle
菜鸟学Oracle - 用PL/SQL画直方图
作者:佚名 时间:2007-06-19 16:10 出处:ccidnet.com 责编:月夜寒箫
              摘要:菜鸟学Oracle - 用PL/SQL画直方图
现在用的库里有一个MV是统计按小时的访问量的,数据如下代码:

SQL> select * from mv_time_stat;



    TIME     CNT

---------- ----------

      0     187

      1       51

      2       34

      3       19

      4       19

      5       20

      6       50

      7     107

      8     682

      9     1342

    10     1854

    11     1292

    12     1416

    13     1180

    14     1217

    15     1573

    16     1785

    17     1469

    18     1892

    19     1907

    20     1602

    21     1540

    22     1013

    23     441



24 rows selected.



--------------------------------------------------------------------------------




  某年月日,突发奇想,打算在sqlplus下面按上面的数据画个直方图出来,首先写了个竖列的(因为好写):


代码:--------------------------------------------------------------------------------
SQL> COL Time FORMAT A7
SQL> SELECT LPAD(DECODE(TIME,TO_CHAR(SYSDATE,'HH24'),'NOW: '||TO_CHAR(TIME),TO_CHAR(TIME)),7,' ') AS "Time",
2 SUBSTR('|'||LPAD('> '||CNT,CEIL(CNT/A.TOTAL*300)+LENGTH(TO_CHAR(CNT))+1,'-'),1,35) AS "   Count per hour"
3 FROM MV_TIME_STAT,(SELECT SUM(CNT) AS TOTAL FROM MV_TIME_STAT) A;
COL Time CLEAR

Time     Count per hour
------- -----------------------------------------------------------------
    0 |--> 187
    1 |> 51
    2 |> 34
    3 |> 19
    4 |> 19
    5 |> 20
    6 |> 50
    7 |-> 107
NOW: 8 |---------> 682
    9 |-----------------> 1342
  10 |------------------------> 1854
  11 |-----------------> 1292
  12 |------------------> 1416
  13 |---------------> 1180
  14 |----------------> 1217
  15 |--------------------> 1573
  16 |-----------------------> 1785
  17 |-------------------> 1469
  18 |-------------------------> 1892
  19 |-------------------------> 1907
  20 |---------------------> 1602
  21 |--------------------> 1540
  22 |-------------> 1013
  23 |-----> 441

24 rows selected.--------------------------------------------------------------------------------


  然后又想,怎么样把它横过来,到网上查资料,又突击学习了下分析函数,写了一个过程是这个样子的:


代码:--------------------------------------------------------------------------------
CREATE OR REPLACE PROCEDURE HISTOGRAPH(HEIGHT NUMBER DEFAULT 15) AS
MAX_ONE NUMBER;
STR_LINE VARCHAR(120);
STR_TEMP VARCHAR(120);
I NUMBER;
BEGIN
DBMS_OUTPUT.PUT_LINE(LPAD('^',14,' '));
SELECT MAX(CNT) INTO MAX_ONE FROM MV_TIME_STAT;
FOR I IN 1 .. HEIGHT+1 LOOP
  STR_LINE:=LPAD(TO_CHAR(MAX_ONE-(I-1)*MAX_ONE/HEIGHT,'99999')||'-'||TO_CHAR(MAX_ONE-(I-2)*MAX_ONE/HEIGHT,'99999')||'|',14,'0');
  SELECT MAX(SYS_CONNECT_BY_PATH(
    DECODE(SIGN(CNT-MAX_ONE+(I-1)*MAX_ONE/HEIGHT),-1,
    DECODE(SIGN(CNT-MAX_ONE+(I-2)*MAX_ONE/HEIGHT),-1,'^','*'),
    '|'),
  ' ')) INTO STR_TEMP
  FROM MV_TIME_STAT
  START WITH TIME=0
  CONNECT BY PRIOR TIME=TIME-1;
  STR_LINE:=STR_LINE||STR_TEMP;
  DBMS_OUTPUT.PUT_LINE(REPLACE (STR_LINE,'^',' '));
END LOOP;
SELECT MAX(SYS_CONNECT_BY_PATH(TO_CHAR(TIME,'00'),'^')) INTO STR_TEMP
FROM MV_TIME_STAT
START WITH TIME=0
CONNECT BY PRIOR TIME=TIME-1;
DBMS_OUTPUT.PUT_LINE(LPAD('0',14,' ')||LPAD('>',LENGTH(REPLACE(STR_TEMP,' '))+3,'-'));
DBMS_OUTPUT.PUT_LINE(REPLACE(LPAD('^',14,' ')||REPLACE(STR_TEMP,' '),'^',' '));
END;
/  

Procedure created.

SQL> exec histograph;
        ^
1907- 2034|                                       |
1780- 1907|                     |           |   | |
1653- 1780|                     |           |   | |
1526- 1653|                     |         | |   | | | |
1398- 1526|                     |   |     | | | | | | |
1271- 1398|                   | | | |     | | | | | | |
1144- 1271|                   | | | | | | | | | | | | |
1017- 1144|                   | | | | | | | | | | | | |
  890- 1017|                   | | | | | | | | | | | | | |
  763-   890|                   | | | | | | | | | | | | | |
  636-   763|                 | | | | | | | | | | | | | | |
  509-   636|                 | | | | | | | | | | | | | | |
  381-   509|                 | | | | | | | | | | | | | | | |
  254-   381|                 | | | | | | | | | | | | | | | |
  127-   254| |               | | | | | | | | | | | | | | | |
  0-   127| | | | | | | | | | | | | | | | | | | | | | | | |
        0-------------------------------------------------------------------------->
          00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23

PL/SQL procedure successfully completed.--------------------------------------------------------------------------------

关闭本页
 
首页 | 投资与合作 | 服务条款 | 隐私政策 | 收藏本站 | 设为首页 | 新用户注册 | 免责声明 | 使用帮助
Copyright ©2005-2008 chinaitpower.com All rights reserved. www.chinaitpower.com 版权所有