畢業(yè)設(shè)計(jì)（論文）超市進(jìn)銷(xiāo)存信息管理系統(tǒng)設(shè)計(jì)

1、畢業(yè)設(shè)計(jì) 引言目錄摘 要2引言31本課題的研究意義和目的41.1開(kāi)發(fā)背景41.2研究超市進(jìn)銷(xiāo)存管理系統(tǒng)的意義42系統(tǒng)設(shè)計(jì)62.1系統(tǒng)目標(biāo)設(shè)計(jì)62.2開(kāi)發(fā)設(shè)計(jì)思想62.3開(kāi)發(fā)和運(yùn)行環(huán)境選擇62.4系統(tǒng)功能分析72.5系統(tǒng)功能模塊設(shè)計(jì)73數(shù)據(jù)庫(kù)設(shè)計(jì)83.1數(shù)據(jù)庫(kù)需求分析83.2數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)93.3數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)93.4數(shù)據(jù)庫(kù)結(jié)構(gòu)的實(shí)現(xiàn)114各個(gè)功能模塊的創(chuàng)建144.1系統(tǒng)菜單的設(shè)計(jì)144.3身份驗(yàn)證界面的設(shè)計(jì)164.3.1用戶身份驗(yàn)證界面164.3.2創(chuàng)建“修改密碼”表單184.4信息管理模塊設(shè)計(jì)204.4.1“商品信息管理”表單204.4.2“輸入查詢條件”表單275系統(tǒng)的編譯和發(fā)行4

2、0結(jié)束語(yǔ)41致謝42參考文獻(xiàn)43摘 要超市管理系統(tǒng)是目前應(yīng)用于中型或是大型超市商品進(jìn)、銷(xiāo)、存、管理等系統(tǒng)中的典型代表，涉及到了商品或貨物管理中的以下4個(gè)方面，即進(jìn)貨、銷(xiāo)售、庫(kù)存及盤(pán)點(diǎn)。通過(guò)一個(gè)超市管理系統(tǒng)的例子，介紹了超市進(jìn)、銷(xiāo)、存、管理信息化的一般解決方案，其重要性不言而喻。但是，目前超市在具體的業(yè)務(wù)流程處理過(guò)程中仍然使用手工操作的方式來(lái)實(shí)施，不僅費(fèi)時(shí)、費(fèi)力，效率低下，而且無(wú)法達(dá)到理想的效果。本系統(tǒng)是根據(jù)超市的特點(diǎn)，集進(jìn)、銷(xiāo)、存、分析于一體，為超市量身定做的進(jìn)、銷(xiāo)、存、管理軟件。在設(shè)計(jì)過(guò)程中最大限度滿足用戶的要求，因此，該系統(tǒng)具有較強(qiáng)的實(shí)用性和針對(duì)性。本系統(tǒng)界面友好，操作簡(jiǎn)單，可維護(hù)性強(qiáng)，功

3、能完備。本論文介紹了超市管理信息系統(tǒng)開(kāi)發(fā)的全過(guò)程，主要從管理思想、系統(tǒng)分析說(shuō)明、系統(tǒng)設(shè)計(jì)說(shuō)明、系統(tǒng)使用說(shuō)明、技巧與體會(huì)等方面對(duì)本管理系統(tǒng)加以論述。前言部分指明了選題背景和開(kāi)題意義；而后又詳細(xì)介紹了系統(tǒng)的分析、系統(tǒng)的開(kāi)發(fā)與設(shè)計(jì)說(shuō)明等內(nèi)容；最后給出了系統(tǒng)的使用說(shuō)明和系統(tǒng)設(shè)計(jì)的心得體會(huì)。 關(guān)鍵詞：系統(tǒng)設(shè)計(jì)、系統(tǒng)分析、進(jìn)銷(xiāo)存、信息管理系統(tǒng)引言隨著社會(huì)經(jīng)濟(jì)的發(fā)展，信息化程度的不斷深入，超市的傳統(tǒng)業(yè)務(wù)己愈來(lái)愈不能滿足消費(fèi)者的需要。如今，商品進(jìn)、銷(xiāo)、存、管理是大小型超市經(jīng)營(yíng)管理中的核心環(huán)節(jié)，也是一個(gè)超市能夠取得效益的關(guān)鍵，如果能夠做到合理生產(chǎn)，及時(shí)銷(xiāo)售，庫(kù)存量最小，減少積壓，那么超市就能取得最佳的效益。由此

4、可見(jiàn)，進(jìn)、銷(xiāo)、存、管理決策的正確與否直接影響了超市的效益。本管理信息系統(tǒng)是針對(duì)超市的實(shí)際需求開(kāi)發(fā)設(shè)計(jì)的，我組在超市中采集了許多實(shí)際資料。利用計(jì)算機(jī)運(yùn)算速度快、存儲(chǔ)信息容量大、處理邏輯問(wèn)題強(qiáng)、功能強(qiáng)大的優(yōu)勢(shì)及計(jì)算機(jī)網(wǎng)絡(luò)與通信網(wǎng)的結(jié)合,可以使眾多的個(gè)人計(jì)算機(jī)不僅能夠同時(shí)處理文字、數(shù)據(jù)、圖像、聲音等信息而且方便快捷，特別是局域網(wǎng)的應(yīng)用，它可以通過(guò)數(shù)據(jù)通信網(wǎng)或?qū)Ｓ脭?shù)據(jù)電路，與遠(yuǎn)方的局域網(wǎng)、數(shù)據(jù)庫(kù)或處理中心相連接，構(gòu)成一個(gè)大范圍的信息處理系統(tǒng)，從超市管理特別是查詢與決策信息的管理需求出發(fā)，針對(duì)性強(qiáng)，功能齊備，旨在通過(guò)幫助超市管理實(shí)現(xiàn)信息化，以提高超市管理的效率。與此同時(shí)，我們所學(xué)到的知識(shí)也得到了理論聯(lián)系

