银行员工培训管理系统

银行员工培训管理系统摘要：随着21世纪的到来，信息化时代和全球经济一体化不以人们意志为转移地向我们走来。为企业要在21世纪生存和发展，至少具备三个基本条件，那就是，有助于企业高效运行的组织结构体系，维持企业健康运行的强大核心战略，保证企业运行活力的员工素质（包括经理人员和普通员工）。当代企业组织的健康发展和竞争力的培养离不开强大核心战略，强大核心战略的贯彻需要同当代生产力和科学技术相适应的企业组织结构体系来支持，而具有深度的员工素质是所有这一切的保证，是支撑起高效企业组织结构体系和强大核心战略乃至企业竞争力的必不可缺的强大基石。所以，对企业员工的进行深度素质培训来提高员工的素质，是为了适应新的时代日趋激烈的全球竞争的需要。关键词员工培训系统设计一、前言随着21世纪的到来，信息化时代和全球经济一体化不以人们意志为转移地向我们走来。为企业要在21世纪生存和发展，至少具备三个基本条件，那就是，有助于企业高效运行的组织结构体系，维持企业健康运行的强大核心战略，保证企业运行活力的员工素质（包括经理人员和普通员工）。当代企业组织的健康发展和竞争力的培养离不开强大核心战略，强大核心战略的贯彻需要同当代生产力和科学技术相适应的企业组织结构体系来支持，而具有深度的员工素质是所有这一切的保证，是支撑起高效企业组织结构体系和强大核心战略乃至企业竞争力的必不可缺的强大基石。所以，对企业员工的进行深度素质培训来提高员工的素质，是为了适应新的时代日趋激烈的全球竞争的需要。（一）中国企业员工面临的挑战中国的改革开放，使中国越来越融入世界经济大家庭之中。中国企业将面临来自全球的激烈竞争。中国企业必须作好充分的准备接受挑战，或向强大的企业特别是世界500强发起挑战。但目前就中国企业的状况而言，上述三方面都是相当艰巨的任务。其中最为根本的当务之急是员工的素质问题。首先，中国企业面临外方企业的压力。国外企业特别是世界500强企业无论是资源实力，还是组织和战略，都大大优于中国企业，在人才资源的开发上更是有其独到之处，保证了企业可持续发展。例如，通用电气公司总裁韦尔奇特别重视人才的培养，每年花费在员工培训上的费用不止亿万。韦匀奇的人才战略不仅为公司的巨大发展创造了良好条件，而且如今美国许多大公司的高层主管也都来自通用电气公司，因此通用电气公司被誉之为"经理人才的摇篮"。就中国国内而言，许多外资企业同中国企业激烈地争夺人才，他们以优厚的待遇吸引大批优秀人才为其工作，使中国企业在人才方面更见窘迫。其次，中国企业的寿命不长，从管理人员到普通员工问题较多。全球500强企业的平均寿命为40-42岁，中国企业的平均寿命为3.5岁。其中员工素质低下不能不说是主要原因之一。中国企业联合会会长袁宝华指出当前企业界的三种危险倾向，其中之一就是企业领导人轻视学习。他认为"企业家只有认真学习，才能提高领导班子的素质乃至企业整体素质"。显然，轻视学习的企业领导人很难带出高素质的职工。据有关部门统计，目前中国企业领导人有大专以上文化程度的比例从1985年到1995年提高了69.2%，应该说中国企业家随着中国经济的发展在进步。但以当今全球化竞争和科学技术飞速发展的形势来衡量，同世界上众多先进企业相比较，其间的差距是显而易见的。再说，仅有文化程度是远远不够的，市场千变万化，管理错综复杂，只有不断学习才能保持正确认识和处理复杂的局面的能力。中国企业并不是"无药可救"，提高员工素质是中国企业脚踏实地的迎接新时代挑战的第一步。中国企业应抓紧企业核心战略和企业组织结构体系建设的同时，狠抓员工深度素质培训战略，以保证企业目前的竞争力和未来的竞争潜力。（二）中国企业的深度素质培训战略探讨现代经营管理理论之父现代管理理论的创始人法国工业家亨利•法约尔，曾精譬指出，"对所有需要培训的各级工作人员进行持续的、有步骤的培训是管理工作良好的一个标志。经过几年努力，将取得惊人成绩。"他又认为，"如果领导让工人研究一下如何教育工人，那么企业就有可能在较短的时间里培养出一支精良的职工队伍。"深度素质培训是指经理人员和普通职工的培训须具有纵向的深度，也就是说，培训的内容不仅与其横向的工作范围相关，而且涉及到企业的战略方向与战略的具体实施，以使经理人员和普通职工比竞争对手更好地适应环境的变化，有利于企业的长久生存和发展。通过深度素质培训，企业可以达到以下目的：员工深刻了解企业目前状况和将来走势，加强他们的责任感；培养全体工作人员的现代经营理念，加强他们对现代经营的参与感；掌握最新科学技术，不断理解提高改进工作标准，并激发创新能力；满足现代员工不断成长的需求，有利于留往人才；可持续地获得新鲜血液，取得企业再造的效果，发展保持企业核心竞争力；巩固团队精神，共同理解企业的发展远景、目的、目标和价值观，使他们看得到企业的发展前途，并为之共同努力；*总体提高加快企业对信息时代的全球化竞争的反应能力。（三）企业深度素质培训战略模式：企业的深度素质培训战略主要体现在对管理人员和普通职工的培训上面。对一名称职的管理人员来说，战略阐发、组织梳理、员工导引和科技敏感是必须具备的四种基本能力。正确的战略思想及其向下属的阐发能力可把企业指向成功，而错误盲目的战略思想或低下的战略阐发能力会把企业引向衰败，对中国企业的许多管理人员来说，学习提高当代企业战略思想及其阐发水平是一个极为迫切的问题。另外，信息化和全球化对当代企业组织结构造成激烈的震荡，管理人员应有能力依据内外部环境的变化及时梳理优化组织结构，减轻震荡对员工的冲击，给予他们引导和激励；除此以外，科技敏感型领导是当代企业管理人员必备的素质。在21世纪这个特殊的社会经济发展阶段，管理人员应不断地接受深度素质学习，提高自己的素质，以避免在管理实践中给企业造成难以挽回的损失。对普通职工来说，当代企业的发展要求他们不是被动地接受指挥，而要积极地投入参予，因此除了要掌握完成本职工作所需的技能之外，还需对企业的发展战略有清晰的了解，使自己的工作努力不是盲目的，而是有的放矢，带有明确的目的性和使命感；另外，当代企业要求职工富于协作参与精神，在工作中互相取长补短，精诚协作参与，积极创新，不断提高工作和产品质量；除此之外，当代企业的职工对成长的需求越来越多，包括文化科技知识、工作成就、晋升和责任感等，所有这一切都是企业健康发展所不可缺少的，并且需要不断更新的深度素质培训来得到保证。企业通过坚持不懈的培训战略，培养成当代企业不断更新发展所需的恒久深入的学习动能，使企业具有观念技能更新和换血再造的强大功能，持续地为企业巩固发展核心专长、应变能力、生命活力，使企业保持持久的竞争力。企业深度素质培训战略如得到脚踏实地、实事求是的贯彻实施，则可以为企业带来可持续竞争力；而浮夸虚妄的实施行为不仅浪费企业宝贵的资源，而且使企业的竞争力遭到侵蚀，造成严重后果。企业深度素质培训战略的实施不应是临时的，而应该有一个长期的、与企业的远景、发展目标和价值观相吻合的培训战略计划。许多中国企业也有培训的想法或进行了一些培训，但往往虎头蛇尾，定位不准确，培训难以到位，效果也缺乏检测手段，结果变成走过场而已，导致许多企业领导认为，培训效果不明显，意义不大，搞企业只要抓好当前生产或经营即可。显然，这种想法是只重视眼前利益?quot;近视行为”，并没有考虑到企业的长远发展和当今世界全球化竞争、信息时代对企业发展的深远影响。近年来中国许多企业出现了"风骚二、三年"的短命现象，这同这些企业忽视企业深度素质培训，使企业管理人员和普通员工素质底下，与一些优秀企业相比处于竞争劣势，不能不说是有密切的关联的。有效的企业深度素质培训战略应该在企业内部形成一种学习氛围，一种难以动摇的企业学习文化，成为企业战略的一个重要组成部分；企业高层领导要挂职领导并积极参与；要有明确的培训目标、内容和方式；培训不应脱离工作实践，应与企业运作密切关联；随时评价培训实效，按需及时调整培训战略和内容；培训效果与工作业绩、奖励相结合。另外，培训渠道的良好选择可以使培训实施得到事半功倍的成效。世界一流公司的成功经验表明，培训中除了让公司内部优秀人员充当培训师之外，还应邀请外部优秀培训师如其他企业的杰出管理人员或员工和咨询公司的优秀咨询师充当培训师，受训方式可以是接受企业安排的培训，也可以让员工在企业的规划内根据需求，寻找合适的外部受训渠道，并为之负责。这样做公司和员工可以在吸取公司自身长处的基础上，吸收外部的新鲜或先进的理念、知识和技能，使企业在竞争中始终处于领先的地位。除了以授课或讲座的正式形式进行培训之外，企业也可采取全方位的培训方式，如利用公司的宣传资料、管理人员与普通员工之间的谈话以及普通员工间的交流等，日本某著名公司甚至把领导与员工的偶尔碰面的谈话也作为培训的非正式渠道，使员工无意中产生意想不到培训效果。需要指出的是，在企业深度素质培训过程中，对企业和员工的压力是企业培训能否成功的关键因素之一，企业和员工只有在适度的压力下才能使培训得到有效的进行。（四）结合中国文化创建中国企业深度素质培训战略中国的传统文化精微而深广，其中在四个方面最有益于产生影响恒久深入的学习功能：*强调人为核心；*注重学习、修身；*强调团队合作；*强调事物本质，效法自然，系统思考。中国企业必须结合中国文化实际情况，以推动促进有中国特色的现代企业深度素质培训战略。在实行这一培训战略时，我们应有充分的思想准备和有效的措施，扬长避短，形成良好的培训文化，要求全体员工突破陈规、锐意创新、面向未来，强调和谐的团队合作学习，为企业的长远发展团结一致共同努力。这样，企业才能人才叠出，更有助于吸引和留住人才，即使有跳槽也不影响企业实力，从而保证企业可持续发展的后劲，使现代企业培训战略获得最佳效果，为信息时代全球化进程中中国企业组织结构的发展和现代企业战略的实施在人力资源上得到充分的保证。二、系统设计2.1设计思想尽量采用现有软硬件环境，以及先进的管理系统开发方案，从而达到充分利用现有资源，提高系统开发水平和应用效果的目的。系统应符合银行员工培训管理的规定，满足银行日常员工培训工作的需要，达到操作过程中的直观、方便、实用、安全等要求。系统采用C/S体系结构‘Client（客户端）负责提供表达逻辑、显示用户界面信息、访问数据库服务器；Server（服务器）端用于提供数据服务。系统采用模块化程序设计方法，既便于系统功能的各种组合和修改，又便于其他技术人员维护补充。•系统应具备数据库维护功能到及时根据用户需求进行数据的添加、修改、备份、删除等的操作。系统功能分析商业银行员工培训系统需要实现的主要功能包括:员工各种信息的输入，包括员工基本信息、支撑、岗位、已经培训过的课程和成绩，培训计划等。员工各种信息的查询、修改，包括员工基本信息、职称、岗位、已经有没听过的课程和成绩，培训计划等。培训课程信息的输入，包括课时、课程种类等。培训课程信息的查询、修改。银行所有员工培训需求的管理。银行培训计划的制定、修改。培训课程的评价。培训管理系统的使用帮助。教师进修的管理、教师的评价。培训资源的管理。培训教材管理。员工外出培训管理。系统用户管理、权限管理。系统功能模块设计本系统涉及到员工与培训管理部门之间的交流，因此需要根据用户的不同分成两大功能模块。这二个模块的功能和使用的权限完全不同。本系统功能模块图如下。2.4数据流程图培训管理系统的基本数据流程如下图所示。

