【正文】 * * _0Y40W84BG ON SELECTION BAR 3 OF POPUP 新菜單項 * * * * Procedure Origin: * * * * From Menu: , Record: 19 * * Called By: ON SELECTION BAR 3 OF POPUP 新菜單項 * * Prompt: 查詢逾期還書讀者 * * Snippet: 1 * * * ********************************************************* * PROCEDURE _0y40w84bg SELECT Dj.*, , , , 。PRG ,WHERE is TSGLXT?) DEFINE POPUP _0xg1elfhv MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1elfhv PROMPT 添加讀者檔案 DEFINE BAR 2 OF _0xg1elfhv PROMPT 修改讀者檔案 DEFINE BAR 3 OF _0xg1elfhv PROMPT 刪除讀者檔案 DEFINE BAR 4 OF _0xg1elfhv PROMPT 清空記錄 ON SELECTION BAR 1 OF _0xg1elfhv do form tjdj ON SELECTION BAR 2 OF _0xg1elfhv do form syxgdjh ON SELECTION BAR 3 OF _0xg1elfhv do form sysqdjh ON SELECTION BAR 4 OF _0xg1elfhv 。PRG ,WHERE is TSGLXT?) DEFINE POPUP _0xg1ebks9 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1ebks9 PROMPT 按編號查詢 DEFINE BAR 2 OF _0xg1ebks9 PROMPT 按書名查詢 DEFINE BAR 3 OF _0xg1ebks9 PROMPT 按作者查詢 DEFINE BAR 4 OF _0xg1ebks9 PROMPT 按出版社查詢 ON SELECTION BAR 1 OF _0xg1ebks9 do form cqts ON SELECTION BAR 2 OF _0xg1ebks9 do form asncqts ON SELECTION BAR 3 OF _0xg1ebks9 do form azzcqts ON SELECTION BAR 4 OF _0xg1ebks9 do form acbscqts DEFINE POPUP _0xg1eevn6 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1eevn6 PROMPT 按借書證號查詢 DEFINE BAR 2 OF _0xg1eevn6 PROMPT 按姓名查詢 DEFINE BAR 3 OF _0xg1eevn6 PROMPT 按專業(yè)查詢 DEFINE BAR 4 OF _0xg1eevn6 PROMPT 按班級查詢 ON SELECTION BAR 1 OF _0xg1eevn6 do form ajsxhcqdj ON SELECTION BAR 2 OF _0xg1eevn6 do form axmcqdj ON SELECTION BAR 3 OF _0xg1eevn6 do form ajycqdj ON SELECTION BAR 4 OF _0xg1eevn6 do form abjcqdj DEFINE POPUP _0xg1eijc4 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1eijc4 PROMPT 圖書檔案維護(hù) DEFINE BAR 2 OF _0xg1eijc4 PROMPT 讀者檔案維護(hù) ON BAR 1 OF _0xg1eijc4 ACTIVATE POPUP _0xg1eivt0 ON BAR 2 OF _0xg1eijc4 ACTIVATE POPUP _0xg1elfhv DEFINE POPUP _0xg1eivt0 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1eivt0 PROMPT 添加圖書檔案 DEFINE BAR 2 OF _0xg1eivt0 PROMPT 修改圖書檔案 DEFINE BAR 3 OF _0xg1eivt0 PROMPT 刪除圖書檔案 DEFINE BAR 4 OF _0xg1eivt0 PROMPT 清空記錄 ON SELECTION BAR 1 OF _0xg1eivt0 do form tjts ON SELECTION BAR 2 OF _0xg1eivt0 do form syxgtsh ON SELECTION BAR 3 OF _0xg1eivt0 do form sysqtsh ON SELECTION BAR 4 OF _0xg1eivt0 。 第四章 數(shù)據(jù)庫實現(xiàn) 系統(tǒng)主菜單： 圖 書 館 管 理 系 統(tǒng) 借書 還 書書刊號 系 統(tǒng) 查 詢 退出 幫 助 系 統(tǒng) 維 護(hù) 圖書檔案維護(hù) 讀者檔案維護(hù) 圖 書 查 詢 按 編號查詢 按書名查詢 按作者查詢 按出版社查詢 讀 者 查 詢 按借書號查詢 按姓名查詢 按專業(yè)查詢 按班級查詢 添加圖書檔案 刪除圖書檔案 修改圖書檔案 清空記錄 添加讀者檔案 刪除讀者檔案 修改讀者檔案 清空記錄 查詢愈期讀者 ` ********************************************************* * * * * * * ********************************************************* * * * * 菜單定義 * * * ********************************************************* SET SYSMENU TO SET SYSMENU AUTOMATIC DEFINE PAD _0y40w84b0 OF _MSYSMENU PROMPT 借書 COLOR SCHEME 3 DEFINE PAD _0y40w84b3 OF _MSYSMENU PROMPT 還書 COLOR SCHEME 3 DEFINE PAD _0y40w84b4 OF _MSYSMENU PROMPT 系統(tǒng)查詢 COLOR SCHEME 3 DEFINE PAD _0y40w84b5 OF _MSYSMENU PROMPT 系統(tǒng)維護(hù) CO