5、實(shí)際的目的。45畢業(yè)設(shè)計(jì) 第1章 本課題的研究意義和目的1本課題的研究意義和目的1.1開(kāi)發(fā)背景隨著科技發(fā)展和社會(huì)進(jìn)步，尤其是計(jì)算機(jī)大范圍的普及，計(jì)算機(jī)應(yīng)用逐漸由大規(guī)?？茖W(xué)計(jì)算的海量數(shù)據(jù)處理轉(zhuǎn)向大規(guī)模的事務(wù)處理和對(duì)工作流的管理，這就產(chǎn)生了以臺(tái)式計(jì)算機(jī)為核心，以數(shù)據(jù)庫(kù)管理系統(tǒng)為開(kāi)發(fā)環(huán)境的管理信息系統(tǒng)在大規(guī)模的事務(wù)處理和對(duì)工作流的管理等方面的應(yīng)用，特別是在超市管理之中的應(yīng)用日益收到人們的關(guān)注。目前，無(wú)論公司還是企業(yè)對(duì)于貨物都實(shí)行了信息化管理以提高管理水平和工作效率，同時(shí)也可以最大限度地減少手工操作帶來(lái)的錯(cuò)誤。于是，進(jìn)銷(xiāo)存管理信息系統(tǒng)便應(yīng)運(yùn)而生。在工廠中，涉及產(chǎn)品原料的采購(gòu)、庫(kù)存，投入生產(chǎn)，報(bào)損，甚至

6、有時(shí)涉及到銷(xiāo)售，同時(shí)，對(duì)于產(chǎn)品也有相同的生產(chǎn)，庫(kù)存，銷(xiāo)售和盤(pán)點(diǎn)等類(lèi)似環(huán)節(jié)。在其他非生產(chǎn)性單位，如超市，商店等，則主要涉及到進(jìn)貨，庫(kù)存，銷(xiāo)售和盤(pán)點(diǎn)4方面。我們的系統(tǒng)開(kāi)發(fā)的整體任務(wù)是實(shí)現(xiàn)超市管理的系統(tǒng)化、規(guī)范化、自動(dòng)化和智能化，從而達(dá)到提高企業(yè)管理效率的目的。1.2研究超市進(jìn)、銷(xiāo)、存、管理系統(tǒng)的意義隨著社會(huì)的進(jìn)步和計(jì)算機(jī)技術(shù)的發(fā)展，尤其是網(wǎng)絡(luò)技術(shù)的飛速進(jìn)步，信息觀念已經(jīng)深入人心。信息科學(xué)作為當(dāng)代社會(huì)中的重要一環(huán)在國(guó)民經(jīng)濟(jì)中起著舉足輕重的作用。從目前看來(lái)，依靠電子化手段，加強(qiáng)超市的管理，是各家超市提高其工作效率、增強(qiáng)其業(yè)務(wù)競(jìng)爭(zhēng)力的重要因素。對(duì)超市來(lái)說(shuō)，至少有如下幾點(diǎn)益處:1、界面清晰、功能少而實(shí)用、

7、操作簡(jiǎn)單。2、開(kāi)發(fā)周期短、維護(hù)費(fèi)用低、軟件更新速度快。3、風(fēng)格友好化，輕松管理，容易上手，達(dá)到一看就懂、一學(xué)即會(huì)。4、目標(biāo)系統(tǒng)必須具有可靠性、安全性、可維護(hù)性、可移植性等，對(duì)于不同的管理人員授予不同的操作權(quán)限，具有定期數(shù)據(jù)備份功能。5、以表格的形式輸出信息。6、增加數(shù)據(jù)有效性驗(yàn)證：即在操作人員因某種原因錯(cuò)誤的輸入了數(shù)據(jù)時(shí)系統(tǒng)會(huì)自動(dòng)提出數(shù)據(jù)錄入有誤并加以提示，這樣方便操作人員輸入的數(shù)據(jù)有效性。7、系統(tǒng)的通用性：此系統(tǒng)為綜合性工業(yè)企業(yè)庫(kù)存管理系統(tǒng)，里面的數(shù)據(jù)都是從數(shù)據(jù)庫(kù)中提出（包括公司名稱(chēng)、操作人名稱(chēng)等），不受固定數(shù)據(jù)限制。增強(qiáng)系統(tǒng)的通用性?？傊F(xiàn)代超市的競(jìng)爭(zhēng)和發(fā)展，已突破傳統(tǒng)業(yè)務(wù)的框架，為了提

8、高超市的業(yè)務(wù)競(jìng)爭(zhēng)能力，擴(kuò)大客戶群，培育新的利潤(rùn)增長(zhǎng)點(diǎn)，務(wù)必大力改良其超市的進(jìn)、銷(xiāo)、存、管理系統(tǒng)，因此建立一個(gè)功能齊全、靈活、通用、可靠、安全、統(tǒng)一的超市管理系統(tǒng)成為各超市當(dāng)前業(yè)務(wù)發(fā)展的迫切之需。畢業(yè)設(shè)計(jì) 第2章 系統(tǒng)設(shè)計(jì)2系統(tǒng)設(shè)計(jì)2.1系統(tǒng)目標(biāo)設(shè)計(jì)通過(guò)該超市管理系統(tǒng)，利于計(jì)算機(jī)的技術(shù)，使得進(jìn)貨，銷(xiāo)售，庫(kù)存能夠有利結(jié)合起來(lái)，產(chǎn)銷(xiāo)銜接，提高超市效率和效益從而達(dá)到提高賬戶管理效率的目的。系統(tǒng)開(kāi)發(fā)的總體任務(wù)是使超市人員可以輕松快捷地完成對(duì)賬戶管理的任務(wù)2.2開(kāi)發(fā)設(shè)計(jì)思想本系統(tǒng)開(kāi)發(fā)設(shè)計(jì)思想：通過(guò)完成這個(gè)超市進(jìn)、銷(xiāo)、存、管理系統(tǒng)，實(shí)現(xiàn)公司企業(yè)貨物管理的穩(wěn)定性，易操作性，可維護(hù)性，安全性等，從而達(dá)到提高貨物

