【正文】 話 Char 15 Null備注 Nemo 100 Null（注：客戶編號取值范圍： 000～999）表 倉庫信息表表格字段名 數(shù)據(jù)類型 長度 可否為空 備注 說明倉庫編號 Char 4 Not Null 主索引 類型：由字母與數(shù)字組成商品編號 Char 8 Null 普通索引貨架區(qū)編號 Char 2 Null貨架編號 Char 2 Null貨位編號 Char 4 Null備注 Nemo 100 Null表 用戶表表格字段名 數(shù)據(jù)類型 長度 可否為空 備注 說明用戶名 Char 10 Not Null密碼 Numeric 6 Null級別 Char 4 Null備注 Nemo 100 Null表 采購審核單字段名 數(shù)據(jù)類型 長度 可否為空 備注 說明審核號 Char 8 Not Null 主索引 類型：由字母與數(shù)字組成商品編號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成日期 Datetime 8 Null供應商編號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成商品名稱 Char 50 Null出版社 Char 30 Null單位 Char 4 Null商品數(shù)量 Numeric 8 Null單價 Currency 8 Null金額 Currency 8 Null采購審核 Char 10 Null “已審核”或“未審核”負責人 Char 10 Null備注 Nemo 100 Null19 / 56表 銷售審核單字段名 數(shù)據(jù)類型 長度 是否為空 備注 說明審核編號 Char 8 Not Null 主索引 類型：由字母與數(shù)字組成商品編號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成日期 Datetime 8 Null客戶編號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成商品名稱 Char 50 Null出版社 Char 30 Null單位 Char 4 Null商品數(shù)量 Numeric 8 Null單價 Currency 8 Null金額 Currency 8 Null銷售審核 Char 10 Null “已審核”或“未審核”負責人 Char 10 Null備注 Nemo 100 Null表 驗收單字段名 數(shù)據(jù)類型 長度 是否為空 備注 說明驗收單號 Char 8 Not Null 主索引 類型：由字母與數(shù)字組成日期 Datetime 8 Null送貨單號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成商品編號 Char 8 Null 普通索引 類型：由字母與數(shù)字組成商品名稱 Char 50 Null出版社 Char 30 Null數(shù)量 Numeric 8 Null單價 Currency 8 Null金額 Currency 8 Null負責人 Char 10 Null驗收結(jié)果 Char 10 Null 結(jié)果為：“合格”或“不合格”表 庫存盤點單字段名 數(shù)據(jù)類型 長度 是否為空 備注 說明商品編號 Char 8 Null 主索引 類型：由字母與數(shù)字組成盤點數(shù)量 Numeric 8 Null調(diào)整數(shù)量 Numeric 8 Null操作日期 Datetime 8 Null操作人員 Char 10 Null標志 Char 4 Null 標志為：“新建”或“完成”第 4 章 系統(tǒng)設計及實現(xiàn) 系統(tǒng)功能結(jié)構設計 系統(tǒng)功能結(jié)構圖根據(jù)上述系統(tǒng)功能的分析，按照結(jié)構化程序設計的要求，得到如下所示的系統(tǒng)功能模塊圖，如圖 所示： 進銷存管理系統(tǒng)銷售信息管理 庫存信息管理采購信息管理采購計劃單管理采購審核單管理采購單管理采購清單查詢采購追蹤單管理領貨單管理銷售清單查詢銷售單管理銷售計劃單管理預售單管理庫存維護管理銷售審核單管理 送貨通知單管理 入庫驗收單管理 驗收退貨單管理入庫單管理庫存清單查詢 缺貨單管理出庫單管理基本信息管理倉庫信息管理 供應商資料管理 客戶資料管理 商品信息資料管理員工信息資料管理統(tǒng)計分析管理銷售統(tǒng)計分析管理采購統(tǒng)計分析管理系統(tǒng)管理用戶及密碼設置圖 系統(tǒng)功能結(jié)構圖21 / 56 對開發(fā)的系統(tǒng)性能要求書店進銷存管理系統(tǒng)涉及到采購、銷售和庫存管理等相關活動，因此需要各個部門的相互協(xié)作，對輸入和輸出都有嚴格的要求，這就需要報表人員提供準確的數(shù)據(jù)及操作人員的輸入的正確。具體實現(xiàn)：? 系統(tǒng)對與操作命令做出準確快速的反應,響應時間最好在 5 秒中之內(nèi)，否則用戶將會感覺的系統(tǒng)運行速度低效。? 準確統(tǒng)計核算日常的不斷變化的數(shù)據(jù)。? 真正達到進銷存一體化管理。①供應商資料模塊：主要負責維護供應商的基本信息。⑤倉庫信息資料：主要負責倉庫的基本信息管理 ⑵采購信息管理：該模塊主要負責進行采購管理，包括采購計劃單、采購計劃審核單、商品采購單、采購追蹤單、采購查詢、采購報表。④采購追蹤單：主要負責對商品采購單進行追蹤。①商品銷售計劃單：主要是負責編制商品銷售計劃單。⑤領貨單：主要負責銷售領貨過程。②入庫驗收單：主要負責貨物入庫前的驗收。⑥出庫單：對銷售物品進行出庫管理。⑩庫存報表：生成庫存報表。⑹系統(tǒng)管理：該模塊主要負責用戶的登錄及密碼的管理。 創(chuàng)建數(shù)據(jù)庫 首先，新建一個項目。如圖 所示：圖 參照完整性編輯至此，數(shù)據(jù)庫基本物理結(jié)構的創(chuàng)建就已經(jīng)完成。點擊數(shù)據(jù)環(huán)境，添加用戶表。39。系統(tǒng)提示39。系統(tǒng)提示39。保存39。JH39。39。39。39。39。否39。39。系統(tǒng)提示39。 alltrim( ),alltrim( ),alltrim( ),。 =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.f.35 / 56 =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. endif●在控件 mand6（修改）事件中添加以下代碼：if =39。 =.f. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.f. else a=messagebox(39。) if a=6 repl 計劃單號 with alltrim( ),。 商品編號 with alltrim( ),。 單價 with val( ),。 備注 with alltrim( )endif =39。 messagebox(39。) else a=messagebox(39。) if a=6 then if eof()=.f.37 / 56 delete pack endif endifendif在控件 mand8（審核）的 click 事件中添加以下代碼：a=messagebox(39。)if a=6 then if =39。,64,39。 else Zdph=39。) endif 審核號=zdph 日期=date() insert into 采購審核單( 審核號,供應商編號,日期,商品編號,出版社,商品名稱,單位,商品數(shù)量,單價,金額)。endifendif●在控件 mand9（退出）的 click 事件中添加以下代碼：●在控件 mand10（查詢）的 click 事件中添加以下代碼：set exac offif txt=alltrim() continue else txt=alltrim() locate for 計劃單號=alltrim() endif if found()=.t. else messagebox(39。) go top endif ⑶創(chuàng)建采購審核單 新建一個表單，單擊數(shù)據(jù)環(huán)境添加采購審核單、商品資料表、商品采購單。,32+4+256,39。 messagebox(39。) else select 商品采購單 供應商編號=alltrim( ) 商品編號=alltrim( ) 商品名稱=alltrim( ) 出版社=alltrim( ) 單位=alltrim( ) 商品數(shù)量= 單價= 金額= calculate max(采購單號)to Czdph Nzdph=val(right(Czdph,6)) if Nzdph=0 then Zdph=39。+padl(alltrim(str(Nzdph+1)),6,39。 , , , )select 采購審核單replace 采購審核 with 39?！裨诳丶?mand8（打?。┑?click 事件中添加以下代碼：select 商品采購單txt 采購單號=reo()report form rep1 for reo()=txt 采購單號 preview41 / 56⑸采購單查詢新建一個表單，單擊數(shù)據(jù)環(huán)境添加商品采購單。 else do case case alltrim()=39。+alltrim()。商品數(shù)量39。 +39。 CXTJ=alltrim()+39。39。 +39。 endcase select*from 商品采購單。lingshistudent39。不能輸入同一采購物品,請更改采購單號!39。確定要驗收嗎？39。已驗收39。系統(tǒng)提示39。RK39。 values(zdph,date(), , , ,。其中表單的設計界面如圖 所示：45 / 56圖 入庫單●在控件 mand6（入庫）的 click 事件中添加如下代碼：a=messagebox(39。) if a=6 then if =39。,64,39。 use 庫存單表 again getid= set order to 商品編號 seek getid if found() select 庫存單表 replace 當前庫存 with 當前庫存+val( ) for 商品編號= 商品編 replace 總金額 with 總金額val( ) for 商品編號= 商品編號.valueelse insert into 庫存單表( 商品編號,商品名稱,出版社,倉庫編號,單價,當前庫存,總金額)?！裨诳丶?mand1（查詢）的 click 事件中添加以下代碼：select*from 庫存盤點單 where 操作日期= into cursor 臨時單表 =39。order by into cursor 臨時單表 =39。messagebox(39。)else replace 當前庫存 with 當前庫存+val( )update 庫存盤點單 set 標志 =39。其中一些重要控件的設計屬性如表 所示：表 重要控件屬性對象 屬性 值Text1 Value ｛｝Text2 Value ｛｝Grid1 Recordsource 商品采購單其設計界面如圖 所示：圖 采購統(tǒng)計分析單●在控件 mand1（查詢）的 click 事件中添加以下代碼：if empty() wait windows39。 else select*from 商品采購單。 endif endif●在控件 mand3（查詢）的 click 事件中添加以下代碼：select 商品編號,商品名稱,出版社,sum(商品數(shù)量) as 數(shù)量總和,sum(金額) as 金額總和 from 商品采購單 into cursor 臨時商品采購單=39。⑴編輯采購計劃單：先添加采購計劃單，完成后，點擊“審核”按鈕。如圖 所示：圖 商品采購單⑷編輯采購追蹤單：通過添加采購單，就可以對特定的采購單進行追蹤，通過修改采購狀態(tài)進行采購的時時監(jiān)控，直到貨物的順利到貨。這些功能模塊的設計能夠滿足用戶的基本業(yè)務管理，尤其是通過對書店的業(yè)務分51 / 56析，在采購管理、銷售管理及庫存管理的設計上能夠幫助用戶準確、有效的完成從采購到庫存再到銷售的整合過程。因程序設計水