还剩54页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
员工信息管理系统The latestrevision onNovember22,2023*
3.3系统数据库设计
3.
3.1数据库设计要点9第一阶段的设计任务是搜集和分析顾客需求,完毕数据库的概念设计10第二阶段设计任务是数据库的逻辑设计,完毕E-R模型向逻辑模型转换H第三阶段设计任务是数据库的物理设计,确定表欧I构造,建立数据库模型
3.
3.2数据库系统设计要点及难点12建立数据库,确定数据库中表日勺数量及其每个表中各个字段的字段名、类型、宽度、小数及索引、排序13确定数据库中各个表的I字段的主键值、主索引及一般索引14建立各个表数据环境,确定主表并建立主表与各个表之单的关联15程序设计过程中的标签、文本框、编辑框、复选框、列表框、数据库连接、数据查询日勺属性16采用构造化编程措施,确定系统功能模块及其互相之间的关系
3.
3.3数据库及其表的建立和使用使用Access程序建立Access数据库,建立对应表,设置各个表中详细字段名称、类型、主键、索引,设置各个表间日勺关系
3.
3.4系统构成及数据环境⑵表:员工一员工信息表,工资一工资表,⑴数据库:部门一部门信息表,职务一职务信息表,⑶项目:员工信息管理系统项目管理器⑷表单:一系统主界面一员工管理界面工资类别一工资类别信息表一工资管理界面一部门管理界面一职务管理界面—有关界面一工资类型管理界面⑸程序:一系统主程序一员工管理程序一工资管理程序一部门管理程序一职务管理程序—工资类型管理程序一有关程序6数据环境
3.
3.5数据库概念设计数据库概念设计重要采用E-R模型进行设计.E-R模型日勺关系是确定每一处理模块日勺实体、实体属性和实体间日勺联络实体、属性、联络及数据构造描述如下:⑴员工管理模块实体员工、部门、职务;属性员工日勺属性有姓名、员工编号、部门、职务、入职时间、性别、身份证号、出生日期、学历、私人、工作及备注等;部门日勺属性有部门编号和部门名称;职务的I属性有职务编号和职务名称联络员工与部门之间是多对一(M1)的关系;员工与职务之间也是多对一(M1)日勺关系数据项见数据库欧I物理设计⑵工资管理模块实体工资、工资类别;属性工资日勺属性有员工编号、工资类别和工资金额;工资类别有工资类别编号、工资类别名称关系工资类别与工资这间是一对一(L1)日勺关系数据项见数据库的物理设计
3.
3.6数据库逻辑设计数据库的逻辑设计重要完毕从E-R模型向数据逻辑模型的转换首先将E-R模型中同一实体日勺所有属性放在同一记录类型中,变成记录的数据项;另一方面假如两个实体间有M:N的关系,除各自建立记录类型之外,还需增长一种记录类型,这一记录类型应包括两个实体各自日勺主键逻辑模型规范化及总E-R图描述如下员工(员工编号、姓名、部门编号、职务编号、入职时间、性别、身份证号、出生日期、学历、私人、工作、备注);部门(部门编号、部门名称、备注);职务(职务编号、职务名称、备注);工资(员工编号、工资类型编号、金额、备注);工资类别(工资类别编号、工资类别名称、备注);顾客(顾客名、密码、确认密码、备注)消除冗余数据和联络后,其系统的E-R图如下
3.
3.7数据库物理设计数据库的物理设计将完毕数据逻辑模型向数据物理模型的转换每一记录类型确定为数据库中的I一张表;记录类型中的I数据项成为对应表中的字段,字段属性根据各字段特点设置;确定索引和表之间的联络系统表构造描述如下
(1)员工表用于寄存员工信息,包括员工编号、姓名、部门编号、职务编号、入职时间、性别、身份证号、出生日期、学历、私人、工作、备注字段字段名称类型宽度必需索引阐明1员工编号文本20是有无反复主键2姓名文本10是3部门编号数字长整型4职务编号数字长整型5入职时间日期/时间6性别文本27身份证号文本208出生日期日期/时间9学历文本1010私人文本2011工作文本2012备注文本1002部门表用于寄存员工的部门信息,包括部门编号、部门名称和备注字段字段名称类型宽度必需索引阐明1部门编号数字长整型是有无反复主键2部门名称文本20是3备注文本1003职务表用于寄存员工日勺职务信息,包括职务编号、职务名称和备注字段字段名称类型宽度必需索引阐明1职务编号数字长整型是有无反复主键2职务名称文本20是字段字段名称类型宽度必需索引阐明3备注文本1004工资表用于寄存员工日勺工资信息,包括员工编号、工资类别编号、金额和备注字段字段名称类型宽度必需索引阐明1员工编号文本20是有反复主键2工资类别编号数字长整型是有反复主键3金额数字单精度型4备注文本1005工资类别表用于寄存员工日勺工资类别,包括工资类别编号、工资类别名称和备注字段字段名称类型宽度必需索引阐明1工资类别编号数字长整型是有无反复主键2工资类别名称文本20是3备注文本1006顾客表用于寄存系统的顾客名和密码,包括顾客名、密码和备注字段字段名称类型宽度必需索引阐明1顾客名文本20是有无反复主键2密码文本30是3确认密码文本30是4备注文本
1003.4输出设计1选择输出方式显示终端、打印机;2确定输出格式格式设计体目前各类报表中;3输出的重要形式报表;4输出的内容重要有员工信息、工资信息、部门信息、职务信息、工资类别信息和顾客信息
3.5输入设计1输入方式设计
①键盘输入和鼠标操作,为常规的数据录入方式;
②磁盘传递数据2顾客界面设计详见各子模块顾客界面
①人机对话方式通过屏幕、键盘、鼠标与系统对话,当操作错误时系统给出提醒和警告
①菜单方式设计成下拉式、上弹式、按钮式,功能选择有光带移动、数字或字母选择、鼠标驱动
4.系统实现系统实行日勺最重要工作是程序设计,此外还包括了物理系统的实行、程序日勺调试等本系统日勺程序设计由主程序和各模块表单程序等两大部份构成
4.1系统主程序流程
4.2系统主界面设计
4.3系统主程序设计unit Main;interface usesWindows,SysUtils,Classes,Graphics,Forms,Controls,Menus,StdCtrls,Dialogs,Buttons,Messages,ExtCtrls,ComCtrls,StdActns,ActnList,ToolWin,ImgList,DB,ADODB,cxControls,exContainer,cxEdit,cxLabel;typeTMainForm=classTFormMainMenu:TMainMenu;Filel:TMenuItem;Window:TMenuItem;Help:TMenuItem;FileExitltem:TMenuItem;WindowCascadeltem:TMenuItem;WindowTileltem:TMenuItem;WindowArrangeItem:TMenuItem;HelpAboutltem:TMenuItem;WindowMinimizeltem:TMenuItem;ActionList:TActionList;FileExit:TAction;WindowCascadel:TWindowCascade;WindowTileHorizontali:TWindowTileHorizontal;WindowArrangeAl11:TWindowArrange;WindowMinimizeAlll:TWindowMinimizeAll;HelpAboutl:TAction;WindowTi1eVerticall:TWindowTileVertical;WindowTileItem2:TMenuItem;ImageList:TImageList;FileWage:TMenuItem;FilePersonnel:TMenuItem;FileDepartment:TMenuItem;ADOConnection:TADOConnection;FilePost:TMenuItem;N1:TMenuItem;FileWageCategory:TMenuItem;Image1:TImage;FileUser:TMenuItem;ADOQueryDelete:TADOQuery;FileDatalnit:TMenuItem;procedure HelpAboutlExecuteSender:TObject;procedure FileExitExecuteSender:TObject;procedure FilePersonnelClickSender:TObject;procedure FileDepartmentClickSender:TObject;procedure FilePostClickSender:TObject;procedure FileWageCategoryClickSender:TObject;procedure FileWageClickSender:TObject;procedure FormActivateSender:TObject;《再包卷倭径计》数件工程辗程核计课题名称员工信息管理系统姓名:兰朝仁学号学院继续教育学院专业计算机科学与技术年级级(夜大专升本)2023指导教师陈郎钦完毕日期年月日20231011procedure FileUserClickSender:TObject;procedure FileDatalnitClickSender:TObject;private{Private declarationspublic{Public declarationsend;varMainForm:TMainForm;ShowLogin:Boolean=True;implementation{$R*.dfm}uses Login,Personnel,Department,Post,Wage,WageCategory,User,About;procedure Sender:TObject;beginClose;procedure Sender:TObject;begin end;procedure Sender:TObject;varMDIPersonnel:TMDIPersonnel;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIPersonnelthen beginMDIChildren[i].BringToFront;if MDIChiIdren[i].WindowState=wsMinimized thenMDIChildren[i].WindowState:=wsNormal;Exit;MDIPersonnel:=Application;end;procedure Sender:TObject;varMDIDepartment:TMDIDepartment;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIDepartmentthenbeginMDIChildren[i].BringToFront;if MDIChildren[i].WindowState=wsMinimized thenMDIChildren[i].WindowState:=wsNormal;Exit;end;MDIDepartment:=Application;procedure Sender:TObject;varMDIPost:TMDIPost;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIPostthenbeginMDIChildren[i].BringToFront;if MDIChildren[i].WindowState=wsMinimized thenMDIChildren[i].WindowState:=wsNormal;Exit;end;MDIPost:=Application;procedure Sender:TObject;varMDIWageCategory:TMDIWageCategory;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIWageCategorythenbeginMDIChildren[i].BringToFront;if MDIChiIdren[i].WindowState=wsMinimized thenMDIChildren[i].WindowState:=wsNormal;Exit;end;MDIWageCategory:=Application;procedure Sender:TObject;varMDIWage:TMDIWage;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIWagethenbeginMDIChildren[i].BringToFront;if MDIChiIdren[i].WindowState=wsMinimized thenMDIChildren[i].WindowState:=wsNormal;Exit;end;MDIWage:=Application;■,end;procedure Sender:TObject;beginif ShowLoginthenbegin■if ShowLoginthen Close;end;end;procedure Sender:TObject;varMDIUser:TMDIUser;i:integer;beginfor i:=0to MDIChildCount-1doif MDIChildren[i]is TMDIUserthenbeginMDIChildren[i].BringToFront;if MDIChildren[i].WindowState=wsMinimized thenMDIChildrenfi].WindowState:=wsNormal;Exit;end;MDIUser:=Application;■end;end.
4.4子程序设计
4.
4.1系统登录unit Login;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,StdCtrls;typeTLoginBox=classTFormButtonLogin:TButton;ButtonCancel:TButton;LabelUser:TLabel;EditUser:TEdit;LabelPassword:TLabel;EditPassword:TEdit;ADOQueryLogin:TADOQuery;procedure ButtonLoginClickSender:TObject;procedure FormCloseSender:TObject;var Action:TCloseAction;procedure ButtonCancelClickSender:TObject;private{Private declarations}public{Public declarations}end;varLoginBox:TLoginBox;LoginTime:Integer=0;implementation{$R*.dfm}uses Main;procedure Sender:TObject;beginifthen◊begintry■■if
[0].Aslnteger=l thenbeginShowLogin:=False;Close;endelse beginShowMessageC顾客名或密码错误!);Log inT ime:=Log inT ime+1;if LoginTime=3then Close;end;finally end;end;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;procedure Sender:TObject;beginClose;end;end.
4.
4.2员工管理unit Personnel;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,cxStyles,cxCustomData,exGraphics,cxFilter,cxData,cxDataStorage,cxEdit,cxDBData,cxGridCustomTab1eView,cxGridTableView,cxGridDBTab1eView,cxGridLevel,cxClasses,cxControls,cxGridCustomView,exGrid,exNavigator,StdCtrls,Grids,DBGrids,StrUtils,cxDBNavigator,cxGridCustomPopupMenu,cxGridPopupMenu,dxStatusBar,cxCalendar,cxDropDownEdit,cxCheckBox,cxRadioGroup,cxDBLookupComboBox;typeTMDIPersonnel=classTFormDataSourcePersonne:TDataSource;ADOQueryPersonne:TADOQuery;cxGri d1DBTab1eVi ew1:TcxGri dDBTab1eVi ew;cxGridlLevell:TcxGridLevel;cxGridl:TcxGrid;cxDBNavigator1:TcxDBNavigator;cxGridlDBTableViewlDBCo1umn:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn1:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn2:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn3:TcxGri dDBCo1umn;cxGridlDBTableViewlDBCo1umn4:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn5:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn6:TcxGri dDBCo1umn;cxGridlDBTableViewlDBCo1umn7:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn8:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn9:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn10:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn11:TcxGridDBCo1umn;DataSourceDepartment:TDataSource;ADOQueryDepartment:TADOQuery;DataSourcePost:TDataSource;ADOQueryPost:TADOQuery;procedure ADOQueryPersonnePostErrorDataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;procedure FormCloseSender:TObject;var Action:TCloseAction;procedure ADOQueryPersonneBeforeRefreshDataSet:TDataSet;private{Private declarations}public{Public declarations}end;{$R*.dfm}uses main;procedure(DataSet:TDataSet;E:EDatabaseError;var Action:TDataAction);beginif
[0].AsString=thenShowMessage(员工编号不能为空!)else ifAnsiContainsStr,反复数据)thenShowMessage(,“员工编号”不能反复!’)else if
[1].AsString=thenShowMessage(姓名不能为空!)else if
[2].AsString=thenShowMessage(,“部门编号”不能为空!’)else if
[3].AsString=thenShowMessage(,“职务编号”不能为空!’)else if
[4].AsString=thenShowMessage(入职时间”不能为空!’)elseShowMessage;Action:=daAbort;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;procedure DataSet:TDataSet;begin end;end.
4.
4.3部门管理unit Department;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,cxStyles,cxCustomData,exGraphics,cxFilter,cxData,cxDataStorage,cxEdit,cxDBData,cxGridCustomTab1eView,cxGridTableView,cxGridDBTab1eView,cxGridLevel,cxClasses,cxControls,cxGridCustomView,exGrid,exNavigator,StdCtrls,Grids,DBGrids,StrUtils,cxDBNavigator,cxGridCustomPopupMenu,cxGridPopupMenu,dxStatusBar;typeTMDIDepartment=classTFormDataDepartment:TDataSource;ADOQueryDepartment:TADOQuery;cxGri d1DBTab1eVi ew1:TcxGri dDBTab1eVi ew;cxGridlLevell:TcxGridLevel;cxGridl:TcxGrid;cxDBNavigator1:TcxDBNavigator;cxGridlDBTableViewlDBCo1umn1:TcxGridDBCo1umn;cxGrid1DBTab1eView1DBCo1umn2:TcxGridDBCo1umn;procedure ADOQueryDepartmentPostErrorDataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;procedure FormCloseSender:TObject;var Action:TCloseAction;private{Private declarations}public{Public declarations}end;{$R*.dfm}uses main;procedure DataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;beginif
[1].AsString=thenShowMessageC”部门名称”不能为空!else ifAnsiContainsStr,反复数据thenShowMessage,“部门名称”不能反复!elseShowMessage;Action:=daAbort;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;end.
4.
4.4职务管理unit Post;interface usesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,cxStyles,cxCustomData,exGraphics,cxFilter,cxData,cxDataStorage,cxEdit,cxDBData,cxGridCustomTab1eView,cxGridTableView,cxGridDBTab1eView,cxGridLevel,cxClasses,cxControls,cxGridCustomView,exGrid,exNavigator,StdCtrls,Grids,DBGrids,StrUtils,cxDBNavigator,cxGridCustomPopupMenu,cxGridPopupMenu,dxStatusBar;type【摘要】本文从员工信息管理系统规划、需求分析、系统设计、系统实现及系统测试等多种方面,分别论述系统研发日勺整个实现过程,简述采用Delphi7编程工具及Access数据库实现系统应用时设计要点,重点论述系统实现过程中日勺重点和难点问题日勺分析及其处理方案,处理企业对员工日勺计算机管理【关键词】员工、人事、工资、管理、数据库引言伴随我国国民经济建设的蓬勃发展和社会主义市场经济体制时迅速完善,各个行业都在积极使用现代化日勺手段,不停改善服务质量,提高工作效率,这些都在很大程度上给企业提出越来越严峻日勺挑战,对企业体系无论是在行政职能、企业管理水平以及优质服务上都提出更高的规定建设一种科学高效的信息管理系统是处理这一问题时必由之路员工信息管理作为企业内部的一种员工基本档案管理也是如此,由于企业的人数较多,每一位员工的详细实际状况也不尽相似,假如没有一种完整的I员工信息管理系统去完毕,将使工作变得复杂,并且对于工作的效率也将使一种致命的打击,使无论怎样也无法适应现代社的需要止匕外,目前部分企业使用日勺员工信息管理系统只有信息的录入,修改和删除日勺功能,而不具有信息查询日勺功能,这对于企业的信息管理工作来说是一种很遗憾日勺事情因此,开发一套功能完整,设计合理,使用以便日勺企业员工信息管理系统成为很有必要的事情TMDIPost=classTFormDataPost:TDataSource;ADOQueryPost:TADOQuery;cxGri d1DBTab1eVi ew1:TcxGri dDBTab1eVi ew;cxGridlLevell:TcxGridLevel;cxGridl:TcxGrid;cxDBNavigatorl:TcxDBNavigator;cxGridlDBTableViewlDBCo1umn1:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn2:TcxGridDBCo1umn;procedure ADOQueryPostPostErrorDataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;procedure FormCloseSender:TObject;var Action:TCloseAction;private{Private declarations}public{Public declarations}end;implementation{$R*.dfm}uses main;procedure DataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;beginif
[1].AsString=thenShowMessage,“职务名称”不能为空!’else ifAnsiContainsStr,反复数据thenShowMessageC职务名称”不能反复!elseShowMessage;Action:=daAbort;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;end.
4.
4.5工资管理
4.
4.6工资类别管理unit WageCategory;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,cxStyles,cxCustomData,exGraphics,cxFilter,cxData,cxDataStorage,cxEdit,cxDBData,cxGridCustomTab1eView,cxGridTableView,cxGridDBTab1eView,cxGridLevel,cxClasses,cxControls,cxGridCustomView,exGrid,exNavigator,StdCtrls,Grids,DBGrids,StrUtils,cxDBNavigator,cxGridCustomPopupMenu,cxGridPopupMenu,dxStatusBar;typeTMDIWageCategory=classTFormDataSourceWageCategory:TDataSource;ADOQueryWageCategory:TADOQuery;cxGri d1DBTab1eVi ew1:TcxGri dDBTab1eVi ew;cxGridlLevell:TcxGridLevel;cxGridl:TcxGrid;cxDBNavigator1:TcxDBNavigator;cxGridlDBTableViewlDBCo1umn1:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn2:TcxGridDBCo1umn;procedure ADOQueryWageCategoryPostErrorDataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;TCloseAction;procedure FormCloseSender:TObject;var Action:private{Private declarations}public{Public declarationsend;implementation{$R*.dfm}uses main;procedure DataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;beginif
[1].AsString=thenShowMessage,工资类别名称”不能为空!else ifAnsiContainsStr,反复数据thenShowMessage,工资类别名称”不能反复!elseShowMessage;Action:=daAbort;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;end.
4.
4.7顾客管理unit User;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DB,ADODB,cxStyles,cxCustomData,exGraphics,cxFilter,cxData,cxDataStorage,cxEdit,cxDBData,cxGridCustomTab1eView,cxGridTableView,cxGridDBTab1eView,cxGridLevel,cxClasses,cxControls,cxGridCustomView,exGrid,exNavigator,StdCtrls,Grids,DBGrids,StrUtils,cxDBNavigator,cxGridCustomPopupMenu,cxGridPopupMenu,dxStatusBar,exTextEdit;typeTMDIUser=classTFormDataSourceUser:TDataSource;ADOQueryUser:TADOQuery;cxGr id1DBTab1eV iew1:TcxGr idDBTab1eVi ew;cxGridlLevell:TcxGridLevel;cxGridl:TcxGrid;cxDBNavigatorl:TcxDBNavigator;cxGridlDBTableViewlDBCo1umn:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn1:TcxGridDBCo1umn;cxGridlDBTableViewlDBCo1umn2:TcxGri dDBCo1umn;cxGridlDBTableViewlDBCo1umn3:TcxGridDBCo1umn;procedure ADOQueryUserPostErrorDataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;procedure FormCloseSender:TObject;var Action:TCloseAction;procedure ADOQueryUserBeforePostDataSet:TDataSet;procedure cxDBNavigatorlButtonsButtonClickSender:TObject;AButtonlndex:Integer;var ADone:Boolean;private{Private declarations}public{Public declarationsend;implementation{$R*.dfm}uses main;procedure DataSet:TDataSet;E:EDatabaseError;var Action:TDataAction;beginif
[0].AsString=thenShowMessage(“顾客名”不能为空!’)else if
[1].AsString=thenShowMessageJ“密码”不能为空!else if
[2].AsString=thenShowMessage C确认密码”不能为空!’else ifAnsiContainsStr,反复数据thenShowMessage“顾客名”不能反复!elseShowMessage;Action:=daAbort;end;procedure Sender:TObject;var Action:TCloseAction;beginAction:=caFree;end;procedure DataSet:TDataSet;beginif
[1].AsString
[2].AsString thenbeginShowMessage输入日勺密码不一样样!;Abort;end;end;procedure Sender:TObject;AButtonlndex:Integer;var ADone:Boolean;beginif AButtonIndex=7and=1thenbeginShowMessage不能删除最终一种顾客!;ADone:=True;end;end;end.企业员工信息管理系统日勺内容功能对于企业的决策者和管理者来说都至关重要,因此企业员工信息管理系统应当可以为管理者提供充足日勺信息和快捷的查询与管理手段作为计算机应用的一部分,使用计算机对企业员工信息进行管理,具有手工管理所无法比拟日勺长处.例如:查询迅速、查找以便、可靠性高、存储量大、保密性好、寿命长、成本低等这些长处可以减少员工管理工作的成本,减轻企业管理人员的承担,以便员工信息的更新、维护和查询,增长数据的可靠性;从而提高企业员工信息管理的效率,开拓企业员工管理工作日勺新局面,提高管理水平,是企业管理的I科学化、正规化、信息化管理,与世界接轨的重要条件目前主流日勺程序开发环境有Microsoft Visual,Sun Java,Borland Delphi等Visual对Windows系统兼容性好;Java可以支持多种环境及操作系统平台;而Delphi则可在Windows系统下迅速开发C/S构造程序,具有多方成熟的控件完善系统开发主流日勺数据系统则有racle,Microsoft SQL Server和AccessOracle功能强大,稳定性好;SQL Server稳定,功能齐全;而Access简朴迅速、小巧便捷下面采用Borland Delphi7开发环境,结合Microsoft Access数据库,对员工信息管理系统的开发过程和系统规划、系统需求及分析、系统设计、系统实现及系统测试等各个阶段,论述其数据库应用系统的设计要点,实现过程中存在的难
4.
4.8数据初始化procedure(Sender:TObject);vari:integer;TabieName:TStrings;beginif MessageBoxQ数据初始化将删除所有的数据!+CHR
(13)+与否继续,数据初始化,MB_IC0NEXCLAMATI0N+MB_YESN0+MB_DEFBUTT0N2)二IDNO thenExit;for i:=0to MDIChildCount-1doMDIChildren[i].Close;TableName:=;(工资’);(工资类另『);(员工);(部门’);(职务);(顾客);for i:=0to dobegintryfinallyend;end;tryfinallyend;end;
4.5系统测试系统程序设计后,根据测试用例分别进行系统的I单元测试、集成测试、有效性测试,最终进行系统日勺总体测试首先,对构成系统的各个模块分别进行单元测试;另一方面,对通过单元测试的各个模块进行了组装测试即集成测试,并完毕系统模块功能有效性测试;最终完毕系统测试通过上述测试后,根据系统设计的规定分别对户主信息管理、雇佣产品信息管理、系统顾客管理等模块进行试运行,效果良好,得到了满意的成果在测试过程中,不仅选择对的的数据,还要录入假定错误的数据,并对系统的数据进行查对,填写系统运行日志,整顿成文档资料,以便于此后系统的维护
5.结束语根据课任老师的规定并在老师的指导下,通过信息系统设计,在计算机管理信息系统的开发研制及其设计方面得到了很好的锻炼和学习通过《员工信息管理系统》日勺设计,让我懂得了信息系统日勺可行性研究及业务需求分析日勺重要性,理解了系统日勺概要设计和详细设计对系统实行的程序设计日勺重要作用,把所学的编程语言运用于数据库应用系统日勺设计中,掌握了系统测试日勺技巧尤其是学会了提出问题、分析问题并处理问题日勺措施,真正地把书本上、课堂上所学的知识应用于实际的、详细的I实践中,很好地完毕了理论与实践上相结合的信息系统设计,为此后更为复杂日勺计算机管理信息系统日勺开发打下良好的基础【参照文献】
[1]朱振元、朱承,《Delphi面向对象程序设计及应用开发》西安电子科技大学出版社,2023
[2]陈瑞、叶核亚,《Delphi程序设计实用教程》,电子工业出版社,
19983、Delphi7组件应用实例》张海莲、马琳、郑城荣、邢海峰出版社电子工业出版社
20234、Delphi7程序设计技巧与实例》吴天准出版社中国铁道出版社
5、Delphi7信息系统设计与开发》黄明、梁旭、石虎出版社机械工业出版社点、问题日勺分析及其处理方案
1.系统规划系统规划的重要内容是信息系统设计的目的及信息系统的总体方案
1.1系统设计目的本系统的设计目日勺是建立企业对员工档案及工资的I计算机管理系统
1.22系统总体规划系统本着合理性、可靠性和先进性欧I原则,实现1完整的数据分析系统,能对数据流实行控制与动态分析;2有功能强大、资料齐全的查询系统;3以便顾客使用及操作的界面,操作简便、运行稳定
1.3设计方案环节在员工信息需求日勺基础上,提出整个信息系统的总体构造方案,确定系统开发设计的次序及时间的安排详细分为五个环节4分析员工档案及工资等信息管理的I业务活动,弄清业务流程及数据流程;5根据业务流程及数据流程,确定属于系统业务处理的范围;6分析业务流程及数据流程所波及时数据,确定数据库及其数据表;⑺确定系统概要设计总体构造、数据构造、详细设计模块、算法框架;8进行系统实行过程的程序设计及其软件测试
2.系统分析系统分析的最重要内容有员工信息管理系统的业务需求分析、业务流程图、数据流程图、数据库设计等四个部分
2.1业务需求与分析1系统数据需求通过对企业员工日勺信息管理业务流程的调查,总结系统对其数据的需求,重要有
①员工档案信息,
②员工工资信息,
③部门、职务、工资类型等基础信息2系统功能需求系统的重要需求,即所设计的系统在功能上应做什么本系统重要的功能有
①员工管理完组员工档案的新增、修改、删除、查询及打印等功能;重要实现对所有员工日勺姓名、编号、部门、职务、入职时间、性别、身份证号、出生日期、学历、私人及工作等信息的I管理
②工资管理完组员工工资日勺录入、查询、分析及有关打印等功能;重要实现对员工的姓名、工资类别及工资金额等信息日勺管理
③基本信息管理完毕部门设置、职务设置、工资类别设置、顾客口令设置,系统数据初始化等功能部门设置重要实现部门编号和部门名称的设置;职务设置重要实现职务编号和职务名称的I设置;工资类别设置重要实现工资类别编号和工资类别名称欧I设置;口令更改实现顾客口令的修改;系统初始化清除系统所有历史数据,使数据库进入初始状态
④系统协助协助顾客处理问题,沟通与软件开发者的联络3系统性能需求系统的性能指标包括存储容量限制、运行时间限制、传播速度规定、安全保密性等几种方面4系统运行环境需求
①硬件方面采用欧I设备机型以及外部设备等;
②软件方面支持系统运行日勺系统软件,如操作系统、数据库系统等5系统可靠性及安全保密需求对系统、重要子系统在运行中的安全、可靠、保密方面提出规定
2.2系统业务流程图从实际业务功能的角度将系统规划中有关欧I业务做深入的分析,用一种完整的I图型来反应业务处理过程系统业务流程图TFD如下:
2.3系统数据流程图以数据流程图表达数据流向和对数据进行欧I加工;分析系统数据,对数据流图中的数据流给出详细定义系统日勺顶层数据流程图(DFD)如下
3.系统设计系统设计重要有如下几项内容
3.1系统软件功能构造
3.2系统重要技术本系统采用Borland Delphi7开发环境,结合Microsoft Access数据库Borland Delphi7使用日勺是面向对象的I ObjectPascal语言,可以灵活得进行大型应用系统的开发Delphi7提供了对数据库系统及原则SQL语言支持,可以开发出符合原则SQL的应用系统,提高系统的可移植性,可根据不一样企业日勺需求,使用Oracle、SQLServer、Access等原则日勺SQL数据库同步,Delphi7自身提供了诸多数据库操作的控件,尚有第三方优势的I数据库操控件,从面更快,更好得开发出优秀的I应用系统本系统就采用了Dev Express企业的J DevExpressVCL数据控件一起实现员工信息管理系统日勺开发。
个人认证
优秀文档
获得点赞 0