9、管理效率的目的?？尚行苑治鼍褪菍?duì)項(xiàng)目開(kāi)發(fā)的可能性和必要性進(jìn)行分析，避免盲目投資。主要是必要性分析和效益分析，同時(shí)還要進(jìn)一步進(jìn)行技術(shù)可行性分析，投資效益分析，組織管理可行性分析，建立是否存在否定項(xiàng)目的可能性。超市管理系統(tǒng)需要投資費(fèi)用和未來(lái)的運(yùn)營(yíng)維護(hù)費(fèi)用，尤其投資費(fèi)用主要包括設(shè)備費(fèi)用，人員費(fèi)用，材料費(fèi)用和其他費(fèi)用，如由于工作方式改變需要增加的其他開(kāi)支，通常保證新系統(tǒng)運(yùn)行的可靠性，要求手工和計(jì)算機(jī)處理在長(zhǎng)時(shí)間并存。系統(tǒng)的收益主要通過(guò)新系統(tǒng)銷(xiāo)售來(lái)實(shí)現(xiàn)，但有些指標(biāo)也是難以計(jì)算的，例如如下指標(biāo)：貨物管理中節(jié)省的人力，減輕的勞動(dòng)強(qiáng)度。降低成本幾其他費(fèi)用。改進(jìn)薄弱環(huán)節(jié)，提高工作效率。提高數(shù)據(jù)處理的及時(shí)性和準(zhǔn)確

10、性。其他各種有利方面。2.3開(kāi)發(fā)和運(yùn)行環(huán)境選擇開(kāi)發(fā)工具：visualfoxpro60中文版，運(yùn)行環(huán)境：windows9x或windows2000。2.4系統(tǒng)功能分析系統(tǒng)功能分析是在系統(tǒng)開(kāi)發(fā)的總體任務(wù)的基礎(chǔ)上完成的。本例要完成的功能主要有：(1)信息管理，日常操作，信息查詢，系統(tǒng)管理。(2)商品信息管理。(3)商品進(jìn)貨管理，商品銷(xiāo)售管理。(4)進(jìn)貨記錄查詢，商品銷(xiāo)售記錄查詢，庫(kù)存記錄查詢。(5)登錄系統(tǒng)，修改密碼，關(guān)于系統(tǒng)，退出系統(tǒng)。2.5系統(tǒng)功能模塊設(shè)計(jì)在系統(tǒng)功能分析的基礎(chǔ)上，根據(jù)visualfox程序編制的特點(diǎn)，如圖：超市管理系統(tǒng)信息管理日常操作系統(tǒng)管理信息查詢商品信息管理商品進(jìn)貨管理商品銷(xiāo)

11、售管理庫(kù)存信息查詢銷(xiāo)售信息查詢進(jìn)貨信息查詢重新登錄退出系統(tǒng)修改密碼畢業(yè)設(shè)計(jì) 第3章 數(shù)據(jù)庫(kù)設(shè)計(jì)3數(shù)據(jù)庫(kù)設(shè)計(jì)在visualfoxpro60中，數(shù)據(jù)庫(kù)指的是可以存儲(chǔ)一個(gè)或多個(gè)表(dbf文件)及數(shù)據(jù)的關(guān)系數(shù)據(jù)庫(kù)，所謂的關(guān)系數(shù)據(jù)庫(kù)就是多個(gè)表的集合。每個(gè)表通過(guò)形成一定關(guān)系的公共字段與另外的表聯(lián)系。一般來(lái)說(shuō)數(shù)據(jù)庫(kù)可按下列步驟進(jìn)行設(shè)計(jì)：(1)確定需要的表。著手把信息分成各個(gè)獨(dú)立的主題，每個(gè)主題對(duì)應(yīng)一個(gè)表。(2)確定所需字段。確定每個(gè)表中要保存哪些信息，一個(gè)信息為一個(gè)字段。(3)確定表之間的聯(lián)系。3.1數(shù)據(jù)庫(kù)需求分析數(shù)據(jù)庫(kù)需求分析是數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的第一個(gè)階段，是收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程。針對(duì)本

12、實(shí)例，通過(guò)對(duì)超市進(jìn)銷(xiāo)存管理的內(nèi)容和數(shù)據(jù)流程分析，總結(jié)如下需求信息：(1)進(jìn)貨信息中要包含商品信息。(2)銷(xiāo)售信息中要包含商品信息。(3)庫(kù)存信息中要包含商品信息。經(jīng)過(guò)上述系統(tǒng)功能分析和需求總結(jié)，考慮到將來(lái)功能上的擴(kuò)展，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：商品信息，包含商品編號(hào)，商品名稱(chēng)，商品單位，商品單價(jià)，類(lèi)別，產(chǎn)地及說(shuō)明等。進(jìn)貨信息，包含進(jìn)貨編號(hào)，商品編號(hào)，進(jìn)貨單價(jià)，進(jìn)貨數(shù)量，進(jìn)貨時(shí)間，經(jīng)手人，供貨單位等。銷(xiāo)售信息，包含出貨編號(hào)，商品編號(hào)，出貨單位，出貨數(shù)量，出貨編號(hào)，經(jīng)手人及說(shuō)明等。庫(kù)存信息，包含商品編號(hào)，庫(kù)存說(shuō)明和說(shuō)明等。系統(tǒng)設(shè)置，包含商品類(lèi)別等。用戶信息，包含用戶，密碼等。有了上面的數(shù)據(jù)

