如家酒店管理系统的设计与实现

精选优质文档-倾情为你奉上大连东软信息学院毕业设计（论文）论文题目：如家酒店管理系统的设计与实现系 所： 信息技术与商务管理 专 业： 信息管理与信息系统（SAP ERP开发方向） 学生姓名： 黄铭奋 学生学号： 指导教师： 张奇松 完成日期： 2014 年 5 月 3 日 大连东软信息学院Dalian Neusoft University of Information专心-专注-专业如家酒店管理系统的设计与实现摘 要随着酒店服务市场竞争的加剧，新的业务需求不断涌现，同时，随着人们生活水平的不断提升，对服务的要求越来越高。这就要求酒店管理系统能够不断适应新的需求变化，为业务发展的需要提供有效的解决方案。如家酒店是目前国内酒店服务行业业务比较全面的连锁酒店，几乎覆盖了国内的大、中、小城市，为成千上万的顾客提供了便利的服务。如家酒店有着自己特有的经营模式，所以才能领先于其它品牌酒店。但由于业务需求的不断扩大，原有的管理系统和管理模式已难以支撑酒店的经营运转，这就需要寻找一套更完善的解决方案。与市场上基于JAVA平台开发的系统相比，此系统最大优点在于它拥有更强的处理数据的能力，尤其在处理各种业务报表上。除此之外，此系统的开发周期较短，主要是因为代码量少，不用像JAVA那样编写大量的SQL语句，以及逻辑处理和页面编写代码，大大减少了开发人员的工作量，节约了成本。同时基于ABAP开发的系统，操作界面更简洁、更方便，给用户带来全新的体验。本文通过对如家酒店的业务分析，提供一套系统解决方案，并基于SAP R/3平台ABAP编程语言，运用屏幕、表控制等技术开发如家酒店管理系统。关键词：解决方案，SAP，ABAP ，屏幕，表控制Design and Implementation of Management System forRuJia HotelAbstractWith the hotel services market competition, new business needs continue to emerge, while with the continuous improvement of peoples living standards, demand for services is increasing. This requires that the hotel management system to constantly adapt to the changing needs of the new, providing effective solutions for the needs of business development. RuJia hotel is currently the hospitality industry more comprehensive business hotel chain, covering almost the domestic large, medium and small cities, tens of thousands of customers to provide convenient services. RuJia hotel has its own unique business model, so can lead to other branded hotels. However, due to growing business needs, existing management systems and management model has been difficult to support the operation of the hotel business, which needs to find a better solution. Compared with JAVA platform-based systems on the market, the biggest advantage of this system is that it has more data processing capabilities, especially in dealing with the various business reports. In addition, shorter development cycle of this system, mainly because less code, JAVA did not like writing a lot of SQL statements, and logic processing and page write code, greatly reducing the workload of developers, cost savings. Meanwhile based on ABAP systems development, user interface is more concise, more convenient, giving users a new experience.Based on the analysis of business, such as hotels, to provide a system solution based on SAP R / 3 platform ABAP programming language, using technology developed screens, table control, such as hotel management system.Key words: Solution, SAP, ABAP, screen, table control目录第1章绪 论随着中国经济水平的提升，人们的生活水平有了较快的提高，从而推动了旅游业的迅速发展，以至于促进了酒店服务产业的快速发展。酒店服务产业作为第三产业的突出产业，以其前所未有的规模迅速占领了服务产业市场。酒店服务业主要以满足人们外出旅游、出差、以及无法避免的在外借宿提供了住宿等保障服务，这也是其得以迅速发展的主要因素。随着酒店数量的不断增加，规模不断扩大，连锁酒店也随之腾空出世。然而酒店的管理运营需求压力也瞬间增大，客人数量的增加，业务报表的增加，各种信息的处理难度越来越高，这极大的影响了酒店服务产业的发展。于是，为了促使酒店的持续、稳定、健康的发展，酒店管理系统成为其潜在的经营手段。通过酒店管理系统的科学管理，酒店的服务水平将提高到另一个档次，从而提供更加人性化的服务。1.1 论文研究主要内容本课题将通过分析设计如家酒店管理系统，使如家酒店的管理信息化，提高酒店经营效率，实现酒店效益最大化。课题所分析设计的酒店管理系统主要实现客房的预订，客户信息管理，客房的维护，生成房间订单，打印报表等功能。系统所要实现的功能将运用最先进的ABAP/4高级语言来实现。系统所呈现的界面主要以屏幕制作器结合表控制来完成，界面设计简单快速，但不乏个性，使用户更加容易操作。使用屏幕和表控制减少了大量的代码，避免了给系统调试带来的不必要麻烦。代码的简单易懂，给系统的维护降低了成本，对系统维护人员降低了要求，真正实现了系统的高效、科学管理。同时高层领导可以简单快速的通过报表了解酒店的业务情况，及时的发现问题和提出正确解决方案。以上所述的系统功能经过科学的可行性分析，有效的运用SAP/ABAP语言及其强大的集成开发环境来实现，其中系统呈现的界面主要通过ABAP中的屏幕绘制器来实现，屏幕之间的交互，是受流逻辑控制的，它不是真正意义上的ABAP语言，但是它包含ABAP代码块。而存储数据的数据库采用的是SAP R/3系统自带的MAXDB，MAXDB实现了对数据的封装，系统中的数据库表通过建立ABAP中的字典库来映射到MAXDB中。避免了大量SQL语句的编写，从而使数据的调用更加方便。1.2 国内外现状国外酒店集团在市场需求的驱动和经济效益的牵引双重作用下，逐步经历了区域发展阶段、洲际发展阶段和全球发展阶段，服务功能已经相对完善。酒店管理借助计算机以后，不仅能大大的提高了工作效率，而且可以节约人力资源，使成本也大大降低。在信息技术的帮助下，酒店可以随心所欲地为顾客提供人性化的服务，如美国希尔顿酒店管理学院设计的“21实际酒店客房”拥有虚拟现实、生物测定等先进技术，从而赋予传统酒店客房“舒适”、“安全”等标准以全新的含义。而纵观国内的酒店，简单的管理系统无法提供网上预约功能，更别说实现连锁报表的处理，甚至有些还需要手工的登记，人工的叫醒服务。而且服务也无法满足客户的更多要求，不能提供人性化的服务。可谓经营效率底，服务水平差。但国内也不乏先进的连锁酒店，比如“7天连锁酒店”、“城市便捷酒店”等。 第2章关键技术介绍2.1 关键性开发技术的介绍2.1.1 SAP系统结构介绍SAP主要由SAP R/3和NetWeaver系统结构组成。我们经常说的SAP就是R/3，它是一个基于一种三层架构的分布式处理系统，可以应用于小型的服务器，其庞大的系统数据依靠客服及/服务器的主从架构分布在网络中。它的三级体系结构将系统的软件和服务分布在三个不同的层次，从而将系统的负载分散，提高了系统的执行效率；界面显示层提供了友好的图形化操作，结合严格的权限划分功能，确保了不同的用户在不同的办公地点同时操作不同的业务，以及操作同一个业务。SAP NetWeaver是一个标准化平台，它其实就是R/3和Basis系统的拓展。实现员工整合、信息整合、流程整合和应用程序平台四个层面的集成。2.1.2 对话程序开发对话程序是SAP开发项目中的一个重要环节，是系统和用户的“对话”。对话程序开发包括了基本屏幕、屏幕序列、屏幕的流逻辑的开发，以及各种屏幕控件的应用。系统中，通过屏幕的不断切换来满足用户的业务需求，但屏幕之间的跳转是通过流逻辑来控制的，然而屏幕跳转前后岁数据的处理分别是通过PBO和PAI模块来控制。其中PBO是对屏幕显示之前对屏幕要显示的数据进行处理，以满足业务的需求；PAI是对屏幕显示后对用户录入的数据进行后期处理，如把数据插入或更新到数据库表中。同时我们可以通过屏幕控件来绘制要显示的界面，根据不同的控件来布置窗口界面，比如Text Field可以输入文本信息、Checkbox可以选择不同的类型或数据、Table Control可以显示和操作显示出来的数据库信息。2.1.3企业报表开发在企业生产、经营中，报表是企业组织、分析和传递数据信息的一种最基本最常用的方式。报表不仅具有与语言无关、包含多个国家的货币、时间、日期等输出格式的特性，同时也可以以多种不同的格式输出用户需要的数据信息。在ABAP报表中包括Report List报表、ALV报表以及ScriptFrom、SmartForm商业报表。在本系统中主要运用了SmartForm商业报表来实现订单的打印等功能。以及Tablecontrol来显示和操作用户数据，Tablecontrol是较为简单的报表输出方式。有两种方法，一是通过向导来完成所需要的报表字段样式；二是根据自己需求来画，操作简单。第3章系统分析3.1 构架概述3.1.1 组织构架根据酒店的需求调研结果，确定本系统中的组织架构，主要包含了包括以下组织，如图3.1所示。通过结构图我们可以看出，酒店的组织架构主要由总经理、业务部、财务部、市场部，以及各部门下的员工构成。图3.1 系统组织结构3.1.2 系统功能架构功能架构的调研可以明确系统的功能构造。系统功能架构的最上层是系统开发的总体目标，而总体目标下面是总体目标分解后的子功能，将总体目标分解可以更加明确开发的具体步骤，分工更明确，目标更清晰，从而更好的完成系统的开发。通过对如家酒店的基本调研和对客户的需求分析，本课题得到了如家酒店管理系统的基本的功能体系图，如图3.2所示。图3.2 系统功能结构此酒店管理系统分为顾客功能和管理员功能两大功能，顾客可以注册登录，之后可以查看酒店、客房信息及预订，并且可以查看个人和订单信息；职员功能包括注册登录、维护酒店、顾客、员工和房间等基本信息，并打印出房间订单等。3.2 系统开发环境 硬件环境：Inter Core(TM)2 Duo CPU i5-450M 2.10GHz /2GB/320GB软件环境：SAP GUI 7203.3 需求分析为了提高房间的使用率，提升酒店的业绩，使酒店资源使用率最大化。充分酒店现有的网络资源实现对酒店的管理和顾客的管理。酒店的管理主要实现对酒店资源的合理化管理，通过对市场需求的分析和主要竞争对手的分析，制定一个科学有效的业务流程，然后在系统上实现。首先，管理员需要注册后方可使用系统，通过注册账号登陆酒店管理模块，对酒店信息管理与维护、房间信息管理与维护、顾客的信息的管理与维护以及对酒店员工信息的管理与维护，为顾客提供网上预订功能，提供酒店信息，客房信息以及提供可住房间信息。主要实现对上述对象的增、删、查、改等基本功能以及打印报表等。而顾客的管理模块，主要以查询为主，查询酒店信息、房间信息以及个人信息。选择适合自己的房间进行预订。3.4业务流程图业务流程图是对实际业务图形化，使系统开发人员更加快速的分析业务的流程，更加方便的与用户进行交流。经过对如家酒店的顾客和管理员的业务分析，分别绘制了顾客和管理员的业务流程图，如图3.3,3.4所示。图3.3 客的业务流程图图3.4管理员的业务流程图3.5数据流程图数据流程图，是把数据在组织（或原系统）内部的流动情况抽象地独立出来，舍去了具体组织结构、处理工作、信息载体、物资和材料等，只从数据的流动过程来考察实际业务数据的处理模式。数据流程的分析主要是对信息进行分析，具体体现在数据的流动、处理、传递以及存储的方式。数据流程分析的目的就是要对数据流通时的问题进行发现和解决。这些问题主要是数据流程不流畅，处理过程不科学以及前后数据不相符等等。数据流程分析是通过对业务据流程图进行分析来。主要的思路是：首先根据业务流程图确定业务的流程顺序，然后根据调研中掌握的资料，将数据处理流程由抽象到具体，绘制出完整的数据流程图，在核对相应的报表、数据和模型等的同时绘制数据流程图。数据流程图是调查业务过程，与用户交换思想的工具。因此，数据流程图应简明易懂，同时这也有利于后面的设计，有利于对系统说明书进行维护。3.5.1顶层数据流程图顶层数据流程图是把整个系统看成一个整体，把系统作为一个总的数据处理模块，只需指明处理与有关外部实体之间的信息交换就可以了。顶层数据流图仅包含一个处理来代表被开发系统，它的输入流是该系统的输入数据，输出流是系统所输出数据。顶层数据流程图，如图3.5所示。图3.5 系统顶层数据流程图3.5.2一层数据流程图一层数据流图表示对顶层的细化。它的每一处理还可能继续细化，形成子图。一层数据流程图，如图3.6所示。图3.6 系统一层数据流程图3.5.3底层数据流程图底层数据流程图，是对上层数据流程图的进一步分解，是研究子系统内部的数据处理、数据存储、信息流动与交换情况的必要手段，把各功能的数据流图结合在一起为底层数据流图。如图3.7所示。图3.7 底层数据流程图3.6系统可行性分析3.6.1 技术可行性分析如家酒店管理系统，主要是通过互联网来实现对满足酒店日常业务需求的SAP系统进行数据操作与共享。在现在的互联网时代，计算机互联网几乎覆盖每个家庭的环境下，实现酒店的信息化，计算机网络已不再是问题。加上SAP系统在不断的完善，网络及数据的共享安全也不需考虑，强大的权限控制保证了数据的安全、可靠性。同时，服务器的处理能力也有目共睹，就连庞大的百度数据处理都不在话下，更不用担心酒店庞大的数据处理能力。一般的服务器足以满足酒店系统运行要求。在软件方面，SAP作为全球最先进的企业管理解决方案，其操作系统完全可以满足酒店的业务处理要求，自带数据库管理系统也完全可以实现数据的有效管理。对于技术人员的要求，ABAP只是开发语言中的一种，与JAVA、C语言大同小异，况且ABAP开发不用自己搭建系统框架，只要在SAP产品上进行二次开发即可。同时，在中国SAP行业中，有不少精通ABAP开发的，对于技术人员的要求也可满足。考虑到后续对系统的维护，对系统维护人员固然有要求，但是对于酒店原有的系统维护人员而言，只要经过一定的培训也可满足对系统的维护。3.6.2 经济可行性分析SAP系统因其强大的处理能力和先进的管理思想而高不可攀，以及后续昂贵的维护费用，让很多中小型企业望而却步。但经过对如家酒店过去的经营情况分析，同时对其支出进行预算，以及实施系统的前后利润分析后，得出酒店上SAP系统是可行的。虽然实施费用昂贵，但系统提高了酒店的经营效率，降低了成本。从长远利益出发，酒店信息化是必然的趋势。3.6.3 开发环境可行性分析当前酒店的管理系统已无法满足与日俱增的报表处理需求，SAP系统的实施迫在眉睫。企业领导经过对以上可行性的分析，提供了一个良好的开发环境，全力支持SAP系统的实施。在这样的环境下，SAP开发可顺利进行。3.7系统安全性分析在满足企业的业务要求的同时，系统的安全性、稳定性、可靠性显得更为重要，这也是一个软件好坏的衡量标准。想让用户用的放心，系统的安全性软件开发环节中重点考虑的环节。良好的稳定性可以减少了维护的成本，降低了维护人员的要求。可靠的数据是分析问题的前提，是解决问题的基础。所以数据的可靠性显得尤为重要。第4章系统设计4.1 功能模块设计根据业务的需求和系统设计思路，把系统分成了多个模块进行设计。首先，把系统分成了顾客和管理员两大模块，在顾客模块中，分成了顾客注册模块：为新顾客提供进入系统的入口，只有注册过的用户才能享受查询与预定服务；顾客登陆模块：登陆后的用户可以查询酒店信息、房间信息、进而选择预定客房，同时查看更新后的个人信息。管理员模块中，分成了注册、登陆模块的同时，增加了对管理模块：主要实现对酒店、客房、员工、顾客等信息的维护。虽然各个模块看似独立完成各自的功能，但其实各个模块式联系在一起不可分割的。比如顾客预定房间后会更新了顾客的一些信息，管理员维护房间信息后，顾客的查询结果也会随之改变。4.2系统设计原则为了使本系统功能齐全完备，操作简便，最大限度的提高系统的使用效率，从而满足用户的实际需要，在设计开发过程中遵循了如下原则：（1）实用性原则根据酒店的实际业务需求，满足酒店的业务需求为主，需求中涉及的功能必须一一实现，不可脱离用户实际的要求。（2）易操作原则要求设计的系统功能齐全的同时，界面要清晰友好，提示语句要言简意赅，不要让用户产生歧义；操作要方便简单，处理逻辑要符合一般用户的逻辑，对特殊的地方提供相应的备注。（3）可扩充性原则要考虑到酒店业务会发生改变，用户需求的改变，预留开发接口，为增加功能和改变需求提供方便了便，代码要提供对应的说明，避免系统维护中不必要的麻烦。4.3 数据库设计在整个系统的开发中，数据库的设计是系统的基础，也是至关重要的一步，数据库的设计决定了数据的输出，数据的调用。甚至会影响系统的整体性能，表和字段的建立会影响查询和调用数据的速度，所以在设计数据库之前要对数据采集的完整性，以及详细的数据分析。确定主键来确保数据的唯一性，必要时可通过建立外键和关联表来实现表的关联。（1）数据库概念设计通过E-R图，可以清楚的看出数据库由哪些表构成，以及表与表之间的关联关系，以下是如家酒店管理系统E-R图，如下图4.1所示。图4.2 如家酒店管理系统E-R图（2）数据库逻辑设计管理员基本信息表（ID，管理员编号，管理员姓名，管理员密码）如酒店基本信息表（ID，酒店编号，酒店名称，网址）员工基本信息表（ID，酒店ID，员工编号，员工姓名，身份证号码，家庭住址，员工电话，员工工资）客房基本信息表（ID，酒店ID，房间编号，房间类型，房间面积，有无窗户，有无空调，房间价格，房间物品）顾客基本信息表（ID，订单ID，顾客编号，顾客姓名，身份证号码，家庭住址，顾客电话，顾客积分）订单信息表（ID，酒店ID，房间ID，订单编号，预订城市，预订时间，入住时间，退房时间，入住天数，获得积分）（3）数据库物理设计数据库物理设计，如表4.1-4.6所示。表4.1 管理员基本信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDADMIN_NUMCHAR18CHAR18非空管理员编号ADMIN_NAMENAMECHAR35管理员姓名ADMIN_PAWDCHAR11CHAR11管理员密码表4.2 酒店基本信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDHOTEL_NUMCHAR18CHAR18非空酒店编号HOTEL_NAMENAMECHAR35酒店名称URLCHAR11CHAR300酒店网址表4.3 员工基本信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDHOTEL_IDCHAR11CHAR11非空酒店IDWORK_NUMCHAR18CHAR18非空员工编号WORK_NAMENAMECHAR35员工姓名CAR_NUMCHAR11CHAR11身份证号码WORK_ADDRCHAR50CHAR50家庭住址WORK_TELCHAR20CHAR20员工电话WORK_WAGECHAR11NUMB11员工工资表4.4 客房基本信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDHOTEL_ID CHAR11CHAR11非空酒店IDROOM_NUMCHAR18CHAR18非空客房编号ROOM_TYPENAMECHAR35房间类型ROOM_AREACHAR11CHAR11房间面积ROOM_WINDCHAR11CHAR11有无窗户ROOM_CONDCHAR11CHAR11有无空调ROOM_PRICECHAR11NUMB11房间价格ROOM_GOODSCHAR11CHAR11房间物品表4.5 顾客基本信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDBOOK_IDCHAR11CHAR11非空订单IDUSER_NUMCHAR18CHAR18非空顾客编号USER_NAMENAMECHAR35顾客姓名CAR_NUMCHAR11CHAR11身份证号码USER_ADDRCHAR50CHAR50家庭住址USER_TELCHAR20CHAR20顾客电话USER_INTEGCHAR11NUMB11顾客积分表4.6 订房信息表主键名称数据元素数据类型大小限制说明是IDCHAR11CHAR11非空IDHOTEL_IDCHAR11CHAR11非空酒店IDROOM_IDCHAR11CHAR11非空房间IDBOOK_NUMCHAR18CHAR18订单编号BOOK_CITYNAMECHAR35预订城市BOOK_DATECHAR11CHAR11预订时间CHECK_INTIMECHAR11CHAR50入住时间CHECK_OUTTIMECHAR11CHAR20退房时间BOOK_DAYSCHAR11NUMB11入住天数BOOK_INTEGCHAR11NUMB11获得积分第5章系统实现5.1 系统登陆界面 在此界面可以看到系统的入口，用户可以根据自己的角色选择不同的登陆方式。顾客用户可以选择顾客登陆界面，同时输入相应的用户名和密码，点击登陆如信息正确即可进入顾客功能界面并提示登陆成功信息，如果输入的信息有误，则会提示用户密码或用户名有误。管理员用户登陆方式与顾客登陆方式一样。如果用户是新用户，则需点击注册按钮，进入注册界面填写相应的信息，注册成功后方可登陆系统。如图5.1 所示图5.1 系统登陆界面实现代码如下：CASE ok_code.WHEN LOGIN.SELECT SINGLE * FROM zhmf_user INTO zhmf_userWHERE user_id = zhmf_user-user_idAND password = zhmf_user-password.IF sy-subrc = 0.MESSAGE TYPE I.SET SCREEN 400.ELSE.MESSAGE TYPE I.ENDIF.WHEN REGISTER.CLEAR zhmf_user.SET SCREEN 200.WHEN LOGIN1.SELECT SINGLE * FROM zhmf_admin INTO zhmf_userWHERE admin_id = zhmf_admin-admin_idAND password = zhmf_admin-password.IF sy-subrc = 0.MESSAGE TYPE I.SET SCREEN 500.ELSE.MESSAGE TYPE I.ENDIF.WHEN REGISTER1.CLEAR zhmf_admin.SET SCREEN 300.WHEN EXIT.LEAVE PROGRAM.ENDCASE.5.1.1 顾客注册界面提示顾客用户输入新的用户名、密码、电话等基本信息，同时判断用户输入的用户名是否存在，如果已存在则提示用户此用户名已存在，并且需要用户再次输入密码，两次输入要一致，否则将提示两次密码不一致。所有信息输入无误后，则会提示用户注册成功，返回登录界面。如图5.2 所示图5.2 顾客注册界面实现代码如下：MODULE user_command_0200 INPUT. CASE ok_code. WHEN SURE. IF zhmf_user-user_id IS INITIAL. MESSAGE TYPE I. ELSE. IF zhmf_user-name IS INITIAL. MESSAGE TYPE I. ELSE. IF zhmf_user-password = pw. INSERT zhmf_user FROM zhmf_user. IF sy-subrc = 0. MESSAGE TYPE I. SET SCREEN 100. ELSE. MESSAGE TYPE I. ENDIF. ELSE. MESSAGE TYPE I. CLEAR pw. ENDIF. ENDIF. ENDIF. WHEN RESET. CLEAR zhmf_user. WHEN BACK. CLEAR zhmf_user. SET SCREEN 100. ENDCASE.ENDMODULE. USER_COMMAND_0200 INPUTMODULE clearokcode_0200 OUTPUT. CLEAR ok_code.ENDMODULE. clearokcode_0200 OUTPUT5.1.2管理员注册界面提示管理员用户输入新的用户名、密码、等基本信息，同时判断用户输入的用户名是否存在，如果已存在则提示用户此用户名已存在，并且需要用户再次输入密码，两次输入要一致，否则将提示两次密码不一致。所有信息输入无误后，则会提示用户注册成功，返回登录界面。如图5.3 所示。图5.3 管理员注册界面实现代码如下：MODULE user_command_0300 INPUT. CASE ok_code. WHEN SURE. IF zhmf_admin-admin_id IS INITIAL. MESSAGE TYPE I. ELSE. IF zhmf_admin-password = pw. INSERT zhmf_admin FROM zhmf_admin. IF sy-subrc = 0. MESSAGE TYPE I. SET SCREEN 100. ELSE. MESSAGE TYPE I. ENDIF. ELSE. MESSAGE TYPE I. CLEAR pw. ENDIF. ENDIF. WHEN RESET. CLEAR zhmf_admin. WHEN BACK. CLEAR zhmf_admin. SET SCREEN 100. ENDCASE.ENDMODULE. USER_COMMAND_0300 INPUT5.2 顾客功能界面 5.2.1 登录成功界面顾客用户成功登录系统后，可以选择不同的按钮进入查询酒店信息、房间信息、个人信息、以及房间预订等界面，点击返回则返回到登录界面。如图5.4 所示图5.4 顾客登录成功界面实现代码如下：MODULE user_command_0400 INPUT. CASE ok_code. WHEN HOTEL. SET SCREEN 1300. WHEN BOOK. CLEAR: city,indate,ldate,tdays. CALL SELECTION-SCREEN 0001. SET SCREEN 1700. WHEN INFOR. SET SCREEN 1800. WHEN BACK. SET SCREEN 100. CLEAR zhmf_user. ENDCASE.ENDMODULE. USER_COMMAND_0400 INPUT5.2.2 查询酒店信息界面显示酒店的详细信息。如图5.5 所示图5.5 查看酒店界面实现代码如下：MODULE user_command_1300 INPUT. CASE ok_code. WHEN BACK. SET SCREEN 500. ENDCASE.ENDMODULE. user_command_1300 INPUTMODULE select_1300 OUTPUT. CLEAR ok_code. SELECT * FROM zhmf_hotel INTO CORRESPONDING FIELDS OF TABLE itab_hotel.ENDMODULE. select_1300 OUTPUTMODULE file_1300 OUTPUT. MOVE-CORRESPONDING wa_hotel TO zhmf_hotel.ENDMODULE. file_1300 OUTPUTMODULE write_1300 INPUT. MOVE-CORRESPONDING zhmf_hotel TO wa_hotel. MODIFY itab_hotel FROM wa_hotel INDEX tc5-current_line.ENDMODULE. write_1300 INPUT5.2.3 预定房间信息界面显示不同类型的房间信息。如图5.6 所示图5.6 查看房间界面实现代码如下：MODULE user_command_1700 INPUT. CASE ok_code. WHEN BOOK. SET SCREEN 1400. ENDCASE.ENDMODULE. USER_COMMAND_1700 INPUTMODULE fill_1700 OUTPUT. MOVE-CORRESPONDING wa_order TO zhmf_order.ENDMODULE. fill_1700 OUTPUTMODULE write_1700 INPUT. MOVE-CORRESPONDING zhmf_order TO wa_order. MODIFY itab_order FROM wa_order INDEX tc8-current_line.ENDMODULE. write_1700 INPUTMODULE select_1700 OUTPUT. CLEAR ok_code. SELECT * FROM zhmf_order INTO TABLE itab_order.ENDMODULE. select_1700 OUTPUT5.2.4 查询个人信息界面显示当前顾客的个人信息。如图5.7 所示图5.7 查看个人信息界面实现代码如下：MODULE user_command_1800 INPUT. CASE ok_code. WHEN BACK. CALL SCREEN 400. ENDCASE.ENDMODULE. USER_COMMAND_1800 INPUTMODULE display_1800 OUTPUT. CLEAR ok_code. SELECT SINGLE * FROM zhmf_user INTO wa_user WHERE user_id = zhmf_user-user_id. MOVE-CORRESPONDING wa_user TO zhmf_user.ENDMODULE. display_1800 OUTPUT5.2.5 条件查询房间界面提示顾客输入相应条件，查看满足条件的房间信息，进而可进行预订。如图5.8 所示。图5.8 条件查询房间界面实现代码如下：SELECTION-SCREEN BEGIN OF SCREEN 0001 TITLE text-001.PARAMETERS:city TYPE zhmf_bysj_order-city OBLIGATORY, indate TYPE zhmf_bysj_order-indate OBLIGATORY, ldate TYPE zhmf_bysj_order-leavedate OBLIGATORY, tdays TYPE zhmf_bysj_order-totaldays.PARAMETERS tcity TYPE zhmf_order-city.SELECTION-SCREEN END OF SCREEN 0001.5.2.6 预订房间界面顾客可选取一条房间信息，点击预订即可预订该房间。如图5.9 所示。图5.9 房间预订界面实现代码如下：MODULE user_command_1700 INPUT. CASE ok_code. WHEN BOOK. SET SCREEN 1400. ENDCASE.ENDMODULE. USER_COMMAND_1700 INPUTMODULE fill_1700 OUTPUT. MOVE-CORRESPONDING wa_order TO zhmf_order.ENDMODULE. fill_1700 OUTPUTMODULE write_1700 INPUT. MOVE-CORRESPONDING zhmf_order TO wa_order. MODIFY itab_order FROM wa_order INDEX tc8-current_line.ENDMODULE. write_1700 INPUTMODULE select_1700 OUTPUT. CLEAR ok_code. SELECT * FROM zhmf_order INTO TABLE itab_order.ENDMODULE. select_1700 OUTPUT5.3 管理员功能界面 5.3.1 登录成功界面管理员用户成功登录系统后，可以选择不同的按钮进入维护酒店信息、房间信息、员工信息、顾客信息以及打印订单等界面，点击返回则返回到登录界面。如图5.10 所示图5.10 管理员登录成功界面实现代码如下：MODULE user_command_0500 INPUT. CASE ok_code. WHEN USER. SET SCREEN 1200. WHEN EMPLOY. SET SCREEN 1000. WHEN HOTEL. SET SCREEN 600. WHEN ROOM. SET SCREEN 800. WHEN BOOK. SET SCREEN 1500. WHEN BACK. SET SCREEN 100. CLEAR zhmf_admin. ENDCASE.ENDMODULE. user_command_0500 INPUT5.3.2 维护酒店信息界面显示所有酒店的信息，管理员可根据需要对其进行修改、删除以及添加信息。如图5.11 所示。图5.11 酒店维护界面实现代码如下：MODULE user_command_0600 INPUT. CASE ok_code. WHEN SAVE. MODIFY zhmf_hotel FROM TABLE itab_hotel. IF sy-subrc = 0. MESSAGE TYPE I. ENDIF. WHEN DELETE. char = . LOOP AT itab_hotel INTO wa_hotel. IF wa_hotel-mark = X. char = X. DELETE TABLE itab_hotel FROM wa_hotel. DELETE zhmf_hotel FROM wa_hotel. IF sy-subrc = 0. tc1-lines = tc1-lines - 1. MESSAGE TYPE I. ENDIF. ENDIF. ENDLOOP. IF char X. MESSAGE TYPE I. ENDIF. WHEN ADD. CALL SCREEN 700. WHEN BACK. CALL SCREEN 500. ENDCASE.ENDMODULE. USER_COMMAND_0600 INPUT5.3.3 维护房间信息界面显示所有酒店的信息，管理员可根据需要对其进行修改、删除以及添加信息。如图5.12 所示。图5.12 房间维护界面实现代码如下：MODULE user_command_0800 INPUT. CASE ok_code. WHEN SAVE. MODIFY zhmf_rooms FROM TABLE itab_room. IF sy-subrc = 0. MESSAGE TYPE I. ENDIF. WHEN DELETE. char = . LOOP AT itab_room INTO wa_room. IF wa_room-mark = X. char = X. DELETE TABLE itab_room FROM wa_room. DELETE zhmf_rooms FROM wa_room. IF sy-subrc = 0. tc2-lines = tc2-lines - 1. MESSAGE TYPE I. ENDIF. ENDIF. ENDLOOP. IF char X. MESSAGE TYPE I. ENDIF. WHEN INSERT. CALL SCREEN 900. WHEN BACK. CALL SCREEN 500. ENDCASE.ENDMODULE. USER_COMMAND_0800 INPUT5.3.4 维护员工信息界面显示所有员工的信息，管理员可根据需要对其进行修改、删除以及添加信息。如图5.13 所示图5.13 员工维护界面实现代码如下：MODULE user_command_1000 INPUT. CASE ok_code. WHEN SAVE. MODIFY zhmf_employ FROM TABLE itab_employ. IF sy-subrc = 0. MESSAGE TYPE I. ENDIF. WHEN DELETE. char = . LOOP AT itab_employ INTO wa_employ. IF wa_employ-mark = X. char = X. DELETE TABLE itab_employ FROM wa_employ.