-- Start of DDL script for SF_SF_GETZCGZR -- Generated 3-六月-15 3:52:45 pm -- from fw2-SD_HOSPITAL:1 -- Function SF_SF_GETZCGZR CREATE OR REPLACE function SF_SF_GetZCGZR(LV_CZRQ00 char,LV_CZSJ00 char) return char is v_Return VARCHAR2(10); Ecustom exception ;--错误变量 Verrmsg varchar2(255) ;--错误提示变量 v_ZWRQ00 VARCHAR2(10); v_count0 number(3); begin -- MODIFICATION HISTORY -- Person Date Comments -- Zhangyc 2011.07.14 CREATE; -- linzy 2011.08.30 增加通用字典自定义节假日 -- -------- --------------- --------------------------------------------------- v_Return:='0'; ---正常工作日 return='0' 节假日 return='1' --周四下午、周六下午、周日全天 为节假日,其他为正常工作日。 --注:周四及周六下午12:30后就算节假日 select to_char(to_date(LV_CZRQ00,'yyyy-mm-dd'),'day') into v_ZWRQ00 from dual; select count(1) into v_count0 from BM_TYZD00 where ZDMC00='节假日信息维护' and MC0000=LV_CZRQ00; if v_count0>0 then v_Return:='1'; elsif v_ZWRQ00 in ('星期日') and LV_CZRQ00 not in ('20150215') then v_Return:='1'; elsif v_ZWRQ00 in ('星期六') and LV_CZRQ00 not in ('20150228') then if LV_CZSJ00>='12:30:00' then v_Return:='1'; else v_Return:='0'; end if; else v_Return:='0'; end if; return v_Return; end; / -- End of DDL script for SF_SF_GETZCGZR