📄 backmune.mpr
字号:
* *
* *********************************************************
*
PROCEDURE _0hz0uq3ye
biaozi=3
do form 2.scx
* *********************************************************
* *
* * _0HZ0UQ3YG ON SELECTION BAR 7 OF POPUP 档案管理d
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 27
* * Called By: ON SELECTION BAR 7 OF POPUP 档案管理d
* * Prompt: 档案打印输出
* * Snippet: 13
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yg
public kk
do form 2_6.scx
if kk<>" "
WAIT windows "档案库输出成功,,所输出的库文件在导出文件夹中！......." at 100,40 timeout 1
else
WAIT windows "档案库输出失败！......." at 100,40 timeout 1 nowait
endif
* *********************************************************
* *
* * _0HZ0UQ3YK ON SELECTION BAR 2 OF POPUP 成绩管理c
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 31
* * Called By: ON SELECTION BAR 2 OF POPUP 成绩管理c
* * Prompt: 成绩库导出
* * Snippet: 14
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yk
public hh3
do form 3_2.scx
if hh3<>" "
WAIT windows "成绩库导出成功,所导出的库文件在导出文件夹中！......." at 100,40 timeout 2 nowait
else
WAIT windows "成绩库导出失败！......." at 100,40 timeout 2 nowait
endif
* *********************************************************
* *
* * _0HZ0UQ3YL ON SELECTION BAR 4 OF POPUP 成绩管理c
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 33
* * Called By: ON SELECTION BAR 4 OF POPUP 成绩管理c
* * Prompt: 成绩录入
* * Snippet: 15
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yl
nbiaozi=1
do form 3.scx
* *********************************************************
* *
* * _0HZ0UQ3YN ON SELECTION BAR 5 OF POPUP 成绩管理c
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 34
* * Called By: ON SELECTION BAR 5 OF POPUP 成绩管理c
* * Prompt: 成绩查询
* * Snippet: 16
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yn
nbiaozi=3
do form 3.scx
* *********************************************************
* *
* * _0HZ0UQ3YP ON SELECTION BAR 7 OF POPUP 成绩管理c
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 36
* * Called By: ON SELECTION BAR 7 OF POPUP 成绩管理c
* * Prompt: 成绩打印输出
* * Snippet: 17
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yp
public kk3
do form 3_6.scx
if kk3<>" "
WAIT windows "成绩库输出成功,,所输出的库文件在导出文件夹中！......." at 100,40 timeout 1
else
WAIT windows "成绩库导出失败！......." at 100,40 timeout 1 nowait
endif
* *********************************************************
* *
* * _0HZ0UQ3YT ON SELECTION BAR 2 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 40
* * Called By: ON SELECTION BAR 2 OF POPUP 查询统计a
* * Prompt: 单科本班名次
* * Snippet: 18
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yt
mbiaozi=1
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3YV ON SELECTION BAR 3 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 41
* * Called By: ON SELECTION BAR 3 OF POPUP 查询统计a
* * Prompt: 平均分本班名次
* * Snippet: 19
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yv
mbiaozi=2
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3YW ON SELECTION BAR 4 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 42
* * Called By: ON SELECTION BAR 4 OF POPUP 查询统计a
* * Prompt: 总分本班名次
* * Snippet: 20
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yw
mbiaozi=3
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3YY ON SELECTION BAR 5 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 43
* * Called By: ON SELECTION BAR 5 OF POPUP 查询统计a
* * Prompt: 同专业平均分名次
* * Snippet: 21
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yy
mbiaozi=4
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3YZ ON SELECTION BAR 6 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 44
* * Called By: ON SELECTION BAR 6 OF POPUP 查询统计a
* * Prompt: 同专业总分名次
* * Snippet: 22
* *
* *********************************************************
*
PROCEDURE _0hz0uq3yz
mbiaozi=5
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3Z1 ON SELECTION BAR 8 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 46
* * Called By: ON SELECTION BAR 8 OF POPUP 查询统计a
* * Prompt: 班级学生补考名单
* * Snippet: 23
* *
* *********************************************************
*
PROCEDURE _0hz0uq3z1
mbiaozi=6
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3Z3 ON SELECTION BAR 10 OF POPUP 查询统计a
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 48
* * Called By: ON SELECTION BAR 10 OF POPUP 查询统计a
* * Prompt: 学生个人资料查询
* * Snippet: 24
* *
* *********************************************************
*
PROCEDURE _0hz0uq3z3
mbiaozi=7
do form 4.scx
* *********************************************************
* *
* * _0HZ0UQ3Z6 ON SELECTION BAR 2 OF POPUP 数据处理s
* *
* * Procedure Origin:
* *
* * From Menu: BACKMUNE.MPR, Record: 52
* * Called By: ON SELECTION BAR 2 OF POPUP 数据处理s
* * Prompt: 数据整理
* * Snippet: 25
* *
* *********************************************************
*
PROCEDURE _0hz0uq3z6
wait windows "正在优化数据库，请等待..........." at 100,40 timeout 2
set safety off
xizhuanyebei=""
banbei=""
dangbei=""
qibei=""
sele 1
use 系专业 EXCLUSIVE
chdir 数据库
sele * from 系专业 where 档案=.t. into table suoyindangan
chdir ..
use
sele 1
use chengjiku EXCLUSIVE
chdir 数据库
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -