首页 > 编程语言 > 详细

按某些字段排序数据

时间:2015-07-20 18:25:04      阅读:146      评论:0      收藏:0      [点我收藏+]
CREATE OR REPLACE PROCEDURE Campaignprize_hash( ServerNum number, RETVAL OUT VARCHAR2) IS
RNum number(6);
SIndex number(2);
hashcodd VARCHAR2(8);
flag number(2);
begin
    SIndex:=0;
DECLARE CURSOR c1 IS
      select campaignprizeid,CAMPAIGNID,PRIZETYPEID from mkt_campaignprize where issend=0 order by campaignprizeid asc;
  BEGIN
      FOR r1 IN c1 LOOP
        if SIndex=ServerNum then
          SIndex:=0;
         end if;
          select count(1) into flag from mkt_RangeNum t where t.serverindex=SIndex and t.campaignid=r1.CAMPAIGNID and t.prizetypeid=r1.PRIZETYPEID and rownum<=1;
          if flag>0 then
               select t.RangeNum into RNum from mkt_RangeNum t where t.serverindex=SIndex and t.campaignid=r1.CAMPAIGNID and t.prizetypeid=r1.PRIZETYPEID;
               RNum:=RNum+1;
               update mkt_RangeNum t set t.RangeNum=RNum where  t.serverindex=SIndex and t.campaignid=r1.campaignid and t.prizetypeid=r1.prizetypeid;
            else
              RNum:=0;
              insert into mkt_RangeNum values(SIndex,r1.CAMPAIGNID,r1.PRIZETYPEID,RNum);
            end if;
              hashcodd:=lpad(SIndex,2,‘0‘)||lpad(RNum,6,‘0‘);
              update mkt_campaignprize mc set mc.hashcode=hashcodd where mc.campaignprizeid=r1.campaignprizeid;
            SIndex:=SIndex+1;
         END LOOP;
  END;
  COMMIT;
  RETVAL := ‘1‘;
    Exception
     When others then
       RETVAL :=‘E‘||SUBSTR(SQLERRM, 1, 600);
end Campaignprize_hash;
create  global temporary table mkt_RangeNum   
(ServerIndex number(2),   
CampaignID number(19),   
PrizeTypeID number(19),
RangeNum number(6)) on Commit delete Rows 

 

按某些字段排序数据

原文:http://www.cnblogs.com/linbl/p/4661852.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!