人事工资管理系统设计与实现.doc

人事工资管理系统设计与实现
【摘 要】…………………………………………………………………3
【关键字】…………………………………………………………………3
第一章 绪 论…………………………………………………………3
1。1研究课题的背景………………………………………………3
1。2 研究思路和工作计划…………… …………………………3
第二章 管理信息系统研究概述………………………………………4
2。1管理信息系统的发展历史……………………………………4
2。2管理信息系统的特点…………………………………………5
2。3管理信息系统的开发方式……………………………………6
2。4管理信息系统的开发过程……………………………………7
第三章 工资管理系统分析与设计……………………………………9
3。1系统功能需求简介……………………………………………9
3.2功能需求描述…………………………………………………10
3。3目标系统要求…………………………………………………10
3。4系统平台选择…………………………………………………11
3。5数据库设计……………………………………………………11
3.5。1数据库介绍……………………………………………11
3.5。2数据流图………………………………………………11
3。5。3数据词典分析…………………………………………12
第四章 人事工资管理系统的功能实现……………………………13
4.1员工基本信息模块编码设计……………………………………………13
4。2工资结构设置模块编码设计…………………………………20
4。3入口程序………………………………………………………21
4。4连编程序………………………………………………………21
第五章 小 结……………………………………………………22【摘 要】对企业而言，人力资源是企业最宝贵的资源，也是企业的“生命线”.而工资管理又是人力资源管理的重中之重.实行电子化的工资管理，可以让人力资源管理人员从繁重琐碎的案头工作解脱出来，去完成更重要的工作.本文介绍毕业设计课题的选题背景和意义，相关的研究和开发的比较和综述，研究开发的过程，以及设计思路和实现细节的考虑，最后给出了作者在毕业设计过程的体会。
【关键字】管理信息系统，数据库，工资管理,实体关系图（E—R图），数据字典,数据流图。
第一章 绪 论
1。1研究课题的背景
借助现代信息技术和管理理论，建立企业管理信息系统是当今社会的重要趋势。党和政府根据知识经济时代的特点，对国民经济建设提出了“用信息化带动工业化”的指导思想。对企业而言，全面开发和应用计算机管理信息系统就是近期不能回避的问题。在企业管理中，人力资源是企业最宝贵的资源，也是企业的“生命线",因此人事管理是企业的计算机管理信息系统重要组成部分。而工资管理又是人力资源管理的重中之重。实行电子化的工资管理,可以让人力资源管理人员从繁重琐碎的案头工作解脱出来，去完成更重要的工作。工资管理信息系统的实现可以减轻比较繁琐的手工工资管理。
现在应用在大中型企业的管理信息系统中，几乎都包括了工资管理模块。有些环境中是由作为大型ERP软件中的一个模块引进的，有些是作为企业的财务系统的一部分。这些根据规范的西方的管理制度设计的工资管理软件,在很多时候还不能完全解决中国特色的中小企业的问题，本文介绍的毕业设计的研究工作就是要为这些具有中国特色的中小企业解决他们在工资管理方面的问题。
通过在本单位经过一周的调研，并参考其他同行设计工资管理软件，我基本上搞清楚了像我们单位这样的小型企业对系统的需求,如果能够设计一套针对类似本单位的小型国有企业的工资管理系统特别有意义，并且是现行的财务管理软件代替不了的.
在和指导老师多次交流后，确定实现方案的要点和工作计划。本系统的实现的主要功能有:员工信息管理、工资结构设置、工资汇总打印等等功能.
1.2 研究思路和工作计划
正如研究任何其它软件项目一样，我做的毕业设计也经历了从选题,调研,熟悉开发环境，实验关键技术,查找类似的相关系统的资料;系统概要设计，数据库结构设计，功能模块开发，功能模块测试，系统调试和系统试运行和修改。下面的流程图反映了我们的基本的思路和过程.
在各阶段的时间安排上，选题和调研用了两周左右的时间；熟悉开发环境,实验关键技术，查找类似的相关系统的资料用了两周时间;系统概要设计用了一周的时间；数据库结构设计用了一周时间；功能模块开发和功能模块测试用了四周的时间；最后，系统调试和系统试运行和修改用了约三周的时间。完成全部工作大约用了3个月的时间.
概要设计
数据库的结构设计
功能模块开发
功能模块测试
系统调试
定题
调查研究
资料查询
开发环境熟悉
研究关键技术
系统试运行和修改

