高校职工考核管理系统的设计＊

顾远利

（潍坊学院，山东 潍坊 261061）

随着近年来高校间竞争的加剧，对管理工作的要求越来越高，只有利用先进的技术手段，改进传统的管理方式，才能进一步提高管理效能，取得良好的管理效果。利用校园网，把人事信息、教学、科研等教职工管理的各个环节全部纳入计算机管理，实现管理数据由用户分别录入，归口部门审核确认的管理工作过程，建成各部门信息共享、查询自如、方便快捷的教职工考核管理系统，将为学校的日常管理和领导科学决策提供必要的平台支持。

1 系统需求分析

通过对高校教职工管理制度和管理方式的调研，在深入分析教职工各项管理工作流程的基础上，确立了以模块管理为主线，基于C／S与B／S相结合的体系结构[1]，满足高校教职工管理需求的系统解决方案。首先，从系统的功能和性能两方面进行系统需求分析，列出部分功能模型和业务流程图；进行系统设计时，再根据系统分析得到的结果，细化系统定义，制定系统设计原则及所采用的技术路线和体系结构，进行系统具体功能模块划分和数据库设计。

系统主要包括教职工基本信息、教学、科研管理三个主要的业务模块。各个模块之间共享人事基本信息。系统的模块设计如图1所示。

图1 系统的模块设计图

教职工考核管理系统以教职工工号作为教职工的唯一标识，将教职工的个人基本信息、教学、科研等管理数据信息进行整合，形成一个统一的教职工管理、评价工作平台。将教职工的结构化数据信息和非结构化文档、多媒体数据信息统一起来，构成全校范围内的教职工考核管理信息数据库，以便各职能部门的管理人员及时准确地把握教职工全部考核信息，为实现深入的数据分析奠定坚实的信息基础。

教职工考核管理业务流程设计的主要原则是：管理科学、脉络清晰、操作简便。根据高校教职工考核管理业务流程定义及需求分析结果，可以获得教职工发出信息审核申请到综合评价各阶段的业务流程图，并用它来指导后面的程序设计[2]。整个教职工考核评价工作主要过程如图2所示。

图2 教职工综合评价流程图

2 系统设计

本系统设计采用浏览器／服务器的体系架构，利用ASP动态网页技术作为程序开发工具，采用SQL Server 2000数据库[3]，使用ADO数据库作为访问接口。客户端通过访问服务器的网页实现系统登陆，系统运行环境可以是Windows2000、WindowXP等。

采用ASP技术，具有如下优点：客户端访问迅速，使用简便；程序编写简单，兼容性强，易于扩展；安全性强。

在教职工考核管理系统中，权限管理体系主要由数据库控制、权限管理、运行控制三个部分构成。系统运行时，这三部分相互配合，共同构成教职工考核管理系统的强大权限管理体系，保障系统安全。部分窗体程序设计如下：

信息管理窗体主要设计程序：

public

modi：boolean；

xcaption：string；

end；

var

yggl＿Form：Tyggl＿Form；

implementation

uses main；

｛＄R＊.dfm｝

procedure Tyggl＿Form.FormClose（Sender：TObject；var Action：TCloseAction）；

begin

Action：＝caFree；

MainForm.N21.Enable：＝True；

end；

／／确定按钮单击事件

procedure Tyggl＿Form.cmdokClick（Sender：TObject）；

var

bmdm，sqlstr：String；

begin

／／生成检索所有教职工的SQL语句

if bmdm＿CBox＝0then

begin

sqlstr：＝＇select a.＊ b.bmmc，c.zcmc，d.zwmc from ygb a，bmdm b，＇；

sqlstr：＝sqlstr＋＇zcdm c，zwdmd where（a.bmdm＝b.bmdm）and（a.zcdm＝c.zcdm）＇；

sqlstr；＝sqlstr＋＇and（a.zwdm＝d.zwdm）order by a.bmdm，a.bh＇）；

