给点测试数据

把旷工>=24小时的每个人的一行记录分成一天一条记录，过滤掉周六、周日的考勤记录，然后再查找连续三天旷工的记录。
比如第一条记录，是31天，就分成31条记录，以此类推。
也就是说，把列记录转换为行记录。

可以考虑逐个员工计算，按照考勤记录，遇到旷工就开始计数、遇到节假日就跳过、遇到正常考勤就清零，超过三天的就很容易筛选出来了。

测试数据已上传

数据只有1~31日，没有年月，这样怎样确定周六周日？

是根据当前月显示的

这个问题应该不难解决。
某年某月某日是周六或周日，先确定某月的天数，再用DOW()返回就可以。
如果还要考虑节假日，这个与政策性有关，可以建一个数据表记录实际情况，写一个函数用来返回某年某月某日是否节假日。

只考虑周六与周日的情况

close databases all
create cursor kgtj (姓名 c(10)) && 保存连续旷工三天的人员姓名
create cursor t1 (姓名 c(10),日期 d,旷工 n(2)) && 列记录转换为行记录用表
use 旷工 in 0 alias kg
select kg
scan
    scatter to asj
    for i=4 to fcount("kg")
        nday=val(right(field(i,"kg"),2))
        drq=date(year(date()),month(date()),nday)
        zdm=evaluate(field(i,"kg"))
        insert into t1 values (asj[1],drq,zdm)
    endfor
endscan
select t1
index on 姓名+dtoc(日期) tag xm for not inlist(dow(日期,2),6,7) && 过滤掉周六、周日
browse
cs=0
xm=姓名
scan
    if 姓名=xm and 旷工=8
        cs=cs+1
    else
        cs=0
    endif
    if cs=3
        insert into kgtj values (xm)
    endif
    xm=姓名
endscan
select kgtj
browse

[此贴子已经被作者于2016-12-28 10:43编辑过]

感谢！
代码我慢慢研究，用了一些我不了解和不会灵活运用的知识
碰到这个问题后把您的博客又翻找了一遍

谢谢，上有政策下有对策啊