計算機信息管理?？飘厴I(yè)論文--小型百貨商店管理系統(tǒng)規(guī)劃

上傳人：奔*** IP屬地：河北更新時間：2024-03-01 格式：doc 頁數(shù)：23 大?。?94.00KB 人氣指數(shù)：12 舉報 版權申訴

計算機信息管理?？飘厴I(yè)論文--小型百貨商店管理系統(tǒng)規(guī)劃_第1頁

已閱讀1頁，還剩22頁未讀，繼續(xù)免費閱讀

版權說明：本文檔由用戶提供并上傳，收益歸屬內容提供方，若內容存在侵權，請進行舉報或認領

文檔簡介

1、　　畢業(yè)論文　　論文題目小型百貨商店管理系統(tǒng)規(guī)劃 　　摘要　　內容摘要：《小型百貨商店管理系統(tǒng)》是一個比較復雜和全面的管理系統(tǒng)，可以完成中小型超市的大部分業(yè)務?？偟膩碚f包括進貨管理、物價管理、庫存管理、銷售管理

2、、供貨廠商管理、POS收款機系統(tǒng)等。該系統(tǒng)界面樸素一致，但不失美觀大方；操作方便，查詢功能強大；數(shù)據(jù)全面、準確。系統(tǒng)采用了目前比較流行而技術非常成熟地客戶機／服務器結構（C/S），前臺應用程序用Delphi軟件開發(fā),后臺數(shù)據(jù)庫是Microsoft SQL Server 2000。　　關鍵字: 面向對象的程序設計，繼承，WINDOWS消息，存儲過程，事務&

3、lt;b>　　目錄　　一需求分析1　?。ㄒ唬?行業(yè)概念的理解1　　（二）業(yè)務流程說明2　?。ㄈ﹩栴}解決方案2　　（四）數(shù)據(jù)流圖3</p

4、>　　二系統(tǒng)設計3　　二系統(tǒng)設計4　?。ㄒ唬┫到y(tǒng)模塊的劃分4　?。ǘ?數(shù)據(jù)字典4　　三、程序的設計與編碼8

5、（一） POS系統(tǒng)的開發(fā)8　　1. 功能及實現(xiàn)方法8　　2. 問題討論：交易流水號的確定9　　（二）管理信息系統(tǒng)的設計9　　1.界面設計9　　2. 各個功能模塊實現(xiàn)的要點和技術10

6、　　2.1 類繼承與重載10　　2.2 windows消息機制11　　2.3 關于權限設置12　　2.4 應用Delphi顯式事務控制13　　2.5 存儲過程的使用13<b

7、>　　參考書錄20　　小型百貨商店管理系統(tǒng)規(guī)劃　　一需求分析　?。ㄒ唬?行業(yè)概念的理解　　POS： Point Of Sells , 電子收款機系統(tǒng)，也就是直接與顧客打交道的收銀機系統(tǒng)。

8、;　　定單狀態(tài)：用來描述商品進貨方式，一般分為定單、日配、自采等。　　定單：表示該商品進貨必須先向供貨商發(fā)出定單，供貨商按定單上的商品明細發(fā)貨，超市則按定單上的商品明細收貨。　　日配：指那些每天都要進貨的商品或者補貨期較短的商品，例如水果，生鮮蔬菜等。如果按定單，時間不允許而且工作重復煩瑣。

9、　　自采：顧名思義，超市自己負責商品的進貨。　　銷售狀態(tài)：用來描述某種商品當前的銷售狀態(tài)，一般定義為正常、促銷、折扣等，正常表示商品處于正常的售價狀態(tài)，即按正常的售價銷售。　　促銷：表示超市把某種商品讓利銷售，以此來吸引跟多的消費者。一般低于正常售價甚至成本價。　　折扣：表示某種商品銷售情況不好，或者商品有瑕疵，

10、或者保質期快到等情況發(fā)生時，使盡快商品銷售出去的一種手段。　　庫存調整：當非因正常銷售發(fā)生而實物數(shù)量變動時，通過調整庫存使其帳面數(shù)量與實物數(shù)量相符。　　日處理：當一天的銷售結束后，開始做日處理。把當天的銷售數(shù)據(jù)匯總，調整商品庫存。　　損益：商品出現(xiàn)損壞，變質，被盜等情況發(fā)生時，商品發(fā)生損益。損益通過調整庫存得到體