end

else

／／生成检索某一部门员工的SQL语句

begin

bmdm：＝IntToStr（bmdm＿Cbox.ItemIndex-1）；

sqlstr：＝＇select a.＊ ，b.bmmc，c.zcmc，d.zwmc from ygb a，td＿bmdm b，＇；

sqlstr：＝sqlstr＋＇and（a.zwdm＝d.zwdm）and（a.bmdm＝＇"＋bmdm＋"＇）order by a.bh＇；

end；

Query1.Close；

Query1.SQL.Clear；

Query1.SQL.Add（sqlstr）；

Query1.Open；

／／根据检索结构，修改探出菜单项的可操作性

if Query1.RecordCount＞0then

begin

N1.Enabled：＝True；

N2.Enabled：＝True；

N3.Enabled：＝True；

end

else

begin

N1.Enabled：＝False；

N2.Enabled：＝False；

N3.Enabled：＝False；

end；

end；

人员管理设计程序主要部分：

／添加员工探出菜单单击事件

procedure Tyggl＿Form.N1Click（Sender：TObject）；

begin

／／设置表识

Xcaption：＝＇添加教职工信息＇；

modi：＝False；

／／打开添加／修改教职工信息窗体

Application.CreateForm（Tygxx＿Form，ygxx＿Form）；

ygxx＿Form.ShowModal；

end；

／／修改员工 弹出菜单单击事件

procedure Tyggl＿Form.N2Click（Sender：TObject）；

begin

／／设置表识

Xcaption：＝＇修改教职工信息＇；

modi：＝True；

／／打开添加／修改员工信息窗体

Application.CreateForm（Tygxx＿Form，ygxx＿Form）；

ygxx＿Form.ShowModal；

end；

／／删除教职工 弹出菜单单击事件

procedure Tyggl＿Form.N3Click（Sender：TObject）；

var

id：String；

begin

if MessageDlg（＇确认要删除选中教职工信息吗？＇，mtconfirmation，[mbYes，mbNo]，0）＝mrYes

then

begin

id：＝Query1.FieldbyName（＇id＇）.AsString；

with TQuery.Create（nil）do

begin

try

Close；

SQL.Clear；

SQL.Add（＇delete from ygb where id＝＇"＋id＋"＇）；

ExecSQL；

finally

Free；

end；

end；

ShowMessage（＇成功删除教职工信息＇）；

end；

end；

procedure Tyggl＿Form.cmdcloseClick（Sender：TObject）；

begin

with TQuery.Create（nil）do

try

Close；

SQL.Clear；

SQL.Add（＇select＊from bmdm order by bmdm＇）；

Open；

First；

／／将数据表中的所有部门添加到部门列表中

bmdm＿CBox.Items.Add（＇所有部门＇）；

while not Eof do

begin

bmdm＿CBox.Items.Add（FieldByName（＇bmmc＇）.AsString；

Next；

end；

bmdm＿CBox.ItemIndex：＝0；

finally

Free；

end；

end；

3 结束语

本系统采用了B／S模式，以学校的校园网为平台予以开发设计。在开发工具的选择上，使用ASP和SQL server开发系统，是一种较好的MIS开发模式。该系统具有数据集中程度高，系统可操作性强；数据存储灵活，通用性强；信息较全面，安全可靠等特点。依托这一有效平台，学校管理者能够借助智能分析手段找出管理工作的不足，及时调整管理政策，不断提升管理工作水平的目的。

[1]徐晓霞，贝雨馨.B／S模式与C／S模式之比较[J].延边大学学报：自然科学版，2002，28（2）：126-129.

[2]纪红.人事管理信息系统的设计与实施[J].管理信息系统，2000，（6）：46-49.

[3]Tony Bain.SQL Server 2000数据仓库与 Analysis Services[M].邵勇，译.北京：中国电力出版社，2003.