三、数据库设计数据库结构设计的好坏将直接对应用系统的效率以及与实现的效果产生影响，好的数据库结构设计会减少数据库的存储量，数据的完整性和一致性比较高，系统具有较快的响应速3.1数据库需求分析通过对银行员工培训管理的内容和数据流程分析，设计的数据项和数据结构如下。员工基本状况。包括的数据项有员工号、员工姓名、性别、所属部门、身份

证号、生日、籍贯、国籍、民族、婚姻状况、健康状况、参加工作时间、家庭住址、联系电话等。员工成绩状况。包括的数据项有员工号、课程名称、时间、地点、授课教师、课程信息。包括的数据项有课程号、课程类别、课程名称、课程学时等。员工工作岗位信息。包括的数据项有工作岗位代码、工作岗位名称、权力范银行部门信息。包括的数据项有部门代号、部门名称、部门经理、部位副经培训需求的信息。包括的数据项有所需培训的课程、要求培训的员工。银行培训计划信息。包括的数据项有培训的课程、开始培训时间、结束时间、•成绩等•成绩等••围等。•理等。••个人培训计划信息。包括的数据项有培训员工、培训课程、培训开始时间、培训结束时间。教员信息。包括的数据项有教员号、教员西米、教员学历、开始教课时间、教员评价等。培训资源管理信息。包括的数据项有各个教室、教学设备的分配情况、培训中心固定资产管理、各种培训费用和支出等。培训教材管理。包括数据项有教材适合的课程、作者、教材数量、价格等。3.2数据库概念结构设计根据以上分析规划出的实体有：员工实体、部门实体、岗位实体、教员实体、教学资源实体、教材实体、课程实体。员工实体E-R图部门实体E-R图教员实体E-R图教员培训资源实体E-R图教材实体E-R图3.3数据库逻辑结构设计1．员工基本状况表PERSNNEL别名数据类型是否为空说明EMP_NONUMBER(6,0)NOTNULL员工号（主键）EMP_NAMEVARCHAR2(10)NULL员工姓名DEPT_IDNUMBER(3,0)NULL所在部门号（外部键）EMP_XLVARCHAR2(10)NULL学历EMP_GENDERVARCHAR2(2)NULL性别EMP_BIRTHDAYDATENULL生日EMP_HOMETOWNVARCHAR2(8)NULL籍贯EMP_COUNTRYVARCHAR2(10)NULL国籍EMP_NATIONVARCHAR2(10)NULL民族EMP_IDNUMBER(20,0)NULL身份证号EMP_MARRIAGEVARCHAR2(2)NULL婚姻状况EMP_HEALTHVARCHAR2(20)NULL健康状况

