VFP倉庫管理系統(tǒng)課程設(shè)計報告

1、甘帚椽電就榮放術(shù)罟院 -VFP程序設(shè)計實訓(xùn)報告系 另q： 經(jīng)濟與信息管理系班 級：G113501學(xué) 號：G11350133姓 名：楊琪琪指導(dǎo)教師：張海峰 VFP程序設(shè)計課程實訓(xùn)說明、課程設(shè)計題目倉庫管理系統(tǒng)1. 功能描述滿足基本的功能主要包括：1. 滿足倉庫物品查詢功能以及分類查詢的功能2. 滿足倉庫物品出入庫統(tǒng)計的功能3. 滿足倉庫物品各種信息記錄的功能4. 滿足統(tǒng)計物品信息的功能5. 可制作報表6. 出入庫數(shù)據(jù)記錄7. 管理員及普通用戶的權(quán)限8. 滿足保密功能二、概要設(shè)計：（一）、整體系統(tǒng)歡迎界面（二）、打開倉庫管理系統(tǒng)，首先展示的是歡迎界面，此界面顯示 當(dāng)前日期，并且含有說明文字等。此界

2、面可以退出，即退出系統(tǒng)。（三）、權(quán)限選擇中對管理員與普通用戶的權(quán)限進行分類，其中 普通用戶只擁有瀏覽的權(quán)限，而管理員擁有查看、統(tǒng)計、打印，瀏覽 等權(quán)限。此界面可以退出，即退出本界面。（四）、登陸界面包括普通用戶登陸界面和管理員登陸界面，兩者 都需要鍵入賬戶名和密碼，密碼錯誤不得進入。此界面可以退出，即 退出本界面。（五）、管理員輸入正確賬戶名和密碼后，進入主要功能界面，此 功能界面比較清楚簡潔地展示了管理員享有的各個功能，對功能進行 細(xì)分。主要有：詳細(xì)瀏覽、入庫瀏覽、按物品名查詢、按庫房號查詢、 按編號查詢、添加、統(tǒng)計、打印等功能。此界面可以退出，即退出本 系統(tǒng)。普通用戶輸入正確用戶名和密碼后

3、進入詳細(xì)瀏覽界面，在此界 面普通用戶享有查看庫存物品編號、品名、產(chǎn)地、進口否、庫房號、 照片的權(quán)限，且此界面含有功能按鈕進行幫助快速瀏覽。 此界面可以 退出，即退出本界面。（六）a、管理員進入詳細(xì)瀏覽界面，在此界面普通用戶享有查看庫存 物品編號、品名、產(chǎn)地、進口否、庫房號、照片的權(quán)限，且此界面含 有功能按鈕進行幫助快速瀏覽。此界面可以退出，即退出本界面。b、管理員進入入庫瀏覽界面，在此界面里管理員可以查看物品 的編號、庫房號、品名、類別，且此界面含有功能按鈕進行幫助快速 瀏覽。此界面可以退出，即退出本界面。c、管理員進入按編號查詢界面，在此界面管理員可以輸入物品 編號進行快速查詢物品的信息，而

4、且可以使用用清除鍵快速清除輸入 編號。此界面可以退出，即退出本界面。d、管理員進入按品名查詢界面。在此界面管理員可以輸入物品 名進行快速查詢，進而查看物品的信息，而且可以使用清除鍵快速清 除輸入的品名。此界面可以退出，即退出本界面。e、管理員進入按庫房號查詢界面。在此界面管理員可以在組合 框里選擇需要查詢的庫房進行快速查詢， 進而查看物品的信息。此界 面可以退出，即退出本界面。f、管理員進入添加物品界面。在此界面管理員可以在物品信息 框里鍵入物品的各種信息，點擊添加按鈕，把入庫的新物品追加的數(shù) 據(jù)庫的物品詳細(xì)表中。此界面可以退出，即退出本界面。g、管理員進入統(tǒng)計界面。在此界面管理員可以在選項按

