[应用计算机管理酒店信息]酒店计算机管理业务论文1800

　　摘 要:在酒店管理工作中,信息的数据量大,数据处理工作频繁。为解决这一问题,我们利用计算机对酒店的数据信息进行处理,将的日常酒店管理工作分成客房管理、VIP客户管理、登记、消费、结账等若干个模块,用VF编写成一个管理软件用来完成酒店管理工作。
　　关键词:数据库 数据处理 信息 模块
　　中图分类号:TP392 文献标识码:A 文章编号:1672-3791(2012)06(c)-0036-02
　　在管理酒店工作中，信息的数据量较多，数据处理工作繁琐，操作频繁。经过实际调研，我们将酒店的日常管理工作分成若干模块，编写成一个VF程序，运行效果良好，特此整理成文。
　　1 系统功能介绍
　　整个酒店管理系统分为：客房管理、VIP客户管理、登记、消费、结账等若干模块。
　　1.1 客房管理模块
　　本模块用来录入、修改、删除和查询客房有关数据，如房价、优惠折扣、是否空房等信息。以下是客房管理表ROOM.DBF主要字段如表1。
　　1.2 VIP客户管理模块
　　本模块用来录入、修改、删除、查询VIP客户有关数据。以下是VIP客户管理表VIP.DBF主要字段如表2。
　　1.3 登记/预定模块
　　本模块用来处理登记、预定入住客户有关数据。下面是登记管理表DJ.DBF主要字段如表3。
　　1.4 消费管理模块
　　本模块用来处理入住客户除住宿以外的消费数据。下表是消费管理表XF.DBF主要字段如表4。
　　1.5 结账模块
　　本模块用来处理入住客户的住宿费用以及消费数据。处理对象为room与xf二表构成的视图view1。结账结果可以用报表pbprint输出。
　　2 系统模块结构
　　以下是酒店管理系统模块结构。
　　
　　3 部分代码说明
　　-------- c1.command1 程序入口，验证口令
　　thisform.combo1.setfocus()
　　if thisform.text1.text=npass.mypass
　　do form c3
　　thisform.release
　　else
　　messagebox("password error",48,"ok")
　　thisform.combo1.setfocus()
　　endif
　　-------- c3.pag1 记录指针移动
　　local x
　　sele room
　　skip -1
　　thisform.refresh
　　x=thisform.pageframe1.activepage
　　thisform.pageframe1.pages[x].grid1.column1.text1.setfocus()
　　----------- 退出系统
　　thisform.release
　　clear events
　　Quit
　　----------- c3.page1 增加记录
　　local x
　　append blank
　　thisform.refresh
　　x=thisform.pageframe1.activepage
　　thisform.pageframe1.pages[x].grid1.column1.text1.setfocus()
　　------------- c3.page2 刷新记录
　　set filter to
　　go top
　　thisform.refresh
　　-------------- c3.page2 vip客户查询
　　x=thisform.pageframe1.activepage
　　con="姓名="""+trim(thisform.pageframe1.pages[x].text1.text)
　　+""""
　　sele vip
　　set filter to &con
　　go top
　　thisform.refresh
　　---------- c3.page4 消费计算
　　repl 消费小计 with 外部电话+洒水+饮料+水果+洗衣+租车+订餐
　　---------- c3.page5 住宿结算
　　local x,y,y1,y2,y3
　　thisform.refresh
　　x=thisform.pagefrme1.activepage
　　y=trim(thisform.pageframe1.pages[x].combo1.text)
　　sele xf
　　locate all for 房间号码=y
　　if eof()
　　y1=0
　　else
　　y1=消费小计
　　endif
　　sele b2end
　　y3=住店天数*价格*优惠折扣
　　repl 总计 with y3
　　y2=预付金额-y3-y1
　　thisform.pageframe1.pages[x].text1.value=y1
　　thisform.pageframe1.pages[x].text2.value=y2
　　----------- c3.page5 打印发票
　　local x,y
　　thisform.refresh
　　x=thisform.pageframe1.activepage
　　y=trim(thisform.pageframe1.pages[x].combo1.text)
　　report form pb for 房间号码=y to printer
　　4 结语
　　开发软件采用Windosw下VF作为平台，软件有密码作为入口，工作人员获取密码后可以使用本软件工作。
　　酒店管理系统功能齐全，操作简单，数据安全，具有实用价值。
　　
　　参考文献
　　[1] 杨佩理.Visual FoxPro程序设计[M].机械工业出版社,2004,7.
　　[2] 董方武.Visual FoxPro程序设计[M].科学出版社,2004,8.