./福建工程學(xué)院課程設(shè)計(jì)課程：數(shù)據(jù)庫(kù)系統(tǒng)概論題目：倉(cāng)庫(kù)管理系統(tǒng)專(zhuān)業(yè)：計(jì)算機(jī)科學(xué)與技術(shù)班級(jí)：座號(hào)：姓名：20xx6月12日一、系統(tǒng)定義隨著各個(gè)公司經(jīng)營(yíng)的X圍慢慢擴(kuò)大,業(yè)務(wù)流量比較大,需要處理的數(shù)據(jù)比較多,為了能對(duì)公司的業(yè)務(wù)進(jìn)行有效的管理,減少手工操作的繁瑣,同時(shí)可以根據(jù)公司業(yè)務(wù)的運(yùn)營(yíng)情況,分析出公司發(fā)展的潛在信息,順應(yīng)時(shí)代的發(fā)展變化,使管理更加簡(jiǎn)單化。二、需求分析1、最終倉(cāng)庫(kù)管理系統(tǒng)功能如下：資料管理功能人員信息：用于登記公司的員工信息資料、客戶(hù)信息資料、和供應(yīng)商信息資料,對(duì)員工信息資料支持員工信息的錄入、修改和刪除。最高權(quán)限的管理員能錄入和刪除工作人員,普通權(quán)限的工作人員只能修改自己的密碼產(chǎn)品信息：支持產(chǎn)品信息的錄入、修改和刪除,可以對(duì)各個(gè)產(chǎn)品進(jìn)行查詢(xún)。業(yè)務(wù)管理功能進(jìn)出倉(cāng)庫(kù)明細(xì)：用于查看進(jìn)貨明細(xì)、進(jìn)貨退貨、銷(xiāo)售明細(xì)、銷(xiāo)售退貨、實(shí)現(xiàn)錄入、修改和刪除。退貨時(shí),需要指定相應(yīng)的退貨單,可以查詢(xún)進(jìn)出倉(cāng)庫(kù)明細(xì)。盤(pán)庫(kù)：通過(guò)人工清點(diǎn)當(dāng)前庫(kù)存物品,與理論上倉(cāng)庫(kù)內(nèi)物品數(shù)量對(duì)比,分析盤(pán)盈、盤(pán)虧問(wèn)題統(tǒng)計(jì)分析功能物品分析：用于對(duì)物品進(jìn)行分析,主要是銷(xiāo)售分析,包括對(duì)利潤(rùn)、進(jìn)貨、退貨、庫(kù)存等進(jìn)行分析,可以通過(guò)報(bào)表顯示。人員分析：由于需求加大,需要各種職務(wù)的工作人員,分析職務(wù)需求,可供人才參考利潤(rùn)分析：對(duì)產(chǎn)品銷(xiāo)售的利潤(rùn)進(jìn)行分析,可以看出貨物的供求關(guān)系系統(tǒng)幫助功能：制作人員介紹使用幫助2、給出系統(tǒng)的邏輯模型：數(shù)據(jù)流程圖、數(shù)據(jù)字典數(shù)據(jù)流圖例子〔可根據(jù)需要用多層數(shù)據(jù)流圖表示〕：采購(gòu)貨物數(shù)據(jù)流圖：數(shù)據(jù)字典：數(shù)據(jù)項(xiàng)：倉(cāng)庫(kù)：{倉(cāng)庫(kù)編號(hào),倉(cāng)庫(kù)名,倉(cāng)庫(kù)類(lèi)型,管理員,員工編號(hào)}；供應(yīng)商：{供應(yīng)商編號(hào),XX,聯(lián)系方式,地址}；供應(yīng)商供應(yīng)的貨物存入倉(cāng)庫(kù)數(shù)據(jù)結(jié)構(gòu)：供應(yīng)商提供貨物,存入相應(yīng)的倉(cāng)庫(kù)數(shù)據(jù)流：需求的貨物進(jìn)入相應(yīng)的倉(cāng)庫(kù)數(shù)據(jù)存儲(chǔ)：產(chǎn)品描述,應(yīng)付款處理過(guò)程：需求貨物->送訂單號(hào)->訂單處理->付款->貨物入庫(kù)管理數(shù)據(jù)流圖：數(shù)據(jù)字典：數(shù)據(jù)項(xiàng)：?jiǎn)T工：{員工編號(hào),XX,登錄密碼,性別,生日,聯(lián)系方式,職稱(chēng),家庭住址}；貨物：{貨物編號(hào),名稱(chēng),類(lèi)型,數(shù)量,單位,進(jìn)價(jià),售價(jià),訂單號(hào)}；管理員管理倉(cāng)庫(kù)和資料庫(kù)數(shù)據(jù)結(jié)構(gòu)：管理員進(jìn)行相關(guān)的操作,顯示相應(yīng)的信息,或存儲(chǔ)相應(yīng)的物品、資料數(shù)據(jù)流：操作信息,操作數(shù)據(jù),相關(guān)信息表數(shù)據(jù)存儲(chǔ)：查詢(xún)時(shí)將數(shù)據(jù)信息顯示出來(lái),入出庫(kù)數(shù)據(jù)進(jìn)行存儲(chǔ)處理等等處理過(guò)程：管理員操作->獲得操作信息->實(shí)行相應(yīng)的處理三、系統(tǒng)設(shè)計(jì)1、概念結(jié)構(gòu)設(shè)計(jì)畫(huà)出系統(tǒng)E-R圖。2、邏輯結(jié)構(gòu)設(shè)計(jì)將E-R圖〔或其他概念設(shè)計(jì)圖〕轉(zhuǎn)換為具體的DBMS對(duì)應(yīng)的關(guān)系模式。員工：{員工編號(hào),XX,登錄密碼,性別,生日,聯(lián)系方式,職稱(chēng),家庭住址}；貨物：{貨物編號(hào),名稱(chēng),類(lèi)型,單位,進(jìn)價(jià),售價(jià)}；倉(cāng)庫(kù)：{倉(cāng)庫(kù)編號(hào),倉(cāng)庫(kù)名,倉(cāng)庫(kù)類(lèi)型,員工編號(hào)}；供應(yīng)商：{供應(yīng)商編號(hào),XX,聯(lián)系方式,地址}；客戶(hù)：{客戶(hù)編號(hào),貨物編號(hào),XX,聯(lián)系方式,地址,訂單號(hào)}；庫(kù)存:{倉(cāng)庫(kù)編號(hào),貨物編號(hào),數(shù)量}進(jìn)倉(cāng)：{入單號(hào),進(jìn)倉(cāng)時(shí)間,入庫(kù)數(shù)量,所付金額}出倉(cāng)：{出單號(hào),出倉(cāng)時(shí)間,出庫(kù)數(shù)量,所付金額}盤(pán)庫(kù)：{盤(pán)庫(kù)號(hào),盤(pán)庫(kù)時(shí)間,盤(pán)庫(kù)數(shù)量}數(shù)據(jù)庫(kù)設(shè)計(jì)：?jiǎn)T工表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1staff_no可變字符10否是員工編號(hào)2staff_password可變字符10否否登錄密碼3staff_name可變字符10否否員工XX4staff_sex字符2否否性別5staff_birthday日期可否出生日期6staff_phone字符15否否聯(lián)系方式7staff_rank字符10否否職稱(chēng)8staff_family_address可變字符50可否家庭住址倉(cāng)庫(kù)表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1cangku_no可變字符10否是倉(cāng)庫(kù)編號(hào)2cangku_name可變字符10否否倉(cāng)庫(kù)名3cangku_type可變字符10否否倉(cāng)庫(kù)類(lèi)型4staff_no可變字符10否否員工編號(hào)貨物表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1material_no可變字符10否是貨物編號(hào)2material_name可變字符10否否貨物名3material_type可變字符10否否貨物類(lèi)型4material_in_price可變字符10否否進(jìn)價(jià)5material_out_price可變字符10否否出價(jià)6material_unit字符4否否單位供應(yīng)商表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1supplier_no可變字符10否是供應(yīng)商編號(hào)2material_no可變字符10否是貨物編號(hào)3supplier_name可變字符10否否供應(yīng)商XX4supplier_phone字符15否否聯(lián)系方式5supplier_address可變字符50可否住址客戶(hù)表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1kehu_no可變字符10否是客戶(hù)編號(hào)2kehu_name可變字符10否否客戶(hù)XX3kehu_password可變字符10否否登錄密碼4kehu_phone字符15否否聯(lián)系方式5kehu_address可變字符50可否住址進(jìn)倉(cāng)表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1rudan_no整形否否入單號(hào)2supplier_no可變字符10否否供應(yīng)商編號(hào)3material_no可變字符10否否貨物編號(hào)4in_data日期否否進(jìn)倉(cāng)時(shí)間5ru_qty長(zhǎng)整形否否進(jìn)倉(cāng)數(shù)量6supp_pay長(zhǎng)整形否否所付金額7staff_no員工編號(hào)10否否員工編號(hào)出倉(cāng)表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1chudan_no整形否否出單號(hào)2kehu_no可變字符10否否客戶(hù)編號(hào)3material_no可變字符10否否貨物編號(hào)4out_data日期否否出倉(cāng)時(shí)間5chu_qty長(zhǎng)整形否否出倉(cāng)數(shù)量6kehu_pay長(zhǎng)整形否否所付金額7staff_no員工編號(hào)10否否員工編號(hào)庫(kù)存表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1cangku_no可變字符10否是倉(cāng)庫(kù)號(hào)2material_no可變字符10否是貨物編號(hào)3qty長(zhǎng)整形否否數(shù)量盤(pán)庫(kù)表序號(hào)字段名稱(chēng)數(shù)據(jù)類(lèi)型大小可否為空主鍵說(shuō)明1panku_no可變字符10否否盤(pán)庫(kù)號(hào)2staff_no可變字符10否否員工編號(hào)3panku_date日期否否盤(pán)庫(kù)日期4material_no可變字符10否否貨物編號(hào)5panku_qty長(zhǎng)整形否否盤(pán)庫(kù)數(shù)量3、系統(tǒng)功能模塊圖畫(huà)出系統(tǒng)功能模塊圖,并對(duì)子模塊功能進(jìn)行詳細(xì)說(shuō)明。四、詳細(xì)設(shè)計(jì)主要的SQL語(yǔ)句--數(shù)據(jù)庫(kù)的建立CREATEDATABASEckglONPRIMARY<NAME='ckgl_data',FILENAME='f:\cg\ckgl_data.mdf',SIZE=5mb,FILEGROWTH=15%>LOGON<NAME='ckgl_log',FILENAME='f:\cg\ckgl_log.ldf',SIZE=2mb,MAXSIZE=100mb,FILEGROWTH=1MB>GO--員工表createtablestaff<staff_novarchar<10>primarykey,staff_passwordvarchar<10>notnull,staff_namevarchar<10>notnull,staff_sexchar<2>notnull,staff_birthdaydatetime,staff_phonechar<15>notnull,staff_rankchar<10>notnull,staff_family_addressvarchar<50>,>go--貨物表createtablematerial<material_novarchar<10>primarykey,material_namevarchar<10>notnull,material_typevarchar<10>notnull,material_in_pricevarchar<10>notnull,material_out_pricevarchar<10>notnull,material_unitchar<4>notnull,>go--倉(cāng)庫(kù)表createtablecangku<cangku_novarchar<10>primarykey,cangku_namevarchar<10>notnull,cangku_typevarchar<10>notnull,staff_novarchar<10>notnull,foreignkey<staff_no>referencesstaff<staff_no>,>Go--庫(kù)存表createtablecunhuo<cangku_novarchar<10>,material_novarchar<10>,qtybigint,primarykey<cangku_no,material_no>,foreignkey<cangku_no>referencescangku<cangku_no>,foreignkey<material_no>referencesmaterial<material_no>,>--供應(yīng)商表createtablesupplier<supplier_novarchar<10>,material_novarchar<10>,supplier_namevarchar<10>notnull,supplier_phonechar<15>notnull,supplier_addressvarchar<50>,primarykey<supplier_no,material_no>,foreignkey<material_no>referencesmaterial<material_no>,>--進(jìn)倉(cāng)表createtablematerial_in<rudan_nointnotnull,supplier_novarchar<10>notnull,material_novarchar<10>notnull,in_datadatetimenotnull,ru_qtybigintnotnull,supp_paybigintnotnull,staff_novarchar<10>notnull,foreignkey<supplier_no,material_no>referencessupplier<supplier_no,material_no>,foreignkey<staff_no>referencesstaff<staff_no>,>--客戶(hù)表createtablekehu<kehu_novarchar<10>primarykey,kehu_namevarchar<10>notnull,kehu_passwordvarchar<10>notnull,kehu_phonechar<15>notnull,kehu_addressvarchar<50>,>--出倉(cāng)表createtablematerial_out<chudan_nointnotnull,kehu_novarchar<10>notnull,material_novarchar<10>notnull,out_datadatetimenotnull,chu_qtybigintnotnull,kehu_paybigintnotnull,staff_novarchar<10>notnull,foreignkey<kehu_no>referenceskehu<kehu_no>,foreignkey<material_no>referencesmaterial<material_no>,foreignkey<staff_no>referencesstaff<staff_no>,>--盤(pán)庫(kù)表createtablepanku<panku_novarchar<10>notnull,staff_novarchar<10>notnull,panku_datedatetime,material_novarchar<10>notnull,panku_qtybigint,foreignkey<material_no>referencesmaterial<material_no>,foreignkey<staff_no>referencesstaff<staff_no>,>Go建立進(jìn)出倉(cāng)的存儲(chǔ)過(guò)程入倉(cāng):createprocedurematerial_in_prorudan_noint,supplier_novarchar<10>,material_novarchar<10>,in_datadatetime,ru_qtybigint,supp_paybigint,staff_novarchar<10>,outvarchar<20>='0'outputasDECLAREn1intselectn1=count<material_no>frommaterialwherematerial_no=material_noif<n1=0>beginselectout='此物料不存在,如果要進(jìn)倉(cāng),請(qǐng)先登記新物料信息?。?returnendelsebegininsertintomaterial_invalues<rudan_no,supplier_no,material_no,in_data,ru_qty,supp_pay,staff_no>updatecunhuosetqty=qty+ru_qtywherematerial_no=material_noselectout='操作成功??！'returnendgo出倉(cāng):createprocmaterial_out_prochudan_noint,kehu_novarchar<10>,material_novarchar<10>,out_datadatetime,chu_qtybigint,kehu_paybigint,staff_novarchar<10>,outvarchar<20>='0'outputasDECLAREn1intselectn1=count<material_no>frommaterialwherematerial_no=material_noif<n1=0>beginselectout='此物料不存在！'returnendelsebeginifchu_qty><selectqtyfromcunhuowherematerial_no=material_no>beginselectout='庫(kù)存數(shù)量不足??！'returnendelsebegininsertintomaterial_outvalues<chudan_no,kehu_no,material_no,out_data,chu_qty,kehu_pay,staff_no>updatecunhuosetqty=qty-chu_qtywherematerial_no=material_noselectout='操作成功??！'returnendend盤(pán)庫(kù)：procedureTForm4.Button8Click<Sender:TObject>;begin//insertintopanku<panku_no,staff_no,panku_date,material_no,panku_qty>//select1,1001,'2012-4-1',material_no,qtyfromcunhuo//將盤(pán)庫(kù)結(jié)果插入到盤(pán)庫(kù)表中withdatamodule2.pankudobeginsql.clear;sql.add<'insertintopanku<panku_no,staff_no,panku_date,material_no,panku_qty>'>;sql.add<'select'''+edit4.text+''','''+combobox11.text+''','''+datetostr<datetimepicker4.datetime>+''',material_no,qtyfromcunhuo'>;close;execsql;showmessage<'盤(pán)庫(kù)成功！！'>;button8.enabled:=false;//一次登錄不允許重復(fù)盤(pán)庫(kù),以免多占空間資源end;//顯示本次盤(pán)庫(kù)結(jié)果withdatamodule2.panku1dobeginsql.clear;sql.add<'select*frompanku,materialwherepanku.material_no=material.material_noandpanku_no='''+edit4.text+''''>;close;open;end;end;//盤(pán)庫(kù)后盤(pán)庫(kù)單號(hào)自動(dòng)加1,便于下次盤(pán)庫(kù)procedureTForm4.FormCreate<Sender:TObject>;varmax:integer;beginwithDataModule2.ADOQuery1dobeginsql.Clear;sql.Add<'selectmax<panku_no>asmaxfrompanku'>;close;open;max:=DataModule2.ADOQuery1.fieldbyname<'max'>.AsInteger;edit4.Text:=inttostr<max+1>;end;End;主