Oracle行转列+排序

--1.删除临时表
drop table biz_bus_station_direct_0711;
--2.将站点数据等放入临时表
create table biz_bus_station_direct_0711 as
select ls.line_no line_no,
       bb.line_name line_name,
       t1.line_direct line_direct,
       s.station_id station_id,
       s.station_name station_name,
       t.point_num point_num_now,
       s.location_x x_now,
       s.location_y y_now,
       t1.point_num point_num_last,
       t1.point_x x_last,
       t1.point_y y_last,
       s.location_x - t1.point_x x_value,
       s.location_y - t1.point_y y_value,
       0 direction,
       0 rn
  from biz_bus_station s
  join biz_bus_line_station ls
    on ls.station_id = s.station_id
  left join biz_bus_line bb on ls.line_no=bb.line_no
  left join biz_bus_line_distance t
    on t.station_id = s.station_id
   and t.line_no = ls.line_no
  left join biz_bus_line_distance t1
    on t1.line_no = t.line_no
   and t1.point_num + 1 = t.point_num
   and t.line_direct = t1.line_direct;
/*select ls.line_no line_no,
       s.station_id station_id,
       s.station_name station_name,
       t.point_num point_num_now,
       s.location_x x_now,
       s.location_y y_now,
       t1.point_num point_num_last,
       t1.point_x x_last,
       t1.point_y y_last,
       s.location_x - t1.point_x x_value,
       s.location_y - t1.point_y y_value,
       0 direction,
       0 rn
  from biz_bus_station s
  join biz_bus_line_station ls
    on ls.station_id = s.station_id
  left join biz_bus_line_distance t
    on t.station_id = s.station_id
   and t.line_no = ls.line_no
  left join biz_bus_line_distance t1
    on t1.line_no = t.line_no
   and t1.point_num + 1 = t.point_num
   and t.line_direct = t1.line_direct;*/
 --where s.station_name=‘安徽工程大学-2‘
 --order by ls.line_no, t.point_num;
--3.新增途径站点字段
ALTER TABLE biz_bus_station_direct_0711 ADD Station_DIRECT CLOB; 

--4.创建相关索引
create index idx_bus_station_line_no on biz_bus_station_direct_0711(line_no,station_id);
--5.给行号赋值
begin
  for t2 in (select t1.line_no,t1.station_id,rank() over(partition by replace(replace(t1.station_name,‘-1‘,‘‘),‘-2‘,‘‘) order by t1.line_no,t1.station_id) rn from biz_bus_station_direct_0711 t1) loop
    update biz_bus_station_direct_0711 t
    set t.rn=t2.rn
    where t.line_no=t2.line_no
    and t.station_id=t2.station_id;
    commit;
  end loop;
end;
--6.根据行号，逐行取值，赋方向值
/*cosθ=向量a.向量b/|向量a|×|向量b|
=(x1x2+y1y2)/[√(x12+y12)*√(x22+y22)]
夹角小于180度，则cosθ大于0，表示当前计算的车辆与RN=1的车辆方向一致
*/
begin
  for t2 in (select replace(replace(t1.station_name,‘-1‘,‘‘),‘-2‘,‘‘) station_name,t1.x_value,t1.y_value,t1.rn from biz_bus_station_direct_0711 t1 where t1.rn=1) loop
    update biz_bus_station_direct_0711 t
    set t.direction=case when t.x_value!=0 and t.y_value!=0 and t2.x_value!=0 and t2.y_value!=0 then (case when (t2.x_value*t.x_value+t2.y_value*t.y_value)/(SQRT(t2.x_value*t2.x_value+t2.y_value*t2.y_value)*SQRT(t.x_value*t.x_value+t.y_value*t.y_value))>0 then 1 else -1 end) else 1 end
    where t.rn <=(select max(rn) from biz_bus_station_direct_0711 where replace(replace(station_name,‘-1‘,‘‘),‘-2‘,‘‘)=t2.station_name)
    and replace(replace(t.station_name,‘-1‘,‘‘),‘-2‘,‘‘)=t2.station_name;
    commit;
  end loop;
end;

--7.根据站点给各个线路赋值途径站点（行转列+排序）
begin
  for t2 in (
    select A.line_no,A.line_direct,max(KEY) Station_DIRECT from (
select t.line_no,t.line_direct,
WMSYS.WM_CONCAT(t.station_name) OVER(PARTITION BY t.line_no,t.line_direct ORDER BY t.line_direct,t.point_num) KEY,
row_number() over(PARTITION BY t.line_no,t.line_direct ORDER BY t.line_direct,t.point_num) rs
from (
select t1.line_no,t1.line_direct,t1.point_num,t2.station_name from BIZ_BUS_LINE_DISTANCE t1
join biz_bus_station t2 on t1.station_id=t2.station_id
order by t1.line_direct,t1.point_num) t
) A
group by A.line_no,A.line_direct
    ) loop
    update biz_bus_station_direct_0711 bbs
    set bbs.station_direct=t2.station_direct
    where bbs.line_no=t2.line_no and bbs.line_direct=t2.line_direct;
    commit;
  end loop;
