客房管理系统

摘要 ２

第一章 引 言 ３

第二章 客房管理系统的分析和设计 ３

2.1用户需求分析 ３

2.2系统功能分析 ４

2.3系统功能模块设计 ４

2.4系统数据流图 ７

2.5系统数据库设计 ８

第三章 客房管理系统的具体实现 １０

3.1开发工具的选择 １０

3.2系统的部分源代码及窗口界面设计 １１

第四章 系统的编译与运行 ２７

4.1可执行文件的生成 ２８

4.2打包应用程序 ２８

4.3系统的运行环境 ２９

第五章 结束语 ３０

附一：主要参考文献 ３１

附二:《凭证》样张 ３１

客房管理系统

摘要

本论文介绍了客房管理系统设计的全过程,根据数据库设计理论体系对客房管理系统进行详细的分析并完成设计,本系统是利用Power Builder8.0作为数据库前端开发工具, Adapative Sever Anywhere 7为后台数据库，主要采用Windows 98/2000作为操作系统，系统基于单机模具有很强的实用性,有比较强的扩展性,有比较强的移植性,易维护,易使用,易升级。

关键字:面向对象数据库 SQL 客房统计维护

第一章 引 言

客房管理系统是一个旅店不可缺少的部分,它的内容对于旅店的决策者和管理者来说都至关重要,所以客房管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。

随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。

作为计算机应用的一部分,使用计算机对客房信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高客房管理的效率,也是饭店的科学化、正规化管理的重要条件。

因此，开发这样一套管理软件有着重要的意义和价值。

第二章 客房管理系统的分析和设计

2.1用户需求分析

软件功能具备：

（1）客户住宿记录管理。通过该管理功能，系统可以通过计算机对客户的一些基本信息进行录入，从而成为客户查询的资料。而且，一个客户一经记录，会自动将占用的床位信息反映在系统中，即哪些房间已经占用，哪些房间床位仍然空余。在进行客户记录时，自动出现客房的总床位、房间号、剩余床位、价格和房间可用的信息，系统可以自动判断该房间是否空余，从而决定是否可以入住该房间。记录时，用户可以选择房间号、价格等，可打印押金收款凭证给客户。

（2）客户查询。在客房管理系统中，可以对客户的一些信息作综合查询，即可以按多种方式进行查询，查询到后可办理退房手续并打印结帐凭证收据，退房的同时系统可以自动将客户占用的房间的床位恢复备用。

（3）客房管理和查询。通过该管理功能，管理人员可对所有客房进行管理，如增减房间，调整价格，进行查询等。

（4）报表打印。可对过去的某一段时间经营状况进行统计并打印结果，方便管理员及时掌握经营情况并作出相应决策。

（5）系统维护。包括：系统初始化，数据备份，用户口令更改和新用户注册。

2.2系统功能分析

客房管理系统是针对客房管理的大量业务处理工作而开发的管理软件。根据用户的要求，实现客房管理、房间管理、打印统计报表和系统维护等几个方面的功能。

用户通过输入基本信息,由系统自行生成相应的统计数据及各类统计报表以供用户查询、打印,另外用户还可以对这些基本信息进行定期的更新和删除,客房管理系统力求给用户方便快捷的途径去管理这些繁琐的数据。

2.3系统功能模块设计

2.3.1系统流程图和功能模块图:

根据以上系统功能分析,考虑到Power Builder8.0程序编制的特点,系统流程图和功能模块图如下:

系统流程图:

登录界面

N

错输三次密码正确

密码正确

N

Y

系统主窗口

Y Y退出

功能模块图:

客房管理系统

系统帮助模块

系统维护模块

打印报表模块

客房管理模块

客户管理模块

客房查询

住宿收银统计

用户管理

口令更改

数据备份

系统初始化

客房设置

客户查询

客户登记

下面对这几个模块做具体说明：

2.3.2客户管理模块

此功能模块包括两个子模块，客户登记和客户查询。

1． 客户住房登记