EMP_STARTWORKDATENULL参加工作时间EMP_STATEVARCHAR2(10)NULL员工状态EMP_STATE_DATEDATENULL状态时间EMP_HOMEADRESSVARCHAR2(10)NULL家庭住址EMP_TELENONUMBER(10,0)NULL联系电话EMP_EMAILVARCHAR2(20)NULL联系E-MAIL地址JOB_IDNUMBER(3,0)NULL工作岗位代号（外部键）2．员工成绩表SCORE别名数据类型是否为空说明EMP_NONUMBER(6)NOTNULL员工号（外部键）COURSE_IDNUMBER(3)NULL课程号（外部键）S_DATEDATENULL上课时间S_PLACEVARCHAR2(10)NULL上课地点TEACHER_IDNUMBER(6)NULL教师号（外部键）SCORE」NUMBER(3)NULL成绩1SCORE_2NUMBER(3)NULL成绩2SCORE_NOTESVARCHAR2(10)NULL教师评语PASSNUMBER(l)NULL通过否（0,1表示）3.课程表格COURSE别名数据类型是否为空说明COURSE_IDNUMBER(3)NULLSUBJECTVARCHAR2(10)NULLCOURSE_CNAMEVARCHAR2(20)NULLCOURSE_ENAMEVARCHAR2(10)NULLCOURSE_DESCVARCHAR2(40)NULL

