【正文】 sysl with repl lb with repl sxrq with repl ph with repl chd with sele yuanb2 if allt()allt(subs(lsldj,at(,lsldj,4)+1,at(,lsldj,5)at(,lsldj,4)1)) count to aa for int(bh)=lbh 19 appe blan repl yjj with val(),dj with val(),chd with allt(),ph with 。39。 15 藥品分類界面設(shè)計： 藥品期初設(shè)置的一個方面，為保證藥品分類計算時 ，保證數(shù)據(jù)的有效性和立人準(zhǔn)確性。主界面，我起先考慮的也跟大多同學(xué)一樣，用菜單生成器，最后發(fā)現(xiàn)，一個小小的系統(tǒng)，功能模塊又非常之小，我就放棄了菜單方式，選用了現(xiàn)在這個樣子。一方面，各個模塊都有自己的獨立性，另一方面，模塊之間的相互關(guān)系可以通過一定的方式予以規(guī)定和說明。數(shù)據(jù)庫設(shè)計的主要任務(wù)是決定數(shù)據(jù)庫的字段名，字段類型，字段長度等 。這是我們也要考慮的問題。這要求我們盡量采用模塊化結(jié)構(gòu)，提高各部分的獨立性，盡是減少各子系統(tǒng)之間的數(shù) 據(jù)依賴性。詳細設(shè)計：詳細設(shè)計包括數(shù)據(jù)存儲文件設(shè)計（數(shù)據(jù)庫文件的設(shè)計）、輸出設(shè)計、輸入設(shè)計、編寫程序設(shè)計說明書等。如果技術(shù)方面可行，瀏覽與查詢方面的功能應(yīng)該編寫得強大一點，再好有條件組合的查詢，可以實現(xiàn)按男女生分類查詢，也可以按專業(yè)、寢室號、籍貫等分類查詢，以便學(xué)校方面管理人員可以很方便的查詢想要的數(shù)據(jù)，以便進行統(tǒng)一管理，統(tǒng)一安排。 技術(shù)上的可行性： 技術(shù)上的可行性分析要考慮將來要采用的硬件和軟件技術(shù)能否滿足用戶（這里是校方）提出的要求（如計算機的容量、速度等）。對于一個學(xué)校而言，更應(yīng)該運用一些本地資源，提高管理的力度，對學(xué)生負責(zé)，對國家負責(zé)。被調(diào)查單位普遍反映且迫切需要善經(jīng)營、會管理，同時能 熟練把計算機運用到信息采集、處理與維護的高級管理人才，計算機信息管理專業(yè)正是在這種背景正應(yīng)運而生的，目的是為企事業(yè)單位提供更多更好的從事計算機信息管理工作的合格人才。1 重慶郵電大學(xué)高等函授 ?？飘厴I(yè)設(shè)計（論文） 設(shè)計（論文）題目： 計算機信息管理之藥品管理系統(tǒng) 入學(xué)年月 2021 年 9 月 1 日 姓 名 學(xué) 號 專 業(yè) 所屬科站 指導(dǎo)教師 完成日期 2021 年 12 月 17 日 2 【摘要】 隨著全球以信息技術(shù)為主導(dǎo)的 科技革命進程的加快，人類社會逐步由工業(yè)社會進入信息社會。隨著我國市場經(jīng)濟的迅速發(fā)展和加入 WTO，企業(yè)信息化程度的要求越來越高，而現(xiàn)階段計算機信息管理普及率并不高，企業(yè)中計算機資源得不到及時充分的利用，信息處理效率跟不上形勢的發(fā)展，近幾年很多單位對計算機信息管理專業(yè)人才需求越來越大。宿舍管理特別是學(xué)校宿舍的管理是 一個非常繁瑣與復(fù)雜的一項工作，一個原因就是工作量大，不好管。從節(jié)省人力方面，可以讓管 理人員從繁與復(fù)雜的工作中解脫出來，做更多的工作，可以給宿舍里的管理提高一個層次。 5 結(jié)論： 通過以 上兩點的分析，編寫或開發(fā)這個宿舍管理系統(tǒng)是可行的，只要這個系統(tǒng)能實現(xiàn)對學(xué)生數(shù)據(jù)的輸入、修改、刪除、打印、瀏覽與查詢就可以了?？傮w設(shè)計：總體設(shè)計包括子系統(tǒng)的劃分，代碼設(shè)計、設(shè)計規(guī)范制定、信息系統(tǒng)流程圖設(shè)計、功能結(jié)構(gòu)圖設(shè)計和系統(tǒng)物理配置方案設(shè)計等。系統(tǒng)應(yīng)靈活，對環(huán)境的變化要有很強的適應(yīng)性。 （ 4） 經(jīng)濟性。 ： 數(shù)據(jù)庫設(shè)計： 在一個 藥品管理查詢 系統(tǒng)的這樣一個系統(tǒng)中，運用數(shù)據(jù)庫的是十分必要的，7 一些 藥品 數(shù)據(jù)資料的保存，修改，查詢都要與數(shù)據(jù)打交道，所以選好存儲類型，選好一 種合適的數(shù)據(jù)庫是十分重要的，考慮到實際情況，我就用 做了。功能模塊設(shè)計的目的都是為了把一個系統(tǒng)分解成一些規(guī)模較小的、功能較簡單的、更易于建立和修改的部分。 信息流程圖的設(shè)計： ： 一個界面的友好，應(yīng)以使用者操作方面為前提，還有操作員長期與這些界面打交道，設(shè)計一個好的界面是我們程序開發(fā)人員的最高追求，在我看來，編一個程序真的很簡單，一個功能就有很多種 實現(xiàn)的方法，我在設(shè)計使用中發(fā)現(xiàn)，用這輸入 存儲 1 處理 中間數(shù) 存儲 2 處理 2 處理 3 輸出 1 輸出 2 13 個版本開發(fā)一個系統(tǒng)，遠不如我用 Powerbuilder 簡單，在那個開發(fā)環(huán)境，不像這個版本，很多東西編起來很礙手礙腳的，放不開。 14 人員管理界面設(shè)計： 設(shè)置多用戶操作，可以通過按鈕增加，修改，刪除等操作，對人員進行管理。 =+200 =.t. =.t. else =增加 if !empty() sele lb appe blan repl lb with allt() endi 16 = =.t. =.f. endi =39。 提示代碼重復(fù)錄入的 實現(xiàn)代碼如下： if !empty() sele yuanb loca for allt(dm)=allt() if found() 17 mm=messagebox(您輸入的代碼已經(jīng)使用，請重新輸入 ,1+32,提示 ) if mm=1 = retu .f. else retu .t. endi endi endi 增加完新藥以后，需要對當(dāng)前實有的藥品進行錄入，可以同藥品購入的錄入用 同一個錄入界面，但在以后的使用過程中，賬簿的正確性就不能保證 ，所以最好使用期初錄入界面進行錄入，保證數(shù)據(jù)的完整性。 是否更改為 +(allt()),1+32,提示 ) if mm=1 sele yuanb2 loca for bh=lbh+ repl sl with sl+,ysl with ysl+ repl yjj with val(),dj with val() sele qclr go bott repl bh with lbh+ else 20 sele yuanb2 loca for bh=lbh+ repl sl with sl+,ysl with ysl+ sele qclr go bott repl bh with lbh+ endi else sele yuanb2 loca for bh=lbh+ repl sl with sl+,ysl with ysl+ sele qclr go bott repl bh with lbh+ endi * else * sele yuanb2 * count to aa for int(bh)=lbh * appe blan * repl yjj with val(),dj with val(),chd with allt(),ph with 。 部分實現(xiàn)代碼如下： 查詢 .click =select distinct gydw from ck1 noconsle into cursor xxx =date()30 25 =date() sele ck1 set filt to gydw=allt() and rq= and rq= go top 藥品銷售累計查詢： 可以累計查詢某個單位或科室在某一時期內(nèi)購入藥品的合計，對于衛(wèi)生室管理具有相當(dāng)大的作用。delimited file:39。amp。 出庫藥品報表： 本報表一式三聯(lián)。39。\data\39。ml.\ copy file amp。ml.\ copy file amp。ml.\ copy file amp。ml.\ copy file amp。ml.\ dele file amp。lpath.\ to amp。lpath.\ to amp。lpath.\ to amp。lpath.\ to amp。lnpath 備份程序自動為備份的數(shù)據(jù)選擇文件夾，自動以當(dāng)前時期作為文件夾名稱，即方便了使用，又可以使以后的工作更加方便。在做好備份文件時，用命令語言去實現(xiàn)數(shù)據(jù)的復(fù)制時，就是通不過，我找了好久，才發(fā)現(xiàn)是相對路徑與絕對路徑的的問 題。最后通過反復(fù)修改才逐漸完善起來。不足之處，希望你的批評指正，以便修改完善。還有一點，因為做這個作業(yè)，不知道的，我有時到網(wǎng)上一些討論組里去發(fā)貼子，向高手請教，因此認(rèn)識了好幾個在計算機領(lǐng)域工作的朋友。35 第六部分：附錄 附錄一（主程序命令代碼）： DEFINE CY 14 DEFINE GY 7 set console off clos all set dele on set safe off set exac off set sysmenu off set status bar off on shutdown quit cCurrentProcedure = SYS(16,1) nPathStart = AT(:,cCurrentProcedure) 1 nLenOfPath = RAT(\, cCurrentProcedure) (nPathStart) SET DEFAULT TO (SUBSTR(cCurrentProcedure, nPathStart, nLenofPath)) zoom window screen max tit=39。 保存客戶信息 臨時出庫數(shù)據(jù)存儲 出庫主文件 庫存主文件 庫存輔助文件 臨時購入數(shù)據(jù)存儲 購入主文件 賬簿文件 保存藥品類別 保存用戶信息 程序文件 主程序文件 備份文件 解密文件 加密文件 表單文件 45 出庫表單 入庫表單 購藥查詢 賬簿表單 類別錄入表單 新藥錄入表單 藥品查詢表單 人員管理表單 參考文獻 [1]. Visual C++ 信息管理系統(tǒng)開發(fā)實例導(dǎo)航 人民郵電出版社 [2]. 薩師煊 數(shù)據(jù)庫系統(tǒng)概論 高等教育出版社 [3]. 李師賢，李文軍，周曉聰 面向?qū)ο蟪绦蛟O(shè)計基礎(chǔ) 高等教育出版社 [4]. 施伯樂等編著 . 數(shù)據(jù)庫系統(tǒng)教程 . 高等教育出版社 , 1999.