5、鈕組中 選擇需要統(tǒng)計的依據(jù)，可以按類別、進口否及庫房號進行統(tǒng)計，進而 查看各種統(tǒng)計信息。此界面可以退出，即退出本界面。h、管理員進入打印界面，在此界面管理員享有打印、預(yù)覽報表 的功能。此界面可以退出，即退出本界面。四、詳細(xì)設(shè)計：1. 建立自由表。建立管理員（gly ）、密碼（mr）入庫詳細(xì)表（rkxx ）、 物品詳細(xì)表（wpxx）。2. 建立表單。a. 建立詳細(xì)瀏覽表單（xxll ）。按上圖建立標(biāo)簽，文本框，命令按鈕。右鍵添加數(shù)據(jù)環(huán)境，添加wpxx設(shè)置controlsource ，字符數(shù)等屬性第一個的代碼是：go topthisform.refresh上一個的代碼是：if .n ot.bof(

6、)skip -1thisform.refresh elsemessagebox（已經(jīng)是第一個了 ）en dif下一個的代碼是：if .no t.eof（）skip 1thisform.refreshelsemessagebox（已經(jīng)是最后一個了 ）en dif末一個的代碼時：go bottomthisform.refresh退出的代碼是：thisform.releaseb、建立入庫瀏覽表（rkll ）按上圖建立標(biāo)簽，命令按鈕，文本框右鍵添加數(shù)據(jù)環(huán)境，添加rkxx表設(shè)置controlsource ，字符數(shù)等屬性第一個的代碼是：go topthisform.refresh上一個的代碼是：if .n

7、 ot.bof()skip -1thisform.refresh elsemessagebox（已經(jīng)是第一個了 ）en dif下一個的代碼是：if .no t.eof（）skip 1thisform.refreshelsemessagebox（已經(jīng)是最后一個了 ）en dif末一個的代碼時：go bottomthisform.refresh退出的代碼是：thisform.releasec、建立品名查詢表（pmcx）按上圖新建三個按鈕，一個文本框，一個標(biāo)簽，一個表格，設(shè)置屬性 查詢的代碼是：select * from wpxx where 品名=alltrim(thisform.text1.va

8、lue) into cursor aathisform.gridl.recordsource二aathisform.refresh清除的代碼是：thisform.text1.value=退出的代碼是：thisform.release共25 頁 第21 頁d、建立庫房查詢表單（kfcx ） 7740963按圖建立組合框，按鈕及表格，設(shè)置屬性。右鍵，把rkxx和wpxx添加入，設(shè)置屬性，右鍵組合框在組合框生成器里添加庫房字段，設(shè)置屬性。其中查詢的代碼是:select * from rkxx where庫房號二bo1.value intocursor hh thisform.grid1.record

9、source=hh thisform.refresh退出的代碼是：thisform.releasef、建立編號查詢表單(bhcx)按上圖建立一個標(biāo)簽，一個文本框，三個按鈕，一個表格，設(shè)置屬性。 其中查詢的命令為：select * from wpxx where 編號=alltrim(thisform.text1.value)into cursor aathisform.grid1.recordsource=aathisform.re清除的命令是：thisform.textl.value二退出的命令是：thisform.releaseg、建立添加表單（tjwp ）右鍵添加wpxx到數(shù)據(jù)環(huán)境，設(shè)置

10、屬性，將編號、類別、庫房號、規(guī) 格、品名、產(chǎn)地拖到表單上，設(shè)置屬性。添加的代碼是：m=messagebox（是否保存？ ,4+48,信息窗口 ”）if m=6messagebox（信息已保存,48,信息窗口 ”）elsedeletepacken dif appe nd bla nkthisform.txt 編號.setfocusthisform.refresh退出的代碼是：deletepackthisform.release useh、建立統(tǒng)計表單（tj ）按上圖建立選項按鈕組，數(shù)量為 3,建立兩個按鈕及一個表格，設(shè)置屬性。統(tǒng)計的代碼是：do casecase thisform.opti on

11、 group1.value=1select類別 1 ,count(*) as物品數(shù) from wpxx group byinto cursor aathisform.grid1.recordsource=aathisform.refreshcase thisform.optio ngroup1.value=2select進口否,count(*) as 物品數(shù) from wpxx group by否 into cursor bbthisform.grid1.recordsource=bbthisform.refreshcase thisform.optio ngroup1.value=3sele