11、現(xiàn)。　　商品變價：商品變價與促銷/折扣調整價格是兩個不同的概念。商品變價是指修改商品的正常售價，調整后在一定的時間內不會在發(fā)生改變。價格可能是升高也可能是降低，一般都是由于進價變動引起的。　　促銷/折扣期：每一種商品促銷/折扣都有一定的期限，即有一定的時間限制。一種商品不可能無期限的促銷/折扣。當期限超過，商品自動恢復正常售價。

12、　　毛利、毛利百分比：毛利＝商品售價－商品進價毛利百分比＝（商品售價－商品進價）÷商品售價　　商品進價及成本核算：在成本核算中，商品成本價的確定一般有最后進價，移動加權平均，按商品批次定價等幾種方式，由于后兩種核算方式較復雜，本系統(tǒng)采用簡單的最后進價方式。　?。ǘ?業(yè)務流程說明

13、　　在實際管理中，有三種信息流動，即資金流，單據(jù)流和商品實物流。系統(tǒng)圍繞實物流展開，對商品從供應商那里進貨到商品銷售到顧客手中整個流程進行管理。簡單來說，就是商品的進銷存管理。每個環(huán)節(jié)通過相應的單據(jù)來連接，同時資金發(fā)生流動。在商品管理方面，我們提出部門和商品分類的概念，這種分級管理方式簡潔高效。所謂部門，就是按照商品的基本屬性進行分類管理。例如,超市一般可分為食品部，生鮮部，日用品部等。部門下面再分類，所謂商品分類，指按商品的具體屬性劃

14、分，例如，食品部下面可以有糖果餅干類，飲料類等，每個部門和每個商品類別都有相應的負責人負責?！吨行⌒统泄芾硇畔⑾到y(tǒng)》完全體現(xiàn)了這種管理思想，商品的銷售和商品庫存都可以按部門級和分類級完成查詢等其他操作。作為一個超市的管理人員，及時了解銷售情況是非常必要的，以便及時調整進貨或者安排營銷策略，把握商機。而《中小型超市管理信息系統(tǒng)》正好滿足了這一要求，可以實時查詢前臺的銷售情況，并且數(shù)據(jù)準確可信。&

15、lt;b>　?。ㄈ﹩栴}解決方案　　超市系統(tǒng)在運行過程中數(shù)據(jù)流量是非常巨大的。有時候會因數(shù)據(jù)流量過大而使網絡發(fā)生阻塞，使POS系統(tǒng)發(fā)生斷網，直接影響銷售活動的進行。這種情況是應該堅決避免的，應該盡量減少網絡的數(shù)據(jù)流量。這一思想在本系統(tǒng)中的直接體現(xiàn)就是采用日處理和運用本地緩存技術。日處理的主要目的就是把當天的銷售數(shù)據(jù)整理匯總，更新商品庫存表，為第二天的銷售做準備。與日處理

16、不同的另一種處理方式就是每次商品銷售完成以后就立即更新庫存。但這樣會使得服務器的負荷非常的重，經常會使POS系統(tǒng)發(fā)生斷網。POS系統(tǒng)銷售商品時所取的商品信息是服務器上的數(shù)據(jù)，有效的保證了數(shù)據(jù)的一致性和集中控制。雖然商品信息來自服務器，但我們使用了本地緩存。POS系統(tǒng)會把取得的數(shù)據(jù)暫時的存放在本地的內存，當要讀取商品信息時，會先在本地緩存里查找，如果成功的話，就不必訪問服務器。這樣一來就有效的減少了網絡的數(shù)據(jù)流量和服務器的負荷。此外，系統(tǒng)

17、充分利用了客戶機／服務器結構的特點，比較復雜的查詢更新等操作都用存儲過程來實現(xiàn)。存儲過程在服務器端執(zhí)行完畢僅返回執(zhí)行結果，能有效的減少網絡的通訊流量。　　（四）數(shù)據(jù)流圖　　對整個業(yè)務活動進行分析歸納后，得出如下的數(shù)據(jù)流圖：　　二系統(tǒng)設計

18、;　?。ㄒ唬┫到y(tǒng)模塊的劃分　　根據(jù)前面所作的需求分析，我將整個系統(tǒng)分為如下幾個模塊：　?。ǘ?數(shù)據(jù)字典　　商品入庫單明細ENTER_GOODS_DETAIL　　商品信息GOODS_INFO&

19、lt;/p>　　供應商信息GYS_INFO　　部門信息LARGE_TYPE　　商品分類信息SMALL_TYPE　　人員信息PERSON_INFO　　前臺銷售表POS_SALE　　收銀臺設置POS_SE

20、T　　商品變價記錄表PRICE_ADJUST　　庫存調整記錄表STORE_ADJUST　　日處理歷史狀態(tài)DIALY_DAN　　庫存調整原因表STORE_ADJUST_REASON　　商品庫存表STORE_DETAIL</p&

21、gt;　　商品促銷/折扣記錄GOODS_PROMOTE_LOG　　權限表MENU_FLAG　　三、程序的設計與編碼　　有了前面的工作，我們選擇就進入編碼階段了。　?。ㄒ唬?POS系統(tǒng)的開發(fā)　　1. 功能及實現(xiàn)

22、方法　　POS系統(tǒng)是作為一個單獨的程序開發(fā)的，主要在POS機上運行，完成商品的交易任務。銷售的商品信息存儲在POS_SALE表中。我們把一次交易放在一個事務提交，保證了數(shù)據(jù)的完整性和數(shù)據(jù)的正確性。界面以灰色調為主，使得收銀員長時間工作眼睛不感到疲勞。收銀的操作也很簡單方便。交易流水號自動增加。　　當某種商品處于促銷或折扣銷售狀態(tài)時，POS系統(tǒng)自動取商品的

23、促銷或折扣售價，無需人工干預，并且促銷或折扣期結束時，系統(tǒng)能自動識別恢復正常售價。這一個功能的實現(xiàn)是通過商品視圖來完成的。請看商品視圖源碼。　　前臺POS銷售時取商品信息時用到的視圖:　　CREATE VIEW V_SPXX　　AS

24、;　　SELECT NAME , A.GOODS_ID,A.BAR_ID,A.GUIGE, 　　BUY_PRICE= CASE 　　WHEN (GETDATE()>B.END_DATE AND GETDATE()<B.BEGIN_DATE) OR A.FLAG='正常' THEN A.BUY_PRICE1</p

25、>　　WHEN (GETDATE()<B.END_DATE AND GETDATE()>B.BEGIN_DATE) AND A.FLAG='促銷' THEN A.BUY_PRICE2　　WHEN (GETDATE()<B.END_DATE AND GETDATE()>B.BEGIN_DATE) AND A.FLAG='折

26、扣' THEN A.BUY_PRICE2　　ELSE A.BUY_PRICE1 　　END 　　FROM GOODS_INFO A ,GOODS_PROMOTE_LOG B　　WHERE A.GOODS_ID*=B.GOOD

27、S_ID　　交易是在一個事務里完成的,請看交易完成數(shù)據(jù)提交的代碼：　　if form_pos.Database1.InTransaction then　　try　　form_pos.query1.ApplyUpdates;把本地

28、緩存修改的操作提交服務器　　form_pos.Database1.Commit; 事務提交　　form_pos.query1.CommitUpdates;清空本地緩存　　if form_pos.Database1.InTransaction=false then

29、　form_pos.Database1.StartTransaction;　　except　　form_pos.Database1.Rollback; 事務回滾　　end;　　2. 問題討論：交易

30、流水號的確定　　在實際運用中，可能十幾臺甚至幾十臺POS機同時工作，也就是存在大量的數(shù)據(jù)庫并發(fā)操作。怎樣使交易流水號唯一呢？我是這樣實現(xiàn)的，在每次事務提交之前，比較本機的流水號是否在后臺數(shù)據(jù)庫交易流水號中已經存在，如果存在，也就是說已經被別人占用，則重新取出最大交易流水號，然后提交整個事務。事務提交成功以后還要更新本地交易流水號。這是取最大流水號select max(P_NO) as p_no

31、 from pos_sale的SQL語句。　?。ǘ┕芾硇畔⑾到y(tǒng)的設計　　1.界面設計　　本系統(tǒng)采用了帶導航欄的多文檔窗體設計風格，使操作變的簡單直觀。當使用某一個功能模塊時，只顯示相應的菜單，使人不會覺得眼花繚亂。系統(tǒng)完全擯棄那種界面花哨，色彩絢麗等華而不實做法，但和傳統(tǒng)的

