📄 ckglmu.mpr
字号:
* * Snippet: 7
* *
* *********************************************************
*
PROCEDURE _1e91bak28
if symbol1>1
do form goodfc
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK29 ON SELECTION BAR 1 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 24
* * Called By: ON SELECTION BAR 1 OF POPUP _1e718ff7k
* * Prompt: 定货单
* * Snippet: 8
* *
* *********************************************************
*
PROCEDURE _1e91bak29
if symbol1>1
do form orderf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2A ON SELECTION BAR 2 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 25
* * Called By: ON SELECTION BAR 2 OF POPUP _1e718ff7k
* * Prompt: 存货单
* * Snippet: 9
* *
* *********************************************************
*
PROCEDURE _1e91bak2a
if symbol1>1
do form storef
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2B ON SELECTION BAR 3 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 26
* * Called By: ON SELECTION BAR 3 OF POPUP _1e718ff7k
* * Prompt: 供货单
* * Snippet: 10
* *
* *********************************************************
*
PROCEDURE _1e91bak2b
if symbol1>1
do form supplyf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2C ON SELECTION BAR 4 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 27
* * Called By: ON SELECTION BAR 4 OF POPUP _1e718ff7k
* * Prompt: 商品信息
* * Snippet: 11
* *
* *********************************************************
*
PROCEDURE _1e91bak2c
if symbol1>1
do form goodf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2D ON SELECTION BAR 5 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 28
* * Called By: ON SELECTION BAR 5 OF POPUP _1e718ff7k
* * Prompt: 顾客信息
* * Snippet: 12
* *
* *********************************************************
*
PROCEDURE _1e91bak2d
if symbol1>1
do form customf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2E ON SELECTION BAR 6 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 29
* * Called By: ON SELECTION BAR 6 OF POPUP _1e718ff7k
* * Prompt: 供货商信息
* * Snippet: 13
* *
* *********************************************************
*
PROCEDURE _1e91bak2e
if symbol1>1
do form produf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2F ON SELECTION BAR 7 OF POPUP _1e718ff7k
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 30
* * Called By: ON SELECTION BAR 7 OF POPUP _1e718ff7k
* * Prompt: 职工信息
* * Snippet: 14
* *
* *********************************************************
*
PROCEDURE _1e91bak2f
if symbol1>1
do form employf
else
messagebox('此功能仅供职工使用！')
endif
* *********************************************************
* *
* * _1E91BAK2G ON SELECTION BAR 1 OF POPUP 供货单管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 33
* * Called By: ON SELECTION BAR 1 OF POPUP 供货单管理
* * Prompt: 商品入库
* * Snippet: 15
* *
* *********************************************************
*
PROCEDURE _1e91bak2g
if symbol1==4 .or.symbol1==6
do form supplyin
else
messagebox('此功能为供货员使用！')
endif
* *********************************************************
* *
* * _1E91BAK2H ON SELECTION BAR 2 OF POPUP 供货单管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 34
* * Called By: ON SELECTION BAR 2 OF POPUP 供货单管理
* * Prompt: 商品信息
* * Snippet: 16
* *
* *********************************************************
*
PROCEDURE _1e91bak2h
if symbol1==4 .or.symbol1==6
do form goodin
else
messagebox('此功能为供货员使用！')
endif
* *********************************************************
* *
* * _1E91BAK2I ON SELECTION BAR 3 OF POPUP 供货单管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 35
* * Called By: ON SELECTION BAR 3 OF POPUP 供货单管理
* * Prompt: 供货商信息
* * Snippet: 17
* *
* *********************************************************
*
PROCEDURE _1e91bak2i
if symbol1==4 .or.symbol1==6
do form produin
else
messagebox('此功能为供货员使用！')
endif
* *********************************************************
* *
* * _1E91BAK2J ON SELECTION BAR 1 OF POPUP 其它管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 38
* * Called By: ON SELECTION BAR 1 OF POPUP 其它管理
* * Prompt: 人事管理
* * Snippet: 18
* *
* *********************************************************
*
PROCEDURE _1e91bak2j
if symbol1==5 .or.symbol1==6
do form employzc
else
messagebox('此功能仅供经理使用！')
endif
* *********************************************************
* *
* * _1E91BAK2K ON SELECTION BAR 2 OF POPUP 其它管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 39
* * Called By: ON SELECTION BAR 2 OF POPUP 其它管理
* * Prompt: 仓库管理
* * Snippet: 19
* *
* *********************************************************
*
PROCEDURE _1e91bak2k
if symbol1==5 .or.symbol1==6
do form ckzc
else
messagebox('此功能仅供经理使用！')
endif
* *********************************************************
* *
* * _1E91BAK2L ON SELECTION BAR 3 OF POPUP 其它管理
* *
* * Procedure Origin:
* *
* * From Menu: CKGLMU.MPR, Record: 40
* * Called By: ON SELECTION BAR 3 OF POPUP 其它管理
* * Prompt: 权限管理
* * Snippet: 20
* *
* *********************************************************
*
PROCEDURE _1e91bak2l
if symbol1==5 .or.symbol1==6
do form grandzc
else
messagebox('此功能仅供经理使用！')
endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -