转蝲�Q�oracle中的函数

xnabx — Thu, 23 Mar 2006 14:38:00 GMT

摘要: 转蝲�Q�oracle中的函数 Oracle已经内徏了许多函敎ͼ�不同的函数有不同的作用和用法�Q�有的函数只能作用在一个记录行上，有的能够作用在多个记录行上，不同的函数可能处理不同的数据�c�d��。常见的有两�c�，单行函数和分�l�函�?�? 单行函数�Q? ... 阅读全文

xnabx 2006-03-23 22:38 发表评论

xnabx — Tue, 14 Mar 2006 08:10:00 GMT

日志报表查询

最�q�在做一个流水表的报表查询，做下��结�?/SPAN>

一般情况下对于数据量比较大的流水日志，都是按月隔接存储的，所以在生成跨月甚至是跨�q�报表的时候，需要做�Ҏ(gu��)��的处理。以下记录我的处理方式，供参考�?/SPAN>

思�\�Q?/SPAN>

1�?SPAN style="FONT: 7pt 'Times New Roman'"> 生成临时表：查询出的数据都放在该临时表�?/SPAN>

2�?SPAN style="FONT: 7pt 'Times New Roman'"> 按月查询�Q�将查询条�g中的开始时间到�l�束旉��之间的数据按月依�ơ查询�?/SPAN>

3�?SPAN style="FONT: 7pt 'Times New Roman'"> 查询�Q?/SPAN>(Oracle数据�?/SPAN>)

参数定义�Q?/SPAN>Start_Date 开始时�?/SPAN>

End_Date �l�束旉��

Tmp_Date 当前旉��

Tmp_Data 临时数据�?/SPAN>

Month_TBName 月表�?BR>

Tmp_Date = Start_Date

While Tmp_Date < End_Date Loop

Month_TBName = tuunc(Tmp_Date,’month�?

Tmp_Date = Add_Months(Tmp_Data,1) 注：下次查询��Z��月表数据

If Tmp_Date > End_Date

查询Month_TBName月表中日�?/SPAN>Between Start_Date And End_Date的数据，攑օ�Tmp_Data�?/SPAN>

Else

查询Month_TBName全月表数据，攑օ�Tmp_Data�?BR>

End Loop

  3�?存储�q�程
    --SP�l�计
    procedure xp_SPStat(areacode    varchar2,
                        songId      varchar2,
                        dateStart   varchar2,
                        dateEnd     varchar2,
                        spID        varchar2,
                        page        number, --之前昄��的页�?BR>                        pageSize    number, --��大��?BR>                        pageAction varchar2, --��页命��o�Q�first、last、next、pre
                        total       out number, --记录��L��
                        currentPage out number, --当前��늠�
                        totalPage   out number, --总页�?BR>                        ret         out number, --操作�l�果
                        rec_rc      out ret_record --�l�果�?BR>                        ) is
        tablename varchar2(100);
        sqlstr    varchar2(256) := '';
        num_start number; --个数下限
        num_end   number; --个数上限
        sqlstry varchar2(256) := '';
    begin
        if isStatOverSpaned(dateStart, dateEnd) then
            --旉��范围�q�大
            ret := ret_err_overspan;
            return;
        end if;
        if statTempTable(areacode,songId,spID,dateStart, dateEnd, tablename) = false then
            ret := ret_err_tmptable;
            return;
        end if;
        --获取��L��
        select count(*)
          into total
          from (select t.song_id, count(*) as statCount
                  from tsongdeallogtemp t

                 group by t.song_id);
        --��页处理
        pageTurn(page, pageSize, total, pageAction, currentPage, totalPage);
        num_start := (currentPage - 1) * pagesize + 1;
        num_end   := currentPage * pagesize;

        --获取数据�?BR>        open rec_rc for
            select *
              from (select c. *, rownum rn
                      from (select a.statcount,
                           (select count(a.statcount) from (select count(*) as statcount
                                      from tsongdeallogtemp t)
                           ) FSTATCOUNT, b. *
                              from (select t.song_id, count(*) as statcount
                                      from tsongdeallogtemp t

                                     group by t.song_id) a,
                                   tSong b
                             where a.song_id = b.song_id
                             order by a.statcount desc) c)
             where rn between num_start and num_end;
        ret := ret_ok;

    exception
        when others then
            sqlstry :=sqlerrm;
            ret := ret_Failed;
    end;

   --sp�l�计临时表操�?/FONT>
   function statTempTable(vareacode varchar2,
                           vsongId    varchar2,
                           vspID      varchar2,
                           vdateStart varchar2,
                           vdateEnd   varchar2,
                           pTabName out varchar2) return boolean is
        ret       boolean := false;
        tmp_date date := to_date(vdateStart, 'YYYY-MM-DD');
        v_dateS   date := to_date(vdateStart, 'YYYY-MM-DD');
        v_dateE   date := to_date(vdateEnd, 'YYYY-MM-DD');
        tmpCount number := 0;
        iCount    number := 0;
        tablename varchar2(100);
        sqlstr    varchar2(516);
        tempSql   varchar2(100);
    begin
        --获取临时表名
        tablename := getSongDealTabName(1);
        pTabName := tablename;
        sqlstr    := 'delete from ' || tablename;
        execute immediate sqlstr;

        --往临时表中写入数据
        while tmp_date <= to_date(vdateEnd ||'23:59:59', 'YYYY-MM-DD HH24:MI:SS') loop
            tablename := 'TSONGDEALLOG' ||
                         to_char(trunc(tmp_date, 'month'), 'YYYYMM');
            select count(*)
              into iCount
              from tab t
             where t.tname = tablename;
            if iCount <= 0 then
                return ret;
            end if;
            tmp_date := add_months(tmp_date, 1);
            tmpCount := tmpCount + 1;

            if vsongId is not null then
              tempSql:=' t.song_id='''||vsongId||''' ';
            else
              tempSql:=' t.song_id like '''||vspID||'%'' ';
            end if;


            if tmp_date >= to_date(vdateEnd||'23:59:59', 'YYYY-MM-DD HH24:MI:SS') then

                sqlstr := 'insert into tsongdeallogtemp ( select * from ' ||
                          tablename || ' t where '|| tempSql ||
                          ' and t.PHONE_CODE like '''||vareacode||'%'''||
                          ' and t.add_time   between '||
                          'to_date('''||vdateStart|| ' 00:00:00'',''yyyy-mm-dd HH24:MI:SS'') and ' ||
                          'to_date('''||vdateEnd|| ' 23:59:59'',''yyyy-mm-dd HH24:MI:SS''))';
                execute immediate sqlstr ;
            else
                sqlstr := 'insert into tsongdeallogtemp select * from ' ||
                          tablename || ' t where '|| tempSql ||
                          ' and t.PHONE_CODE like '''||vareacode||'%''';
                execute immediate sqlstr ;
            end if;

        end loop;
        commit;
        return true;
    exception
        when others then
        sqlstr:=sqlerrm;
            return false;
            rollback;
    end;

xnabx 2006-03-14 16:10 发表评论

国产国拍亚洲精品mv在线观看,不卡一卡二卡三亚洲,亚洲亚洲人成综合网络

转蝲�Q�oracle中的函数

日志报表查询