string aa //* 提取班次 是正常班次还是试用期*// aa=str_pos( 班次编号,'SYQ') //msg(aa)//-1 正常班次 if(aa=='-1') { string beg_p,end_p,empname beg_p=get_emp_info (emp_id,'probation_beg_date') end_p=get_emp_info (emp_id,'probation_end_date') //*提取员工 试用期开始,结束日期 empname=get_emp_info (emp_id,'name') //*员工名字 if((beg_p ==''&&end_p!='')||(beg_p !=''&&end_p =='')||beg_p > end_p||(beg_p ==''&&end_p =='')) {dbg( emp_id+ empname+' 试用期日期 有误请核。或者是试用期空白') //*对试用期限定必须开始日期大于结束日期 ,而且必须写上不允许空白 } else if( class_date >=beg_p&& class_date <=end_p) {string bc_id bc_id=班次编号+'+SYQ' //*正常班次 +SYG (试用期简写特别码) //msg(bc_id) db_run("select class_id from timer_class_def where class_id='" +bc_id+ "'") if(db_row_count()>0) { 备注='' 备注= 班次编号+' '+'未修正前班次编号' //*msg(db_res(0)) //*提取比较 是否定义了对应的 试用期班次 db_run("select class_date,emp_id from timer_class_emp where class_date='" +class_date+ "' and emp_id='" +emp_id+ "'") //提取按日排班是否有班次 if(db_row_count()>0) {db_run("update timer_class_emp set class_id='" +bc_id+ "' where class_date='" +class_date+ "' and emp_id='" +emp_id+ "'") dbg(emp_id+ '/'+empname+'/' +class_date+ '/'+'实用期班次 自动更新'+ 班次编号+'---'+bc_id+'成功。请全部完毕后 必须右键--重新对界面上记录进行数据处理,才能更新数据!') //*按日排班有时,用更新日排班,没有时插入日排班 } else {db_run("INSERT INTO timer_class_emp (class_date, emp_id, class_id) VALUES ('" + class_date + "','" + emp_id + "', '" + bc_id + "')") dbg(emp_id+ '/'+empname+'/' +class_date+ '/'+'实用期班次 插入更新'+ 班次编号+'---'+bc_id+'成功。请全部完毕后 必须右键--重新对界面上记录进行数据处理,才能更新数据!') //msg('插入日排班') } } else {dbg(emp_id+ '/'+empname+ '/' +class_date+'/'+"没找到对应 实用期班次 请到班次里定义 定义规则为"+ 班次编号+"+SYQ") } } } |