COURSE_DURATIONNUMBER(3)NULLCOURSE_BOOKVARCHAR2(10)NULLCOURSE_EQUNUMBER(3)NULLCOURSE_BEFORENUMBER(3)NULLCOURSE_MARKNUMBER(1)NULLDEPT_IDNUMBER(3)NULL4.工作岗位情况表JOB别名数据类型是否为空说明JOB_IDNUMBER(3)NOTNULLJOB_NAMEVARCHAR2(10)NULLJOB_POWERVARCHAR2(20)NULL5.部门信息表DEPT别名数据类型是否为空说明DEPT_IDNUMBER(3)NOTNULLDEPT_NAMEVARCHAR2(10)NULLDEPT_MANAGERNUMBER(6)NULLDEPT_VICEMANAGERNUMBER(6)NULL6.培训需求表COURSE_NEED别名数据类型是否为空说明COURSE_IDNUMBER(3)NULLCOURSE_NEEDNUMBER(6)NULL7.企业培训计划表COURSE_AVAILABLE别名数据类型是否为空说明

COURSE_IDNUMBER(3)NULLCOURSE_DATE_BEGINDATENULLCOURSE_DATE_OVERDATENULLTEACHER_IDNUMBER(6)NULLCOURSE_PERSONNUMBERNUMBER(2)NULLCOURSE_PLACEVARCHAR2(10)NULL8.个人培训计划表PERSONNEL_PLAN别名数据类型是否为空说明EMP_NONUMBER(6)NULLCOURSE_IDNUMBER(3)NULLCOURSE_DATE_BEGINDATENULLCOURSE_DATE_OVERDATENULL9.课程评价表COURSE_EVALUATION别名数据类型是否为空说明COURSE_IDNUMBER(3)NULLEVALUATIONVARCHAR2(40)NULLEVALUATION_DATEDATENULL10.教员信息表TEACHER别名数据类型是否为空说明TEACHER_IDNUMBER(6)NOTNULLTEACHER_NAMEVARCHAR2(10)NULLTEACHER_XLVARCHAR2(10)NULLTEACHER_DATE_STARTDATENULLTEACHER_EVALUATIONVARCHAR2(40)NULL11.培训资源信息表TM_RESOURCE

