当前位置: 首页 > 图文教程 > 数据库 > Oracle > 两种方法分析每月工作日计算程序

Oracle
Oracle数据库集复制方法浅议
Oracle 数据表分区的策略
Oracle收购TimesTen 提高数据库软件性能
Oracle中大批量删除数据的方法
一个oracle指令的好网站
ORACLE数据库空间整理心得
如何Shrink Undo表空间,释放过度占用的空间
Linux系统下导出ORACLE数据库出现Exporting questionable statistics.错误 处理
收集的ORACLE函数大全
PL/SQL Number数字类型函数
PL/SQL 日期时间类型函数及运算
PL/SQL 类型格式转换
Oracle关于时间/日期的操作
PL/SQL数据类型及操作符
PL/SQL number型数据
ORACLE 常用的SQL语法和数据对象
如何保持Oracle数据库的优良性能
Oracle轻松取得建表和索引的DDL语句
重新编译PLSQL中的无效对象或者指定的对象 的方法
在OracleE数据库的字段上建立索引的方法

Oracle 中的 两种方法分析每月工作日计算程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-31   浏览: 285 ::
收藏到网摘: n/a


 SQL> SELECT TEXT FROM USER_SOURCE WHERE TYPE='PROCEDURE' AND NAME='GZR';
  
  TEXT                                                
  ----------------------------------------------------------------------------------------------------
  procedure gzr(v_nowdate in varchar2) as                              
  v_firstsaturday varchar2(10);                                   
  v_outdate date;                                          
  v_countworkday number(10);                                     
  begin                                               
        select to_char(next_day(to_date(concat(v_nowdate,'01'),'yyyymmdd'),1)-1,'dd')         
       into v_firstsaturday                                      
       from sys.dual;                                         
   v_countworkday:=to_number(v_firstsaturday)-1;                          
   loop                                               
    v_outdate:=to_date(concat(v_nowdate,v_firstsaturday+7),'yyyymmdd');              
    if v_outdate yyymm'),'01'),'yyyymmdd') then                                   
                                                    
     v_countworkday:=v_countworkday+5;                              
     else                                             
     v_countworkday:=v_countworkday+5-to_number(v_outdate-to_date(concat(to_char(add_months(sysdate
  ,1),'yyyymm'),'01'),'yyyymmdd'));                                 
                                                    
    end if;                                            
   exit when v_outdate>=to_date(concat(to_char(add_months(sysdate,1),'yyyymm'),'01'),'yyyymmdd');  
  
  TEXT
  
  CREATE OR REPLACE FUNCTION Get_WorkingDays(
   ny IN VARCHAR2
  ) RETURN INTEGER IS

  
  /*------------------------------------------------------------------------------------------
  函数名称:Get_WorkingDays
  中文名称:求某一年月中共有多少工作日
  作者姓名: XINGPING
  编写时间: 2004-05-22
  输入参数:NY:所求包含工作日数的年月,格式为yyyymm,如200405
  返 回 值:整型值,包含的工作日数目。
  算法描述:
    1).列举出参数给出的年月中的每一天。这里使用了一个表(ljrq是我的库中的一张表。这个表可以是有权访问的、记录条数至少为31的任意一张表或视图)来构造出某年月的每一天。
    2).用这些日期和一个已知星期几的日期相减(2001-12-30是星期天),所得的差再对7求模。如果所求年月在2001-12-30以前,那么所得的差既是负数,求模后所得值范围为大于-6,小于0,如-1表示星期六,故先将求模的结果加7,再求7的模.
    3).过滤掉结果集中值为0和6的元素,然后求count,所得即为工作日数目。   
  -------------------------------------------------------------------------------------------------*/