menu2.mpr

一个简单的零售系统,功能不是太强大,一般适合便利店自用还可以,本人没有实际应用测试过,你们用用再看看吧.

*       *********************************************************
*       *                                                         
*       * 05/28/08              MENU2.MPR               18:29:03  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 张锋                                                    
*       *                                                         
*       * Copyright (C) 2008 广天电脑                             
*       * 广州市经济技术开发区东区东城雅院F103                    
*       * 广州市, 广东  Zip                                         
*       * 中国                                              
*       *                                                         
*       * 说明:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _2dp13m91z OF _MSYSMENU PROMPT "销售管理" COLOR SCHEME 3
DEFINE PAD _2dp13m920 OF _MSYSMENU PROMPT "库存管理" COLOR SCHEME 3
DEFINE PAD _2dp13m921 OF _MSYSMENU PROMPT "查帐" COLOR SCHEME 3
DEFINE PAD _2dp13m922 OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON PAD _2dp13m91z OF _MSYSMENU ACTIVATE POPUP 销售管理
ON PAD _2dp13m920 OF _MSYSMENU ACTIVATE POPUP 库存管理
ON PAD _2dp13m921 OF _MSYSMENU ACTIVATE POPUP 查帐
ON PAD _2dp13m922 OF _MSYSMENU ACTIVATE POPUP 退出

DEFINE POPUP 销售管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 销售管理 PROMPT "销售单" ;
	KEY F2, "F2"
ON SELECTION BAR 1 OF 销售管理 do form xs

DEFINE POPUP 库存管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 库存管理 PROMPT "供应商管理" ;
	KEY CTRL+G, "CTRL+G"
DEFINE BAR 2 OF 库存管理 PROMPT "入库管理" ;
	KEY INS, "INS"
DEFINE BAR 3 OF 库存管理 PROMPT "资金管理" ;
	KEY F3, "F3"
DEFINE BAR 4 OF 库存管理 PROMPT "零库存商品清理" ;
	KEY F4, "F4"
ON SELECTION BAR 1 OF 库存管理 do form gys
ON SELECTION BAR 2 OF 库存管理 do form rk
ON SELECTION BAR 3 OF 库存管理 do form addmoney
ON SELECTION BAR 4 OF 库存管理 do form delkc

DEFINE POPUP 查帐 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 查帐 PROMPT "现金查询" ;
	KEY F5, "F5"
DEFINE BAR 2 OF 查帐 PROMPT "库存查询" ;
	KEY F6, "F6"
ON SELECTION BAR 1 OF 查帐 do form moneycx
ON SELECTION BAR 2 OF 查帐 do form kccx

DEFINE POPUP 退出 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 退出 PROMPT "退出系统" ;
	KEY CTRL+Q, "CTRL+Q"
ON SELECTION BAR 1 OF 退出 do quit