32、風格有有所區(qū)別，傳統(tǒng)的風格顯得過于呆板。本系統(tǒng)的界面色調一致，簡單樸素，但不失美觀大方。窗體界面一致，操作也大同小異，絲毫沒有雜亂無章的感覺。　　我首先定義了幾個重要的窗體基類，其他的窗體基本上這幾個基類的派生類。在使用時在對窗體進行重載。所有的窗體都是在運行時動態(tài)加載的。需要運行那個窗體時，程序才加載該窗體，用完后立即釋放，這樣使用戶計算機系統(tǒng)資源得以最少得占用。請看一個窗體得創(chuàng)建例子：<

33、;/p>　　enter_dan:= Tenter_dan.Create(Self); 入庫單錄入窗體得創(chuàng)建　　form_show(enter_dan,555 ,360,10,2); form_show為自定義函數(shù)　　對所有子窗體顯示我自定義了一個函數(shù)form_show，減少了工作量和代碼量。<p&

34、gt;　　procedure form_show(form:TForm;fwidth ,fheight,fleft,ftop :integer);　　begin　　with form do　　begin<p&

35、gt;　　height:=fheight;　　width:=fwidth;　　Left:=fleft;　　top:=ftop;　　Show;　　end;&

36、lt;/p>　　end;　　窗體的釋放實現(xiàn)，例如釋放入庫單錄入界面窗體：　　procedure Tenter_dan.FormClose(Sender: TObject; var Action: TCloseAction);　　b

37、egin　　action:=cafree; 在內存中釋放掉窗體　　end;　　2. 各個功能模塊實現(xiàn)的要點和技術　　這里我只把我在編碼過程中比較重要或者比較有代表性的技術和部分源碼闡述一下。詳情查看系統(tǒng)的源代碼。&

38、lt;/p>　　2.1 類繼承與重載　　在編碼過程中，我充分利用了面向對象編程的特定——代碼的重用，具體實現(xiàn)起來依靠的是重載和繼承。把具有相同或相似屬性的類抽象出來作為一個基類。我定義了幾個重要的窗體基類，基類窗體包含了需要的公有控件和共有事件方法。其他的窗體基本上這幾個基類的派生類。在使用時在對窗體的控件的屬性和方法進行繼承或者重載。<

39、p>　　關于在DELPHI方法的重載，例如：　　procedure Action7Execute(Sender: TObject); OVERRIDE;　　procedure Tenter_goods_info.Action7Execute(Sender: TObject);　　begin

40、　　try　　if (dbedit1.Text<>'') and (dbedit2.Text<>'') and (dbedit3.Text<>'')and (dbedit4.Text<>'

41、9;)then　　begin　　query1.Post;　　addbutton.Enabled:=true;　　delbutton.Enabled:=true;　　savebutton.Ena

42、bled:=false;　　end　　else　　showmessage('你的輸入不完整！');　　except&l

43、t;p>　　showmessage('代碼重復！');　　end;　　end;　　2.2 windows消息機制　　當查詢窗體要返回結果時，我們用到了windows消息機制。

44、　　首先定義一個全局的自定義消息常量。　　Const My_WM_USER=WM_USER+100; //自定義消息 　　向指定的窗體發(fā)送自定義消息，傳遞查詢結果。例如：　　procedure Tgoods_info_search.searchbuttonClick(

45、Sender: TObject);　　begin　　try　　price_adjust.Query1.Close; price_adjust.Query1.SQL.Clear;

46、;　　price_adjust.Query1.SQL:=query1.SQL;　　sendmessage(price_adjust.Handle,My_WM_USER,0,0);　　except　　beep;<

47、/p>　　end;　　close;　　end;　　接收消息，并且處理它，例如：　　定義消息響應的方法</b

48、>　　procedure my_wm_user100(var msg:Tmessage); message My_WM_USER;　　處理消息：　　procedure Tgoods_promote.my_wm_user100(var msg:Tmessage) ;&l

49、t;/p>　　begin　　with query1 do　　close;　　sql.clear;　　sql.add(sql語句);<p&g

50、t;　　open;　　end;　　2.3 關于權限設置　　權限設置是一個管理系統(tǒng)非常重要的一部分，直接關系到公司業(yè)務和財務安全性。因此，本系統(tǒng)在這方面的功能是較完善的。操作人員的權限可以定義到每級子菜單。對沒有賦權限的菜單項不予顯示。也就