12、ct庫房號,cou nt(*) as 物品數(shù) from wpxx group by號 into cursor ccthisform.grid1.recordsource=ccthisform.refreshendcase退出的代碼是：Thisform.release類別進口庫房i、建立報表編號品名類別入庫時間庫房號業(yè)頁標(biāo)頭師右一KHffi匡房號按上圖建立報表。添加數(shù)據(jù)環(huán)境rkxx，將字段拖進報表設(shè)置屬性 預(yù)覽效果如下圖:物品入庫明細(xì)編號品名類別入庫時間slOl大白菜生鮮11/12/01s03102魚干生鮮11/09/25sOsi 03海帶生鮮11/08/30sOr201花露水日用11/09/2

13、2rOf1j、建立打印表單（dy）IL 1按上圖建立一個選項按鈕組，數(shù)量為2及兩個按鈕，設(shè)置屬性。確定的代碼是：do casecase thisform.optio ngroup1.value=2report form 報表 en vir onment to prin terthisform.refreshcase thisform.optio ngroup1.value=1report form 報表 en vir onment previewthisform.refreshendcase退出的代碼是：thisform.releasek、建立程序1內(nèi)容為：do form hyjmread e

14、ve ntsl、建立功能界面（gnjm）建立lablel 及10個命令按鈕如下圖:詳細(xì)瀏覽的命令為:do form xxll入庫瀏覽的命令為:do form rkll按物品名的命令為:do form pmxx按庫房名的命令為：do form kfcx按編號的命令為：do form bhcx添加的命令為：do form tjwp統(tǒng)計的命令為：do form tj打印的命令為：do form dy退出的命令為：quitm建立管理員登陸表單（glydl ）按上圖建立兩個標(biāo)簽，兩個按鈕，一個組合框，一個文本狂，設(shè)置屬 性。右鍵添加mn和gly表，設(shè)置屬性。登陸的代碼是：go toplocate for

15、 管理員 二alltrim(bol.value)if 密碼 二alltrim(thisform.textl.value)messagebox(可以進入！)do form gnjm elsei=i+1if i=3messagebox（ 密碼錯,重新輸入！ ”）thisform.textl.value二elsemessagebox（ 信息錯，禁止進入！”）quiten difen dif退出的代碼是：thisform.releasen、建立普通用戶登陸表單（ptyhdl ）共25 頁 第# 頁按上圖建立兩個標(biāo)簽，兩個按鈕，兩個文本狂，設(shè)置屬性。登陸的代碼是：andi=i+1IFTHISFORM.T

16、extl.Value二黃 麗 麗 ”THISFORM.Text2.Value二1111MESSAGEBOX（密碼正確！可以進入系統(tǒng)?。ヾo form pmxxTHISFORM.ReleaseELSEIF i3MESSAGEBOX（密碼或帳戶錯！請重新輸入?。㏕HISFORM.Text1.value二THISFORM.Text2.value二THISFORM.Text1.SetfocusELSEMESSAGEBOX（密碼或帳戶錯！禁止進入系統(tǒng)?。?quitENDIFENDIF退出的代碼是：o、建立權(quán)限選擇表單（qxxz）新建 opiongroup1,buttoncount設(shè)置為 2新建兩個命令按

17、鈕，caption分別為“進入” “退出 設(shè)置picture ,及命令按鈕組的屬性 backstyle , fontsize，對其進行單獨屬性設(shè)置。進入的代碼是:do casecase thisform.optio ngroup1.value=1 do form glydl thisform.releasedo form ptyhdlthisform.releasecase thisform.optio ngroup1.value=2共25 頁 第27 頁endcase退出的代碼是:Thisform.releasep、建立歡迎界面表單（hyjm）點擊界面，設(shè)置 picture，新建 lablel , lable3 , label2 caption為“現(xiàn)在是” “歡迎使用倉庫管理系統(tǒng)”“”新建兩個命令按鈕，caption為“進入” “退出”進入代碼是：do form qxxz退出代碼是:quit點擊屬性 backstyle , fontsize , forecolo