首页 > 代码库 > OA电子表单设计-年假申请单-数据验证
OA电子表单设计-年假申请单-数据验证
OA从年初上线到现在已经过去半年了,时光飞逝。
上月底,行政文员找到我,说最近有新来的部门文员填《年假申请单》时,有乱填的情况,让我想办法处理。
我一查还真是,这文员是个男的,同一天给同一个人居然填了7张单据。被主管×回了4张,还√了3张。
于是,我给行政文员出主意,要不流程第一关设置成你审批,单据填写正常,才到各自主管审批,否则你就×回去重填,行政文员当时同意了,反正纸质也是她审批。
第二天,情况发生了变化,行政经理不同意第一关由文员审批这样的做法,啥原因也没说,好吧,听官大的,只能从程序的角度想办法去避免这样的错误发生了。
于是,有了下面的SQL代码:
declare @date char(8), -- 入职日期 @today char(8),-- 服务器当天日期 @year_yn int, -- 初始年限(不判断是否满年) @year int, -- 实际年假年限 @start_date char(8), -- 年假起始日期 @end_date char(8), -- 年假终止日期 @day int -- 年假天数set @date=‘20111212‘set @today = convert(char(8),getdate(),112)set @year_yn = convert(int,left (@today,4)) - convert(int,left(@date,4))set @year = (select case when right (@today,4) >= right(@date,4) then @year_yn else @year_yn-1 end)set @start_date = convert(char(4),(convert(int, left(@date,4)) + @year -1)) + right(@date,4) set @end_date = convert(char(4),(convert(int, left(@date,4)) + @year)) + right(@date,4)--年假说明,5年以下5天,5-9年 7天,10年以上10天set @day = (select case when @year<=4 then 5 when @year >4 and @year <10 then 7 when @year >=10 then 10 end )print @date print @yearprint @start_dateprint @end_dateprint @day--result20111212 → 入职日期2 → 初始年限20121212 → 年假起始日期20131212 → 年假结束日期5 → 年假天数
由于OA开窗取数据MIMJ程序不支持以上的T-SQL语句,于是第一反应是写个SQL表值函数,于是有了下面的函数代码:
CREATE function InTime (@workTime Varchar(20),@serverToday char(8)) returns @temptable table(date1 char(8),date2 char(8),dayCount int) as begin declare @date Varchar(20), -- 入职日期 @today char(8),-- 服务器当天日期 @year_yn int, -- 初始年限(不判断是否满年) @year int, -- 实际年假年限 @start_date char(8), -- 年假起始日期 @end_date char(8), -- 年假终止日期 @day int -- 年假天数 set @date=@workTime set @today = @serverToday set @year_yn = convert(int,left (@today,4)) - convert(int,left(@date,4)) set @year = (select case when right (@today,4) >= right(@date,4) then @year_yn else @year_yn-1 end) set @start_date = convert(char(4),(convert(int, left(@date,4)) + @year)) + right(@date,4) set @end_date = convert(char(4),(convert(int, left(@date,4)) + @year -1)) + right(@date,4) --年假说明,5年以下5天,5-9年 7天,10年以上10天 set @day = (select case when @year<=4 then 5 when @year >4 and @year <10 then 7 when @year >=10 then 10 end ) insert into @temptable select @start_date,@end_date,@day return end
注:为什么函数要加2个参数,一个【入职日期】参数不就可以了么,因为SQL表值函数不支持动态数据。
觉得这个函数有2个参数还是不好使,算了,还是换存储过程吧,于是有了下面的存储过程代码:
create proc worktime @workTime Varchar(20) as declare @date Varchar(20), -- 入职日期 @today char(8),-- 服务器当天日期 @year_yn int, -- 初始年限(不判断是否满年) @year int, -- 实际年假年限 @start_date char(8), -- 年假起始日期 @end_date char(8), -- 年假终止日期 @day int -- 年假天数 set @date=@workTime set @today = convert(char(8),getdate(),112) set @year_yn = convert(int,left (@today,4)) - convert(int,left(@date,4)) set @year = (select case when right (@today,4) >= right(@date,4) then @year_yn else @year_yn-1 end) set @start_date = convert(char(4),(convert(int, left(@date,4)) + @year)) + right(@date,4) set @end_date = convert(char(4),(convert(int, left(@date,4)) + @year -1)) + right(@date,4) --年假说明,5年以下5天,5-9年 7天,10年以上10天 set @day = (select case when @year<=4 then 5 when @year >4 and @year <10 then 7 when @year >=10 then 10 end ) select @start_date 起始日期,@end_date 终止日期,@day 年假天数
想了想存储过程也不好使,如果领导要看所有人的年假明细表,那么岂不是又要折腾,于是,有了下面视图代码:
create view userworktimeas select 工号 a,姓名 b,入职日 c,起始日 d,结束日 e,case when 实际年限>0 then 年假天数 else 0 end f,isnull(天数汇总,0) g,case when 实际年限>0 then 年假天数 else 0 end -isnull(天数汇总,0) hfrom(select * ,convert(char(4),(convert(int, left(入职日,4)) + 实际年限 -1)) + right(入职日,4) 起始日, convert(char(4),(convert(int, left(入职日,4)) + 实际年限)) + right(入职日,4) 结束日, case when 实际年限<=4 then 5 when 实际年限 >4 and 实际年限 <10 then 7 when 实际年限 >=10 then 10 end 年假天数from(select *,case when right (系统日,4) >= right(入职日,4) then 初始年限 else 初始年限-1 end 实际年限from(select *,convert(int,left (系统日,4)) - convert(int,left(入职日,4)) 初始年限from(select EmpNO 工号,EmpName 姓名,convert(char(8),WorkTime,112) 入职日,convert(char(8),getdate(),112) 系统日from DoorSV.IMSDB.dbo.EmployeeWHERE WorkTime <>‘‘ ) aaa) bbb) ccc) dddleft join (select 编号,年假起始日期,年假终止日期,sum(本次天数) 天数汇总from(select newopenquery1 编号,newopenquery1C 姓名,datetime1 入职日期,text4 年假天数,text1 已请天数,datetime5 请假起,datetime6 请假止,text6 本次天数,datetime2 年假起始日期,datetime3 年假终止日期,CASE WHEN resda021=‘1‘ THEN ‘未完成‘ WHEN resda021=‘2‘ THEN ‘同意‘ WHEN resda021=‘3‘ THEN ‘不同意‘ WHEN resda021=‘4‘ THEN ‘已抽单‘ END 签核结果 from hr07join resda on resda002=hr07002 and resda001=‘HR07‘where resda021=‘2‘ and text6<>0) xxxgroup by 编号,年假起始日期,年假终止日期) yyy on 编号=工号 COLLATE Chinese_PRC_CI_AS and 起始日 = 年假起始日期 COLLATE Chinese_PRC_CI_AS and 结束日 = 年假终止日期 COLLATE Chinese_PRC_CI_AS
最终结果:
SQL代码确认好之后,修改MIMJ开窗和HR07_MIMJ.aspx 取值关联,再加入JavaScript验证代码,大功告成。
总结:设计电子表单原则——数据管控(只读,数值范围)和历史数据交互是非常重要的,应遵循ERP流程和程序设计思路,“严谨、规范、科学、效率”。
OA电子表单设计-年假申请单-数据验证