📄 pcmenu.mpr
字号:
* *********************************************************
* *
* * 06/16/03 PCMENU.MPR 08:39:57
* *
* *********************************************************
* *
* * 作者名称
* *
* * 版权所有 (C) 2003 公司名称
* * 地址
* * 城市, 邮编
* * 国家
* *
* * 说明:
* * 此程序由 GENMENU 自动生成。
* *
* *********************************************************
* *********************************************************
* *
* * 菜单定义
* *
* *********************************************************
*
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _0z80iknu5 OF _MSYSMENU PROMPT "系统操作" COLOR SCHEME 3
DEFINE PAD _0z80iknu6 OF _MSYSMENU PROMPT "基础资料管理" COLOR SCHEME 3
DEFINE PAD _0z80iknu7 OF _MSYSMENU PROMPT "日常操作" COLOR SCHEME 3
DEFINE PAD _0z80iknu8 OF _MSYSMENU PROMPT "报表管理" COLOR SCHEME 3
DEFINE PAD _0z80iknu9 OF _MSYSMENU PROMPT "帮助系统" COLOR SCHEME 3
ON PAD _0z80iknu5 OF _MSYSMENU ACTIVATE POPUP 系统操作
ON PAD _0z80iknu6 OF _MSYSMENU ACTIVATE POPUP 基础资料管
ON PAD _0z80iknu7 OF _MSYSMENU ACTIVATE POPUP 日常操作
ON PAD _0z80iknu8 OF _MSYSMENU ACTIVATE POPUP 报表管理
ON PAD _0z80iknu9 OF _MSYSMENU ACTIVATE POPUP 帮助系统
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 "\-"
DEFINE BAR 6 OF 系统操作 PROMPT "数据备份"
DEFINE BAR 7 OF 系统操作 PROMPT "数据恢复"
DEFINE BAR 8 OF 系统操作 PROMPT "\-"
DEFINE BAR 9 OF 系统操作 PROMPT "退出"
ON SELECTION BAR 1 OF 系统操作 do form xgmm
ON SELECTION BAR 3 OF 系统操作 do form dbclean
ON SELECTION BAR 4 OF 系统操作 do form dbclear
ON SELECTION BAR 6 OF 系统操作 do form backup
ON SELECTION BAR 7 OF 系统操作 do form restore
ON SELECTION BAR 9 OF 系统操作 do pexit
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 yzzlgl
ON SELECTION BAR 2 OF 基础资料管 do form fczlgl
ON SELECTION BAR 3 OF 基础资料管 do form sfbz
ON SELECTION BAR 4 OF 基础资料管 do form main
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 cblr name cblr
ON SELECTION BAR 2 OF 日常操作 do form sfdj name sfdj
ON BAR 4 OF 日常操作 ACTIVATE POPUP _0xq13iu7a
DEFINE POPUP _0xq13iu7a MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF _0xq13iu7a PROMPT "未交费业主情况"
DEFINE BAR 2 OF _0xq13iu7a PROMPT "详细资料查找"
DEFINE BAR 3 OF _0xq13iu7a PROMPT "收费率统计"
ON SELECTION BAR 1 OF _0xq13iu7a do form wjf
ON SELECTION BAR 2 OF _0xq13iu7a do form xxzl
ON SELECTION BAR 3 OF _0xq13iu7a do form tj
DEFINE POPUP 报表管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 报表管理 PROMPT "收费通知单"
DEFINE BAR 2 OF 报表管理 PROMPT "未交费业主清单"
DEFINE BAR 3 OF 报表管理 PROMPT "催缴通知单"
ON SELECTION BAR 1 OF 报表管理 report form sftzd preview
ON SELECTION BAR 2 OF 报表管理 do pn_wjfyz
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 about
ON SELECTION BAR 2 OF 帮助系统 do form help
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -