横表转换成纵表

declare
  type t1 is ref cursor;
  tab1_cursor t1;
  v_Col all_col_comments.COLUMN_NAME%TYPE;
  my_sql VARCHAR2(200);
begin
    open tab1_cursor for 
    select   column_name from all_col_comments where table_name = upper('airmap_airportapprovetype1')
and substr(column_name ,2,1) in ('0','1','2','3','4','5','6','7','8','9');
  loop
    fetch tab1_cursor into v_Col; 
    exit when tab1_cursor%notfound;
    my_sql :='insert into airmap_airportapprovetype select  sectioncode ,'''||v_Col ||''', '|| v_Col ||' from airmap_airportapprovetype1   where ' || v_Col ||' is not null' ;
    dbms_output.put_line(my_sql);
    EXECUTE IMMEDIATE  my_sql;
    --    exit when tab1_cursor%notfound; 不能再此位置；
end loop;
 commit;
end;