该窗口具有新增、保存、删除、打印押金收据等功能。在此管理人员必须输入个人客户的详细资料包括姓名、性别、年龄证件类别、证件号码、住店日期、预付押金，所入住的房间号等。在这个窗口中，系统会将未住客房的资料通过表格形式显示出来，以方便管理人员合理安排客户住房。当管理人员将个人资料登入后，数据窗口通过Freefrom表现形式，系统将会显示所入住客户的姓名、身份证号、性别、入住日期、入住时间和入住的房间号等资料，以方便管理人员核对客户资料。一般情况下，客户信息录入完毕后，需要打印“住房押金收款凭证”所以在该窗口添加了打印功能。

2． 客户查询

该窗口具有查询、结帐、退房、打印结帐凭证等功能。在此管理人员对要求退房的客户进行查询，并进行费用结算。在查询时，可以按房号、姓名、全部等方式进行查询，客户的信息资料可以从查询结果中获得。在此管理人员可以浏览已住客户的详细资料，包括客户的姓名、性别、入住人数、房间号码、身份证号码、入住日期、入住时间、已住天数等资料，方便管理人员管理客户。

一般情况下，结帐退房时要进行查询，调出该客户登记的资料，并进行费用结算，同时打印“客户结帐凭证”，所以我们将客户结帐退房功能放置在该窗口进行，符合手工操作习惯。在查询结果中选择要退房的记录先进行结帐，系统将显示该客户的住宿详细资料，并询问是否需要打印，若须打印单击打印按钮，打印该客户的“住宿结帐凭证”，若无须打印则按返回键。打印完毕后，便可以办理退房手续了，将退房房间号的床位腾出备用。

2.3.3客房管理模块

此功能模块也包括两个子模块：房间设置和房间查询。

1、房间设置

该窗口具有对房间数据进行新增、删除、保存等操作功能，在此管理人员必须输入新房间的房间号码、总床位数、剩余床位数、每床单价等，在输入完毕后，单击“确定”，系统将显示新房间的基本情况。同时，为方便管理人员对房间进行管理，在这个窗口中，我们将剩余床位为零的房号记录用红色标记，表示该房客满，禁用。

2、 房间查询

在此管理人员对要求客房进行查询，在查询时，可以按房号、床位数、全部等方式进行查询，房间的信息资料可以从查询结果中获得。包括客房总床位数、剩余床位数、每床单价等。

2.3.4统计报表模块

该模块实现对客房住宿收银的统计，为管理人员提供某一段时间内住房人数和累计收入的统计，可以实现对统计的数据进行年报表，月报表，日报表的查询统计并进行打印，为管理人员的经营决策提供科学数据。

2.3.5系统维护模块

此功能模块有三个子模块，我们在进行系统维护时，首先要选取系统维护的类型，包括：数据初始化，修改密码、数据备份和新用户注册。

1． 数据初始化

此模块实现系统原始数据的清空，以便重新输入数据，进行管理。

2． 修改密码

在此模块中，用户必须首先输入用户名和原始密码，按“确认”键后，在新密码栏中输入新密码，并进行确认，最后单

击“确认”键进行保存。

3． 数据备份

任一个含有数据库的系统，其数据的备份功能是很重要的。因系统有着种种不可预测的被损坏的可能，如果系统数据没有备份，一旦数据被丢失或破坏，有时会给用户造成无法估量的损失或严重的后果。

4． 新用户的注册

一般情况下，系统的使用不止一人，每人使用都可以有自己的用户名和密码，特别是统计报表数据时，其默认的报表人名称就是进入系统的用户名。

2.3.6系统帮助模块（略）

2.4系统数据流图

下面以数据流图方式来描述系统的逻辑功能（简称DFD）。

数据流图是在对系统进行需求分析和功能分析的基础上，从系统的科学性、管理的合理性、实际运行的可行性角度出发，将信息处理功能和彼此之间的联系自顶向下、逐层分解，从逻辑上精确地描述系统应具有的数据加工功能、数据输入、数据输出、数据存储及数据来源和方向（外部项）。如图2.6所示。

*

外部项（外部实体）加工（处理逻辑） 数据存储 数据流 与

