jctj_main.mpr

银河就餐系统辅助软件

*       *********************************************************
*       *                                                         
*       * 09/11/08            JCTJ_MAIN.MPR             13:08:16  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 冯云友                                                  
*       *                                                         
*       * 版权所有 (C) 2008 北京市密云县太师庄中学               
*       * 北京市密云县太师屯镇太师庄                              
*       * 密云, 北京  101504                                        
*       * 中华人民共和国                                    
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _2gn0s5qdq OF _MSYSMENU PROMPT "数据采集" COLOR SCHEME 3
DEFINE PAD _2gn0s5qdr OF _MSYSMENU PROMPT "数据维护" COLOR SCHEME 3
DEFINE PAD _2gn0s5qds OF _MSYSMENU PROMPT "报表打印" COLOR SCHEME 3
DEFINE PAD _2gn0s5qdt OF _MSYSMENU PROMPT "备份数据" COLOR SCHEME 3
DEFINE PAD _2gn0s5qdu OF _MSYSMENU PROMPT "数据上报" COLOR SCHEME 3
DEFINE PAD _2gn0s5qdv OF _MSYSMENU PROMPT "退出系统" COLOR SCHEME 3
ON SELECTION PAD _2gn0s5qdq OF _MSYSMENU do form \jctj\forms\cj.scx
ON SELECTION PAD _2gn0s5qdr OF _MSYSMENU do form \jctj\forms\dinge1.scx
ON SELECTION PAD _2gn0s5qds OF _MSYSMENU report form \jctj\reports\dinge.frx preview
ON SELECTION PAD _2gn0s5qdt OF _MSYSMENU do progs\sjwc
ON SELECTION PAD _2gn0s5qdu OF _MSYSMENU do progs\wjcs
ON SELECTION PAD _2gn0s5qdv OF _MSYSMENU quit