ggjr.prg

来自「建设银行计算机设备台帐程序计算机设备管理程序。其中包括一个网络文件传输示例」· PRG 代码 · 共 31 行

*       *********************************************************
*       *                                                         
*       * 12/07/99              MCJR.MPR                17:27:01  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 1999 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


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

DEFINE POPUP 快捷菜单 SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF 快捷菜单 PROMPT "将设备规格加入到字典库中"
ON SELECTION BAR 1 OF 快捷菜单 do form ggjr

ACTIVATE POPUP 快捷菜单