51、是說，系統(tǒng)能根據(jù)登陸人員的權限自動顯示具有權限的功能菜單。我們把人員的權限信息存放在MENU_FLAG表中，在系統(tǒng)啟動時加載相關的權限設置信息。權限設置這一功能只有高級管理人員和系統(tǒng)管理員才能使用。　　根據(jù)權限顯示菜單算法　　with damo.query1 do //query1關聯(lián)MENU_FLAG表&l

52、t;b>　　begin　　close;　　sql.Clear;　　sql.Add('select * from menu_flag where id=:id ');　　ParamByName(

53、'id').AsInteger:=person_id;　　open;　　end;　　for i:=1 to 42 do　　begin</

54、p>　　flag:=damo.query1.fields[i].AsInteger;//flag為每項菜單的權限標志　　for j:=0 to main_form.ComponentCount-1 do　　begin　　if (main_form.

55、Components[j] is TMenuItem) and ((main_form.Components[j] as TMenuItem).Tag=i-1 ) then　　if flag = 0 then　　(main_form.Components[j] as TMenuItem).Visible:=false&l

56、t;p>　　else　　(main_form.Components[j] as TMenuItem).Visible:=true;　　end;　　end;

57、;　　2.4 應用Delphi顯式事務控制　　事務控制是一種能夠把數(shù)據(jù)庫的一組修改作為整體提交給數(shù)據(jù)庫以保證數(shù)據(jù)的一致性和完整性的機制。如果其中有一個操作失敗，則所有操作失敗。　　2.5 存儲過程的使用　　在程序設計中，系統(tǒng)主要的復雜的操作我都都是通過存儲過程來實現(xiàn)的。

58、　例如：使用庫存調整操作時，我們用P_ADJUST_STORE來完成。　　procedure Tadjust_store.okbuttonClick(Sender: TObject);　　begin　　if not damo.Database1.InTransaction t

59、hen　　damo.Database1.StartTransaction; 開始一個事務　　with P_ADJUST_STORE do //P_ADJUST_STORE為存儲過程　　begin　　Params[1].AsIn

60、teger:=strtoint(edit_id.Text);　　Params[2].AsFloat:=strtofloat(edit_adjust.Text);　　Params[3].AsInteger:= table1.Fields[0].AsInteger ;　　Params[4].AsInteger:= p

61、erson_id ;// person_id為全局變量人員ID　　Prepare;　　execproc;　　end;　　try</b&

62、gt;　　damo.Database1.Commit; 事務提交　　except　　begin　　damo.Database1.Rollback; 事務回滾

63、;　　showmessage('數(shù)據(jù)提交失?。?');　　end;　　end; 　　以下是幾種典型存儲過程。　　日處理存儲過程：</

64、p>　　CREATE PROCEDURE P_DIALY_DO　　@dialy_date char(12),　　@person_id smallint　　AS　　DECLARE @goods_id i

65、nt　　DECLARE @quantity float　　DECLARE @amount money　　DECLARE temp_cursor CURSOR FOR　　SELECT A.GOODS_ID,SUM(A.QUANTITY),SUM(A.QUANTITY*B

66、.COST_PRICE) 　　FROM POS_SALE A, GOODS_INFO B　　WHERE convert(char(12),WORK_DATE,102)=@dialy_date 　　AND A.GOODS_ID=B.GOODS_ID GROUP BY A.GOODS_ID <

67、/p>　　OPEN temp_cursor　　FETCH NEXT FROM temp_cursor INTO @goods_id, @quantity, @amount　　WHILE (@@FETCH_STATUS=0)　　BEGIN</

68、p>　　if EXISTS(SELECT * FROM STORE_DETAIL WHERE GOODS_ID = @goods_id)　　BEGIN 　　UPDATE STORE_DETAIL　　SET QUANTITY=QUANTIT

69、Y-@quantity , AMOUNT=AMOUNT-@amount　　WHERE GOODS_ID = @goods_id　　END　　FETCH NEXT FROM temp_cursor INTO @goods_id,@quantity,@amount</p&

70、gt;　　END　　INSERT DIALY_DAN　　VALUES( @dialy_date,'已做',@person_id)　　CLOSE temp_cursor　　DEALLOCATE te

71、mp_cursor　　查詢每日商品銷售匯總的存儲過程：　　CREATE PROCEDURE P_DIALY_SALE　　AS　　CREATE TABLE #temp_table<b

