顧遠利
(濰坊學院,山東 濰坊 261061)
隨著近年來高校間競爭的加劇,對管理工作的要求越來越高,只有利用先進的技術手段,改進傳統(tǒng)的管理方式,才能進一步提高管理效能,取得良好的管理效果。利用校園網(wǎng),把人事信息、教學、科研等教職工管理的各個環(huán)節(jié)全部納入計算機管理,實現(xiàn)管理數(shù)據(jù)由用戶分別錄入,歸口部門審核確認的管理工作過程,建成各部門信息共享、查詢自如、方便快捷的教職工考核管理系統(tǒng),將為學校的日常管理和領導科學決策提供必要的平臺支持。
通過對高校教職工管理制度和管理方式的調研,在深入分析教職工各項管理工作流程的基礎上,確立了以模塊管理為主線,基于C/S與B/S相結合的體系結構[1],滿足高校教職工管理需求的系統(tǒng)解決方案。首先,從系統(tǒng)的功能和性能兩方面進行系統(tǒng)需求分析,列出部分功能模型和業(yè)務流程圖;進行系統(tǒng)設計時,再根據(jù)系統(tǒng)分析得到的結果,細化系統(tǒng)定義,制定系統(tǒng)設計原則及所采用的技術路線和體系結構,進行系統(tǒng)具體功能模塊劃分和數(shù)據(jù)庫設計。
系統(tǒng)主要包括教職工基本信息、教學、科研管理三個主要的業(yè)務模塊。各個模塊之間共享人事基本信息。系統(tǒng)的模塊設計如圖1所示。
圖1 系統(tǒng)的模塊設計圖
教職工考核管理系統(tǒng)以教職工工號作為教職工的唯一標識,將教職工的個人基本信息、教學、科研等管理數(shù)據(jù)信息進行整合,形成一個統(tǒng)一的教職工管理、評價工作平臺。將教職工的結構化數(shù)據(jù)信息和非結構化文檔、多媒體數(shù)據(jù)信息統(tǒng)一起來,構成全校范圍內的教職工考核管理信息數(shù)據(jù)庫,以便各職能部門的管理人員及時準確地把握教職工全部考核信息,為實現(xiàn)深入的數(shù)據(jù)分析奠定堅實的信息基礎。
教職工考核管理業(yè)務流程設計的主要原則是:管理科學、脈絡清晰、操作簡便。根據(jù)高校教職工考核管理業(yè)務流程定義及需求分析結果,可以獲得教職工發(fā)出信息審核申請到綜合評價各階段的業(yè)務流程圖,并用它來指導后面的程序設計[2]。整個教職工考核評價工作主要過程如圖2所示。
圖2 教職工綜合評價流程圖
本系統(tǒng)設計采用瀏覽器/服務器的體系架構,利用ASP動態(tài)網(wǎng)頁技術作為程序開發(fā)工具,采用SQL Server 2000數(shù)據(jù)庫[3],使用ADO數(shù)據(jù)庫作為訪問接口??蛻舳送ㄟ^訪問服務器的網(wǎng)頁實現(xiàn)系統(tǒng)登陸,系統(tǒng)運行環(huán)境可以是Windows2000、WindowXP等。
采用ASP技術,具有如下優(yōu)點:客戶端訪問迅速,使用簡便;程序編寫簡單,兼容性強,易于擴展;安全性強。
在教職工考核管理系統(tǒng)中,權限管理體系主要由數(shù)據(jù)庫控制、權限管理、運行控制三個部分構成。系統(tǒng)運行時,這三部分相互配合,共同構成教職工考核管理系統(tǒng)的強大權限管理體系,保障系統(tǒng)安全。部分窗體程序設計如下:
信息管理窗體主要設計程序:
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;
//根據(jù)檢索結構,修改探出菜單項的可操作性
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;
//將數(shù)據(jù)表中的所有部門添加到部門列表中
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;
本系統(tǒng)采用了B/S模式,以學校的校園網(wǎng)為平臺予以開發(fā)設計。在開發(fā)工具的選擇上,使用ASP和SQL server開發(fā)系統(tǒng),是一種較好的MIS開發(fā)模式。該系統(tǒng)具有數(shù)據(jù)集中程度高,系統(tǒng)可操作性強;數(shù)據(jù)存儲靈活,通用性強;信息較全面,安全可靠等特點。依托這一有效平臺,學校管理者能夠借助智能分析手段找出管理工作的不足,及時調整管理政策,不斷提升管理工作水平的目的。
[1]徐曉霞,貝雨馨.B/S模式與C/S模式之比較[J].延邊大學學報:自然科學版,2002,28(2):126-129.
[2]紀紅.人事管理信息系統(tǒng)的設計與實施[J].管理信息系統(tǒng),2000,(6):46-49.
[3]Tony Bain.SQL Server 2000數(shù)據(jù)倉庫與 Analysis Services[M].邵勇,譯.北京:中國電力出版社,2003.