圖書(shū)館圖書(shū)管理的數(shù)據(jù)庫(kù)系統(tǒng)(參考版)
2024-09-11 12:44本頁(yè)面
【正文】 畢業(yè)設(shè)計(jì)是對(duì)我大專(zhuān)三年所學(xué)知識(shí)的一個(gè)綜合，通過(guò)了本次的設(shè)計(jì)，我能從中學(xué)到的更多的東西，使自己的計(jì)算機(jī)程序設(shè)計(jì)水平得到了一定的提高，這是最重要的。本次畢業(yè)設(shè)計(jì)歷時(shí)三個(gè)多月，我和同組的成員分工合作，從需求分析、資料收集、模型設(shè)計(jì)到整個(gè)管理系統(tǒng)的完成做了大量的工作。 命令： QUIT 幫助模塊： 列出了有關(guān)系統(tǒng)的一 些有關(guān)約定和作者的一些信息。 性別 with ,專(zhuān)業(yè) with 。 性別 with ,專(zhuān)業(yè) with 。 性別 with ,專(zhuān)業(yè) with 。 作者 with ,出版社 with 。 作者 with ,出版社 with 。 AND date( )90 * ********************************************************* * * * * _0Y40W84BR ON SELECTION BAR 4 OF POPUP _0xg1eivt0 * * * * Procedure Origin: * * * * From Menu: , Record: 27 * * Called By: ON SELECTION BAR 4 OF POPUP _0xg1eivt0 * * Prompt: 清空記錄 * * Snippet: 2 * * * ********************************************************* * PROCEDURE _0y40w84br use ts zap * ********************************************************* * * * * _0Y40W84BV ON SELECTION BAR 4 OF POPUP _0xg1elfhv * * * * Procedure Origin: * * * * From Menu: , Record: 33 * * Called By: ON SELECTION BAR 4 OF POPUP _0xg1elfhv * * Prompt: 清空記錄 * * Snippet: 3 * * * ********************************************************* * PROCEDURE _0y40w84bv use dj zap 借書(shū)表單（ ） : 程序： : =date() Command1(確定 ). Click select dj locate for = if found()=.f. messagebox(沒(méi)有這個(gè)借書(shū)證 號(hào)，請(qǐng)查證后重新輸入 ,0+64) = else select ts locate for = if found()=.f. messagebox(沒(méi)有這本書(shū)，請(qǐng)查證后重新輸入 ,0+64) = else select js set delete on locate for = if found( ) and messagebox(這本書(shū)借出未還！ ,0+48) = ELSE locate for 借書(shū)證號(hào) = if found() and date() 30 messagebox(此人有書(shū)超期未還，不能借書(shū)??！ ,0+64) else go bottom append blank replace with , with 。 ON = 。 INNER JOIN tsgl!ts 。PRG ,WHERE is TSGLXT?) * ********************************************************* * * * * _0Y40W84BG ON SELECTION BAR 3 OF POPUP 新菜單項(xiàng) * * * * Procedure Origin: * * * * From Menu: , Record: 19 * * Called By: ON SELECTION BAR 3 OF POPUP 新菜單項(xiàng) * * Prompt: 查詢(xún)逾期還書(shū)讀者 * * Snippet: 1 * * * ********************************************************* * PROCEDURE _0y40w84bg SELECT Dj.*, , , , 。 IN LOCFILE(\TSGLXT\TSGLXT ,MPX。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 。 IN LOCFILE(\TSGLXT\TSGLXT ,MPX。PRG ,WHERE is TSGLXT?) DEFINE POPUP _0xg1ebks9 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF _0xg1ebks9 PROMPT 按編號(hào)查詢(xún) DEFINE BAR 2 OF _0xg1ebks9 PROMPT 按書(shū)名查詢(xún) DEFINE
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1