13、結(jié)構(gòu)、數(shù)據(jù)項(xiàng)和數(shù)據(jù)流程，然后進(jìn)行下面的數(shù)據(jù)庫(kù)設(shè)計(jì)。3.2數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)根據(jù)上面的設(shè)計(jì)規(guī)劃本實(shí)例中的實(shí)體有：商品信息實(shí)體，進(jìn)貨實(shí)體，銷(xiāo)售信息實(shí)體，庫(kù)存信息實(shí)體和用戶信息實(shí)體。實(shí)體與實(shí)體之間的關(guān)系e-r圖分別如下：3.3數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)我們需要將上面的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為visualforpro數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。在上面的實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。超市進(jìn)銷(xiāo)存管理系統(tǒng)數(shù)據(jù)庫(kù)中各個(gè)表格的設(shè)計(jì)結(jié)果幾個(gè)表格每個(gè)表格表示在數(shù)據(jù)庫(kù)中的一個(gè)表。這些表為用戶基本信息表。“商品信息”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值

14、說(shuō)明商品編號(hào)字符型6否主索引字段商品名稱(chēng)字符型40可商品單位字符型6否商品單價(jià)浮動(dòng)型6否1位小數(shù)產(chǎn)地字符型40否類(lèi)別字符型20說(shuō)明備注型4條形碼字符型14“進(jìn)貨信息”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值說(shuō)明進(jìn)貨編號(hào)字符型10否主索引字段商品編號(hào)字符型6否普通索引字段進(jìn)貨數(shù)量浮動(dòng)型8否1位小數(shù)銷(xiāo)售單價(jià)浮動(dòng)型8否1位小數(shù)進(jìn)貨時(shí)間日期時(shí)間型8否供貨單位字符型40可經(jīng)手人字符型20可單位備注型4“銷(xiāo)售信息”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值說(shuō)明銷(xiāo)售編號(hào)字符型8否主索引字段商品編號(hào)字符型6否普通索引字段銷(xiāo)售數(shù)量浮動(dòng)型8否1位小數(shù)銷(xiāo)售單價(jià)浮動(dòng)型8否1位小數(shù)銷(xiāo)售時(shí)間日期時(shí)間型8否接收人

15、字符型20否經(jīng)手人字符型20可說(shuō)明備注型4“庫(kù)存信息”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值說(shuō)明商品編號(hào)字符型6否主索引字段庫(kù)存數(shù)量浮動(dòng)型81位小數(shù)說(shuō)明備注型4“用戶信息”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值說(shuō)明用戶名字符型20否主索引字段密碼字符型20否1位小數(shù)“系統(tǒng)設(shè)置”表的字段設(shè)置如下：字段名類(lèi)型寬度可否為空默認(rèn)值說(shuō)明商品類(lèi)別字符型20否主索引字段3.4數(shù)據(jù)庫(kù)結(jié)構(gòu)的實(shí)現(xiàn)在需求分析、概念結(jié)構(gòu)設(shè)計(jì)的繼承上得到數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)之后，我們就可以在visual foxpro數(shù)據(jù)庫(kù)系統(tǒng)中實(shí)現(xiàn)該邏輯結(jié)構(gòu)。實(shí)現(xiàn)數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)的方式是直接使用visual foxpro的項(xiàng)目管理器來(lái)實(shí)現(xiàn)

16、。下面將以本例中jxcdata數(shù)據(jù)庫(kù)為實(shí)例，來(lái)說(shuō)明.在visualfoxpro主窗口選擇【文件】【新建】菜單，打開(kāi)“新建”對(duì)話框。在此對(duì)話框中的“文件類(lèi)型”選項(xiàng)組中選中“項(xiàng)目”選項(xiàng)后單擊【新建文件】按鈕，打開(kāi)“創(chuàng)建”對(duì)話框，在此對(duì)話框中選擇項(xiàng)目文件的保存位置并輸入項(xiàng)目名稱(chēng)，單擊【保存】按鈕可保存項(xiàng)目并完成一個(gè)visualfoxpro項(xiàng)目的創(chuàng)建。項(xiàng)目創(chuàng)建完成以后即可打開(kāi)項(xiàng)目管理器，如下圖：新建數(shù)據(jù)庫(kù)如圖所示：在項(xiàng)目管理器中選擇data選項(xiàng)卡，在目錄樹(shù)中打開(kāi)jxcdata數(shù)據(jù)庫(kù)，選中“本地視圖”項(xiàng)，單擊新建按鈕，在打開(kāi)的“新建本地視圖”對(duì)話框中單擊新建視圖按鈕，即可打開(kāi)視圖設(shè)計(jì)器來(lái)設(shè)計(jì)本地視圖。設(shè)

17、置好的視圖inview，outview,storeview輸出結(jié)果分別如下：畢業(yè)設(shè)計(jì) 第4章 各個(gè)功能模塊的創(chuàng)建4各個(gè)功能模塊的創(chuàng)建建立功能模塊的目的在于：一個(gè)是使用者能簡(jiǎn)單明了地掌握軟件功能，另個(gè)是未開(kāi)發(fā)的人貝也能輕松地進(jìn)行維護(hù)。根據(jù)本軟件的特點(diǎn)，本系統(tǒng)將分為3個(gè)功能模塊它們是：信息管理模塊、日常操作模塊、信息查詢模塊。在進(jìn)入各個(gè)功能模塊前，應(yīng)該給用戶提供一個(gè)選擇的界面，即系統(tǒng)的主界面。下面按系統(tǒng)計(jì)開(kāi)發(fā)順序逐一介紹。4.1系統(tǒng)菜單的設(shè)計(jì)系統(tǒng)主菜單的功能在于引導(dǎo)用戶進(jìn)入不同的功能模塊。本系統(tǒng)主菜單的界面為簡(jiǎn)單起見(jiàn)，設(shè)計(jì)界面如圖所示。界面的系統(tǒng)菜單又包含三個(gè)子菜單，分別為“日常操作”、“信息查詢