图 2．6 数据流图图例

客 户 房 间

*

入住 押金 房间

登记 凭证 结帐 设置

*

客户数据 房间数据

查询 统计数据 查询

统计

报表 管理员

结帐

凭证

2.5系统数据库设计

由于考虑到本系统是应用在单机系统上，另外根据管理人员规模，我们建如下表：

　·客户信息数据表 guest

·房间信息数据表 room

·用户密码表 user1

另外，根据实际统计需要，我们另外建立一个统计表，用以存放部分统计信息以便查询。

·统计表 tj

　下面我们详细说明：1、 客户信息数据表

字段名称字段类型字段大小索引忽略空值客户编号Int默认primary N(自动生

成)

房号Int默认forign y

证件类别Char8y

证件号码Char20y

姓名Char10y

性别Char2y

年龄Cnt默认y

住店日期Date默认y

离店日期Date默认y

住房天数Int默认y

预付款Decimal7(2)y

2、 房间信息数据表

字段名称字段类型字段大小索引忽略空值房号Int默认primay n

总床位Char10y

剩余床位Char10y

客房类别Char2y

每床标价Decimal10(2)y

3、 用户密码表

字段名称字段类型字段大小索引忽略空值Username Char10primary否userpw Char10否usertype Char1否

4、 统计表

字段名称字段类型字段大小索引忽略空值

结帐号Char10primay n(自动生

成)

姓名Char10y

房号Int默认y

证件号码Char20y

住店日期Timestamp默认y

结帐日期Timestamp默认y

结帐金额Decimal10（2）y

金额大写Char14y

客户编号Int10y

第三章 客房管理系统的具体实现

3.1开发工具的选择

在众多的优秀的软件开发工具中，结合自己对软件熟悉的程度和喜好，我选择专业的面向对象的数据库应用系统开发工具Power Builder 8.0及其自带的数据库Adapitve Sever Anywhere（简称ASA）作为这套管理系统的开发平台。PB8.0是美国Sybase公司及其子公司PowerSoft公司共同开发的第八代产品。是一个大型的数据库应用系统的开发平台，它基于客户/服务器体系结构，可以广泛开发适合于远程数据库和本地数据库的应用系统。它除拥有其他开发平台的界面制作的优秀控件之外，以应用系统工程的工作空间为框架，以数据窗口控件和数据窗口对象作为数据库应用系统开发的核心，并结合其他控件的辅助功能，可以方便的为用户创建数据库应用系统。

3.2系统的部分源代码及窗口界面设计

3.2.1系统登录窗口界面及代码

窗口代码：

open event: // Profile kfgl

SQLCA.DBMS = "ODBC"

SQLCA.AutoCommit = False

SQLCA.DBParm = "Connectstring='DSN=kfgl'"

connect;

if sqlca.sqlcode<>0 then

messagebox('连接数据库失败','sqlca.sqlerrtext')

else

end if

确认按钮代码：(clicked event)

select username,userpw,usertype

into :ls_username,:ls_userpw,:ls_type

from "user"

where username=:sle_username.text;

if sle_username.text <> ls_username or sle_username.text='' then

if ls_time =3 then

messagebox('登录错误','对不起，你无权使用统!',exclamation!) halt close

end if

messagebox('提示信息','该用户不存在!',exclamation!)

sle_username.text=''

sle_userpw.text=''sle_username.setfocus()

ls_time++

return

else

if sle_userpw.text <> ls_userpw then

if ls_time =3 then

messagebox('登录错误','对不起，你无权使用统!',exclamation!) halt close

end if

