• oracle Loop循环示例


    --loop循环用法 (输出1到10)  
    declare v_num number(2) := 0;  
    begin   
      loop  
        v_num := v_num + 1;  
        exit when v_num > 10;  
        --上面退出循环也可以用下面3行  
         /* if(v_num > 9) then  
            exit;  
         end if;*/  
        dbms_output.put_line(v_num);   
      end loop;    
    end;  
      
    --while loop循环用法 (输出1到10)  
    declare v_num number(2) := 0;  
    begin   
      while v_num < 10 loop  
         v_num := v_num + 1;  
         dbms_output.put_line(v_num);  
      end loop;    
    end;  
      
    --for loop循环用法1 (输出1到10)  
    declare v_num number(2) := 99;  
    begin  
      for v_n in 1 .. v_num loop      
         exit when v_n > 10;  
         dbms_output.put_line(v_n);  
      end loop;  
    end;  
      
    --for loop循环用法2 (输出某个表的序号、列数据)  
    begin  
       for v_n in(select amount,rownum from tmp) loop   
          dbms_output.put_line(v_n.rownum || ' , ' || v_n.amount);  
       end loop;  
    end;  
      
      
    ---个循环打印某个月日历例子  
    declare v_days number(2);   
            v_firstday number(2);  
            v_result varchar2(4000);  
            v_d varchar(100);  
            v_month date;  
    begin  
       v_month := to_date('20170301','yyyymmdd');  
       v_result := to_char(v_month,'yyyy') || '年' || to_char(v_month,'mm') || '月' || chr(10) ||  '日 一 二 三 四 五 六' || chr(10);  
       select to_char(last_day(v_month), 'dd') into v_days from dual;--当月多少天  
       select to_char(trunc(v_month, 'mm'),'d') into v_firstday from dual;--当月第1天是星期几:1-7      
       --1号所在星期几的之前每一天补3个空格  
       for v_week in 1 .. v_firstday - 1  loop  
          exit when v_firstday < 2;  
          v_result := v_result || '   ';        
       end loop;  
       for v_date in 1 .. v_days loop  
          v_d := v_date;  
          if(length(v_date) = 1) then  
             v_d :=  ' '||v_date ;                  
          end if;  
          v_result := v_result || v_d || ' ';       
          if(mod(v_date + v_firstday, 7) = 1) then  
              v_result := v_result || ' ' || chr(10);         
          end if;  
       end loop;    
       dbms_output.put_line(v_result);  
    end;  
    /*  
    运行结果:  
      
    2017年03月  
    日 一 二 三 四 五 六  
              1  2  3  4    
     5  6  7  8  9 10 11    
    12 13 14 15 16 17 18    
    19 20 21 22 23 24 25    
    26 27 28 29 30 31   
    */  
  • 相关阅读:
    Vue打包之后部署到 express 服务器上
    Vue 点击事件传递原生DOM事件?
    CSS hover 改变另外一个元素状态
    element-UI el-table二次封装
    element-UI el-table添加序号列时序号永远都是从1开始?
    element-UI el-table表格根据搜索条件表格值改变颜色
    HTML head meta标签详细
    CodeForces 489C Given Length and Sum of Digits... (dfs)
    CodeForces 489B BerSU Ball (水题 双指针)
    Codeforces 489A SwapSort (水题)
  • 原文地址:https://www.cnblogs.com/MrLiu2016/p/7650494.html
Copyright © 2020-2023  润新知