📄 mainmenu.mpr
字号:
* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
* 文件名: MAINMENU.MPR <-- 本文件由 UnFoxAll 创建
* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _13F0Y33ZK OF _MSYSMENU PROMPT '考勤机管理' MESSAGE '考勤机管理' COLOR ;
SCHEME 3
DEFINE PAD _13F0Y33ZN OF _MSYSMENU PROMPT '人事管理' COLOR SCHEME 3
DEFINE PAD _13F0Y33ZO OF _MSYSMENU PROMPT '工资管理' COLOR SCHEME 3
DEFINE PAD _13F0Y33ZP OF _MSYSMENU PROMPT '考勤统计' COLOR SCHEME 3
DEFINE PAD _13F0Y33ZQ OF _MSYSMENU PROMPT '考勤设置' COLOR SCHEME 3
DEFINE PAD _13F0Y33ZR OF _MSYSMENU PROMPT '系统' COLOR SCHEME 3
DEFINE PAD _13F0Y33ZS OF _MSYSMENU PROMPT '帮助' COLOR SCHEME 3
ON PAD _13F0Y33ZK OF _MSYSMENU ACTIVATE POPUP 考勤机管理
ON PAD _13F0Y33ZN OF _MSYSMENU ACTIVATE POPUP 人事管理
ON PAD _13F0Y33ZO OF _MSYSMENU ACTIVATE POPUP 工资管理
ON PAD _13F0Y33ZP OF _MSYSMENU ACTIVATE POPUP 考勤统计
ON PAD _13F0Y33ZQ OF _MSYSMENU ACTIVATE POPUP 考勤设置
ON PAD _13F0Y33ZR OF _MSYSMENU ACTIVATE POPUP 系统
ON PAD _13F0Y33ZS OF _MSYSMENU ACTIVATE POPUP 帮助
DEFINE POPUP 考勤机管理 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 考勤机管理 PROMPT '机器设定' MESSAGE '机器设定'
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 _13f0y3405 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 3 OF 考勤机管理 ;
DO _13f0y340x IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 考勤机管理 ;
DO _13f0y340z IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 5 OF 考勤机管理 ;
DO _13f0y3412 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 7 OF 考勤机管理 ;
DO _13f0y3415 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 9 OF 考勤机管理 ;
DO _13f0y3418 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 人事管理 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
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 _13f0y341f IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 2 OF 人事管理 ;
DO _13f0y341h IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 人事管理 ;
DO _13f0y341k IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 工资管理 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
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 '工资打印'
ON SELECTION BAR 1 OF 工资管理 ;
DO _13f0y341q IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 2 OF 工资管理 ;
DO _13f0y341s IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 工资管理 ;
DO _13f0y341v IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 5 OF 工资管理 ;
DO _13f0y341x IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 考勤统计 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
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 _13f0y3423 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 2 OF 考勤统计 ;
DO _13f0y3425 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 考勤统计 ;
DO _13f0y3428 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 考勤设置 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
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 '节假日公休日管理'
ON SELECTION BAR 1 OF 考勤设置 ;
DO _13f0y342f IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 2 OF 考勤设置 ;
DO _13f0y342i IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 考勤设置 ;
DO _13f0y342k IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 6 OF 考勤设置 ;
DO _13f0y342n IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 8 OF 考勤设置 ;
DO _13f0y342r IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 系统 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
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 '退出'
ON SELECTION BAR 1 OF 系统 ;
DO _13f0y342x IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 2 OF 系统 ;
DO _13f0y3430 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 系统 ;
DO _13f0y3432 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 5 OF 系统 ;
DO _13f0y3435 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 7 OF 系统 ;
DO _13f0y3438 IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 帮助 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 帮助 PROMPT '内容(F1)'
DEFINE BAR 2 OF 帮助 PROMPT '\-'
DEFINE BAR 3 OF 帮助 PROMPT '关于'
ON SELECTION BAR 1 OF 帮助 ;
DO _13f0y343d IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 3 OF 帮助 ;
DO _13f0y343h IN LOCFILE("KQJ\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
PROCEDURE _13f0y3405
DO forminit.prg
DO FORM kqj_machine
ENDPROC
*------
PROCEDURE _13f0y340x
DO forminit.prg
DO FORM kqj_autocard
ENDPROC
*------
PROCEDURE _13f0y340z
DO forminit.prg
DO FORM kqj_datetime
ENDPROC
*------
PROCEDURE _13f0y3412
DO forminit.prg
DO FORM kqj_recdata
ENDPROC
*------
PROCEDURE _13f0y3415
DO forminit.prg
DO FORM kqj_sourcedatapri
ENDPROC
*------
PROCEDURE _13f0y3418
DO forminit.prg
DO FORM kqj_linkdata
ENDPROC
*------
PROCEDURE _13f0y341f
DO forminit.prg
DO FORM rsgl
ENDPROC
*------
PROCEDURE _13f0y341h
DO forminit.prg
DO FORM rsgllist
ENDPROC
*------
PROCEDURE _13f0y341k
REPORT FORM grjl PREVIEW
ENDPROC
*------
PROCEDURE _13f0y341q
DO forminit.prg
DO FORM gzgl
ENDPROC
*------
PROCEDURE _13f0y341s
DO forminit.prg
DO FORM gzdy
ENDPROC
*------
PROCEDURE _13f0y341v
DO forminit.prg
DO gzhs.prg
ENDPROC
*------
PROCEDURE _13f0y341x
DO forminit.prg
DO FORM gzprint
ENDPROC
*------
PROCEDURE _13f0y3423
DO forminit.prg
DO FORM kqtj
ENDPROC
*------
PROCEDURE _13f0y3425
DO forminit.prg
DO FORM kqquer
ENDPROC
*------
PROCEDURE _13f0y3428
DO forminit.prg
DO FORM qjtj
ENDPROC
*------
PROCEDURE _13f0y342f
DO forminit.prg
DO FORM kqsjbb
ENDPROC
*------
PROCEDURE _13f0y342i
DO forminit.prg
DO FORM rsgz_bc
ENDPROC
*------
PROCEDURE _13f0y342k
DO forminit.prg
DO FORM kqsj
ENDPROC
*------
PROCEDURE _13f0y342n
DO forminit.prg
DO FORM qjgl
ENDPROC
*------
PROCEDURE _13f0y342r
DO forminit.prg
DO FORM jjrgl
ENDPROC
*------
PROCEDURE _13f0y342x
DO forminit.prg
DO FORM export
ENDPROC
*------
PROCEDURE _13f0y3430
DO forminit.prg
DO FORM databack
ENDPROC
*------
PROCEDURE _13f0y3432
DO forminit.prg
DO FORM chapass
ENDPROC
*------
PROCEDURE _13f0y3435
DO FORM chaoption
ENDPROC
*------
PROCEDURE _13f0y3438
QUIT
ENDPROC
*------
PROCEDURE _13f0y343d
DO FORM hlp
ENDPROC
*------
PROCEDURE _13f0y343h
DO FORM about
ENDPROC
*------*
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -