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

Oracle
常见的一些Oracle初学者的问题
ORACLE认证系统概述
数据库考试简介:Oracle认证
Oracle认证基础知识介绍
ADO连接Oracle Access示例及记录集处理源码
SQL Server和MySQL的安全性分析
用Oracle和SQL Server数据库组合利弊分析
Oracle 11g分区功能新革命
Flashback Query 恢复误删除的数据
基于Oracle高性能动态SQL程序开发
怎样在Oracle 9i中正确的转换时区
Oracle 10g导出的数据库能否导入Oracle 9i?
增加Distinct后查询效率反而提高
Oracle限制返回结果集的大小
Java语言数据库操作的基本流程
美国甲骨文(ORACLE)公司入驻渝中区大都会商厦
RHEL AS4上安装oracle 10R2 的方法
DB中如何查询Table占用空间的大小
编写高质量高性能的MySQL语法
Oracle数据库自动备份的具体实现步骤

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-31   浏览: 295 ::
收藏到网摘: 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,所得即为工作日数目。   
  -------------------------------------------------------------------------------------------------*/