第二章 管理信息系统研究概述
2.1管理信息系统的发展历史
信息作为生产力中最活跃的因素,很早就在人类经济生活中发挥着不可替代的作用，但把信息纳入企业经营管理系统中高效处理和应用是在计算机发明以后的50年代末。
目前人们所提到的管理信息系统,通常是指以计算机为工具，对管理信息进行收集、存贮、检索、加工和传递，使其应用于组织机构及企业管理领域的“人－机系统”，该系统是70
年代初“后工业经济”时代的产物，在企业管理信息系统在其发展的初期，是单一的人-机系统，系统功能简单，效率低，对管理的作用有限。
进入2 0世纪80年代末，随着计算机网络和通信技术的大力发展，企业管理信息系统进入网络化的发展时期.世界发达国家已建立起了完善的先进的管理信息系统体系,在其社会经济发展领域中发挥着巨大的作用。
我国的管理信息系统大发展是在80年代末90年代初，国家相继建立起了“金卡"、“金关”、“金桥”工程,多数企事业单位建立了局域网和广域网管理信息系统.随着世界经济和我国经济逐步向知识经济迈进，无论是基于工业经济的管理信息系统，还是面向少数专家和管理人员的专家系统 （ES）或决策支持系统 （DSS)，其处理对象和服务对象,自身的系统结构，处理能力，都有了进一步的发展。
2.2管理信息系统的特点
1、管理信息系统的组成
管理信息系统在企业中的应用存在三个要素，这就是人、计算机和数据。
人是指企业领导者、管理人员、技术人员，以及MIS建设的领导机构和实施机构，他们在系统中起主导作用。MIS是一项系统工程，不是只靠一些计算机开发人员就可以完成的，必须有企业管理人员，尤其是企业领导的积极参与.
计算机技术是MIS(管理信息系统）得以实施的主要技术。在这些技术中，软件开发是MIS开发的重点.
第三个因素也不能忽视。企业的管理数据是MIS正常运行的基础。广义地说，各项管理制度是MIS建设成功的基础。试想要计算一台机床的成本,需要按时输入每个部件、每个零件以及每个螺钉螺帽的费用，涉及企业的生产车间、采购、库房、工艺设计和财务等多个部门，必须有一整套管理制度作保证.
2、管理信息系统的界面特点
在计算机软件技术中,人机界面已经发展成为一个重要的分支。MIS人机界面设计一般遵循以下一些基本原则:
（1)以通信功能作为界面设计的核心
人机界面设计的关键是使人与计算机之间能够准确地交流信息。一方面，人向计算机输入信息时应当尽量采取自然的方式：另一方面,计算机向人传递的信息必须准确，不致引起误解或混乱。另外，不要把内部的处理、加工与人机界面混在一起(人机界面程序只是通信），以免互相干扰，影响速度。
设计MIS时，针对每一个功能,都要按照模块化思想，使输入、处理与输出“泾渭分明"，充分体现人机界面的通信功能。这样设计出来的程序不易出错，而且易于维护.
报表打印是MIS必备的功能之一，而且打印之前常常需要计算.计算与打印分开设计,虽然消耗时间，但易于整个MIS系统的维护。
（2）界面必须始终一致
统一的人机界面不至于会增加用户的负担，让用户始终用同一种方式思考与操作。最忌讳的是每换一个屏幕用户就要换一套操作命令与操作方法.
例如在整个系统可以以问号图标表示帮助，以磁盘图标表示存盘，以打印机图标表示打印等。
(3）界面必须使用户随时掌握任务的进展情况
人机界面应该能够告诉用户软件运行的进度。特别是在需要较长时间的等待时,必须让用户了解工作进展情况，如可以设计已经完成了百分之几的任务进度条等。目前，Windows下的应用软件无论大小，其安装程序几乎均做到了这一点。开发MIS软件时,这一点很值得借鉴.
(4）界面友好。使用方便
多数MIS软件的数据输入量较大。对于一些相对固定的数据，不应让用户频频输入（特别是汉字)，而应让用户用鼠标轻松选择。例如，人事管理系统中的“文化程度”是相对固定的数据，其值一般取“小学”、“初中”、“高中"、“大专”、“大本"、“硕研"、“博研"等。录入这类数据之前,MIS软件应在相应位置弹出一个列表框,待用户以鼠标点击，而不应让用户每次都输入这些汉字。
总之，所开发的MIS在使用过程中，应使用户的数据输入量降至最低限度减少用户的干预量。实践证明，用户干预愈少，MIS系统的满意程度愈高.
2。3管理信息系统的开发方式
管理信息系统的开发方式主要有独立开发方式、委托开发方式、合作开发方式、购买现成软件方式等4种。这4种开发方式各有优点和不足，需要根据使用单位的技术力量、资金情况、外部环境等各种因素进行综合考虑和选择。不论哪种开放方式都需要有单位的领导和业务人员参加，并在管理信息系统的整个开发过程中培养、锻炼、壮大该系统的维护队伍。
1.独立开发
独立开发适合于有较强的管理信息系统分析与设计队伍和程序设计人员、系统维护使用队伍的组织和单位,如大学、研究所、计算机公司、高科技公司等单位。独立开发的优点是开发费用少，实现开发后的系统能够适应本单位的需求且满意度较高，最为方便的是系统维护工作.缺点是由于不是专业开发队伍,容易受业务工作的限制，系统优化不够,开发水平较低,且由于开发人员是临时从所属各单位抽调出来进行管理信息系统的开发工作，这些人员在其原部门还有其他工作，所以精力有限，容易造成系统开发时间长，开发人员调动后,系统维护工作没有保证的情况.因此，一方面需要大力加强领导，实行“一把手"原则，另一方面可向专业开发人士或公司进行咨询,或聘请他们作为开发顾问。
2。委托开发
委托开发方式适合于使用单位无管理信息系统分析、设计及软件开发人员或开发队伍力量较弱、但资金较为充足的单位。双方应签订管理信息系统开发项目协议，明确新系统的目标和功能、开发时间与费用、系统标准与验收方式、人员培训等内容.委托开发方式的优点是省时、省事，开发的系统技术水平较高。缺点是费用高、系统维护需要开发单位的长期支持。此种开发方式需要使用单位的业务骨干参与系统的论证工作，开发过程中需要开发单位和使用单位双方及时沟通，进行协调和检查。
3.合作开发
合作开发方式适合于使用单位有一定的管理信息系统分析、设计及软件开发人员,但开发队伍力量较弱,希望通过管理信息系统的开发建立完善和提高自己的技术队伍，便于系统维护工作的单位。双方共享开发成果，实际上是一种半委托性质的开发工作。优点是相对于委托开发方式而言节约了资金，并可以培养、增强使用单位的技术力量，便于系统维护工作，系统技术水平较高.缺点是双方在合作中沟通易出现问题,需要双方及时达成共识,进行协调和检查。
总之，不同的开发方式有不同的长处和短处，需要根据使用单位的实际情况进行选择也可综合使用各种开发方式.
2。4管理信息系统的开发过程
管理信息系统的开发过程一般包括系统开发准备、系统调查、系统分析、系统设计、系统实现、系统转换、系统运行与维护、系统评价等步骤.根据开发系统的大小、复杂、投入、方式、方法等因素的不同，各步骤的要求和内容也不同，用户需要根据实际情况进行取舍和计划。
1、系统开发准备
系统开发准备工作主要包括提出系统开发要求、成立系统开发小组、制订系统开发计划等工作。
2、系统调研
新系统的系统分析与系统设计工作都要建立在对现行系统调研的基础上，即必须调查现行系统的运行情况、问题等，明确用户的需求，特别是合作开发和委托开发方式。
调研的主要内容有:
(1)现行系统概况：该组织的发展历史、目前组织的规模、工作状况、管理水平、与外界的主要联系等。调查该项内容的目的主要是为了划分系统界限、系统与外界的输入输出接口等。
（2）组织机构：画出组织的组织结构图，弄清组织的行政关系、人员编制、工作范围、地理位置等，发现不合理问题及新系统启动后可能对现有组织的影响.
（3）业务流程：按照业务种类的不同和处理时间的先后不同，深入了解现行系统的业务流程，画出现行系统业务流柞图，并与业务人员反复讨论，得到认可。调查中要注意定性与定量相结合，注意人、财、物、信息的流向、规格、频率、要求以及需要解决的问题等。
(4）报表、数据处理：了解各种统计报表、数据的格式、内容、处理时间及上报时间、频率、规律,存在的问题，对新系统的要求、希望等并收集各种报表。
(5）问题:现行系统中存在的主要问题和薄弱环节,可以按照严重程度分成不同的等级.新系统的建立应能解决大部分问题，并改善薄弱环节。
（6）新系统的功能和目标：了解各级领导和各类业务工作人员对新系统功能的要求，系统分析(又称逻辑设计)是管理信息系统开发的关键环节，要求在系统调查的基础上，对新系统的功能进行细致的分析，并建立一个新系统的逻辑模型。
新系统的逻辑模型由系统数据流程图、概况表、数据字典、物理逻辑表达式及有关说明组成.最后要完成系统分析报告（也称为系统逻辑设计说明书）。系统逻辑模型就像在根据需要建设一座学校前,按照学校教育的层次（初等、中等、高等)、规模、投资、地理环境、技术水平等条件的要求和约束，先由建筑设计院进行设计，保证学校建成后的各种功能得以实现，之后才能进行工程设计和施工一样。在系统设计阶段要做认真、细致的分析、研究工作,避免新系统在功能上存在先天不足或缺陷。
因为新系统模型是建立在对现行系统的分析及要求的基础上的，所以系统调查工作要进行得深入、细致、全面。用户可以对新系统的逻辑模型提出意见，双方经过讨论、修改,最后达成共识，并完成系统分析报告（系统逻辑设计说明书），经有关领导审批通过之后,转入系统设计(又称系统物理设计)阶段.
4、系统设计
系统设计又称系统物理设计。系统设计要根据系统分析报告中的系统逻辑模型综合考虑各种约束，利用一切可利用的技术手段和方法进行各种具体设计，确定新系统的实施方案，解决“系统怎么做”的问题。
结构化系统设计是指利用一组标准的图表工具和准则,确定系统有哪些模块，用什么方法连接，如何构成良好的系统结构，并进行系统输入、输出、数据处理、数据存储等环节的详细设计。这一阶段的重点是设计好系统的总体结构，选择最经济合理的技术手段。系统设计阶段的文件是系统设计报告（又称系统物理设计说明书）.
5、系统实施与转换
系统实施阶段的主要工作包括：系统硬件的购置与安装、程序的编写(购买）与调试、系统操作人员的培训、系统有关数据的准备和录入、系统调试和转换。
在系统实施阶段要成立系统实施工作量到小组，组织各专业小组组长和有关部门的领导共同编制新系统实施计划。可以应用各种项目管理的软件和方法进行管理，实行项目经理负责制，保证系统实施工作的顺利进行和成功。
硬件的购置和安装包括计算机硬件、外设、网络、电源、机房、环境等有关设备的购买、验收、安装与调试工作等，这些工作主要由专业技术人员完成。
数据准备与录入工作主要是指由手工操作转入计算机处理所需的各种数据的整理、录入及计算机系统中为新系统所用数据的转换工作。数据准备与录入工作要注意数据的准确性，在整理、录入、校验等各个环节把好关，为系统的顺利转换打好基础。
在进行以上各个环节的同时展开人员培训工作,包括管理信息系统只是的普及教育、新制度的学习、计算机操作训练等。使所有人员了解新系统的基本功能、新系统对使用人员的要求、建立管理信息系统的目的、管理信息系统的建设可以为组织和个人带来的帮助和便利、个人在新系统中应该承担的工作等，是用户关心、支持新系统的实现。
6。系统维护和评价
管理信息系统是一个复杂的人机系统。系统外部环境与内部因素的变化，不断影响系统的运行，这时就需要不断地完善系统，以提高系统运行的效率与服务水平，这就需要从始至终地进行系统的维护工作。
系统评价主要是指系统建成后,经过一段时间的运行后，要对系统目标与功能的实现情况进行检查，并与系统开发中设立的系统预期目标进行对比，及时写出系统评价报告。
系统维护与评价阶段是系统生命周期中的最后一个阶段，也是时间最长的一个重要阶段。
第三章 工资管理系统分析与设计
3.1系统功能需求简介
工资管理信息系统对企业加强工资管理有着极其重要的作用，就一般的大型企业来说,它的设计内容非常复杂而且繁多，比如拥有工资计算功能，工资统计功能，报表输出功能，而且设计的模块也很多，比如工资管理模块，工资统计模块，报表设计模块，打印输出模块，模糊查询模块等等。
由于本软件主要是为作者工作的一家科技公司定制开发的.该公司是一家刚刚成立的公司，总体人员比较少,有正式员工20人,人员结构比较简单，学历比较高，基本上都拥有大专以上学历，部门划分也很清晰，而且人员的流动性不高,所以该公司目前对工资管理的要求并不高.因此，针对该公司而言，我们经过了反复地论证,最终确定了工资管理系统的设计方案。该工资管理系统的主要功能如图3.1所示:
工资管理系统
员工基本信息
工资结构设置
工资汇总
资料输入
员工增删

员工查询

基础工资

岗位工资

工龄工资

岗位工资

工龄工资

图3.1 系统功能模块图
3.2功能需求描述
1、员工基本信息模块
员工基本信息模块具有员工信息输入、员工增删和员工信息查询三个功能。员工基本信息包括员工号、员工姓名、员工性别、所在部门、所在岗位、工龄和工资等级等信息。员工增删实现了对数据库中员工信息的增加和删除。员工信息查询可以通过员工号或员工姓名对员工信息进行查询。
2、工资结构设置模块
根据该公司的工资管理实际情况，本系统将工资结构分为基础工资、岗位工资和工龄工资三部分.该模块可以对这三个工资类型设置工资等级,并对每个等级设置工资标准。3、工资汇总模块
用户在员工信息管理模块对该员工的工资等级进行输入以后，在工资汇总模块会自动对员工工资进行汇总。用户可以打印出工资汇总表，打印之前可以通过打印预览功能进行打印预览.
3.3目标系统要求
目标系统应该达到以下要求：
1、时间经济性.优化逻辑设计与物理设计，使系统运行效率高，反映速度快。
2、可靠性。能连续准确的处理业务，有较强的容错能力。
3、可理解性。用户容易理解和使用该系统.
4、可维护性和适应性。系统应易于修改、易于扩充、易于维护,能够适应业务不断发展变化的需要。
5、可用性。目标系统功能齐全，能够完全满足业务需求。
6、安全保密性.保证系统的物理安全、数据存储和存取的安全与保密、数据传输的安全与保密，做好使用人员的授权管理.
3.4系统平台选择
选择微软平台作为主导，一方面考虑目前微软的飞速发展,越来越多的企业在规划内部网络时，将微软平台作为首选方案;另一方面从技术角度来讲，微软平台上的应用无论是在开发上,还是在软件的部署上都非常容易，而且性能优越。
操作系统：Windows XP
开发工具与语言： Visual FoxPro 6。0中文版
3。5数据库设计
3。5.1数据库介绍
所谓数据库(Database）就是指按一定组织方式存储在一起的，相互有关的若干个数据的结合,数据库管理系统（Database Management System）就是一种操纵和管理数据库的大型软件,简称DBMS,他们建立在操作系统的基础上，对数据库进行统一的管理和控制,其功能包括数据库定义，数据库管理,数据库建立和维护，于操作系统通信等.DBMS通常由数据字典,数据描述语言及其编译程序，数据操纵（查询)语言及其编译程序,数据库管理例行程序等部分组成。
关系数据库是以关系模型为基础的数据库，是根据表、记录和字段之间的关系进行组织和访问的一种数据库，它通过若干个表（Table）来存取数据,并且通过关系(Relation)将这些表联系在一起,关系数据库提供了成为机构化查询语言（SQL）标准接口,该接口允许使用多种数据库工具和产品,关系数据库是目前最广泛应用的数据库。
在VFP中数据库是一个逻辑上的概念，通过一组系统文件将相互关联的数据表及其数据库对象组织起来，成为扩展名为。dbc的数据库文件、扩展名为。dct的数据库备注文件和扩展名为.dcx的数据库索引文件，三个文件一般不能直接使用,而是交由VFP数据库统一管理。
VFP把。dbf文件称为表文件,一个库可以容纳多个表，通过库我们可明确各表之间的相互关系，使表文件不在彼此孤立,而成为相互关联的数据集合.
3。5。2数据流图
图3.2 系统的数据流图
根据对工资管理工作的调查和用户需求分析,该系统的数据流图如图3.2所示。基础工资设定
岗位工资设定
工龄工资设定
工资标准设定
员工信息设定
员工工资汇总

图3.2系统的数据流图

3。5.3数据词典分析
该软件的数据库由下述四张数据表组成：
员工信息表：PERSONNEL。DBF
基础工资设置表：COURSE。DBF
岗位工资设置表：RANK.DBF
工龄工资设置表:GONGLING。DBF
1、员工信息表：PERSONNEL.DBF
字段
字段名
类型
宽度
说明
1
员 工 号
字符型
3
数字
2
员工姓名
字符型
10
小于等于5个汉字
3
员工性别
字符型
2
“男”或“女"
4
岗位名称
字符型
14
小于等于7个汉字
5
工 龄
数值型
2
1—99之间
6
工资等级
数值型
2
1-99之间
2、基础工资设置表：COURSE。DBF
字段
字段名
类型
宽度
说明
1
工资等级
数值型
2
1-99之间
2
工资标准
数值型
4
1-9999之间
3、岗位工资设置表：RANK。DBF
字段
字段名
类型
宽度
说明
1
岗位名称
字符型
14
小于等于7个汉字
2
工资标准
数值型
4
1—9999之间
4、工龄工资设置表：GONGLING.DBF
字段
字段名
类型
宽度
说明
1
工资等级
数值型
2
1-99之间
2
工资标准
数值型
4
1—9999之间
5、管理员注册表:ADMINER。DBF
字段
字段名
类型
宽度
说明
1
注册名
字符型
10
任意字符
2
口 令
字符型
10
英文字母或数字
第四章 人事工资管理系统的功能实现
4。1员工基本信息模块编码设计
1、员工基本信息增删改功能
员工基本信息模块主要分为员工信息浏览界面和员工信息查询界面,员工信息浏览界面如图4.1所示：
图4.1
具体编码如下:
（1)“增加新记录”按钮控件源代码：
thisform.pageframe1。page1.fy1。enabled=。F.
thisform。pageframe1.page1。command2.enabled=。F.
thisform。pageframe1。page1。command3。enabled=.F.
mand4.enabled=.T。
if thisform。pageframe1.page1。command1.caption='增加新记录’
thisform。pageframe1。page1。txtpid。enabled=。T.
thisform。pageframe1.page1。txtpname。enabled=。T.
thisform。pageframe1。page1。txtpsex。enabled=。T。
thisform。pageframe1.page1。txtpjob。enabled=.T。
thisform.pageframe1.page1.txtpindate。enabled=。T。
thisform.pageframe1.page1。txtprank.enabled=。T。
append blank
thisform.pageframe1。page1。command1。caption=’增加确认’
thisform。pageframe1.page1.refresh
thisform。pageframe1。page1。txtpid.setfocus
else
getid=alltrim（thisform。pageframe1。page1。txtpid。value）
getname=alltrim（thisform。pageframe1。page1.txtpname.value)
getsex=alltrim（thisform.pageframe1.page1.txtpsex。value）
getjob=alltrim（thisform。pageframe1。page1.txtpjob。value）
getindate=alltrim（thisform。pageframe1。page1。txtpindate。value)
getrank=alltrim(thisform。pageframe1.page1。txtprank。value)
if empty（getid） or empty(getname） or empty（getsex） or empty（getjob) or empty（getindate） or empty（getrank)
messagebox（”资料不足”，48,”错误”）
else
thisform。pageframe1。page1。command1.caption=’增加新记录'
tableupdate（。t。)
thisform。pageframe1。page1.txtpid。enabled=。F.
thisform.pageframe1。page1。txtpname。enabled=。F.
thisform。pageframe1。page1。txtpsex.enabled=。F。
thisform。pageframe1.page1。txtpjob.enabled=。F。
thisform.pageframe1.page1。txtpindate。enabled=.F。
thisform。pageframe1.page1。txtprank.enabled=.F。
thisform。pageframe1.page1。fy1。enabled=。T。
thisform。pageframe1。page1。command2。enabled=。T。
thisform。pageframe1.page1。command3。enabled=。T.
thisform.pageframe1。page1。command4。enabled=。F.
endif
endif
（2）“修改这条记录”按钮控件源代码:
thisform。pageframe1。page1。command1。enabled=.F。
thisform。pageframe1.page1。command3。enabled=.F.
thisform。pageframe1。mand4。enabled=。T.
thisform。pageframe1。page1。fy1.enabled=。F.
if thisform.pageframe1。page1。command2。caption=’修改这条记录’
thisform。pageframe1。page1。txtpid.enabled=。T。
thisform.pageframe1。page1。txtpname。enabled=.T。
thisform.pageframe1。page1.txtpsex.enabled=。T。
thisform。pageframe1。page1。txtpjob.enabled=.T。
thisform。pageframe1.page1.txtpindate。enabled=.T.
thisform。pageframe1.page1.txtprank.enabled=。T.
thisform.pageframe1。page1。command2。caption=’修改确认’
thisform。pageframe1。page1。refresh
thisform。pageframe1。page1。txtpid.setfocus
else
thisform。pageframe1。mand2.caption='修改这条记录’
tableupdate(。t。）
thisform.pageframe1.page1。txtpid。enabled=。F。
thisform。pageframe1。page1。txtpname。enabled=。F。
thisform。pageframe1.page1。txtpsex。enabled=.F.
thisform。pageframe1。page1。txtpjob。enabled=。F.
thisform。pageframe1.page1。txtpindate。enabled=。F。
thisform。pageframe1。page1.txtprank.enabled=.F.
thisform.pageframe1。mand1。enabled=.T。
thisform.pageframe1。page1。command3.enabled=。T.
thisform。mand4。enabled=.F。
thisform.pageframe1。page1。fy1。enabled=。T.
endif
2、员工信息查询功能
员工信息查询界面如图4。2所示。
图4。2
具体编码如下：
“查询”按钮控件源代码：
getpid=alltrim(thisform。pageframe1.page2.text1.value）
getpname=alltrim（thisform。pageframe1。page2.text2.value)
flag1=thisform。pageframe1。page2.check1.value
flag2=thisform.pageframe1.page2。check2。value
if flag1=0 and flag2=0
messagebox("请输入查询条件”，48,”错误”）
endif
if flag1=1 and flag2=0
set order to pid
seek getpid
if found（)
messagebox（”查到记录”，48，"注意”）
select ＊ from personnel where pid=getpid into cursor ling
thisform。pageframe1。page3.enabled=。T。
thisform。pageframe1.page3.refresh
else
messagebox(”没有这条记录”,48,”注意")
endif
endif
if flag1=0 and flag2=1
set order to pname
seek getpname
if found（)
messagebox(”查到记录”,48，"注意”）
select ＊ from personnel where pname=getpname into cursor ling
thisform.pageframe1.page3。enabled=。T。
thisform.pageframe1。page3.refresh
else
messagebox(”没有这条记录”，48,”注意”）
endif
endif
if flag1=1 and flag2=1
set order to pid
seek getpid
if personnel。pname=getpname
messagebox("查到记录"，48,”注意”)
select ＊ from personnel where pid=getpid and pname=getpname into cursor ling
thisform。pageframe1.page3。enabled=。T。
thisform.pageframe1。page3.refresh
else
messagebox（”没有这条记录",48，”注意”)
endif
endif
4。2工资结构设置模块编码设计
工资结构设置模块界面如图4。3所示
图4。3
其中“基础工资"功能界面如图4。4所示：
图4。4
具体编码如下:
“修改”按钮控件源代码：
thisform。grdrank.column1.text1.enabled=。T。
thisform。grdrank.column2.text1。enabled=.T.
thisform。grdrank.column1。text1。setfocus
“修改确认”按钮控件源代码:
thisform.grdrank。column1.text1。enabled=.F.
thisform.grdrank。column2.text1。enabled=。F。
“添加”按钮控件源代码：
append blank
go bottom
thisform。grdrank.column1。text1.enabled=。T.
thisform。grdrank。column2。text1。enabled=.T.
thisform.grdrank。column1。text1。setfocus
“删除"按钮控件源代码：
thisform。grdrank。recordsource=’'
use rank exclusive
delete from rank where rname=getid
pack
thisform。grdrank.recordsource=’rank’
thisform。grdrank.refresh
“退出”按钮控件源代码:
thisform。release
do form form\dataformat
4。3入口程序
各模块程序编写完成后，要为程序编写一个入口程序。该程序的作用是完成应用系统一系列的初始化设置。
工资信息系统的入口程序如下：
clear screen
clear events
open database database\salary
do form form\ksjm
read events