客房管理系统.mpr

非常不错的酒店管理系统！界面美观

*       *********************************************************
*       *                                                         
*       * 01/06/06          客房管理系统.MPR            16:54:23  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 2006 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜单定义                        
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1pc108itg OF _MSYSMENU PROMPT "系统" COLOR SCHEME 3
DEFINE PAD _1pc108ith OF _MSYSMENU PROMPT "前台管理" COLOR SCHEME 3
DEFINE PAD _1pc108iti OF _MSYSMENU PROMPT "客房管理" COLOR SCHEME 3
DEFINE PAD _1pc108itj OF _MSYSMENU PROMPT "查询统计" COLOR SCHEME 3
DEFINE PAD _1pc108itk OF _MSYSMENU PROMPT "挂帐管理" COLOR SCHEME 3
DEFINE PAD _1pc108itl OF _MSYSMENU PROMPT "基础信息设置" COLOR SCHEME 3
DEFINE PAD _1pc108itm OF _MSYSMENU PROMPT "系统初始化" COLOR SCHEME 3
DEFINE PAD _1pc108itn OF _MSYSMENU PROMPT "系统维护" COLOR SCHEME 3
DEFINE PAD _1pc108ito OF _MSYSMENU PROMPT "帮助" COLOR SCHEME 3
ON PAD _1pc108itg OF _MSYSMENU ACTIVATE POPUP 系统
ON PAD _1pc108ith OF _MSYSMENU ACTIVATE POPUP 前台管理
ON PAD _1pc108iti OF _MSYSMENU ACTIVATE POPUP 客房管理
ON PAD _1pc108itj OF _MSYSMENU ACTIVATE POPUP 查询统计
ON PAD _1pc108itk OF _MSYSMENU ACTIVATE POPUP 挂帐管理
ON PAD _1pc108itl OF _MSYSMENU ACTIVATE POPUP 基础信息设
ON PAD _1pc108itm OF _MSYSMENU ACTIVATE POPUP 系统初始化
ON PAD _1pc108itn OF _MSYSMENU ACTIVATE POPUP 系统维护
ON PAD _1pc108ito OF _MSYSMENU ACTIVATE POPUP 帮助

DEFINE POPUP 系统 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR _mfi_open OF 系统 PROMPT "打开(\<O)..." ;
	KEY CTRL+O, "Ctrl+O" ;
	MESSAGE "打开已有文件"
DEFINE BAR _mfi_save OF 系统 PROMPT "保存(\<S)" ;
	KEY CTRL+S, "Ctrl+S" ;
	MESSAGE "保存当前改动了的文件"
DEFINE BAR _mfi_savas OF 系统 PROMPT "另存为(\<A)..." ;
	MESSAGE "用新文件名保存当前改动了的文件"
DEFINE BAR _mfi_print OF 系统 PROMPT "打印选项(\<P)..." ;
	KEY CTRL+P, "Ctrl+P" ;
	MESSAGE "打印一个文本文件，报表，标签、命令窗口的内容或剪贴板上的内容"
DEFINE BAR _mfi_sysprint OF 系统 PROMPT "打印(\<P)..." ;
	KEY CTRL+P, "Ctrl+P" ;
	MESSAGE "打印一个文本文件，报表，标签、命令窗口的内容或剪贴板上的内容"
DEFINE BAR _mfi_quit OF 系统 PROMPT "退出(\<X)" ;
	MESSAGE "退出 Visual FoxPro"

DEFINE POPUP 前台管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 前台管理 PROMPT "客房预定"
DEFINE BAR 2 OF 前台管理 PROMPT "住宿登记"
DEFINE BAR 3 OF 前台管理 PROMPT "调房登记"
DEFINE BAR 4 OF 前台管理 PROMPT "追加押金"
DEFINE BAR 5 OF 前台管理 PROMPT "退宿结帐"
ON SELECTION BAR 1 OF 前台管理 DO Form 客房预定
ON SELECTION BAR 2 OF 前台管理 DO Form 住宿登记
ON SELECTION BAR 3 OF 前台管理 DO Form 调房登记
ON SELECTION BAR 5 OF 前台管理 DO Form 退宿结帐

DEFINE POPUP 客房管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 客房管理 PROMPT "客房查询"
DEFINE BAR 2 OF 客房管理 PROMPT "房态查看"

DEFINE POPUP 查询统计 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 查询统计 PROMPT "预定房查询"
DEFINE BAR 2 OF 查询统计 PROMPT "住宿查询"
DEFINE BAR 3 OF 查询统计 PROMPT "退宿查询"
DEFINE BAR 4 OF 查询统计 PROMPT "宿费提醒"

DEFINE POPUP 挂帐管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 挂帐管理 PROMPT "挂账查询"
DEFINE BAR 2 OF 挂帐管理 PROMPT "客人结帐"
ON SELECTION BAR 1 OF 挂帐管理 DO Form 挂帐查询

DEFINE POPUP 基础信息设 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 基础信息设 PROMPT "客房信息"
DEFINE BAR 2 OF 基础信息设 PROMPT "客房类型信息"
DEFINE BAR 3 OF 基础信息设 PROMPT "员工信息"
DEFINE BAR 4 OF 基础信息设 PROMPT "挂帐单位信息"
ON SELECTION BAR 1 OF 基础信息设 DO Form 客房信息
ON SELECTION BAR 2 OF 基础信息设 DO Form 房类型信息
ON SELECTION BAR 3 OF 基础信息设 DO Form 员工信息
ON SELECTION BAR 4 OF 基础信息设 DO Form 挂帐单位信息

DEFINE POPUP 系统初始化 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 系统初始化 PROMPT "本单位定义"
DEFINE BAR 2 OF 系统初始化 PROMPT "业务部门定义"
DEFINE BAR 3 OF 系统初始化 PROMPT "操作员管理"
DEFINE BAR 4 OF 系统初始化 PROMPT "权限设置"
ON SELECTION BAR 1 OF 系统初始化 DO Form 本单位定义

DEFINE POPUP 系统维护 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 系统维护 PROMPT "系统初始化"
DEFINE BAR 2 OF 系统维护 PROMPT "数据备份"
DEFINE BAR 3 OF 系统维护 PROMPT "数据恢复"

DEFINE POPUP 帮助 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 帮助 PROMPT "关于"
DEFINE BAR 2 OF 帮助 PROMPT "新菜单项"
DEFINE BAR 3 OF 帮助 PROMPT "注册"