end;

存储过程：

create or replace procedure usp_bus_station_direct_update is
/*
  --名称：公交站点方向同步
  --功能：将各个公交站点的途径公交车辆相同方向置1，不同方向置-1
  --作者：赛太岁
  --编写时间：2016-07-12
*/

begin
--删除中间表数据
delete from biz_bus_station_direct;

--将公交站点等数据全量插入中间表
insert into biz_bus_station_direct
select ls.line_no line_no,
       bb.line_name line_name,
       t1.line_direct line_direct,
       s.station_id station_id,
       s.station_name station_name,
       t.point_num point_num_now,
       s.location_x x_now,
       s.location_y y_now,
       t1.point_num point_num_last,
       t1.point_x x_last,
       t1.point_y y_last,
       s.location_x - t1.point_x x_value,
       s.location_y - t1.point_y y_value,
       0 direction,
       0 rn,
       ‘‘ STATION_DIRECT,
       sysdate create_time
  from biz_bus_station s
  join biz_bus_line_station ls
    on ls.station_id = s.station_id
  left join biz_bus_line bb on ls.line_no=bb.line_no
  left join biz_bus_line_distance t
    on t.station_id = s.station_id
   and t.line_no = ls.line_no
  left join biz_bus_line_distance t1
    on t1.line_no = t.line_no
   and t1.point_num + 1 = t.point_num
   and t.line_direct = t1.line_direct;

--给行号赋值
  for t2 in (select t1.line_no,t1.station_id,rank() over(partition by replace(replace(t1.station_name,‘-1‘,‘‘),‘-2‘,‘‘) order by t1.line_no,t1.station_id) rn from biz_bus_station_direct t1) loop
    update biz_bus_station_direct t
    set t.rn=t2.rn
    where t.line_no=t2.line_no
    and t.station_id=t2.station_id;
  end loop;


--根据行号，逐行取值，赋方向值
/*cosθ=向量a.向量b/|向量a|×|向量b|
=(x1x2+y1y2)/[√(x12+y12)*√(x22+y22)]
夹角小于180度，则cosθ大于0，表示当前计算的车辆与RN=1的车辆方向一致
*/

  for t2 in (select replace(replace(t1.station_name,‘-1‘,‘‘),‘-2‘,‘‘) station_name,t1.x_value,t1.y_value,t1.rn from biz_bus_station_direct t1 where t1.rn=1) loop
    update biz_bus_station_direct t
    set t.direction=case when t.x_value!=0 and t.y_value!=0 and t2.x_value!=0 and t2.y_value!=0 then (case when (t2.x_value*t.x_value+t2.y_value*t.y_value)/(SQRT(t2.x_value*t2.x_value+t2.y_value*t2.y_value)*SQRT(t.x_value*t.x_value+t.y_value*t.y_value))>0 then 1 else -1 end) else 1 end
    where t.rn <=(select max(rn) from biz_bus_station_direct where replace(replace(station_name,‘-1‘,‘‘),‘-2‘,‘‘)=t2.station_name)
    and replace(replace(t.station_name,‘-1‘,‘‘),‘-2‘,‘‘)=t2.station_name;
  end loop;


--根据站点给各个线路赋值途径站点

  for t2 in (
    select A.line_no,A.line_direct,max(KEY) Station_DIRECT from (
select t.line_no,t.line_direct,
WMSYS.WM_CONCAT(t.station_name) OVER(PARTITION BY t.line_no,t.line_direct ORDER BY t.line_direct,t.point_num) KEY,
row_number() over(PARTITION BY t.line_no,t.line_direct ORDER BY t.line_direct,t.point_num) rs
from (
select t1.line_no,t1.line_direct,t1.point_num,t2.station_name from BIZ_BUS_LINE_DISTANCE t1
join biz_bus_station t2 on t1.station_id=t2.station_id
order by t1.line_direct,t1.point_num) t
) A
group by A.line_no,A.line_direct
    ) loop
    update biz_bus_station_direct bbs
    set bbs.station_direct=t2.station_direct
    where bbs.line_no=t2.line_no and bbs.line_direct=t2.line_direct;
  end loop;

  commit;

--异常处理
exception
  when others then
    rollback;
end usp_bus_station_direct_update;