| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1632 人关注过本帖
标题:一个在表中写入数据的逻辑问题
只看楼主 加入收藏
tvs
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2007-6-13
收藏
得分:0 
回复:(hu9jj)那么每个人是固定在一个部门上班还是要...

基本是在一个部门,调动还是比较少的。


2007-07-08 20:29
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
抛砖引玉!

建立员工表 ygb:
字段至少为 员工编号 Yg_id,部门编号 Bm_id,均为数值型。
建立排班表 pbb:
字段至少为 日期 Lb_D,日班(8-20时)Lb_M,夜班(20-8时)Lb_E,其中Lb_D字段为日期型数据,存放所安排的日期,其他字段为数值型数据,存放上班员工的编号。
声明四个变量:
dDATE_S 排班开始的日期
dDATE_E 排班结束的日期
dDATE_T 当前的日期
nBMBH 当前排班的部门编号

排班的代码如下:
SELECT YGB
SET FILTER TO BM_ID = nBMBH
GO TOP
dDATE_T = dDATE_S
DO WHILE .t.
a = YG_ID &&取上日班的员工编号
SKIP
IF EOF()
GO TOP
ENDIF
b = YG_ID &&取上夜班的员工编号
SKIP
IF EOF()
GO TOP
ENDIF
INSERT INTO pbb(LB_D,LB_M,LB_E);
VALUES(dDATE_T,a,b)
dDATE_T = dDATE_T + 1
IF dDATE_T > dDATE_E
EXIT
ENDIF
ENDDO

存在的问题:
当上班的人数为偶数时,上日班的永远被安排日班,上夜班的永远被安排夜班,不能轮换

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2007-07-10 10:02
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
推荐楼主看看《生产与运作管理》这样的教科书,特别是陈荣秋、马士华编著的、高等教育出版社出版的第二版内容。

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2007-07-14 09:47
tvs
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2007-6-13
收藏
得分:0 
谢谢大家

2007-07-20 22:26
快速回复:一个在表中写入数据的逻辑问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.033140 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved