级岗工 别位龄工工工 资资资 设设设 设设设 定 定 定
工资基本设定 员工信息 员工工资
数据流程图
通过流程图我们可以很清晰的看到员工工资的计算及总体情况
11
4.2 数据库概念结构设计
根据上面的设计规划出的实体有:员工实体、员工工资实体、工资等级实体、部门岗位实体、工龄实体,公司福利实体。E——R图如下:
工资等级 部门工资 工龄 公司福利 对应 对应 对应 对应 基础工资 岗位工资 工龄工资 福利费用 包含 员工工资 对应 员工 4.3 数据库的支持
有了,我们就可以进行系统的初步建设了,首先是建立项目管理器,如下图所示:
12
在项目管理器中新建一个表单,名称为人事工资管理系统,如下图所示:
只有一个界面是不行的,那么我们看到表单中有2个按钮,进入系统和退出系统,要实现它们的功能就需要对它们进行设置。首先是进入系统的设置,对它的代码设置是
“do 菜单1.mpr release thisform”
do 菜单1.mpr是运行菜单项,具体什么菜单我们下面介绍
release thisform是释放当前表单,也就是关闭人事工资管理系统这个表单 退出系统的代码则是 release thisform 释放此表单
4.4 建立菜单栏
在项目管理器中建立一个菜单,如下
13
要求:菜单中包括职工信息,工资设定,工资汇总,工资查询和退出 职工信息中 还包括浏览,编译,查询等选项
类似 工资设定中 还包括了基本工资,岗位工资,工龄工资
这样 程序运行的时候就到了do 菜单1.mpr,此时的系统界面是这样的
4.5 表的建立
任何程序都少不了表的支持,没有数据库,添加,删除等操作几乎无法实现,我们首先建一个员工信息表,ygxx
其具体设置如上 然后录入员工的基本信息 再建员工的基本工资表 jbgz 只要设置如下
继续建立员工的岗位工资表和工龄工资表
到此,程序有了一个很好的开始,也可以说,这个小程序开始显露生机,下面我们要做的就是完善它的功能。
4.6 浏览职工信息
工资管理软件就要知道职工的基本信息,年龄,性别,工龄,在什么岗位工作,是属于什么工种,这些都为工资的结算提供了很好的帮助。
我们需要再建立一个表单,类型如下:
14
我们可以很清楚的看到职工的基本信息,职工号,岗位,姓名,性别,工龄,工资等级,这些基本信息对于工资的定位和发放有很好的帮助
那怎么实现职工信息的浏览呢,我们看到右边有5个按钮,这些按钮就是控制浏览职工信息的指挥棒,我们先看以下“首行”里面的代码
go top
This.enabled=.f.
ThisForm.Command2.enabled=.f. ThisForm.Command3.enabled=.t. ThisForm.Command4.enabled=.t. thisform.refresh
在这些代码中 go top 是控制信息到第一个记录,enabled是控制按钮是否可用,refresh是刷新表单,让跳转的记录信息能更新到当前表单中
按钮“上一条”的代码如下 skip -1 if bof()
messagebox(\已是首记录!\信息窗口\ThisForm.Command1.enabled=.f. This.enabled=.f. else
ThisForm.Command3.enabled=.t. ThisForm.Command4.enabled=.t. endif
thisform.refresh
代码skip -1的意思是向上翻转记录,bof()意思是是否到记录的首个 下一条的代码: skip
thisform.refresh
15