72、>　　(　　amount float,　　work_date char(12),　　sale_cost float,　　gain float　　)</p&g

73、t;　　INSERT INTO #temp_table　　SELECT 　　a.amount,convert(char(12),a.work_date,102) AS work_date, 　　(c.cost_price*a.quantity) AS sa

74、le_cost,　　(a.amount-c.cost_price*a.quantity) AS gain　　FROM pos_sale a,small_type b,goods_info c　　WHERE a.goods_id=c.goods_id　　AND c.

75、small_type=b.small_type_id　　SELECT work_date, sum(amount) AS sum_amount , sum(sale_cost) AS sum_sale_cost , sum( gain ) AS sum_gain　　FROM #temp_table <

76、p>　　GROUP BY work_date, ORDER BY work_date　　商品審核入庫存儲過程　　CREATE PROCEDURE P_GOODS_ENTER　　@enter_dan_id int　　AS<

77、;/p>　　DECLARE @goods_id int　　DECLARE @quantity float　　DECLARE @amount money　　DECLARE temp_cursor CURSOR FOR　　SELECT GOODS

78、_ID,QUANTITY,AMOUNT FROM ENTER_GOODS_DETAIL　　WHERE ENTER_DAN_ID=@enter_dan_id　　OPEN temp_cursor　　FETCH NEXT FROM temp_cursor INTO @goods_id,@quantity,@amount

79、　　WHILE (@@FETCH_STATUS=0)　　BEGIN　　if EXISTS(SELECT * FROM STORE_DETAIL WHERE GOODS_ID = @goods_id)　　BEGIN

80、 　　UPDATE STORE_DETAIL　　SET QUANTITY=QUANTITY+@quantity , 　　AMOUNT=AMOUNT+@amount　　WHERE GOODS_ID = @goods_id<

81、;p>　　END　　ELSE　　BEGIN　　INSERT STORE_DETAIL 　　VALUES(@goods_id,@quantity,@amo

82、unt,getdate())　　END　　FETCH NEXT FROM temp_cursor INTO @goods_id,@quantity,@amount　　END　　CLOSE temp

83、_cursor　　DEALLOCATE temp_cursor　　查詢部門銷售匯總的存儲過程　　CREATE PROCEDURE P_SEARCH_DEP_SALE　　AS　　CREATE

84、 TABLE #temp_table　　(　　large_type_id int,　　dep_name char(10),　　quantity float,　　amount float,&l

85、t;/p>　　work_date char(12),　　sale_cost float,　　gain float　　)　　INSERT INTO #temp_table<p

86、>　　SELECT 　　b.large_type_id,b.name AS dep_name,　　a.quantity,a.amount,convert(char(12),a.work_date,102) AS work_date, 　　(c.cost_price*a.quantity

87、) AS sale_cost,　　(a.amount-c.cost_price*a.quantity) AS gain　　FORM pos_sale a,large_type b,goods_info c　　WHERE a.goods_id=c.goods_id

88、　AND c.large_type=b.large_type_id　　SELECT work_date, large_type_id ,dep_name,　　sum( quantity) AS sum_quantity , sum(amount) AS sum_amount , sum(sale_cost) AS sum_sale_cost

89、 , sum( gain ) AS sum_gain　　FROM #temp_table 　　GROUP BY work_date, large_type_id ,dep_name ORDER BY work_date　　查詢商品分類匯總的存儲過程　　CREATE

90、 PROCEDURE P_SEARCH_KIND_SALE　　AS　　CREATE TABLE #temp_table　　(　　small_type_id int,&l

91、t;p>　　kind_name char(10),　　quantity float,　　amount float,　　work_date char(12),　　sale_cost float,　　gain float&l

92、t;/p>　　)　　INSERT INTO #temp_table　　SELECT 　　b.small_type_id,b.name AS kind_name,　　a.quantity,a.am

93、ount,convert(char(12),a.word_date,102) AS work_date, 　　(c.cost_price*a.quantity) AS sale_cost,　　(a.amount-c.cost_price*a.quantity) AS gain　　FROM po

94、s_sale a,small_type b,goods_info c　　WHERE a.goods_id=c.goods_id　　AND c.small_type=b.small_type_id　　SELECT work_date, small_type_id ,kind_name,</p&g