18、”、“系統(tǒng)管理”，引導(dǎo)進(jìn)入個(gè)同的功能模塊。本例中的系統(tǒng)主菜單的結(jié)構(gòu)如下表所示：菜單菜單項(xiàng)結(jié)果命令信息管理(a)商品信息管理(p)命令doformproadmin日常操作(d)商品進(jìn)貨管理(i)命令doformiinact_商品操作(o)命令doformoutact信息查詢(s)進(jìn)貨信息查詢(i)命令doforminseach_銷(xiāo)售信息查詢(o)命令doformoutseach_庫(kù)存信息查詢(s)命令doformstoresearch系統(tǒng)管理(m)修改密碼(m)命令doformsetpass_關(guān)于系統(tǒng)(a)doabout.prg_退出系統(tǒng)(e)clearevents4.2創(chuàng)建“splash”表單

19、“splash”表單是程序中比較常見(jiàn)的一種界面，一般作為程序的第一個(gè)界面顯示給用戶，在該界面中顯示程序的名稱(chēng)，創(chuàng)建人，版本等信息。“splash”表單布局如下所示：“splash”表單中計(jì)時(shí)器控件time事件代碼為：*移動(dòng)歡迎使用標(biāo)簽*當(dāng)標(biāo)簽移動(dòng)到表單最右側(cè)時(shí)ifthisform.lable14.left=thisform.width*-移動(dòng)到最左側(cè)thisform.lable14.left=thisform.lable14.left+1endif*-使“超市進(jìn)銷(xiāo)存管理系統(tǒng)”變色*-隨機(jī)生成顏色i=tnt(rand()*255)j=tnt(rand()*255)k=tnt(rand()*255

20、)4.3身份驗(yàn)證界面的設(shè)計(jì)因?yàn)楸鞠到y(tǒng)的特殊性，本系統(tǒng)各處會(huì)涉及到密碼即身份驗(yàn)證。如用戶身份驗(yàn)證等。4.3.1用戶身份驗(yàn)證界面設(shè)計(jì)“系統(tǒng)登錄表單”的用戶驗(yàn)證界面如圖所示。接下來(lái)，我們?yōu)楦骺丶顚?xiě)事件響應(yīng)。“系統(tǒng)登錄“表單中“確定”按鈕的“click”事件代碼：*-精確比較setexacton*-判斷是否輸入用戶名ifalltrim（thisform.textdser.value）-“”messagebox(“請(qǐng)輸入用戶名”，48，“進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.textuser.setfousreturnendif*-獲取輸入的信息user_n=alltrim(thisform.textu

21、ser.value)user_p=alltrim(thisform.textuser.value)*-定義邏輯變量is_user,用于判斷是否為合法用戶localis-uuseris-uuser=.f.*-遍歷用表中所有的記錄*-判斷輸入的用戶名稱(chēng)和用戶密碼是否存在select用戶信息gotopdowhile.not.eof()*-尋找與輸入的用戶名和密碼匹配的記錄isuser=(user_n=用戶信息.用戶名).and.(user_p=用戶信息.密碼)*-如果找到ifis_userexitelseskipendifenddo*-如果正確ifisuser*-保存登錄用戶ccuruser=all

22、trim(thisform.textuser.value)*-調(diào)用主界面doformmainform*-推出當(dāng)前表單thisform.release*-如果登錄不正確elsemessagebox(“用戶名或用戶密碼不正確!”,0+16,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.textuser.value=”thisform.textpass.value=”thisform.textuser.setfocusendif*-模糊比較serexactoff“取消”按鈕的”click”事件代碼如下:*-釋放登錄表單thisform.release*-清除事件循環(huán)clearevents*-退出visual

23、foxproquit至此,”系統(tǒng)登錄”表單創(chuàng)建完成。4.3.2創(chuàng)建“修改密碼”表單首先要?jiǎng)?chuàng)建表單界面，在表單中添加3個(gè)標(biāo)簽控件，4個(gè)文本框控件，2個(gè)按鈕控件，布局如下：然后向“修改密碼”表單中添加“確定”按鈕的“click”事件代碼如下：setexacton*-進(jìn)入數(shù)據(jù)檢查*-檢查原密碼select用戶信息locateforalltrim(用戶名)=alltrim(thisform.txt用戶名.value);.and.alltrim(密碼)=alltrim(thisform.txt原密碼.value)if.not.found()messagebox(“原密碼錯(cuò)誤,請(qǐng)重新輸入”,48”進(jìn)銷(xiāo)存管

24、理系統(tǒng)”)thisform.txt原密碼.setfocusreturnendif*-如果”密碼”欄為空ifempty(alltrim(thisform.txt新密碼.value).and.empty(alltrim(thisform.txt.確認(rèn)密碼.valre)messagebox(“密碼不能為空”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt新密碼.setfocusreturnendif*-如果兩次密碼不一致ifalltrim(thisform.txt新密碼.value)alltrim(thisform.txt確認(rèn)密碼.value)messagebox(“密碼與確認(rèn)密碼不一致”,48

25、,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt新密碼.setfocusreturnendif*-獲取表單中各數(shù)據(jù)項(xiàng)的值sname=alltrim(thisform.txt用戶名.value)spass=alltrim(tihsform.txt新密碼.value)*-確定對(duì)話框yn=messagebox(“確定保存”,4+32,”進(jìn)銷(xiāo)存管理系統(tǒng)”)*-如果確認(rèn)ifyn=6*-修改密碼update用戶信息set密碼=spasswhere用戶名=snamemessagebox(“密碼修改成功”,64,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.releaseendifsteexactoff“修改密碼”表單

26、中”取消”按鈕的功能設(shè)計(jì)是被單擊退出當(dāng)前表單,該按鈕的”click”時(shí)間代碼如下:thisform.rrlrase4.4信息管理模塊設(shè)計(jì)本模塊由“商品信息管理”功組成，該功能由“商品信息管理”和“輸入查詢條件”表單完成。4.4.1“商品信息管理”表單“商品信息管理”表單界面如下圖：“商品信息管理”表單中的“checkempty”方法代碼如下：*-如果商品信息為空ifeof().and.bof().orreccount()=0thisform.mygroup.cmdtop.enabled=.f.thisform.mygroup.cmdpre.enabled=.f.thisform.mygroup

27、.cmdnext.enabled=.f.thisform.mygroup.cmdbtm.enabled=.f.thisform.mygroup.cmdadd.enabled=.f.thisform.mygroup.cmdedit.enabled=.f.thisform.mygroup.cmddel.enabled=.f.thisform.mygroup.cmdexit.enabled=.f.returnendif*如果“商品消息”表只有一條記錄ifreccount（）=1thisform.mygroup.cmdtop.enabled=.f.thisform.mygroup.cmdpre.ena

28、bled=.f.thisform.mygroup.cmdnext.enabled=.f.thisform.mygroup.cmdbtm.enabled=.f.returnendif*如果記錄指針位于第1條記錄并且處于“瀏覽”狀態(tài)ifbof（）.or.recno()=1.and.thisform.formmode=.f.thisform.mygroup.cmdtop.enabled=.f.thisform.mygroup.cmdpre.enabled=.f.thisform.mygroup.cmdnext.enabled=.t.thisform.mygroup.cmdbtm.enabled=.t

29、.rerurnendif*如果記錄指針位于最后1條并且處于“瀏覽”狀態(tài)ifbof（）.or.recno()1.and.recno()reccunt()thisform.mygroup.cmdtop.enabled=.t.thisform.mygroup.cmdpre.enabled=.t.thisform.mygroup.cmdnext.enabled=.t.thisform.mygroup.cmdbtm.enabled=.t.rerurnendif“商品信息管理”表單中的“setmode”方法代碼如下*formmode為.f.表示為瀏覽狀態(tài)*formmode為.t.表示為修改狀態(tài)*控制表單中

30、文本框thisform.setall(“readonly”,!formmode,“textbox”)*控制編輯框thisform.edt說(shuō)明.readonly=!formmode*控制組合框thisform.cmp商品類(lèi)別.enabled=formmode*控制命令組中的命令按扭thisform.mygrop.cmdsearch,enabled=!formmodethisform.mygrop.cmdadd,enabled=!formmodethisform.mygrop.cmdexit,enabled=!formmode*移動(dòng)記錄按扭thisform.mygrop.cmdtop,enable

31、d=!formmodethisform.mygrop.cmdpre,enabled=!formmodethisform.mygrop.cmdnext,enabled=!formmodethisform.mygrop.cmdbtm,enabled=!formmode*修改狀態(tài)時(shí)ifformmode=.t.thisform.mygroup.cmdedit.caption=”保存”thisform.mygroup.cmddel.caption=”恢復(fù)”thisform.mygroup.cmdedit.tooltiotext=”保存對(duì)記錄的修改”thisform.mygroup.cmddel.tool

32、tiptext=”s刪除當(dāng)前記錄”endif因此，如果要使表的單進(jìn)入“瀏覽”狀態(tài)，則只需要使用如下代碼即可。thisform.formmode=.f.thisform.sermodethisform.refresh相應(yīng)地，如果要使表單進(jìn)入“修改”狀態(tài)，則只需要使用如下代碼即可。thisform.formmode=.thisform.sermodethisform.refresh“mygroup”命令組中的“編輯“按鈕”的“click”事件代碼：*如果是作為“編輯”按扭時(shí)ifthis.caption=”編輯”*保存記錄指針位置select商品信息thisform.oldrecord=recno(

33、)*使表單進(jìn)入“瀏覽”狀態(tài)thisform.formmode=.t.thisform.setmodethisform.refreshreturnendif*如果是作為“保存”按扭時(shí)ifthis.caption=”保存”*如果商品標(biāo)號(hào)為空ifempry(alltrm(thisform.txt商品編號(hào).value)messagebox(“商品編號(hào)不能為空”，48，“進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt商品編號(hào).setfocusrerurnendif*如果商品名稱(chēng)為空ifempty(alltrim(thimform.txt商品名稱(chēng).value)messagebox(“商品名稱(chēng)不能為空”，48，

34、“進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt商品名稱(chēng).serfocusreturnendif*如果商品單位為空ifempty(alltrim(thimform.txt商品單位.value)messagebox(“商品單位不能為空”，48，“進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt商品單位.serfocusreturnendif*如果商品單位小于或者等于0ifthisform.txt商品單價(jià).value0gothisform.oldrecordendif*回到“瀏覽”狀態(tài)thisform.formmode=.f.thisform.setmodethisform.refreshendifretu

35、rnendif*如果按扭標(biāo)題為“刪除”ifthisform.caption=”刪除”*確認(rèn)對(duì)話框yn=messagebox(“確認(rèn)刪除”，4+32，“進(jìn)銷(xiāo)存管理系統(tǒng)”)如果確認(rèn)ifyn=6*刪除記錄select商品信息delefpackthisform.checkemptyendifendif“退出”按鈕的“click”事件代碼如下：thisform.release至此，“商品信息管理”表單創(chuàng)建完成。4.4.2“輸入查詢條件”表單在項(xiàng)目管理器中新建一個(gè)表單作為“輸入查詢條件”表單，保存為“searchkey”,在表單中添加一個(gè)文本框控件，一個(gè)組合框控件，兩個(gè)標(biāo)簽控件和兩個(gè)按鈕控件。向頁(yè)面中添加

36、控件，如圖：輸入查詢條件”表單中的“確定”按鈕的“click”事件代碼：*聲明變量localfindstr,oldrecord,stable*如果沒(méi)有選擇查詢字段ifthisform.findlx.value=”messagebox(“沒(méi)有選擇查詢字段”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)*如果選擇了字段*模糊比較setexactoffselect商品信息*根據(jù)選項(xiàng)指定查詢條件docasecasethisform.findlx.value=”商品編號(hào)”findstr=”+alltrim(thisform.findkey.value)=”$”+”商品編號(hào)”casethisform.findlx.valu

37、e=”商品名稱(chēng)”findstr=”+alltrim(thisform.findkey.value)=”$”+”商品名稱(chēng)”casethisform.findlx.value=”商品產(chǎn)地”findstr=”+alltrim(thisform.findkey.value)=”$”+”商品產(chǎn)地”casethisform.findlx.value=”商品類(lèi)別”findstr=”+alltrim(thisform.findkey.value)=”$”+”商品類(lèi)別”endcase*保存記錄指針位置oldrecord=recno()*設(shè)置過(guò)濾條件setfilterto&findstrgotop*循環(huán)dowhi

38、le.not.eof()*刷新“商品信息管理”表單preadmin.refresh*將表單最小化thisform.windowstate=1ifmessagebox(“是本筆記錄嗎？”，4+32,“進(jìn)銷(xiāo)存管理系統(tǒng)”）=6*已找到指定的記錄exitelse*未找到指定的記錄skip*刷新“商品信息管理”表單proadmin.refeshendif*將表單還原thisform.windowstate=0enddo*如果到了表的末尾ifeof()messagebox（“未找到指定的記錄”，48，“進(jìn)銷(xiāo)存管理系統(tǒng)”）*回到原紀(jì)錄gooldrecordendif*清楚過(guò)濾條件setfilterto*刷新

39、“商品信息管理”表單proadmin.refresh*退出當(dāng)前表單thisform.releaseendif“輸入查詢條件”表單中的“取消”按鈕的“click”事件代碼：thisform.release至此，“輸入查詢條件”表單創(chuàng)建完成。4.5日常操作模塊設(shè)計(jì)“超市進(jìn)銷(xiāo)存管理系統(tǒng)“中的日常操作模塊包括“商品進(jìn)貨操作”和“商品出貨”操作功能，分別由“商品進(jìn)貨操作”表單和“商品出貨”表單來(lái)完成。4.5.1“商品進(jìn)貨操作”表單創(chuàng)建表單界面：添加一個(gè)復(fù)選框和兩個(gè)按鈕控件，將“進(jìn)貨信息”表，“商品信息”表和“庫(kù)存信息表”添加到表單的數(shù)據(jù)環(huán)境中。控件布局如下：添加“autoadd函數(shù)代碼：*作用：使“00

40、0000xx”形式的編號(hào)自動(dòng)加1functionautoadd(ncode)*-獲取字符串長(zhǎng)度nlen=len(ncode)*-將字符型轉(zhuǎn)換為數(shù)值型，即獲取非0部分的數(shù)值ncode=val(ncode)*-非0部分?jǐn)?shù)字加1ncode=ncode+1*轉(zhuǎn)換為字符型ncode=alltrim(str(ncode)*獲取轉(zhuǎn)換后的字符長(zhǎng)度nlength=len(ncode)*在數(shù)字之前加上前置“0”nzero=”0000000000”ncode=substr(nzero,1,nlen-nlength)+ncode*返回結(jié)果returnncodeendfunc4.5.2“商品出貨操作”表單創(chuàng)建表單界面：

41、在項(xiàng)目管理器中新建一個(gè)表單為“商品出貨表單”,命名為：”“outact”，將將“進(jìn)貨信息”表，“商品信息”表和“庫(kù)存信息表”添加到表單的數(shù)據(jù)環(huán)境中，從數(shù)據(jù)環(huán)境中將要在表單中顯示的字段拖到表單中，并做適當(dāng)調(diào)整，然后添加一個(gè)復(fù)選框控件，兩個(gè)按鈕控件，創(chuàng)建好的表單布局如下圖：添加“商品出貨操作”表單的“iniit”事件代碼：*使用當(dāng)前日期生成進(jìn)貨編號(hào)前6位leftno=substr(alltrim(str(year(date()、3)；+alltrim（str（month（date()）;+alltrim(str(day(date();*_從“出貨信息”中生成進(jìn)貨編號(hào)后4位select出貨信息set

42、orderto出貨編號(hào)setfrltertosetfrltertottod（出貨信息.出貨時(shí)間）=date()gobottomif出貨信息.出貨編號(hào)=”righno=“0000”elserighno=substr(出貨信息.出貨編號(hào)、7）endif*-對(duì)后4位增1righno=autoadd(rightno)*-完整編號(hào)fullno=leftno+rightno*-在表單中顯示thisform.txt出貨編號(hào).value=fullnothisform.txt出貨時(shí)間.value=datetime()thisform.txt出貨數(shù)量.value=0thisform.txt出貨單價(jià).value=0

43、thisform.txt經(jīng)手人.value=”thisform.txt接收人.value=”thisform.cmb商品編號(hào).value=”*-刷新表單thisform.refresh添加“商品出貨操作”表單的“確定”按鈕的事件代碼：*-獲取表單中的數(shù)據(jù)outno=alltrim(thisform.txt出貨編號(hào).valuepno=thisform.cmb商品編號(hào).valueoutcount=thisform.txt出貨數(shù)量.valueoutprice=thisform.txt出貨單價(jià).valueouttime=thisform.txt出貨時(shí)間.valueoutperson=alltrim(t

44、hisform.txt經(jīng)手人.value.outdanwei=alltrim(thisform.txt接收人.value.outnote=thisform.edt說(shuō)明.value*-如果商品編號(hào)為空ifpno=”messagebox(“商品編號(hào)為空或錯(cuò)誤”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.cmb商品編號(hào).setfocusreturnendif*-檢查商品編號(hào)合法性dimensionrecnum(1)recnum=2selectcount(*)from商品信息where商品編號(hào)=pnointoarrayrecnumifrecnum1messagebox(“商品編號(hào)錯(cuò)誤”,48,”進(jìn)銷(xiāo)

45、存管理系統(tǒng)”)thisform.cmb商品編號(hào).setfocusendif*-如果沒(méi)有庫(kù)存ifthisform.txt庫(kù)存數(shù)量.value=0messagebox(“該商品沒(méi)有庫(kù)存”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.cmb商品編號(hào).value=”thisform.cmb商品編號(hào).setfocusreturnendif*-如果出貨數(shù)量小于0或者大于庫(kù)存數(shù)量ifoutcount=0messagebox(“出貨數(shù)量錯(cuò)誤”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt出貨數(shù)量.setfocusreturnendif*-如果進(jìn)貨單價(jià)小于0ifoutprice=0messagebox(“

46、出貨單價(jià)錯(cuò)誤”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt出貨單價(jià).setfocusreturnendif*-如果經(jīng)手人為空ifoutperson=”messagebox(“經(jīng)手人不能為空”,48,”進(jìn)銷(xiāo)存管理系統(tǒng)”)thisform.txt經(jīng)手人.setfocusreturnendif*-在進(jìn)貨信息表中插入記錄begintransinsertint出貨信息values(outcount,pno,outcount,outprice,outtime，outdanweioutperson,outnote)*-更新庫(kù)存信息表update庫(kù)存信息set庫(kù)存數(shù)量=庫(kù)存數(shù)量-outcountwhe

47、re商品編號(hào)=pnoendtrans*-如果選中了復(fù)選框ifthisform.check1.value=1reportformoutviewfor出貨編號(hào)=thisform.txt出貨編號(hào).valuepreviewendif*-對(duì)話框messagebox(“出貨成功”,64,”進(jìn)銷(xiāo)存管理系統(tǒng)”)*-初始化表單thisform.initthisform.rsfresh“商品出貨操作”表單的“取消”按鈕的事件代碼:thisform.release至此“商品出貨操作”表單創(chuàng)建完成。4.6信息查詢模塊設(shè)計(jì)“超市進(jìn)銷(xiāo)存管理系統(tǒng)”中的信息查詢模塊由“進(jìn)貨信息查詢”，“出貨信息查詢”和“庫(kù)存信息查詢”3個(gè)功

48、能組成，分別由“進(jìn)貨記錄查詢”，出貨記錄查詢“，”庫(kù)存記錄查詢“3個(gè)表單完成。4.6.1創(chuàng)建“進(jìn)貨信息查詢”表單在項(xiàng)目管理器中創(chuàng)建一個(gè)表單作為“進(jìn)貨信息查詢”表單，保存為“insearch”,將“inview”視圖和“系統(tǒng)設(shè)置”表添加到表單的數(shù)據(jù)環(huán)境中。在表單中添加一個(gè)表格控件，六個(gè)標(biāo)簽控件，五個(gè)文本框控件，一個(gè)組合框控件和兩個(gè)按鈕控件，如下圖：4.6.2創(chuàng)建“出貨信息查詢”表單“出貨信息查詢”表單用來(lái)查詢出貨記錄，該表單提供了按照商品編號(hào)，商品名稱(chēng)，商品類(lèi)別，經(jīng)手人，接收人和出貨日期等多種查詢方式。在項(xiàng)目管理器中新建一個(gè)表單作為“出貨信息查詢”表單，保存為“outsearch”,將“outv

49、iew”視圖和“系統(tǒng)設(shè)置”表添加到表單的數(shù)據(jù)環(huán)境中。在表單中添加一個(gè)表格控件，一個(gè)組合框控件，五個(gè)文本框控件，六個(gè)標(biāo)簽控件和兩個(gè)命令按鈕控件，創(chuàng)建好的“出貨信息查詢”表單如下圖：添加“出貨信息查詢”表單代碼：*-收集查詢條件searchfiler=”.t.”ifnotempty(alltrim(thisform.txt商品編號(hào).value)searchfiler=searchfiler+”and”+alltrim(thisform.txt商品編號(hào).value)+”s商品編號(hào)”endififnotempty(thisform.txt商品名稱(chēng).value)searchfiler=searchfiler+”and”+alltrim(thisform.txt商品名稱(chēng).value)+”s商品名稱(chēng)”endififnotempty(alltrim(thisform.cmb商品類(lèi)別.value)searchfiler=searchfiler+”and”+alltrim(thisform.txt商品類(lèi)別.value)+”s商品類(lèi)別”endififnotempty(thisform.txt經(jīng)手人.value)searchfiler=searchfiler+”and”+alltrim(thisform.txt經(jīng)手人.value)+”s經(jīng)手人”endififnotempty(thisform.