messagebox('提示信息','密码错误!~r~n请重新输入密

码!',exclamation!)

sle_userpw.text=''

sle_userpw.setfocus()

ls_time++

return

end if

open(w_main)

close(parent)

end if

3.2.2系统主界面窗口及其代码窗口代码：

open event: timer(1)

this.title="欢迎使用客房管理系统"+" "+"今天日期:"+string(today())+" " + "时间:"+string(now()) if ls_type='2' then

m_main.m_系统维护.m_用户管理.enabled=false

m_main.m_系统维护.m_系统初始化.enabled=false

m_main.m_系统维护.m_密码更改.enabled=false

m_main.m_客房管理.m_房间设置.enabled=false

end if

timer event:

this.title="欢迎使用客房管理系统"+" "+"今天日期:"+string(today())+" " + "时间:"+string(now()) decarle global variable:

integer ls_time=1

string ls_username

string ls_userpw

string ls_type

3.2.3系统信息录入界面及部分控件代码

窗口代码：

open event: connect;

dw_1.settransobject(sqlca)

dw_1.retrieve()

long hh

hh=insertrow(dw_1,0)

dw_1.ScrollToRow(hh)

long ls_countselect count(*) into :ls_count from "guest"; if ls_count=0 then

sle_1.visible=false

sle_2.visible=false

else

sle_1.visible=true

sle_2.visible=true

end if

保存按钮代码：

clicked event: int roomid,row,leftbed

row=dw_1.getrow()

roomid=dw_1.getitemnumber(row,"房号")

if not isnull(roomid) then

select "room"."剩余床位"

into :leftbed

from "room"

where "room"."房号"= :roomid;

leftbed=leftbed -1

update "room"

set "剩余床位"=:leftbed

where "room"."房号"= :roomid;

end if

dw_1.update()

if dw_1.update()=1 then

messagebox("提示信息：

dw_1.ScrollToRow(row)

else

messagebox("提示信息：

end if

押金收据按钮代码：

clicked event: string usernameint khbh,row

username="t_3.text="+"'"+ls_username+"'"

dw_2.modify(username)

row=dw_1.getrow()

khbh=dw_1.getitemnumber(row,”客户编号”)

dw_2.settransobject(sqlca)

dw_2.retrieve(khbh)

if messagebox("信息提示

dw_2.print()

else

rollback;

end if

删除按钮:

clicked event:

long hh

integer net

int row,roomid,leftbed

net=messagebox("注意!

if net=1 then

hh=dw_1.getrow()

row=dw_1.getrow()

roomid=dw_1.getitemnumber(row,"房号")

if not isnull(roomid) then

select "room"."剩余床位"

into: leftbed

from "room"

where "room"."房号"= :roomid;

leftbed=leftbed + 1

update "room"

set "剩余床位"=:leftbed

where "room"."房号"= :roomid;end if

deleterow(dw_1,hh)

//dw_1.retrieve()

else

messagebox("提示

if update(dw_1,true,false)=1 then

//dw_1.retrieve()//该行很重要！

dw_1.resetupdate()

commit;

else

rollback;

end if

long ls_count

select count(*) into :ls_count from "guest"; if ls_count=0 then

sle_1.visible=false

sle_2.visible=false

else

sle_1.visible=true

sle_2.visible=true

end if

3.2.4客户查询窗口界面及代码rb1 clicked event:

if rb_1.checked=true then sle_1.enabled=true

sle_2.enabled=false

sle_2.text=''

sle_1.setfocus()

end if

rb3 clicked event:

if rb_3.checked=true then sle_1.enabled=false

sle_2.enabled=false

sle_1.text=''

sle_2.text=''

dw_1.reset()

end if

查询按钮代码:

clicked event:

long ls_count

//按房号查询

if rb_1.checked=true thenstring s_roomid

s_roomid=trim(sle_1.text)

if s_roomid=""or isnull(s_roomid)then

messagebox("系统提示

dw_1.reset()

sle_1.setfocus()

return

end if

s_roomid="%"+s_roomid+"%"

select count(*) into :ls_count from guest where 房号 like :s_roomid;

if ls_count=0 then

messagebox("提示信息

dw_1.reset()

sle_1.setfocus()

return

else

dw_1.setsqlselect("select * from guest where 房号 like '"+s_roomid+"'")

dw_1.retrieve()

end if

end if

//按姓名查询

if rb_2.checked=true then

string s_name

s_name=trim(sle_2.text)

if s_name=""or isnull(s_name)then

messagebox("系统提示

dw_1.reset()

sle_2.setfocus()

return

end if

s_name="%"+s_name+"%"

Select count(*) into :ls_count From guest where 姓名 like :s_name;

if ls_count=0 then

messagebox("提示信息

dw_1.reset()

sle_2.setfocus()

return

else

dw_1.setsqlselect("select * from guest where 姓名like'"+s_name+"'")

dw_1.retrieve()

end if

end if

//按全部查询

if rb_3.checked=true then

dw_1.setsqlselect("select * from guest")

dw_1.retrieve()

end if

结帐按钮:

clicked event:

/*printsetupprinter()

dw_2.settransobject(sqlca)

dw_2.retrieve()

//打印当前查询到的记录(dw_1窗口)

long row

row=printopen()

printdatawindow(row,dw_2)

printclose(row)*/

integer net

net=messagebox("提示

if net=1 then

//cb_3.enabled=true

cb_4.enabled=false

//close(parent)

//w_search_guest.visible=false

open(w_zsjz)

else

messagebox("提示

end if

结帐按钮:clicked event:

/*printsetupprinter()

dw_2.settransobject(sqlca)

dw_2.retrieve()

//打印当前查询到的记录(dw_1窗口)

long row

row=printopen()

printdatawindow(row,dw_2)

printclose(row)*/

integer net

net=messagebox("提示

//cb_3.enabled=true

cb_4.enabled=false

//close(parent)

//w_search_guest.visible=false

open(w_zsjz)

else

messagebox("提示

end if

退房按钮:

clicked event:

long hh

int roomid,leftbed

hh=dw_1.getrow()

//退房则"剩余床位数"减1

//rows=dw_1.getrow()

roomid=dw_1.getitemnumber(hh,"房号")

if not isnull(roomid) then

select "room"."剩余床位"

into: leftbed

from "room"

where "room"."房号"= :roomid;

leftbed=leftbed + 1

update "room"

set "剩余床位"=:leftbedwhere "room"."房号"= :roomid;

end if

deleterow(dw_1,hh)

//dw_1.resetupdate()

if update(dw_1,true,false)=1 then

dw_1.resetupdate()

cb_4.enabled=true

commit;

else

rollback;

//messagebox("错误

end if

//else

//messagebox("提示

//end if

3.2.5房间设置窗口界面及代码

删除按钮：

clicked event:

long hh

integer net

net=messagebox("注意!

if net=1 then

hh=dw_1.getrow()

deleterow(dw_1,hh)

else

messagebox("提示

if update(dw_1,true,false)=1 then

dw_1.resetupdate()

commit;

else

rollback;

end if

保存按钮：

clicked event:

if update(dw_1,true,false)=1 then

dw_1.resetupdate()

commit;

else

rollback;

messagebox("警告

end if

3.2.6系统统计窗口界面及代码统计按钮代码:

clicked event:

connect;

dw_1.settransobject(sqlca)

dw_1.reset()

string ls_year,ls_month,ls_day

/*if rb_4.checked=true then

dw_1.setsqlselect("select * from tj where(结帐日期)=today() ")

dw_1.retrieve()

end if*/

if rb_1.checked=true then

ls_year=trim(ddlb_1.text)

dw_1.setsqlselect("select * from tj where year(结帐日期)='"+ls_year+"'")

dw_1.retrieve()end if

if rb_2.checked=true then

ls_year=trim(ddlb_1.text)

ls_month=trim(ddlb_2.text)

dw_1.setsqlselect("select * from tj where year(结帐日期)='"+ls_year+"' and month(结帐日期)='"+ls_month+"'") dw_1.retrieve()

end if

if rb_3.checked=true then

ls_day=trim(ddlb_3.text)

ls_year=trim(ddlb_1.text)

ls_month=trim(ddlb_2.text)

dw_1.setsqlselect("select * from tj where year(结帐日期)='"+ls_year+"' and month(结帐日期)='"+ls_month+"' and day(结帐日期)='"+ls_day+"'")

dw_1.retrieve()

end if

打印按钮:

clicked event:

//printsetupprinter()

if messagebox("信息提示

commit;

dw_1.print()

else

rollback;

end if

3.2.7系统帮助窗口界面之一

第四章 系统的编译与运行

当用户应用程序的开发和测试都完成之后，一般都需要将该程序做成一个的可执行文件，以便它能够脱离Powerbuilder环境，能够在windows操作系统下单独运行

4.1可执行文件的生成

生成一个可执行文件有两种基本的方法：

1.将应用程序中的所有对象打包为一个EXE文件，这也是最简单的方法。

2.一个可执行文件和一个或多个PBD动态库，这些动态库中包含在程序运行时需要链接的对象。

第一种方法相对于较小的项目来说非常有效，简单而清晰，但是它存在两个致命的弱点。

首先是文件大小的问题，如果将所有的对象都打包在一个可执行文件中，那么对较大的项目来说会产生较大的可执行文件，从而使文件难于管理，执行效率低。另外一个问题是，在应用程序创建可执行文件时，Powerbuilder会丢失一些在程序中动态创建或引用的对象，而是只包含那些在当前引用程序中使用到的对象。

根据本系统的特点，采用第二种方法比较适合，在PB中可执行文件的生成是在Project画板中完成的。其参数设置如下图所示：

4.2打包应用程序

一个好的软件提交给用户时应该让用户可以轻松地安装，而不必进行烦琐地手工设置，因此，仅仅生成了可执行文件还不够，还需进一步将应用程序文件制作成安装程序文件。

对PB应用程序，一般借助第三方的安装工具将其打包。现在的安装制作工具很多，最有名的是InstallShield,其他的还有如CreatInstall、InstallManager等。这里我们采用一款小巧的安装制作工具Setup Factory,相对于InstallShield的功能强大、体积庞大、复杂而言，Setup Factory的特点是小巧、实用，用它做一般的PB程序的安装程序，完全够用。它支持数据压缩、反安装、屏幕定制、ODBC配置、OCX注册、多语言支持等。

客房管理系统程序在Setup Factory 6.0制作工具中的主画面设置如下图所示：4.3系统的运行环境

4.3.1软件环境

本系统是基于windows操作系统的可视化的应用程序，它支持Windows95\\Windows98\\WindowsMe\\Windows2000\\WindowsNT等操作系统。

4.3.2硬件环境

486以上的多媒体PC机。

32M以上内存。

1G以上的硬盘空间。

第五章 结束语

该系统的开发，从对用户需求进行调查分析，系统的功能分析设计，一步一步的做下来，由于在毕业设计中因理论性知识掌握不足，经验不丰富，因而困难重重。但是整个设计做下来，仍然感觉收获颇丰。特别是在做需求分析和系统分析的时候，我真正体会到了这两项工作的重要性。同时，也体会到了，只有软件设计开发人员符合最终用户充分的要求，才能开发出合适、好用的软件。由于本系统是

PowerBuilder8.0设计的，因此在设计过程查阅了大量的有关PowerBuilder语言方面的书籍资料，对PowerBuilder语言的应用有了更深入的了解。在这次毕业设计过程中，使我数据库应用有了深入的了解。对数据库前端开发工具也有了系统的认识。为了追求些软件的完美性，本人对此软件进行了多次改进，并在软件完成后不断的进行调试和测试，尤其是数据库和应用程序操作的安全性在设计时给予了充分的考虑，以求完善。由于时间紧促，所以该系统还有不尽如人意的地方，恳请老师指正。

最后，衷心感谢老师在整个设计过程中给我的指导和支持，感谢同学们给我的帮助。

附一：主要参考文献

1、《POWERBUILDER 8.0设计与系统开发案例》

作者：伍俊良 清华大学出版社 2003.1

2、《POWERBUILDER 8.0基础篇》

作者：柯建勋 蔡毅等 清华大学出版社 2002.9

3、《POWERBUILDER 8.0实用教程》

作者：陈弘原等 中国水利水电出版 2002.1

4、《实用软件工程》

作者：郑人杰 殷人昆等 清华大学出版社 2001.10

附二:《凭证》样张