别名数据类型是否为空说明RESOURCE」。NUMBER(3)NULLRESOURCE_NAMEVARCHAR2(10)NULLRESOURCE_MARKNUMBERNULLRESOURCE_PRICEVARCHAR2(10)NULLRESOURCE_QUATITYNUMBER(2)NULLRESOURCE_REMVARCHAR2(40)NULL12.教材信息表BOOK别名数据类型是否为空说明BOOK_IDNUMBER(3)NULLBOOK_NAMEVARCHAR2(20)NULLBOOK_AUTHERVARCHAR2(10)NULLBOOK_STATENUMBER(1)NULLBOOK_COURSE_IDNUMBER(3)NULLBOOK_QUATITYNUMBER(3)NULLBOOK_PRICENUMBER(3)NULL13.管理TMS系统的用户口令表USER_PSWD别名数据类型是否为空说明TMS_USERVARCHAR2(20)notNULL,TMS_PSWDVARCHAR2(10)notNULL3.4数据库结构的实现在需求分析、概念结构设计的基础上得到数据库的逻辑结构之后，就可以在数据库系统中实现在逻辑结构。我们使用的是ORACLE数据库系统。下面给出创建这些表格的SQL语句。创建用户四、 银行员工培训管理系统的具体实现4.1数据库的选择本系统的数据库采用的是ORACLE，其原因有二。第一该银行前台业务采用的就是此数据库。在本系统中采用ORACLE可降低成本投资。第二ORACLE.数据库以其强大的功能和稳定性而著称4.2开发语言的选择数据库应用程序的开发工具有许多，比如DELPHI，VisualBasic，VC,PowerBuilder。在此我问为什么选择PowerBuilder作为开发工具其原有：可视化的编程方法使用PowerBuilder开发人员可以在他的可视化集成开发环境(IDE)中以一种快速简捷的方式来开发应用程序。通过简单的拖放技术，程序员就能设计出复杂的WINDOWS应用程序，从而满足用户的要求。在PowerBuilder的IDE中开发应用，诸如窗口、菜单、文本、按钮等WINDOWS的标准控件都不必再Script程序中显式的创建。这些控件的布局、颜色、大小等属性都可以在PowerBuilder的集成开发环境中简单完成。不仅仅是窗口，其他许多的系统对象和用户对象，比如菜单、用户对象、结构和函数等，都可在PowerBuilder集成开发环境界面中的得以简单快速的设计。正因为如此，开发人员所要考虑的一切都可以在PowerBuilder的各个画板和视图中轻松完成。而无需过问许多与应用无关的细节，能充分缩短从设计需求到开发产品的时间，是我们的编码和实现周期变得非常短，从而降低系统的总体成本。在WINDOWS应用程序的开发方面，PowerBuilder支持基本上所有的WINDOWS编程特性，例如事件驱动的编程风格，多进程和多线程的概念，图形化用户界面(GUI),丰富强大的应用编程接口(API)等。使PowerBuilder在流行的WINDOWS操作系统平台上得到用户的普遍赞赏。面向对象的编程思想PowerBuilder不仅支持面向对象的思想，并下还把面向对象的技术和方法充分应用到PowerBuilder的各个方面。面向对象的技术所有两个方面的优秀思想：第一个方面是他主张把客观事物的数据和对这些数据的操作和工作封装在一些抽象到计算机系统中。这和结构化四项重大把数据和操作分离开来看待的做法有本质差别。在面向对象的市场中，这些数据叫做属性，而使用这些数据的操作较多方法。另一个方面面向对象的技术支持继承的概念，子对象不仅可以继承父对象的数据和方法，还可以拥有自己独立的数据和方法。这样具有很多了相似特性的，和某些不同特性的对象都可以去继承同一个祖先，该祖先实现它们公共的那些属性和方法，而这个祖先的各个指示那些不同的属性和方法。这极大地增强了程序代码的重用性都和降低了代码的编写总量，简化了系统的实现。优秀的数据库应用开发工具在数据库应用程序开发方面，PowerBuilder处于领先的地位。它支持众多的数据库管理系统，提供了多种数据库接口，是的用户不必直接去使用这些DBMS所提供的API就可以访问数据库。专用接口是针对大型的关系型数据库管理系统而专门设计的。设计与专用接口的目的是为了利用这些DBMS提供的API来提高访问数据库的速度。PowerBuilder还提供了通用的输入库接口，例如ODBC、JDBC。数据窗口是PowerBuilder用来实现其数据库应用开放的强有力的工具。数据库应用程序的核心目的，一方面是要方便地连接和操纵数据库，另一方面则是要给用户提供友好的界面，使得用户可以方便，而直观地使用从数据库获得的这些数据。效应的输入用开发人员也就需要完成两方面的工作：一方面是编写代码建立和的底层数据库的连接，然后从中获取数据，并根据用户要求对数据库中的数据进行查询、修改、增加和删除；另一方面是把获得的制约数据以生动形象的方式显示给用户，并且向用户提供操纵数据库的简便易用的方法。PowerBuilder这是从这两方面的要求出发，设计了数据窗口技术。数据窗口提供多种方式的数据源，施的应用程序能传出不同类型的数据。数据不仅可以来源于数据库，也可以来源于各种文件，比如文本文件、EXECL文件、Dbase文件。为了解决数据显示方面的问题，PowerBuilder在数据窗口中提出了显示风格的概念。先是风格设置检索到的数据以什么样的格式显示给用户。在PowerBuilder中，有多达11种的数据窗口显示风格。这么多显示风格能够满足各种不同的需求，的使得我们能够设计出各种专业化的用户界面。基于多平台的交叉开发PowerBuilder的一笑技术是基于多平台的交叉开发，可以在多平台上同时利用PowerBuilder进行开发。专业的客户机/服务器以及组件应用开发工具在现代的企业应用中，客户/服务器模式已经成为普遍流行的一种程序组织方式。根据应用系统的功能分割情况，客户/服务器模式分为两种类型：一种是传统的二成客户/服务器结构；另一种是三成和多层的客户/服务器结构。PowerBuilder既能完成客户端应用程序的开发，又能完成服务器的应用程序的开发。6. 对WEB应用的强大支持PowerBuilder提供完善的WEB开发环境，其中集成了PowerSite技术，无论是建立单机的WEB应用，还是与其他组件相结合开发复杂的WEB应用，都可由开发人员任意发挥。7.简洁强大的PowerScriptPowerScript语言不单是一种第四代语言(4GL)，而且还是一种面向对象的高级语言。它结合了C++和Basic这两种语言的优点，同时也克服了这两种语言的缺点，从而成为了一门使用简单的但功能十分强大的编程语言。4.3系统模块的具体实现在本系统中共有八个模块，他们分别是：学员信息管理、培训需求管理、培训资源管理、培训课程管理、培训计划管理、培训教员管理、岗位部门管理、培训教材管理。4.3.1用户登录窗口的设计在应用程序对象Open事件的程序代码中有下面一条语句：open(w_open)该语句就是打开登录窗口的语句。在登录窗口中控制了两个静态文本框StaticText控件,放置在窗口的相应位置用来显示文字。放置了两个单行编辑框SinglelineEdit控件，一个供用户输入登陆的用户名，另一个供用户输入口令。另外还放置了一个按钮控件。在按钮控件的Click事件中输入下面的程序代码，这样用户单击控件按钮就可以实现用户登陆的身份验证。iftrim(sle_1.text)=""thenmessagebox("出错信息","请输入用户号")returnendifSELECTtms_user,tms_pswdinto:g_tms_user,:g_tms_pswdfromuser_pswdwheretms_user=:sle_1.textusingsqlca;IfSQLCA.SQLCode=-1ThenMessageBox("出错信息","登录数据库出错")returnelseif(l_number=3)thenmessagebox("出错信息","你已输错三次，系统将自动关闭")close(parent)returnelseif (righttrim(g_tms_user)<>trim(sle_1.text) orrighttrim(g_tms_pswd)<>trim(sle_2.text))thenMessageBox("登录信息","你的登录信息不对，请重新输入！")sle_1.text=""sle_2.text=""sle_1.setfocus()l_number=l_number+1returnendifMessageBox("登录信息","你好！欢迎使用本系统！")open(w_main)close(parent)4.3.2主窗口的设计在主窗口中控制了10个静态文本框控件。第一个用来显示主窗口标题“XX银行员工培训管理系统”其,余的9个静态文本框控件形状类似于按钮控件，其单击事件分别用来打开具有不同模块功能的窗口。“学员信息管理”其功能是对员工的基本状况、成绩、选择的培训课程、培训需求进行管理。“培训需求管理”其功能是完成培训需求的查询、修改、删除。“培训资源管理”其功能是完成培训资源表的查询、修改、删除。“培训课程管理”其功能是完成培训课程和培训课程评价的查询、修改、删除。5.)“培训计划管理”其功能是完成培训计划表的查询、修改、删除。“培训教员管理”其功能是完成培训教员表的查询、修改、删除。“岗位部门管理”其功能是完成岗位部门表的查询、修改、删除。“培训教材管理”其功能是完成培训教材表的查询、修改、删除。

