畢業設計計算機信息管理之藥品管理系統-預覽頁

　

【正文】 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 藥品分類界面設計： 藥品期初設置的一個方面，為保證藥品分類計算時 ，保證數據的有效性和立人準確性。主界面，我起先考慮的也跟大多同學一樣，用菜單生成器，最后發現，一個小小的系統，功能模塊又非常之小，我就放棄了菜單方式，選用了現在這個樣子。一方面，各個模塊都有自己的獨立性，另一方面，模塊之間的相互關系可以通過一定的方式予以規定和說明。數據庫設計的主要任務是決定數據庫的字段名，字段類型，字段長度等 。這是我們也要考慮的問題。這要求我們盡量采用模塊化結構，提高各部分的獨立性，盡是減少各子系統之間的數 據依賴性。詳細設計：詳細設計包括數據存儲文件設計（數據庫文件的設計）、輸出設計、輸入設計、編寫程序設計說明書等。如果技術方面可行，瀏覽與查詢方面的功能應該編寫得強大一點，再好有條件組合的查詢，可以實現按男女生分類查詢，也可以按專業、寢室號、籍貫等分類查詢，以便學校方面管理人員可以很方便的查詢想要的數據，以便進行統一管理，統一安排。 技術上的可行性： 技術上的可行性分析要考慮將來要采用的硬件和軟件技術能否滿足用戶（這里是校方）提出的要求（如計算機的容量、速度等）。對于一個學校而言，更應該運用一些本地資源，提高管理的力度，對學生負責，對國家負責。被調查單位普遍反映且迫切需要善經營、會管理，同時能 熟練把計算機運用到信息采集、處理與維護的高級管理人才，計算機信息管理專業正是在這種背景正應運而生的，目的是為企事業單位提供更多更好的從事計算機信息管理工作的合格人才。1 重慶郵電大學高等函授 專科畢業設計（論文） 設計（論文）題目： 計算機信息管理之藥品管理系統 入學年月 2021 年 9 月 1 日 姓 名 學 號 專 業 所屬科站 指導教師 完成日期 2021 年 12 月 17 日 2 【摘要】 隨著全球以信息技術為主導的 科技革命進程的加快，人類社會逐步由工業社會進入信息社會。隨著我國市場經濟的迅速發展和加入 WTO，企業信息化程度的要求越來越高，而現階段計算機信息管理普及率并不高，企業中計算機資源得不到及時充分的利用，信息處理效率跟不上形勢的發展，近幾年很多單位對計算機信息管理專業人才需求越來越大。宿舍管理特別是學校宿舍的管理是 一個非常繁瑣與復雜的一項工作，一個原因就是工作量大，不好管。從節省人力方面，可以讓管 理人員從繁與復雜的工作中解脫出來，做更多的工作，可以給宿舍里的管理提高一個層次。 5 結論： 通過以 上兩點的分析，編寫或開發這個宿舍管理系統是可行的，只要這個系統能實現對學生數據的輸入、修改、刪除、打印、瀏覽與查詢就可以了。總體設計：總體設計包括子系統的劃分，代碼設計、設計規范制定、信息系統流程圖設計、功能結構圖設計和系統物理配置方案設計等。系統應靈活，對環境的變化要有很強的適應性。 （ 4） 經濟性。 ： 數據庫設計： 在一個 藥品管理查詢 系統的這樣一個系統中，運用數據庫的是十分必要的，7 一些 藥品 數據資料的保存，修改，查詢都要與數據打交道，所以選好存儲類型，選好一 種合適的數據庫是十分重要的，考慮到實際情況，我就用 做了。功能模塊設計的目的都是為了把一個系統分解成一些規模較小的、功能較簡單的、更易于建立和修改的部分。 信息流程圖的設計： ： 一個界面的友好，應以使用者操作方面為前提，還有操作員長期與這些界面打交道，設計一個好的界面是我們程序開發人員的最高追求，在我看來，編一個程序真的很簡單，一個功能就有很多種 實現的方法，我在設計使用中發現，用這輸入 存儲 1 處理 中間數 存儲 2 處理 2 處理 3 輸出 1 輸出 2 13 個版本開發一個系統，遠不如我用 Powerbuilder 簡單，在那個開發環境，不像這個版本，很多東西編起來很礙手礙腳的，放不開。 14 人員管理界面設計： 設置多用戶操作，可以通過按鈕增加，修改，刪除等操作，對人員進行管理。 =+200 =.t. =.t. else =增加 if !empty() sele lb appe blan repl lb with allt() endi 16 = =.t. =.f. endi =39。 提示代碼重復錄入的 實現代碼如下： if !empty() sele yuanb loca for allt(dm)=allt() if found() 17 mm=messagebox(您輸入的代碼已經使用，請重新輸入 ,1+32,提示 ) if mm=1 = retu .f. else retu .t. endi endi endi 增加完新藥以后，需要對當前實有的藥品進行錄入，可以同藥品購入的錄入用 同一個錄入界面，但在以后的使用過程中，賬簿的正確性就不能保證 ，所以最好使用期初錄入界面進行錄入，保證數據的完整性。 是否更改為 +(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 。 部分實現代碼如下： 查詢 .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 藥品銷售累計查詢： 可以累計查詢某個單位或科室在某一時期內購入藥品的合計，對于衛生室管理具有相當大的作用。delimited file:39。amp。 出庫藥品報表： 本報表一式三聯。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 備份程序自動為備份的數據選擇文件夾，自動以當前時期作為文件夾名稱，即方便了使用，又可以使以后的工作更加方便。在做好備份文件時，用命令語言去實現數據的復制時，就是通不過，我找了好久，才發現是相對路徑與絕對路徑的的問 題。最后通過反復修改才逐漸完善起來。不足之處，希望你的批評指正，以便修改完善。還有一點，因為做這個作業，不知道的，我有時到網上一些討論組里去發貼子，向高手請教，因此認識了好幾個在計算機領域工作的朋友。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。 保存客戶信息 臨時出庫數據存儲 出庫主文件 庫存主文件 庫存輔助文件 臨時購入數據存儲 購入主文件 賬簿文件 保存藥品類別 保存用戶信息 程序文件 主程序文件 備份文件 解密文件 加密文件 表單文件 45 出庫表單 入庫表單 購藥查詢 賬簿表單 類別錄入表單 新藥錄入表單 藥品查詢表單 人員管理表單 參考文獻 [1]. Visual C++ 信息管理系統開發實例導航 人民郵電出版社 [2]. 薩師煊 數據庫系統概論 高等教育出版社 [3]. 李師賢，李文軍，周曉聰 面向對象程序設計基礎 高等教育出版社 [4]. 施伯樂等編著 . 數據庫系統教程 . 高等教育出版社 , 1999.