【文章內(nèi)容簡介】 * * Procedure Origin: * * * * From Menu: , Record: 5 * * Called By: ON SELECTION BAR 1 OF POPUP 基本數(shù)據(jù)管理 * * Prompt: 設(shè)置專業(yè) * * Snippet: 2 * * * **********************************************************PROCEDURE _0vv0ilze1IF ulevel=系統(tǒng)管理員 do form setprofELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE2 ON SELECTION BAR 2 OF POPUP 基本數(shù)據(jù)管理 * * * * Procedure Origin: * * * * From Menu: , Record: 6 * * Called By: ON SELECTION BAR 2 OF POPUP 基本數(shù)據(jù)管理 * * Prompt: 設(shè)置班號 * * Snippet: 3 * * * **********************************************************PROCEDURE _0vv0ilze2IF ulevel=系統(tǒng)管理員 do form setclassELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE3 ON SELECTION BAR 3 OF POPUP 基本數(shù)據(jù)管理 * * * * Procedure Origin: * * * * From Menu: , Record: 7 * * Called By: ON SELECTION BAR 3 OF POPUP 基本數(shù)據(jù)管理 * * Prompt: 設(shè)置課程 * * Snippet: 4 * * * **********************************************************PROCEDURE _0vv0ilze3IF ulevel=系統(tǒng)管理員 do form setcourseELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE4 ON SELECTION BAR 5 OF POPUP 基本數(shù)據(jù)管理 * * * * Procedure Origin: * * * * From Menu: , Record: 10 * * Called By: ON SELECTION BAR 5 OF POPUP 基本數(shù)據(jù)管理 * * Prompt: 錄入學(xué)生 * * Snippet: 5 * * * **********************************************************PROCEDURE _0vv0ilze4IF ulevel=系統(tǒng)管理員 do form setstudentELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE5 ON SELECTION BAR 1 OF POPUP 學(xué)生成績管理 * * * * Procedure Origin: * * * * From Menu: , Record: 14 * * Called By: ON SELECTION BAR 1 OF POPUP 學(xué)生成績管理 * * Prompt: 學(xué)生成績錄入 * * Snippet: 6 * * * *********************************************************PROCEDURE _0vv0ilze5IF ulevel=系統(tǒng)管理員 do form setscoreELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE6 ON SELECTION BAR 1 OF POPUP 系統(tǒng)維護(hù) * * * * Procedure Origin: * * * * From Menu: , Record: 23 * * Called By: ON SELECTION BAR 1 OF POPUP 系統(tǒng)維護(hù) * * Prompt: 用戶管理 * * Snippet: 7 * * * **********************************************************PROCEDURE _0vv0ilze6IF ulevel=系統(tǒng)管理員 do form usermainELSE =MESSAGEBOX(您不是系統(tǒng)管理員,不能使用本項功能,16+0,信息提示)ENDIF* ********************************************************** * * * _0VV0ILZE7 ON SELECTION BAR 3 OF POPUP 系統(tǒng)維護(hù) * * * * Procedure Origin: * * * * From Menu: , Record: 26 * * Called By: ON SELECTION BAR 3 OF POPUP 系統(tǒng)維護(hù) * * Prompt: 數(shù)據(jù)備份 * * Snippet: 8 * *