4.3.3学员信息管理模块的设计学员信息管理模块有一个大的窗口组成。在窗口的左半部分显示员工的基本信息窗口的右半部分显示选中员工的成绩、培训计划、培训需求的信息。该窗口由主程序窗口上的员工信息管理控件单击事件激发中的核心模块。4.3.4帮助程序的设计分析中的帮助程序由两个部分组成:一个是关于本程序的About窗口；那一个是HLP格式的帮助文件。一个成功的Windows应用程序应该提供一个About窗口。其中包括本系统的名称、所有者、联系方式等。“帮助”菜单下“使用帮助”Click事件showhelp（“X:\win\tms.hlp”,index!）其功能是打开已经创良好到帮助文件。第一个参数是帮助文件完整的墓，调的参数标示进入帮助文件的所有页面。本系统中其他的一些功能模块如员工信息管理模块，培训课程管理模块，培训教材管理目、培训计划管理模块的编制与上述大同小异在此不在列数。参考文献1、 oracle9iforwindowsnt/2000输入库系统培训教程（基础篇）北京计算机教育培训中心主编清华大学出版社2002年九月第一版2、 powerbuilder8.0数据窗口实用编程技术刘云洲于德壹编著中国水利水电出版社2002年一月第一版3、 oracle9ik中文版入门与提高赵松涛人民邮电出版社2002年7月1版4、 powerbuildre8.0高级编程技术陈明杨劲松北京希望电子出版社2002年1月1版5、 powerbuildre8.0时尚编程百例网冠科技机械工业出版社2002年6月1版6、 powerbuildre8.0参考手册张长富李均北京希望电子出版社2002年4月1版oracle9iforwindowsnt/2000输入库系统培训教程（基础篇）北京计算机教育培训中心主编清华大学出版社2002年九月第一版附:源程序清单CREATETABLESPACEtmsDATAFILE'X:\oracle\oradata\tms.ora'SIZE8M;ALTERTABLESPACEtmsADDDATAFILE'X:\oracle\oradata\tms11.ora'SIZE2M;CREATEUSERtmsIDENTIFIEDBYtmsDEFAULTTABLESPACEtmsPROFILEDEFAULTACCOUNTUNLOCK;GRANTCONNECT,RESOURCETOtms;ALTERUSERtmsDEFAULTROLEALL;创建员工基本状况表格PERSONNELCREATETABLE"TMS".PERSONNEL(EMP_NONUMBER(6,0)NOTNULL,EMP_NAMEVARCHAR2(10)NULL,DEPT_IDNUMBER(3,0)NULL,EMP_XLVARCHAR2(10)NULL,EMP_GENDERVARCHAR2(2)NULL,EMP_BIRTHDAYDATENULL,EMP_HOMETOWNVARCHAR2(8)NULL,EMP_COUNTRYVARCHAR2(10)NULL,EMP_NATIONVARCHAR2(10)NULL,EMP_IDNUMBER(20,0)NULL,EMP_MARRIAGEVARCHAR2(2)NULL,EMP_HEALTHVARCHAR2(20)NULL,EMP_STARTWORKDATENULL,EMP_STATEVARCHAR2(10)NULL,EMP_STATE_DATEDATENULL,EMP_HOMEADRESSVARCHAR2(10)NULL,EMP_TELENONUMBER(10,0)NULL,EMP_EMAILVARCHAR2(20)NULL,JOB_IDNUMBER(3,0)NULL,CONSTRAINTPERSONNEL_EMP_NO_PKPRIMARYKEY(EMP_NO),CONSTRAINTPERSONNEL_JOB_ID_FKFOREIGNKEY(JOB_ID)REFERENCES"TMS"."JOB"(JOB_ID))TABLESPACE"TMS";创建员工成绩表格SCORECREATETABLE"TMS".SCORE(EMP_NONUMBER(6)NOTNULL,COURSE_IDNUMBER(3)NULL,S_DATEDATENULL,S_PLACEVARCHAR2(10)NULL,TEACHER_IDNUMBER(6)NULL,SCORE_1NUMBER(3)NULL,SCORE_2NUMBER(3)NULL,SCORE_NOTESVARCHAR2(10)NULL,PASSNUMBER(1)NULL,CONSTRAINTSCORE_EMP_NO_PKPRIMARYKEY(EMP_NO),CONSTRAINTSCORE_COURSE_ID_FKFOREIGNKEY(COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID),CONSTRAINTSCORE_TEACHER_ID_FKFOREIGNKEY(TEACHER_ID)REFERENCES"TMS"."TEACHER"(TEACHER_ID))TABLESPACE"TMS";3创建课程表格COURSECREATETABLE"TMS".COURSE(COURSE_IDNUMBER(3)NULL,SUBJECTVARCHAR2(10)NULL,COURSE_CNAMEVARCHAR2(20)NULL,COURSE_ENAMEVARCHAR2(10)NULL,COURSE_DESCVARCHAR2(40)NULL,COURSE_DURATIONNUMBER(3)NULL,COURSE_BOOKVARCHAR2(10)NULL,COURSE_EQUNUMBER(3)NULL,COURSE_BEFORENUMBER(3)NULL,COURSE_MARKNUMBER(1)NULL,DEPT_IDNUMBER(3)NULL,CONSTRAINTCOURSE_COURSE_ID_PKPRIMARYKEY(COURSE_ID))TABLESPACE"TMS";4创建工作岗位情况表JOBCREATETABLE"TMS".JOB(JOB_POWERVARCHAR2(20)NULL,CONSTRAINTJOB_JOB_ID_PKPRIMARYKEY(JOB_ID))TABLESPACE"TMS";5创建部门信息表DEPTCREATETABLE"TMS".DEPT(DEPT_IDNUMBER(3)NOTNULL,DEPT_NAMEVARCHAR2(10)NULL,DEPT_MANAGERNUMBER(6)NULL,DEPT_VICEMANAGERNUMBER(6)NULL,CONSTRAINTDEPT_DEPT_ID_PKPRIMARYKEY(DEPT_ID),CONSTRAINTDEPT_MANAGER_FKFOREIGNKEY(DEPT_MANAGER)REFERENCES"TMS"."PERSONNEL"(EMP_NO),CONSTRAINTDEPT_VICEMANAGER_FKFOREIGNKEY(DEPT_VICEMANAGER)REFERENCES"TMS"."PERSONNEL"(EMP_NO))TABLESPACE"TMS";创建培训需求表COURSE_NEEDCREATETABLE"TMS".COURSE_NEED(COURSE_IDNUMBER(3)NULL,COURSE_NEEDNUMBER(6)NULL,CONSTRAINTCOURSE_NEED_COURSE_ID_FKFOREIGNKEY(COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID),CONSTRAINTCOURSE_NEED_COURSE_NEED_FKFOREIGNKEY(COURSE_NEED)REFERENCES"TMS"."PERSONNEL"(EMP_NO))TABLESPACE"TMS";创建企业培训计划表COURSE_AVAILABLECREATETABLE"TMS".COURSE_AVAILABLE(COURSE_IDNUMBER(3)NULL,COURSE_DATE_BEGINDATENULL,COURSE_DATE_OVERDATENULL,TEACHER_IDNUMBER(6)NULL,COURSE_PERSONNUMBERNUMBER(2)NULL,COURSE_PLACEVARCHAR2(10)NULL,CONSTRAINTCOURSE_AVAILABLE_COURSE_ID_PKPRIMARYKEY(COURSE_ID),CONSTRAINTCOURSE_AVAILABLE_COURSE_ID_FKFOREIGNKEY(COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID),CONSTRAINTCOURSE_AVAILABLE_TEACHER_ID_FKFOREIGNKEY(TEACHER_ID)REFERENCES"TMS"."TEACHER"(TEACHER_ID))TABLESPACE"TMS";创建个人培训计划表PERSONNEL_PLANCREATETABLE"TMS".PERSONNEL_PLAN(EMP_NONUMBER(6)NULL,COURSE_IDNUMBER(3)NULL,COURSE_DATE_BEGINDATENULL,COURSE_DATE_OVERDATENULL,CONSTRAINTPERSONNEL_PLAN_EMP_NO_FKFOREIGNKEY(EMP_NO)REFERENCES"TMS"."PERSONNEL"(EMP_NO),CONSTRAINTPERSONNEL_PLAN_COURSE_ID_FKFOREIGNKEY(COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID))TABLESPACE"TMS";创建课程评价表COURSE_EVALUATIONCREATETABLE"TMS".COURSE_EVALUATION(EVALUATIONVARCHAR2(40)NULL,EVALUATION_DATEDATENULL,CONSTRAINTCOURSE_EVALUATION_COURSE_ID_FKFOREIGNKEY(COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID))TABLESPACE"TMS";10创建教员信息表TEACHERCREATETABLE"TMS".TEACHER(TEACHER_IDNUMBER(6)NOTNULL,TEACHER_NAMEVARCHAR2(10)NULL,TEACHER_XLVARCHAR2(10)NULL,TEACHER_DATE_STARTDATENULL,TEACHER_EVALUATIONVARCHAR2(40)NULL,CONSTRAINTTEACHER_TEACHER_ID_PKPRIMARYKEY(TEACHER_ID))TABLESPACE"TMS";11创建培训资源信息表TM_RESOURCECREATETABLE"TMS".TM_RESOURCE(RESOURCE_IDNUMBER(3)NULL,RESOURCE_NAMEVARCHAR2(10)NULL,RESOURCE_MARKNUMBERNULL,RESOURCE_PRICEVARCHAR2(10)NULL,RESOURCE_QUATITYNUMBER(2)NULL,RESOURCE_REMVARCHAR2(40)NULL,CONSTRAINTRESOURCE_RESOURCE_ID_PKPRIMARYKEY(RESOURCE_ID))TABLESPACE"TMS";12创建教材信息表BOOKCREATETABLE"TMS".BOOK(BOOK_AUTHERVARCHAR2(10)NULL,BOOK_STATENUMBER(1)NULL,BOOK_COURSE_IDNUMBER(3)NULL,BOOK_QUATITYNUMBER(3)NULL,BOOK_PRICENUMBER(3)NULL,CONSTRAINTBOOK_BOOK_ID_PKPRIMARYKEY(BOOK_ID),CONSTRAINTBOOK_COURSE_ID_FKFOREIGNKEY(BOOK_COURSE_ID)REFERENCES"TMS"."COURSE"(COURSE_ID))TABLESPACE"TMS";13创建管理TMS系统的用户口令表USER_PSWD。CREATETABLE"TMS".USER_PSWD(TMS_USERVARCHAR2(20)notNULL,TMS_PSWDVARCHAR2(10)notNULL,CONSTRAINTTMS_USER_PKPRIMARYKEY(TMS_USER))TABLESPACE"TMS";学员信息管理窗口的Open事件//显示员工基本情况DW_PERSONNEL.SETTRANSOBJECT(SQLCA)DW_PERSONNEL.RETRIEVE()//初始化数据窗口是否被修改的标志－全局变量g_personnel_change=0 //学员基本情况是否被修改的标志g_score_change=0 //学员成绩是否被修改的标志g_personnel_plan_change=0//学员培训计划是否被修改的标志“增加”按钮的Click事件用于输入新员工基本信息。dw_personnel.insertrow(0)g_personnel_change=g_personnel_change+1“删除”按钮的Click事件用于删除员工基本信息的窗口中的当前记录。如果用户将员工基本数据表中的一条记录删除，则程序自动将该员工在成绩表、计划表和需求表中的记录删除。longcurrent_rownumbercurrent_rownumber=dw_personnel.getrow()g_emp_no=getitemnumber(dw_personnel,current_rownumber,1)deleterow(dw_personnel,current_rownumber)g_personnel_change=g_personnel_change+1//从其他表中删除该员工的记录deletefromscorewhereemp_no=:gemp_no;deletefromcourse_needwhereemp_no=:gemp_no;deletefrompersonnel_planwhereemp_no=:gemp_no;“查询”按钮的Click事件用于执行条件查询。查询的条件在两个下拉式列表框和一个大行编辑框中输入的。//定义参数：查询条件综合结果stringLookforCondition//定义参数：要查询的列stringlookforItem1//定义参数：查询的符号stringlookforHow1//定义参数：要查询的内容stringlookforWhat1//定义参数：当前的行号intcurrent_row//定义参数：总的行数inttotal_row//定义参数：满足条件的行号intfind_row//查询符号的选择lookforHow1=ddlb_4.text//查询子段和查询内容的选择ifddlb_l.text="员工号"thenlookforItem1="emp_no"lookforwhatl=sle_l.textelseifddlb_1.text="员工姓名"thenlookforIteml="emp_name"lookforwhat1="'"+sle_1.text+"'"elseifddlb_1.text="状态"thenlookforItem1="emp_state"lookforwhat1="'"+sle_1.text+"'"elseifddlb_l.text="岗位"thenlookforItem1="job_id"lookforwhatl=sle_l.textelseifddlb_1.text="联系电话"thenlookforIteml="emp_TeleNo"lookforwhat1=sle_1.textelseifddlb_1.text="学历"thenlookforItem1="emp_xl"lookforwhat1="'"+sle_1.text+"'"endif//查询条件的综合lookforCondition=lookforItem1+lookforHow1+""+lookforwhat1+""//得到当前行号current_row=dw_personnel.getrow()//得到总行数total_row=dw_personnel.rowcount()〃利用find函数从当前行开始往下查询find_row=dw_personnel.find(lookforcondition,current_row,total