95、t;　　sum( quantity) AS sum_quantity , sum(amount) AS sum_amount , sum(sale_cost) AS sum_sale_cost , sum( gain ) AS sum_gain　　FROM #temp_table 　　GROUP BY work_dat

96、e, small_type_id ,kind_name ORDER BY work_date　　查詢商品銷售的存儲過程：　　CREATE PROCEDURE P_SEARCH_GOODS_SALE　　AS　　CREATE TABL

97、E #temp_table　　(　　goods_id int,　　bar_id int,　　goods_name char(20),　　guige char(4),&l

98、t;p>　　quantity float,　　amount float,　　work_date char(12),　　sale_cost float,　　gain float,　　gain_rate float</

99、p>　　)　　INSERT INTO #temp_table　　SELECT 　　a.goods_id,a.bar_id,a.name AS goods_name,　　a.guige,a.qua

100、ntity,a.amount,convert(char(12),a.word_date,102) AS work_date, 　　(c.cost_price*a.quantity) AS sale_cost,　　(a.amount-c.cost_price*a.quantity) AS gain,<p&

101、gt;　　((a.amount-c.cost_price*a.quantity)/(c.cost_price*a.quantity)) AS gain_rate　　FORM pos_sale a,large_type b,goods_info c　　WHERE a.goods_id=c.goods_id

102、AND c.large_type=b.large_type_id　　SELECT work_date, goods_id , bar_id, goods_name , guige ,　　sum( quantity) AS sum_quantity , sum(amount) AS sum_amount , sum(sale_cost)

103、AS sum_sale_cose , sum( gain ) AS sum_gain,gain_rate*100 AS gain_rate　　FORM #temp_table 　　GROUP BY work_date,goods_id, goods_name , guige,gain_rate,bar_id &l

104、t;p>　　ORDER BY work_date　　庫存調整存儲過程　　CREATE PROCEDURE P_STORE_ADJUST　　@goods_id int,　　@adjust_quantity float,<

105、;/p>　　@adjust_readon int,　　@work_person int　　AS　　DECLARE @price money 　　DECLARE @quantity float</p&

106、gt;　　DECLARE @amount money　　SELECT @quantity= QUANTITY,@amount=AMOUNT FROM STORE_DETAIL WHERE GOODS_ID=@goods_id　　SELECT @price=cost_price FROM GOODS_INFO WHERE GOODS_

107、ID=@goods_id 　　UPDATE STORE_DETAIL　　SET　　QUANTITY=QUANTITY-@adjust_quantity, AMOUNT=AMOUNT-@price*@adjust_quantity

108、　WHERE goods_id =@goods_id　　INSERT STORE_ADJUST 　　VALUES(@goods_id,@quantity,@amount,@adjust_quantity,convert(money,@price*@adjust_quantity),@adjust_readon,@work_pe

109、;　　參考書錄　　1.Delphi6 數(shù)據(jù)庫技術姜洪、張希編著國防工業(yè)出版社 2005.4　　2.SQL Server高級管理與開發(fā) 飛思科技產品研發(fā)中心編著電子工業(yè)出版社 2006.1　　.Delphi趣味程序導學楊正華呂躍春編著清華大學出

110、版社 2007.8　　.Delphi6.0 編程技巧與實例分析關兵、邵謙謙等著中國水利水電出版社 2005.5　　.SQL Server7.0應用與提高吳斌、趙有珍著科學出版社 2000.9　　. Delphi6.0 實用編程教程（編程高手成長之路 7）肖帆編寫北京希望電子出版社 2001.11&

眾賞文庫> 全部分類> 畢業(yè)設計

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網頁內容里面會有圖紙預覽，若沒有圖紙預覽就沒有圖紙。
4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲空間，僅對用戶上傳內容的表現(xiàn)方式做保護處理，對用戶上傳分享的文檔內容本身不做任何修改或編輯，并不能對任何下載內容負責。
6. 下載文件中如有侵權或不適當內容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

計算機信息管理?？飘厴I(yè)論文--小型百貨商店管理系統(tǒng)規(guī)劃

文檔簡介

溫馨提示

最新文檔

評論

計算機信息管理?？飘厴I(yè)論文--小型百貨商店管理系統(tǒng)規(guī)劃

文檔簡介

溫馨提示

最新文檔

評論

免費下載

計算機信息管理?？飘厴I(yè)論文--小型百貨商店管理系統(tǒng)規(guī)劃