人事档案论文

人事档案论文 齐齐哈尔职业学院毕业设计 (论文) 题 目 类 别 层 次 专 业 班 号 学 号 学 生 指导教师 齐 齐 哈 尔 职 业 学 院 年 月 日 齐齐哈尔职业学院高等职业教育 毕 业 设 计 (论 文) 评 语 年 月 日 学生: 班号: 学号: 类别: 层次: 专业: 毕业设计(论文)题目: 指导教师评语: 指导教师(签字) 评阅人评语: 评阅人(签字) 答辩委员会评语: 答辩委员会根据毕业设计(论文)之材料及学生之答辩作出以下评语: 学生 毕业设计(论文)答辩成绩评定为 根据所提交之材料及毕业设计答辩之成绩，答辩委员会认为该学生已(未)完成齐齐哈尔职业学院高等教育的教学准予毕业(肄业) 对毕业设计(论文)的特殊评语: 答辩委员会 主任(签字) 委员(签字) 齐齐哈尔职业学院高等职业教育 毕 业 设 计 (论 文) 任 务 书 姓名: 类别: 班号: 层次: 学号: 专业: 毕业设计(论文)题目: 立题目的和意义: 技术条件: 技术要求与: 时间安排: 指导教师: 年 月 日 教研室主任: 年 月 日 目 录 摘 要 „„„„„„„„„„„„„„„„„„„„„„„„„„„ 7 Abstract „„„„„„„„„„„„„„„„„„„„„„„„„„ , 一.开发方法与开发工具 „„„„„„„„„„„„„„„„„„„ 10 1.1开发方法 „„„„„„„„„„„„„„„„„„„„„„10 .2开发工具 „„„„„„„„„„„„„„„„„„„„„„11 1 1.3 vasual foxpro 简介 „„„„„„„„„„„„„„„„„11 二(可行性分析 „„„„„„„„„„„„„„„„„„„„„„14 2.1开发的可行性研究 „„„„„„„„„„„„„„„„„„14 2.2数据字典 „„„„„„„„„„„„„„„„„„„„„14 三(需求分析 „„„„„„„„„„„„„„„„„„„„„„„15 3.1编写目的 „„„„„„„„„„„„„„„„„„„„„15 3.2项目背景 „„„„„„„„„„„„„„„„„„„„„15 四(项目概述 „„„„„„„„„„„„„„„„„„„„„„„15 4.1 软件描述 „„„„„„„„„„„„„„„„„„„„„15 4.2 运行环境 „„„„„„„„„„„„„„„„„„„„„15 4.3条件与限制 „„„„„„„„„„„„„„„„„„„„„15 五(功能需求 „„„„„„„„„„„„„„„„„„„„„„„16 5.1 功能描述 „„„„„„„„„„„„„„„„„„„„„16 5.1.1 人事管理 „„„„„„„„„„„„„„„„„„16 5.1.2 系统维护 „„„„„„„„„„„„„„„„„„16 六(接口需求 „„„„„„„„„„„„„„„„„„„„„„„16 6.1 用户界面 „„„„„„„„„„„„„„„„„„„„„16 6.2 软件接口 „„„„„„„„„„„„„„„„„„„„„17 七(性能需求 „„„„„„„„„„„„„„„„„„„„„„„17 八(数据描述 „„„„„„„„„„„„„„„„„„„„„„„17 8.1 开工或初始化数据 „„„„„„„„„„„„„„„„„15 8.2 动态输入数据 „„„„„„„„„„„„„„„„„„„17 8.3 动态输出数据 „„„„„„„„„„„„„„„„„„„17 8.4 数据采集 „„„„„„„„„„„„„„„„„„„„„17 8.5 数据库描述 „„„„„„„„„„„„„„„„„„„„17 九(其他需求 „„„„„„„„„„„„„„„„„„„„„„„18 9.1 可使用性 „„„„„„„„„„„„„„„„„„„„„18 9.2 安全保密 „„„„„„„„„„„„„„„„„„„„„18 9.3 可维护性 „„„„„„„„„„„„„„„„„„„„„18 十(系统设计 „„„„„„„„„„„„„„„„„„„„„„„18 10.1需求概述 „„„„„„„„„„„„„„„„„„„„„18 10.2 处理流程 „„„„„„„„„„„„„„„„„„„„„18 十一.测试 „„„„„„„„„„„„„„„„„„„„„„„„„25 十二.结束语 „„„„„„„„„„„„„„„„„„„„„„„„26 附录一 参考资料及引用文档 „„„„„„„„„„„„„„„„26 附录二 数据字典 „„„„„„„„„„„„„„„„„„„„„26 附录三 模块代码 „„„„„„„„„„„„„„„„„„„„„30 摘 要 信息技术的浪潮正在席卷整个地球，地球变得越来越小，地球上的人们之间的距离越来越近。信息技术的发展不仅仅是技术上的革命，同时，也是思想上的革命。随着信息技术的发展，新思想、新概念、新理论、新方法层出不穷，令人目不暇接。这是一场真正的革命，这是人类认识自己、认识自然的新阶段。 20世纪，随着全球经济的蓬勃发展，众多经济学家纷纷提出了新的管理理论。信息处理已成为当今世界上一项重要的社会活动。企业需要处理的信息量在急速的增长，对日益增长的信息进行有效的管理是提高生产效率的关键。因此采用什么样的方法对这些大量的数据进行行之有效的管理，是当前企业生产中的一项重要内容。管理信息系统就是我们常说的MIS(Management Information System) ,在强调管理，强调信息的现代社会中它变得越来越普及。 MIS是一门新的学科，它跨越了若干个领域，可以有效的管理企业中的数据，有利于信息化产业高速发展。 bstract Pluck and want The tides of information technology sweep across whole the earths, it is more and more young for the earth to become, peoples at the the earth more and more near distance. The development of the information technology is not merely the revolution on the technology, besides, is the revolution on the thought too. Along with the development of information technology, new thoughts,,, new methods emerge in an endless stream and make people too plenty for the eye to take it all in new theories new concepts. These one a of real revolutions, it is mankind that know oneself, know natural new stages this. In the 20th century, with the flourishing development of global economy, numerous economists put forward the new management theory one after another . Information processing has already become an important social activities nowadays in the world. Enterprise need amount of information that deal with at growths rapidly, carry on effective management to raise the keys of production efficiency to information that increase day by day. Adopt what kind of method carry on effectual management is present enterprise an important contents in the productions to these data as much as a large amount of. The management information system is MIS( Information System of Management) that we often talked about, emphasizing that manages , Emphasize that it is popularized more and more that it makes in the modern society of the information. Unless it is in MISs one pieces new disciplines , cross over several pieces field its,can effective management data of enterprises,it help information-based industry not to be developed at a high speed. This thesis at one a piece of practical Daqings three-dimensional software company leave the example on administrative system by software, recommend developping the whole course of the management information system( MIS). 一(开发方法与开发工具 1.1开发方法 管理信息系统的开发是一个复杂的系统工程，它涉及到计算机处理技术、系统理论、 组织机构、管理功能、管理知识等各方面的问题，至今没有一种统一完备的开发方法。 但是，每一种开发方法都要遵循相应的开发策略。任何一种开发策略都要明确以下问题: , 系统要解决的问题:如采取何种方式解决组织管理和信息处理方面的问题，对企业 提出的新的管理需求该如何满足等。 , 系统可行性研究:确定系统所要实现的目标。通过对企业状况的初步调研得出现状 分析的结果，然后提出可行性并进行论证。系统可行性的研究包括目标和方案可行 性、技术的可行性、经济方面的可行性和社会影响方面的考虑。 , 系统开发的原则:在系统开发过程中，要遵循领导参与、优化创新、实用高效、处 理化的原则。 , 系统开发前的准备工作:作好开发人员的组织准备和企业基础准备工作。 , 系统开发方法的选择和开发计划的制定:针对已经确定的开发策略选定相应的开发 方法，是结构化系统分析和设计方法，还是选择原型法或面向对象的方法。开发计划的 制定是要明确系统开发的工作计划、投资计划、工程进度计划和资源利用计划。 管理信息系统开发方法主要有:结构化生命周期开发方法、原型法、面向对象的开发方 法。 1) 结构化生命周期开发方法 目前较为流行的MIS开发方法是结构化生命周期开发方法，其基本思想是: 用系统的思想和系统工程的方法，按用户至上的原则，结构化、模块化地自上而下对生 命周期进行分析与设计。 用结构化生命周期开发方法开发一个系统，将这个开发过程划分为5个依次 连接的阶段: , 系统规划阶段:主要任务是明确系统开发的请求，并进行初步的调查，通过可行性 研究确定下一阶段的实施。系统规划方法有战略目标集转化法(SST，Strategy Set Transformation)、关键成功因素法(CSF, Critical Success Factors)和企业规划法(BSP, Business System Planning)。 , 系统分析阶段:主要任务是对组织结构与功能进行分析，理清企业业务流程和数据 流程的处理，并且将企业业务流程与数据流程抽象化，通过对功能数据的分析，提 出新系统的逻辑方案。 , 系统设计阶段:主要任务是确定系统的总体设计方案、划分子系统功能、确定共享 数据的组织，然后进行详细设计，如处理模块的设计、数据库系统的设计、输入输 出界面的设计和编码的设计等。 , 系统实施阶段:主要任务是讨论确定设计方案、对系统模块进行调试、进行系统运 行所需数据的准备、对相关人员进行培训等。 , 系统运行阶段:主要任务是进行系统的日常运行管理，评价系统的运行效率，对运 行费用和效果进行监理审计，如出现问题则对系统进行修改、调整。 , 这五个阶段共同构成了系统开发的生命周期。结构化生命周期开发方法严格 区分了开发阶段，非常重视文档工作，对于开发过程中出现的问题可以得到及时的纠正， 避免了出现混乱状态。但是，该方法不可避免地出现开发周期过长、系统预算超支的情 况，而且在开发过程中用户的需求一旦发生变化，系统将很难作出调整。 2) 原型法 原型法在系统开发过程中也得到不少应用。原型法的基本思想是系统开发人员凭借自己对用户需求的理解，通过强有力的软件环境支持，构造出一个实在的系统原型，然后与用户协商，反复修改原型直至用户满意。原型法的应用充分利用了最新的软件工具，使系统开发效率大为提高。 3) 面向对象系统开发方法 面向对象(OO，Object Oriented)的系统开发方法，是近年来受关注的一种系统开发方法。面向对象的系统开发方法的基本思想是将客观世界抽象地看成是若干相互联系的对象，然后根据对象和方法的特性研制出一套软件工具，使之能够映射为计算机软件系统结构模型和进程，从而实现信息系统的开发。 1. 2开发工具 为了缩短软件开发的周期，提高软件的质量和化水平及软件的可维护性，越来越多的软件开发公司使用先进的软件开发工具或计算机辅助软件工程工具(CASE，Computer-Aided Software Engineering)，如各种可视化建模工具、系统分析和设计工具、软件质量测试工具、软件文档建立和管理工具等。还有各种MIS开发平台和代码生成工具，这些工具极大地方便了MIS开发。 1.3 visual foxpro 简介 Visual FoxPro 是为数据库结构和应用程序开发而设计的功能强大的面向对象 的环境。无论是组织信息、运行查询、创建集成的关系型数据库系统，还是为最终用户 编写功能全面的数据管理应用程序，Visual FoxPro 都可以提供管理数据所需的工具,可 以在应用程序或数据库开发的任何一个领域中提供帮助。Visual FoxPro 所具有的速度、 能力和灵活性，是普通数据库管理系统无法比拟的，它把我们带入一个 Xbase 新时代 . visual foxpro的数据窗口还提供了组框对象和按钮对象，开发人员可以使用它们 将数据窗口中的对象进行分组，并且将用户对数据窗口的操作界面集成在数据窗口内 部。 Visual FoxPro可以运行在 Windows 95(中文版)或更高版本，或者 Windows NT 4.0(中 文版)或更高版本中。下面是在 Windows 操作系统中运行 Visual FoxPro 推荐系统的 要求: 1.一台带有 486 66MHz 处理器(或更高档处理器)的 IBM 兼容机。 2.一个鼠标。 3.16MB 内存。 4.用户自定义安装需要 85MB 硬盘空间，完全安装需要 90MB 硬盘空间。 推荐使用 VGA 或更高分辨率的监视器。 二.可行性分析 2.1开发的可行性研究 由于国家对软件行业管理进行了严格的要求，并且制定了严格的管理规范，所以在企业中开发管理信息系统是可行的。另外，在调研的过程中发现，大庆三维软件公司通过了国家质量ISO 9000认证，其管理已经规范。开发出统一的管理信息系统不久可以提高大庆三维软件公司的管理水平，实现科学化、系统化和规范化管理，而且具有很大的实用价值和经济价值。它对于改变三维软件公司的管理长期完全依赖人工管理的现状有着深远的意义。由于近几年计算机技术的飞速发展和各大企业计算机管理的普及，使得实行计算机硬件环境发展成熟。因此开发出适合本企业管理的适用软件是本企业迫切的要求～本论文正是出于此目的开发本系统。利用Adaptive Server Anywhere作为数据后台存储，visual foxpro作为前台开发工具开发出运行于Windows95/98或Windows NT环境下的信息管理系统是完全可行 2.2数据字典 见附录 三(需求性分析 3.1 编写目的 系统需求分析是软件项目开发的一个重要阶段。在进行多次需求调研的基础上，为了方便公司对各个项目所需文档的管理需求，以作为下一开发阶段——软件设计的基础，特编制本软件需求规格说明书。 3.2 项目背景 a. 建议开发的软件项目的名称:光大企业人员管理系统 b.本项目的主要用户:光大企业 四(项目概述 4.1 软件描述 光大企业人事管理系统是公司各项目文档管理的基础。 该项目的主要目标是: 实现广大企业的人事管理、软件配置管理、软件项目管理、软件产品管理的规范化, 从而提高工作效率和工作质量。该项目的实施将实现广大企业的人员信息化管理，对广 大企业人员信息资源进行综合分析，以提高工作质量 4.2 运行环境 操作系统:Windows 95/98/2000 开发工具:visual foxpro 6.0 4.3条件与限制 1.完成本项目应具备的条件是: a. 良好的网络环境、满足系统运行的硬软件环境; b. 管理正规、管理人员综合素质较高的用户; c. 用户方强有力的组织协调和积极配合。 2.完成本项目已具备的条件是: a.广大企业已具有较完整的网络框架，系统运行的软硬件环境已经具备; b.计算机技术和信息技术满足项目的要求; c.光大企业公司领导重视和有关部门的大力支持。 五(功能需求 5.1 功能描述 5.1.1 人事管理 a. 人事档案:人事档案的信息录入、增删改、查询、统计、打印报表 5.1 系统维护 a. 用户密码建立:对于已经在人员管理中添加的用户进行密码设置 b. 系统信息:对于本系统的一些信息进行描述 5.1. 窗口 层叠、平铺 5.2 系统总体设计 打开“文件”菜单下的“新建”，出现对话框，选择“项目”点“新建”即可。 出现“项目管理器”的界面(如下图) “项目管理器”是 Visual FoxPro 中处理数据和对象的主要组织工具,是 Visual FoxPro 的“控制中心”。项目是文件、数据、文档和 Visual FoxPro 对象的集合，其保存文件带有 .pjx 扩展名。 在建立表、数据库、查询、表单、报表以及应用程序时，可以用“项目管理器”来组织和管理文件。通过把已有的 Visual FoxPro .dbf 文件添加到一个新的项目中，可以为自己创建项目。 5.2.1 查看项目中的内容 “项目管理器”为数据提供了一个组织良好的分层结构视图。若要处理项目中某一特定类型的文件或对象，可选择相应的选项卡。 在建立表和数据库，以及创建表单、查询、视图和报表时，所要处理的主要是“数据”和“文档”选项卡中的内容。 4.2.2 “项目管理器”中的“数据”选项卡 数据库是表的集合，一般通过公共字段彼此关联。使用“数据库设计器”可以创建一个数据库，数据库文件的扩展名为 .dbc。 自由表存贮在以 .dbf 为扩展名的文件中，它不是数据库的组成部分。 自由表可添加到数据库中，本系统中添加的表名为rsda 、tjbm、tjzw 查询是检查存贮在表中的特定信息的一种结构化方法。利用“查询设计器”，可以设置查询的格式，该查询将按照输入的规则从表中提取记录。查询被保存为带 .qpr 扩展名的文件。 视图是特殊的查询，通过更改由查询返回的记录，可以用视图访问远程数据或更新数据源。视图只能存在于数据库中，它不是独立的文件。。 5.2.3 “项目管理器”中的“文档”选项卡 表单用于显示和编辑表的内容。 “用表单管理数据”，将讨论用“表单设计器”创建表单的方法。 报表是一种文件，它告诉 Visual FoxPro 如何设置查询，以从表中提取结果，以及如何将它们打印出来。标签是打印在专用纸上的带有特殊格式的报表。 ”、“代码”及“其他”)主要用于为最终用户创建应用程序。其余选项卡(如“类 5.2.4 查看文件详细内容 “项目管理器”中的项是以类似于大纲的结构来组织的，可以将其展开或折叠，以便查看不同层次中的详细内容。 如果项目中具有一个以上同一类型的项，其类型符号旁边会出现一个 + 号。单击 + 号可以显示项目中该类型项的名称。 例如，单击“自由表”符号旁边的 + 号，可以看到项目中自由表的名称。 若要折叠已展开的列表，可单击列表旁边的 - 号。 5.2.5 添加或移去文件 要想使用“项目管理器”，必须在其中添加已有的文件或者用它来创建新的文件。例如，如果想把一些已有的扩展名为 .dbf 的表添加到项目中，只需在“数据”选项卡中选择“自由表”，然后用“添加”按钮把它们添加到项目中。 5.2.6 创建和修改文件 “项目管理器”简化了创建和修改文件的过程。只需选定要创建或修改的文件类型，然后选择“新建”或“修改”按钮，Visual FoxPro 将显示与所选文件类型相应的设计工具。 , 改变显示外观 “项目管理器”显示为一个独立的窗口。可以移动它的位置、改变它的尺寸或者将它折叠起来只显示选项卡。 , 若要移动“项目管理器” 将鼠标指针指向标题栏，然后将“项目管理器”拖到屏幕上的其他位置。 , 若要改变“项目管理器”窗口的大小 将鼠标指针指向“项目管理器”窗口的顶端、底端、两边或角上，拖动鼠标即可扩大或缩小它的尺寸。 , 折叠“项目管理器” 单击右上角的向上箭头，即可折叠如下: 容易地就可以将“项目管理器”还原为正常大小。 , 还原“项目管理器” 单击右上角的向下箭头。 折叠“项目管理器”后，可以拖开选项卡，并根据需要重新安排它们的位置。拖开某一选项卡后，它可以在 Visual FoxPro 的主窗口中独立移动。 5.2.8 拖开某一选项卡 1. 折叠“项目管理器”。 2. 选定一个选项卡，将它拖离“项目管理器”。 当选项卡处于浮动状态时，通过在选项卡中单击鼠标右键可以访问“项目”菜单中的选项。 如果您希望选项卡始终显示在屏幕的最顶层，可以单击选项卡上的图钉图标，这样，该选项 Visual FoxPro 窗口的上面。可以使多个选项卡都处于“顶层显卡就会一直保留在其他 示”的状态。再次单击图钉图标可以取消选项卡的“顶层显示”设置。 , 还原选项卡 单击选项卡上的关闭按钮。- 或者 - 将选项卡拖回到“项目管理器”。 还可以停放“项目管理器”，使它象工具栏一样显示在 Visual FoxPro 主窗口的顶部。 , 停放“项目管理器” 将“项目管理器”拖到 Visual FoxPro 主窗口的顶部。 停放“项目管理器”后，它就变成窗口工具栏区域的一部分。“项目管理器”处于停放状态时，不能将其展开，但是可以单击每个选项卡来进行相应的操作。对于停放的“项目管理器”，您同样可以从中拖开选项卡。 利用“项目管理器”，可以快速访问 Visual FoxPro 的各种设计器。这些工具使得创建表、表单、数据库、查询和报表以管理数据变得轻而易举。 下面是使用设计器的方法。您可以把用设计器创建的项组装到应用程序中。除了在“项目管理器”中选择待创建文件的类型，选择“新建”的方法外，使用设计器的另一种方法就是利用“文件”菜单中的“新建”命令。下表说明了为完成不同的任务所使用的设计器。 若要 使用的设计器 创建表和设置表中的索引 表设计器 在本地表中运行查询 查询设计器 在远程数据源上运行查询;创建可更新的查询 视图设计器 创建表单以便在表中查看和编辑数据 表单设计器 建立用于显示和打印数据的报表 报表设计器 建立数据库;在不同的表之间查看并创建关系 数据库设计器 为远程视图创建连接 连接设计器 每种设计器都有一个或多个工具栏，可以很方便地使用大多数常用的功能或工具操作。例如，表单设计器就有分别用于控件、控件布局以及调色板的工具栏。 工作时，您可以根据需要在屏幕上放置多个工具栏。通过把工具栏停放在屏幕的上部、底部或两边，可以定制工作环境。Visual FoxPro 能够记住工具栏的位置，再次进入 Visual FoxPro 时，工具栏将位于关闭时所在的位置上。 1. 从“显示”菜单中选择“工具栏”。 2. 在“工具栏”对话框中，选择要使用的工具栏。 3. 选择“确定”。 , 将工具栏拖到屏幕的顶部、底部或两边。 向导是交互式的程序，能帮助您快速完成一般性的任务，例如，创建表单、设置报表格式和建立查询。 通过在向导的一系列屏幕显示中回答问题或选择选项，可以让向导建立一个文件，或者根据您的响应完成一项任务。例如，选择“报表向导”后，可以选择待创建报表的类型。向导会询问您要使用哪个表，并提供用于报表格式设置的选择。 启动向导 , 1. 在“项目管理器”中选定要创建文件的类型，然后选择“新建”。 也可以从“文件”菜单中选择“新建”，然后选择待创建文件的类型。 2. 选择“向导”。 , 利用“工具”菜单中的“向导”，您可以直接访问大多数的向导。 定位向导屏幕 启动向导后，要依次回答每一屏幕所提出的问题。在准备好进行下一个屏幕的操作时，可选择“下一步”按钮。 如果操作中出现错误，或者原来的想法发生了变化，可选择“上一步”按钮来查看前一屏幕的内容，以便进行修改。选择“取消”将退出向导而不会产生任何结果。如果在使用过程中遇到困难，请按 F1 键取得帮助。 到达最后一屏时，如果您准备退出向导，请选择“完成”按钮。 如果您很忙，可以选择“完成”按钮直接走到向导的最后一步，跳过中间所要输入的选项信息，而使用向导提供的默认值。 保存向导结果 根据所用向导的类型，每个向导的最后一屏都会要求您提供一个标题，并给出保存、浏览、修改或打印结果的选项。 预览”选项，可以在结束向导中的操作前查看向导的结果。如果需要做出不同的 使用“ 选择来改变结果，您可以返回到前边重新进行选择。对向导的结果满意后，请选择“完成”按钮。 修改用向导创建的项 创建好表、表单、查询或报表后，您可以用相应的设计工具将其打开，并做进一步的修改。不能用向导重新打开一个用向导建立的文件，但是可以在退出向导之前，预览向导的结果并做适当的修改。 使用生成器 生成器是带有选项卡的对话框，用于简化对表单、复杂控件和参照完整性代码的创建和修改过程。每个生成器显示一系列选项卡，用于设置选中对象的属性。可使用生成器在数据库表之间生成控件、表单、设置控件格式和创建参照完整性。 生成一个控件 , 从“表单控件”工具栏中，选择“生成器锁定”按钮。每次向表单添加新控件，Visual FoxPro 显示一个适当的生成器。 - 或者 - , 从表单上选择控件，接着在快捷菜单中选择“生成器”命令。 若要使用“表单生成器” , 从“表单”菜单中，选择“快速表单”。 如果表单中已经有多个控件，可以使用“自动格式生成器”同时设置它们的格式。 若要对多个控件设置格式 1. 在“表单设计器”中，选择控件。 2. 从“表单设计器”工具栏中选择“自动格式”设置按钮。 设置菜单 ～)从项目管理器选择“其他”原项卡，再选择“菜单”，然后单击“新建” 2)出现“菜单设计器” 3) 然后设计菜单 5.3 系统的表单设计 bjry.scx 新增的click append blank &&增加一条空记录 thisform.text1.refresh &&将text1的内容刷新，下同 thisform.text2.refresh thisform.text3.refresh thisform.text4.refresh thisform.text5.refresh thisform.text6.refresh thisform.text7.refresh thisform.text8.refresh thisform.edit1.refresh thisform.text1.setfocus &&将焦点设到text1 上一条 click: skip -1 &&记录指针向上跳一行 *以下一段程序检测记录指针是否到了开头，如果是给出提示，并把指针定位到 第一个记录 if bof() &&假如指针已到开头 wait '已到开头' window nowait &&在右上角显示的提示，鼠标或键盘一动提示消失 go top &&将指针定位到第一个记录 endif &&假设结束 thisform.text1.refresh &&将text1的内容刷新，下同 thisform.text2.refresh thisform.text3.refresh thisform.text4.refresh thisform.text5.refresh thisform.text6.refresh thisform.text7.refresh thisform.text8.refresh thisform.edit1.refresh thisform.text1.setfocus &&将焦点设到text1 下一条 click: skip &&记录指针向下跳一行 *以下一段程序检测记录指针是否到了结尾，如果是给出提示，并把指针定位到最 后一个记录 if eof() &&假如指针已到结尾 wait '已到结尾' window nowait &&在右上角显示的提示，鼠标或键盘一动提示消失 go bottom &&将指针定位到最后一个记录 endif &&假设结束 thisform.text1.refresh &&将text1的内容刷新，下同 thisform.text2.refresh thisform.text3.refresh thisform.text4.refresh thisform.text5.refresh thisform.text6.refresh thisform.text7.refresh thisform.text8.refresh thisform.edit1.refresh thisform.text1.setfocus &&将焦点设到text1 退出 click: thisform.release &&本表单释放 cx.scx 确定click: select rsda &&选择人事档案数据表 locate for 姓名=trim(thisform.text1.value) &&查询数据表中姓名与当前表单 text1文本框值相等的记录 *上一句之所以要用trim()函数是因为假如text1后面有空格可能导致找不到正确的 记录。 *因为'abc '与'abc '是不相等的，但在不精确匹配情况下，与'abc'或'a'是相等的， *所以去掉后面空格后只输入一个姓也能查到。 if .not. found() &&假如没找到 wait window '没找到所要的记录～按任意键或鼠标继续...' &&显示没找到的提示 信息 endif &&假如结束 thisform.release &&本表单释放 取消click thisform.release &&本表单释放 mm.scx 确定click: if mm<>"123456" @ 5,6 say "你是否知道密码，请再输入一遍" else thisform.release endif 取消click: quit rsda.scx 右击，用生成器导入一个表rsda即可 rycxx.scx 确定click locate for 编号=nr go top release thisform ryxg.scx 搜寻click: do form rycxx.scx 上一个click: skip -1 if bof() go top endif thisform.refresh 下一个click skip 1 if eof() go bottom endif thisform.refresh tjbm.scx 录入click: use tjbm append go bottom thisform.refresh 六(接口需求 6.1 用户界面 用户要求系统的界面布局清晰明了，操作简单方便，系统功能易学易用。显示界面元素以黑白灰三色为主色调。界面操作既注重鼠标的运用，也充分考虑习惯使用键盘的用户。 显示屏幕属性:800*600 大字体(large font) 遵循Windows系统风格: , MDI多文档界面， , Main frame defaults to be maximized with the task bar displayed 主框架窗口缺省为最大化状态， , Routine function can be called through menu item and toolbar button 常用功能作为菜单项列在菜单中，另外在工具条上配备按钮， , Mouse operation is not recommended for data input 大数据量输入功能减少鼠标和键盘的切换次数，少用或不用鼠标， , Keyboard can replace mouse in most operations, for instance, accessing menu, opening and closing window, and so on 在大多数操作中，键盘可以代替鼠标， 显示界面如下: 七(性能需求 要求本系统有较强的适应性，稍做修改即可适应新的操作方式;即使因环境的变化造成暂时的故障，待恢复运行之后，数据的存储、精度等都不会发生变化。 八(数据描述 8.1 开工或初始化数据 本系统开工或初始化必需的数据: a. 企业名称、组建时间、现负责人; b. 企业人员编码、姓名; 8.2 动态输入数据 a. 各类人事档案、文档记录 8.3 动态输出数据 本软件输出的数据基本上分为两大类，即WORD文档数据和报表数据。 8.4 数据采集 本系统的数据采集者主要是用户。 8.5 数据库描述 本系统需要建立如下的数据库: 各部门人员基本信息库、部门信息、职务信息 基础数据在系统内保留的时间与系统的生存周期相同，即15年。若系统到期后更新升级，可转储基础数据。 九(其他需求 9.1 可使用性 要求本系统在各个操作层面上都设置检查点、出错信息提示和帮助;具有较强的纠错能力和恢复能力，以增强系统的可使用性。 9(2 可维护性 本系统工作流程较为简单，但也不可避免地可能发生一些变更，因此要求本系统具有很好的可维护性。 十(系统设计 10(1需求概述 系统运行后从宏观上能看到比较统一的管理、查询和打印报表的形式。这样避免了手工管理产生的一系列问题。如避免了以前手工管理WORD文档，如放置不当或文件名称混乱就造成不好查询不好管理的现象。配置管理软件能解决一些手工管理不能解决的问题，能为软件公司的文档管理提供了一个方便的条件。也使得公司在各个管理方面系统化、自动化、科学化。应用本系统，使管理变得更便捷，利于公司人员的查阅。提高了工作效率和工作质量，利于信息化产业高速发展。 主要需求包括: , 能提供公司的部门设置及人员管理情况。如部门的查询、人员的增减、人事 、 档案 的录入、查询、统计。 , 能对软件生产过程中产生的WORD文档进行登记、查询、修改以及修改查询、文档访 问状况查询管理。 10.2运行设计 10.2.1 运行模块的组合 本系统的运行模块有多种组合，主要通过菜单选择来实现。 10.2.2 运行控制 本系统的运行控制方式基本一致，即通过人机界面的操作，如录入、保存、进入选择、退出等完成运行控制。 十一.测试 软件测试的目的是尽可能多地发现软件产品(主要是指程序)中的错误和缺陷。 为了发现程序中的错误，应竭力设计能暴露所有的测试用例。一个好的测试用例是极有可能发现迄今为止尚未发现的错误的测试用例。为了保证软件的可靠性，应作出详细的测试方案，对软件中的各种可能出现问题的地方做了测试，尽可能的发现错误，使程序更完善。 在vf开发过程中，常用一些小的控件来检测显示的结果是否与真正的值相同，这样就可以清楚的知道错误在哪儿。 十二.结束语 我非常的感谢我的老师张凤这几个月里对我的指导。在这短暂的几个月里，我结合企业对人员管理的过程，学习了vf开发工具，另外还加强了理论知识的学习，加强学习了软件工程和数据库系统。加强了理论和实践的结合，完成对所要开发的系统的设计和开发。当然，在开发的过程中也遇到了不少的困难都得到了同学和老师的帮助，在此我表示非常的感谢。 附录一: 参考资料及引用文档 a. visual foxpro 基础编程 b. visual foxpro 最新教程 c. 清华大学《实用软件工程》; d. 清华大学《管理信息系统》薛华成 主编 附录二: 数据字典 1.人事档案库(rsgl) 字段名 类型 长度 编号 字符型 4 姓名 字符型 10 出生年月 日期型 8 联系电话 字符型 8 部门 字符型 8 职务 字符型 10 基本工资 数值型 8 简历 备注型 10 2.部门(tjbm) 字段名 类型 长度 部门 字符型 6 人数 数值型 4 3(职务(tjzw) 字段名 类型 长度 职务 字符型 6 人数 数值型 4 附录三 部分源代码 : ************************************************** *-- Form: form1 (a:\guanli\cx.scx) *-- 父类: form *-- 基类: form * DEFINE CLASS form1 AS form Top = 0 Left = 0 Height = 121 Width = 217 DoCreate = .T. Caption = "查询" WindowType = 1 Name = "Form1" ADD OBJECT label1 AS label WITH ; Caption = "输入姓名:", ; Height = 25, ; Left = 24, ; Top = 24, ; Width = 73, ; Name = "Label1" ADD OBJECT text1 AS textbox WITH ; Height = 25, ; Left = 96, ; Top = 24, ; Width = 97, ; Name = "Text1" ADD OBJECT command1 AS commandbutton WITH ; Top = 72, ; Left = 24, ; Height = 25, ; Width = 72, ; Caption = "确定", ; Name = "Command1" ADD OBJECT command2 AS commandbutton WITH ; Top = 72, ; Left = 120, ; Height = 25, ; Width = 73, ; Caption = "取消", ; Name = "Command2" PROCEDURE command1.Click select rsda &&选择人事档案数据表 locate for 姓名=trim(thisform.text1.value) &&查询数据表中姓名与当前表单 text1文本框值相等的记录 *上一句之所以要用trim()函数是因为假如text1后面有空格可能导致找不到正 确的记录。 *因为'abc '与'abc '是不相等的，但在不精确匹配情况下，与'abc'或'a'是相 等的， *所以去掉后面空格后只输入一个姓也能查到。 if .not. found() &&假如没找到 wait window '没找到所要的记录～按任意键或鼠标继续...' &&显示没找到 的提示信息 endif &&假如结束 thisform.release &&本表单释放 ENDPROC PROCEDURE command2.Click thisform.release &&本表单释放 ENDPROC ENDDEFINE * *-- 结束定义: form1 ************************************************** *-- Form: form1 (a:\guanli\rsda.scx) *-- 父类: form *-- 基类: form * DEFINE CLASS form1 AS form Top = 0 Left = 0 Height = 361 Width = 468 DoCreate = .T. Caption = "人事档案" Name = "Form1" ADD OBJECT grid1 AS grid WITH ; ColumnCount = 8, ; Height = 361, ; Left = 0, ; Panel = 1, ; RecordSource = "rsda", ; Top = 0, ; Width = 468, ; Name = "Grid1", ; Column1.ControlSource = "rsda.编号", ; Column1.Width = 24, ; Column1.Name = "Column1", ; Column2.ControlSource = "rsda.姓名", ; Column2.Width = 54, ; Column2.Name = "Column2", ; Column3.ControlSource = "rsda.性别", ; Column3.Width = 24, ; Column3.Name = "Column3", ; Column4.ControlSource = "rsda.出生年月", ; Column4.Width = 66, ; Column4.Name = "Column4", ; Column5.ControlSource = "rsda.联系电话", ; Column5.Width = 85, ; Column5.Name = "Column5", ; Column6.ControlSource = "rsda.部门", ; Column6.Width = 60, ; Column6.Name = "Column6", ; Column7.ControlSource = "rsda.职务", ; Column7.Width = 60, ; Column7.Name = "Column7", ; Column8.ControlSource = "rsda.基本工资", ; Column8.Width = 48, ; Column8.Name = "Column8" ADD OBJECT form1.grid1.column1.header1 AS header WITH ; Caption = "编号", ; Name = "Header1" ADD OBJECT form1.grid1.column1.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column2.header1 AS header WITH ; Caption = "姓名", ; Name = "Header1" ADD OBJECT form1.grid1.column2.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column3.header1 AS header WITH ; Caption = "性别", ; Name = "Header1" ADD OBJECT form1.grid1.column3.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column4.header1 AS header WITH ; Caption = "出生年月", ; Name = "Header1" ADD OBJECT form1.grid1.column4.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column5.header1 AS header WITH ; Caption = "联系电话", ; Name = "Header1" ADD OBJECT form1.grid1.column5.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column6.header1 AS header WITH ; Caption = "部门", ; Name = "Header1" ADD OBJECT form1.grid1.column6.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column7.header1 AS header WITH ; Caption = "职务", ; Name = "Header1" ADD OBJECT form1.grid1.column7.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column8.header1 AS header WITH ; Caption = "基本工资", ; Name = "Header1" ADD OBJECT form1.grid1.column8.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" PROCEDURE Init dkda=.t. &&将人事档案表格打开的标记设为真，以便退出程序时先关闭本表 单 set order to 编号 &&将主索引设为编号，即按编号排序 ENDPROC PROCEDURE Destroy locate for delete() &&查询是否有做了删除标记的记录 if found() &&如果找到 wait window '正在删除数据' nowait &&给出正在删除数据的提示 pack &&将做了删除标记的数据彻底删除 wait window '数据删除完毕' nowait &&给出数据删除完毕的提示 endif &&结束假设 dkda=.f. &&将人事档案打开的标记设为假，即人事档案表格为关闭 set order to 0 &&将主索引设为0，即没有主索引，数据按输入顺序排列 ENDPROC ENDDEFINE * *-- 结束定义: form1 ************************************************** *-- Form: form1 (a:\guanli\ryxg.scx) *-- 父类: form *-- 基类: form * DEFINE CLASS form1 AS form Top = 14 Left = 41 Height = 250 Width = 401 DoCreate = .T. Caption = "Form1" Name = "Form1" ADD OBJECT label1 AS label WITH ; FontSize = 14, ; Caption = "人员信息修改", ; Height = 24, ; Left = 84, ; Top = 24, ; Width = 116, ; Name = "Label1" ADD OBJECT grid1 AS grid WITH ; ColumnCount = 9, ; Height = 108, ; Left = 72, ; RecordSource = "rsda", ; Top = 60, ; Width = 228, ; Name = "Grid1", ; Column1.ControlSource = "rsda.编号", ; Column1.Width = 75, ; Column1.Name = "Column1", ; Column2.ControlSource = "rsda.姓名", ; Column2.Width = 75, ; Column2.Name = "Column2", ; Column3.ControlSource = "rsda.性别", ; Column3.Width = 75, ; Column3.Name = "Column3", ; Column4.ControlSource = "rsda.出生年月", ; Column4.Width = 75, ; Column4.Name = "Column4", ; Column5.ControlSource = "rsda.联系电话", ; Column5.Width = 75, ; Column5.Name = "Column5", ; Column6.ControlSource = "rsda.部门", ; Column6.Width = 75, ; Column6.Name = "Column6", ; Column7.ControlSource = "rsda.职务", ; Column7.Width = 75, ; Column7.Name = "Column7", ; Column8.ControlSource = "rsda.基本工资", ; Column8.Width = 75, ; Column8.Name = "Column8", ; Column9.ControlSource = "rsda.简历", ; Column9.Width = 75, ; Column9.Name = "Column9" ADD OBJECT form1.grid1.column1.header1 AS header WITH ; Caption = "编号", ; Name = "Header1" ADD OBJECT form1.grid1.column1.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column2.header1 AS header WITH ; Caption = "姓名", ; Name = "Header1" ADD OBJECT form1.grid1.column2.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column3.header1 AS header WITH ; Caption = "性别", ; Name = "Header1" ADD OBJECT form1.grid1.column3.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column4.header1 AS header WITH ; Caption = "出生年月", ; Name = "Header1" ADD OBJECT form1.grid1.column4.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column5.header1 AS header WITH ; Caption = "联系电话", ; Name = "Header1" ADD OBJECT form1.grid1.column5.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column6.header1 AS header WITH ; Caption = "部门", ; Name = "Header1" ADD OBJECT form1.grid1.column6.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column7.header1 AS header WITH ; Caption = "职务", ; Name = "Header1" ADD OBJECT form1.grid1.column7.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column8.header1 AS header WITH ; Caption = "基本工资", ; Name = "Header1" ADD OBJECT form1.grid1.column8.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT form1.grid1.column9.header1 AS header WITH ; Caption = "简历", ; Name = "Header1" ADD OBJECT form1.grid1.column9.text1 AS textbox WITH ; BorderStyle = 0, ; Margin = 0, ; ForeColor = RGB(0,0,0), ; BackColor = RGB(255,255,255), ; Name = "Text1" ADD OBJECT command1 AS commandbutton WITH ; Top = 180, ; Left = 24, ; Height = 37, ; Width = 85, ; Caption = "搜寻", ; Name = "Command1" ADD OBJECT command2 AS commandbutton WITH ; Top = 180, ; Left = 204, ; Height = 37, ; Width = 85, ; Caption = "退出", ; Name = "Command2" ADD OBJECT command3 AS commandbutton WITH ; Top = 168, ; Left = 324, ; Height = 25, ; Width = 73, ; Caption = "上一个", ; Name = "Command3" ADD OBJECT command4 AS commandbutton WITH ; Top = 204, ; Left = 324, ; Height = 25, ; Width = 73, ; Caption = "下一个", ; Name = "Command4" PROCEDURE command1.Click do form rycxx.scx ENDPROC PROCEDURE command2.Click release thisform ENDPROC PROCEDURE command3.Click skip -1 if bof() go top endif thisform.refresh ENDPROC PROCEDURE command4.Click skip 1 if eof() go bottom endif thisform.refresh ENDPROC ENDDEFINE * *-- 结束定义: form1