計(jì)算機(jī)信息管理?？?中小型超市管理系統(tǒng)規(guī)劃(編輯修改稿)
2025-01-20 06:08 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 字段名稱 數(shù)據(jù)類型 描述 WORK_DATE smalldatetime 日處理時(shí)間 STATUS char (4) 狀態(tài) WORK_PERSON int 操作員 ID 第 10 頁(yè) 共 20 頁(yè) 三、程序的設(shè)計(jì)與編碼 有了前面的工作，我們選擇就進(jìn)入編碼階段了。 （一） POS系統(tǒng)的開(kāi)發(fā) 1. 功能及實(shí)現(xiàn)方法 POS 系統(tǒng)是作為一個(gè)單獨(dú)的程序開(kāi)發(fā)的，主要在 POS 機(jī)上運(yùn)行， 完成商品的交易任務(wù)。銷(xiāo)售的商品信息存儲(chǔ)在 POS_SALE 表中。我們把一次交易放在一個(gè)事務(wù)提交，保證了數(shù)據(jù)的完整性和數(shù)據(jù)的正確性。界面以灰色調(diào)為主，使得收銀員長(zhǎng)時(shí)間工作眼睛不感到疲勞。收銀的操作也很簡(jiǎn)單方便。交易流水號(hào)自動(dòng)增加。 當(dāng)某種商品處于促銷(xiāo)或折扣銷(xiāo)售狀態(tài)時(shí)， POS 系統(tǒng)自動(dòng)取商品的促銷(xiāo)或折扣售價(jià)，無(wú)需人工干預(yù)，并且促銷(xiāo)或折扣期結(jié)束時(shí)，系統(tǒng)能自動(dòng)識(shí)別恢復(fù)正常售價(jià)。這一個(gè)功能的實(shí)現(xiàn)是通過(guò)商品視圖來(lái)完成的。請(qǐng)看商品視圖源碼。 前臺(tái) POS 銷(xiāo)售時(shí)取商品信息時(shí)用到的視圖 : CREATE VIEW V_SPXX AS SELECT NAME , , BUY_PRICE= CASE WHEN (GETDATE() AND GETDATE()) OR =39。正常 39。 THEN WHEN (GETDATE() AND GETDATE()) AND =39。促銷(xiāo) 39。 THEN WHEN (GETDATE() AND GETDATE()) AND =39。折扣 39。 THEN ELSE END FROM GOODS_INFO A ,GOODS_PROMOTE_LOG B WHERE *= 交易是在一個(gè) 事務(wù)里完成的 ,請(qǐng)看交易完成數(shù)據(jù)提交的代碼： if then try 。把本地緩存修改的操作提交服務(wù)器 第 11 頁(yè) 共 20 頁(yè) 。 事務(wù)提交 。清空本地緩存 if =false then 。 except 。 事務(wù)回滾 end。 2. 問(wèn)題討論：交易流水號(hào)的確定 在實(shí)際運(yùn)用中，可能十幾臺(tái)甚至幾十臺(tái) POS 機(jī)同時(shí)工作，也就是存在大量的數(shù)據(jù)庫(kù)并發(fā)操作。怎樣使交易流水號(hào)唯一呢？我是這樣實(shí)現(xiàn)的，在每次事務(wù)提交之前，比較本機(jī)的流水號(hào)是否在后臺(tái)數(shù)據(jù)庫(kù)交易流水號(hào)中已經(jīng)存在，如果存在，也就是說(shuō)已經(jīng) 被別人占用，則重新取出最大交易流水號(hào)，然后提交整個(gè)事務(wù)。事務(wù)提交成功以后還要更新本地交易流水號(hào)。這是取最大流水號(hào) select max(P_NO) as p_no from pos_sale 的 SQL語(yǔ)句。 （二）管理信息系統(tǒng)的設(shè)計(jì) 本系統(tǒng)采用了帶導(dǎo)航欄的多文檔窗體設(shè)計(jì)風(fēng)格，使操作變的簡(jiǎn)單直觀。當(dāng)使用某一個(gè)功能模塊時(shí)，只顯示相應(yīng)的菜單，使人不會(huì)覺(jué)得眼花繚亂。系統(tǒng)完全擯棄那種界面花哨，色彩絢麗等華而不實(shí)做法，但和傳統(tǒng)的風(fēng)格有有所區(qū)別，傳統(tǒng)的風(fēng)格顯得過(guò)于呆板。本系統(tǒng)的界面色調(diào)一致，簡(jiǎn)單樸素，但不失 美觀大方。窗體界面一致，操作也大同小異，絲毫沒(méi)有雜亂無(wú)章的感覺(jué)。 我首先定義了幾個(gè)重要的窗體基類，其他的窗體基本上這幾個(gè)基類的派生類。在使用時(shí)在對(duì)窗體進(jìn)行重載。所有的窗體都是在運(yùn)行時(shí)動(dòng)態(tài)加載的。需要運(yùn)行那個(gè)窗體時(shí)，程序才加載該窗體，用完后立即釋放，這樣使用戶計(jì)算機(jī)系統(tǒng)資源得以最少得占用。請(qǐng)看一個(gè)窗體得創(chuàng)建例子： enter_dan:= (Self)。 入庫(kù)單錄入窗體得創(chuàng)建 form_show(enter_dan,555 ,360,10,2)。 form_show 為自定義函數(shù) 對(duì)所有子窗體顯示我自定義了一個(gè)函數(shù) form_show，減少了工作量和代碼量。 procedure form_show(form:TForm。fwidth ,fheight,fleft,ftop :integer)。 begin with form do begin height:=fheight。 第 12 頁(yè) 共 20 頁(yè) width:=fwidth。 Left:=fleft。 top:=ftop。 Show。 end。 end。 窗體的釋放實(shí)現(xiàn)，例如釋放入庫(kù)單錄入界面窗體： procedure (Sender: TObject。 var Action: TCloseAction)。 begin action:=cafree。 在內(nèi)存中釋放掉窗體 end。 2. 各個(gè)功能模塊實(shí)現(xiàn)的要點(diǎn)和技術(shù) 這里我只把我在編碼過(guò)程中比較重要或者比較有代表性的技術(shù)和部分源碼闡述一下。詳情查看系統(tǒng)的源代碼。 類繼承與重載 在編 碼過(guò)程中，我充分利用了面向?qū)ο缶幊痰奶囟?—— 代碼的重用，具體實(shí)現(xiàn)起來(lái)依靠的是重載和繼承。把具有相同或相似屬性的類抽象出來(lái)作為一個(gè)基類。我定義了幾個(gè)重要的窗體基類，基類窗體包含了需要的公有控件和共有事件方法。其他的窗體基本上這幾個(gè)基類的派生類。在使用時(shí)在對(duì)窗體的控件的屬性和方法進(jìn)行繼承或者重載。 關(guān)于在 DELPHI 方法的重載，例如： procedure Action7Execute(Sender: TObject)。 OVERRIDE。 procedure (Sender: TObject)。 begin try if (39。39。) and (39。39。) and (39。39。)and (39。39。)then begin 。 :=true。 :=true。 :=false。 end else showmessage(39。你的輸入不完整！ 39。)。 第 13 頁(yè) 共 20 頁(yè) except showmessage(39。代碼重復(fù)！ 39。)。 end。 end。 windows消息機(jī)制 當(dāng)查詢窗體要返回結(jié)果時(shí)，我們用到了 windows 消息機(jī)制。 首先定義一個(gè)全局的自定義消息常量。 Const My_WM_USER=WM_USER+100。 //自定義消息 向指定的窗體發(fā)送自定義消息，傳遞查詢結(jié)果。例如： procedure (Sender: TObject)。 begin try 。 。 :=。 sendmessage(,My_WM_USER,0,0)。 except beep。 end。 close。 end。 接收消息，并且處理它，例如： 定義消息響應(yīng)的方法 procedure my_wm_user100(var msg:Tmessage)。 message My_WM_USER。 處理消息： procedure (var msg:Tmessage) 。 begin with query1 do close。 。 (sql 語(yǔ)句 )。 open。 end。 第 14 頁(yè) 共 20 頁(yè) 關(guān)于權(quán)限設(shè)置 權(quán)限設(shè)置是一個(gè)管理系統(tǒng)非常重要的一部分，直接關(guān)系到公司業(yè)務(wù)和財(cái)務(wù)安全性。因此，本系統(tǒng)在這方面的功能是較完善的。操作人員的權(quán)限可以定義到每級(jí)子菜單。對(duì)沒(méi)有賦權(quán)限的菜單項(xiàng)不予顯示。也就是說(shuō)，系統(tǒng)能根據(jù)登陸人員的權(quán)限自動(dòng)顯示具有權(quán)限的功能菜單。我們把人員的權(quán)限信息存放在 MENU_FLAG 表中，在系統(tǒng)啟動(dòng)時(shí)加載相關(guān)的權(quán)限設(shè)置信息。權(quán)限設(shè)置這一功能只有高級(jí)管理人員和系統(tǒng)管理員才能使用。 根據(jù)權(quán)限顯示菜單算法 with do //query1 關(guān)聯(lián) MENU_FLAG 表 begin close。
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1