【正文】 之前，MIS軟件應(yīng)在相應(yīng)位置彈出一個(gè)列表框，待用戶以鼠標(biāo)點(diǎn)擊，而不應(yīng)讓用戶每次都輸入這些漢字。如果某個(gè)電算會(huì)計(jì)軟件的憑證錄入畫面是表格式的，一屏可錄入多條記錄，而且與實(shí)際憑證一模一樣，甚至連顏色都無(wú)異，用戶在終端上錄入憑證，仿佛用筆在紙上填寫憑證，以增加人機(jī)親和力。在應(yīng)用程序?qū)ο驩pen事件的程序代碼中有下面一條語(yǔ)句：Open(w_login)該語(yǔ)句就是打開(kāi)登錄窗口的語(yǔ)句。 then messagebox(提示,請(qǐng)輸入正確用戶名!) return end ifif 39。圖34物品管理窗口設(shè)計(jì)表33 物品管理窗口各個(gè)控件的屬性設(shè)置表控件屬性屬性取值St_1text物品管理Tabpage_1text瀏覽Tabpage_2text查詢Tabpage_3text添加Tabpage_4text修改與刪除Cb_1text退出表34 查詢頁(yè)窗口各個(gè)控件的屬性設(shè)置表控件屬性屬性取值St_1text請(qǐng)輸入物品名稱：Sle_2text空Cb_1text查詢dw_1Dataobjectd_thing1Gb_1text空表35 添加頁(yè)窗口各個(gè)控件的屬性設(shè)置表控件屬性屬性取值St_1text請(qǐng)輸入信息，按確定……Cb_1text確定Cb_2text重置dw_1Dataobjectd_thing2Gb_1text空表36 修改與刪除頁(yè)窗口各個(gè)控件的屬性設(shè)置表控件屬性屬性取值St_1text請(qǐng)輸入需處理物品名稱：Sle_2text空Cb_1text查詢Cb_2text確定Cb_3text刪除Cb_4text重置dw_1Dataobjectd_thing1Gb_1text空?qǐng)D35客戶數(shù)據(jù)錄入窗口設(shè)計(jì)在“瀏覽”分頁(yè)中，實(shí)現(xiàn)在數(shù)據(jù)窗口中顯示該企業(yè)的各種各樣的物品。在“添加”分頁(yè)中，實(shí)現(xiàn)向該企業(yè)物品表中添加各種各樣的物品。表37 客戶數(shù)據(jù)錄入窗口各個(gè)控件屬性設(shè)置表控件屬性屬性取值St_1text客戶數(shù)據(jù)錄入Tabpage_1text客戶信息錄入Tabpage_2text客戶物品錄入Tabpage_3text客戶節(jié)目錄入Cb_1text退出在“客戶信息錄入”分頁(yè)中，實(shí)現(xiàn)添加客戶的的信息。在“客戶節(jié)目錄入”分頁(yè)中，實(shí)現(xiàn)添加客戶訂購(gòu)的節(jié)目的信息。在“按物品查詢”分頁(yè)中，可以查到訂購(gòu)的該物品的客戶信息。 菜單設(shè)計(jì)：圖37菜單設(shè)計(jì)1.“物品節(jié)目管理”菜單下“物品管理”子菜單的clicked事件程序代碼：Open(w_thing)其功能打開(kāi)物品窗口。5.“客戶管理”菜單下“物品管理”子菜單的clicked事件程序代碼：Open(w_query)其功能打開(kāi)客戶信息窗口。在本應(yīng)用程序中，完全采用數(shù)據(jù)窗口來(lái)實(shí)現(xiàn)讀取數(shù)據(jù)庫(kù)中的數(shù)據(jù)、修改數(shù)據(jù)庫(kù)中的數(shù)據(jù)、排序等功能。 單擊“ok”按鈕啟動(dòng)數(shù)據(jù)窗口對(duì)象向?qū)?。單擊要選中的多個(gè)列，單擊“ok”按鈕，出現(xiàn)“Select Color and Border setting”對(duì)話框。單擊其上的“Finish”按鈕。應(yīng)用程序中窗口上的數(shù)據(jù)窗口控件可以連接和使用這個(gè)創(chuàng)建好的數(shù)據(jù)窗口對(duì)象。圖41系統(tǒng)登錄窗口輸入正確的用戶名和口令，按“確定”按鈕后進(jìn)入程序的主界面，在菜單或在工具欄中選中“物品管理”進(jìn)入 物品管理窗口。如圖所示：圖43物品管理主窗口在主窗口中，選中“節(jié)目管理”進(jìn)入節(jié)目管理窗口，選擇“添加”分頁(yè)，在數(shù)據(jù)窗口中按要求輸入信息后，按“確定”按鈕用來(lái)保存。如圖所示：圖47客戶數(shù)據(jù)錄入窗口完成了企業(yè)管理信息系統(tǒng)的編程和調(diào)試工作，最后一步就是該系統(tǒng)的編譯和發(fā)行。本系統(tǒng)是一個(gè)數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)，需要涉及到涉及數(shù)據(jù)庫(kù)環(huán)境配置等問(wèn)題。選擇“ApplicationWizard”圖標(biāo)。在指定完畢，單擊“Finish”按鈕，生成一個(gè)工程對(duì)象。單擊該窗口上的“Stop”按鈕終止編譯過(guò)程。2. 將編譯好的文件拷貝到PowerBuilder庫(kù)文件放置的路徑下。致 謝在本次畢業(yè)設(shè)計(jì)中，我的導(dǎo)師是老師，我從老師身上學(xué)到了很多東西。這對(duì)于我以后的工作和學(xué)習(xí)都是一種莫大的幫助，非常感謝老師。【4】 王珊、薩師煊，《數(shù)據(jù)庫(kù)系統(tǒng)概論》，高等教育出版社，1990年?？蛻粜畔⒐芾淼囊话阈畔⒉樵?、訂購(gòu)信息瀏覽，客戶訂購(gòu)查詢按物品查詢、按節(jié)目查詢客戶的信息以及客戶數(shù)據(jù)的錄入，但由于設(shè)計(jì)經(jīng)驗(yàn)較少，所以該系統(tǒng)還有許多不盡人意之處，如：用戶界面不夠美觀，功能設(shè)計(jì)不夠完善，人機(jī)交互不夠便敏等，這些都有待進(jìn)一步改善。MIS 之所以能夠得到廣泛的應(yīng)用，主要是由于其對(duì)復(fù)雜信息強(qiáng)大的管理功能，能夠輔助用戶管理實(shí)時(shí)數(shù)據(jù)或歷史數(shù)據(jù)，甚至可以產(chǎn)生新數(shù)據(jù)，或從大量的數(shù)據(jù)中做出統(tǒng)計(jì)，也可以根據(jù)用戶的需求做各種類型的查詢，大大方便了用戶的管理工作。通過(guò)對(duì)系統(tǒng)組織機(jī)構(gòu)的分析，業(yè)務(wù)流程和數(shù)據(jù)流程的分析，相應(yīng)畫出了組織機(jī)構(gòu)圖，系統(tǒng)業(yè)務(wù)流程圖和數(shù)據(jù)流程圖。第三章“系統(tǒng)設(shè)計(jì)”論述了概要設(shè)計(jì)的方法。附 錄。 Messagebox(修改,修改成功!) = ()else rollback using sqlca。//賦值給下拉列表框 fetch thing_cursor into :ls_client。if str_name then messagebox(提示,重名，請(qǐng)重新輸入！) () returnend ifclient_telephone1=trim()client_telephone2=trim() client_connector=trim()client_address=trim()client_memo=trim()//向數(shù)據(jù)庫(kù)寫入數(shù)據(jù)insert into 客戶表(client,telephone1,telephone2,connector,address,date1,memo)values(:client_name,:client_telephone1,:client_telephone2,:client_connector,:client_address,:client_date,:client_memo)。 do while =0 (ls_client) (ls_client) fetch thing_cursor into :ls_client。ret=messagebox(提示,確定保存嗎？,question!,yesno!,2)if ret=1 thenMessagebox(保存,保存成功!)else if ret=2 then return end ifend if==41 / 41。//添加客戶節(jié)目信息string client_program,client_name_2,client_grade,ls_program,ls_nameint ret,client_countif =or isnull()then messagebox(提示,請(qǐng)輸入節(jié)目名!) () returnend ifclient_program=trim()client_name_2=trim()client_count=integer(trim())client_grade=trim()//檢驗(yàn)有沒(méi)有重復(fù)select into :ls_name,:ls_programfrom 客戶節(jié)目表where =:client_name_2 and =:client_program。 () ()//打開(kāi)游標(biāo)open thing_cursor。 loop//關(guān)閉游標(biāo) close thing_cursor。 Messagebox(刪除,刪除成功!) = () = () =false =false =falseelse if ret=2 then return end ifend if客戶訂購(gòu)信息查詢代碼：//聲請(qǐng)變量 string ls_client string str_client//聲明游標(biāo) declare thing_cursor cursor for SELECT FROM 客戶表。 Messagebox(提示,添加成功！) () (0)//添加 ()else rollback using sqlca。第四章“系統(tǒng)的編輯與發(fā)行”是本文的重點(diǎn)展示了系統(tǒng)的運(yùn)行效果。可見(jiàn)需求分析的重要性。MIS 的管理對(duì)象往往是某一領(lǐng)域中大量的信息，這就要求開(kāi)發(fā)人員首先必須充分調(diào)研，仔細(xì)了解用戶工作的方方面面，熟悉用戶的工作領(lǐng)域，并通過(guò)與用戶的交流，分析用戶提出的各種要求，結(jié)合系統(tǒng)開(kāi)發(fā)的可行性，剔除掉用戶的不可實(shí)現(xiàn)的需求，最后確定系統(tǒng)應(yīng)向用戶提供的功能，并以這些需求為約束來(lái)規(guī)劃應(yīng)用程序的開(kāi)發(fā)。 第一章“緒論”介紹了管理信息系統(tǒng)的發(fā)展與應(yīng)用，管理信息系統(tǒng)的特點(diǎn)及管理信息系統(tǒng)的開(kāi)發(fā)方法與開(kāi)發(fā)過(guò)程。 畢業(yè)設(shè)計(jì)小結(jié)經(jīng)過(guò)半年的設(shè)計(jì)和開(kāi)發(fā)，一個(gè)完整的企業(yè)信息管理系統(tǒng)已創(chuàng)建完畢了。【2】 薛華誠(chéng)，《 管理信息系統(tǒng)》，清華大學(xué)出版社，1993年。老師無(wú)論在理論上還是在實(shí)踐中都給了我很大的幫助，使我的綜合技能有了很大的提高。 通過(guò)上面測(cè)試的可執(zhí)行文件，就可以進(jìn)行發(fā)布了。編譯通過(guò)后。單擊其上的“next”按鈕，在對(duì)話框中，指定庫(kù)文件名。單擊工具條的“new”圖標(biāo)，打開(kāi)“new”對(duì)話框。這涉及到工程對(duì)象的創(chuàng)建、可執(zhí)行應(yīng)用程序的生成以及發(fā)布環(huán)境的配置等多方面的問(wèn)題。如圖所示：圖45客戶信息管理窗口在主窗口中，選中“客戶訂購(gòu)信息查詢”進(jìn)入客戶訂購(gòu)信息查詢窗口，按不同的要求進(jìn)行查詢，選擇“按物品查詢”分頁(yè)，輸入物品，單擊“查詢”按鈕，定購(gòu)本物品的客戶顯示在數(shù)據(jù)窗口中。選中“查詢”頁(yè)，在文本框中輸入物品名稱，單擊“查詢”按鈕，相關(guān)的信息顯示在數(shù)據(jù)窗口中。至此已經(jīng)完成企業(yè)管理系統(tǒng)程序的編制。在數(shù)據(jù)庫(kù)表中各個(gè)列的列名使用英文表示的在列標(biāo)題顯示的時(shí)候我們將它們?cè)O(shè)置為中文。單擊“next”按鈕，“Ready to Create Grid Datawindow”對(duì)話框。在左上方的表格列表中雙擊要連接的表。其他的數(shù)據(jù)窗口對(duì)象由于方法相似，在這里不作詳細(xì)講述。 數(shù)據(jù)窗口的設(shè)計(jì) 數(shù)據(jù)窗口對(duì)象是PowerBuilder編程的精華所在，建立數(shù)據(jù)窗口對(duì)象是程序設(shè)計(jì)中極為重要的一個(gè)部分。3.“物品節(jié)目管理”菜單下“退出”子菜單的clicked事件程序代碼：Close(w_main)其功能關(guān)閉主窗口。在“按節(jié)目查詢”分頁(yè)中，實(shí)現(xiàn)添加客戶訂購(gòu)的物品的信息。圖36客戶訂購(gòu)