前言：本站為你精心整理了企業經營網絡選單探討范文，希望能為你的創作提供參考價值，我們的客服老師可以幫助你提供個性化的參考范文，歡迎咨詢。

摘要:企業經營模擬課程中的選單環節,在現場選單中,很難控制,浪費時間,不利于比賽。通過對選單流程的分析,試圖用delphi、sql構建的C/S來實現網絡控制選單,達到選單有效控制,時間精確控制,用于比賽的目的。

關鍵詞:企業經營模擬;delphi;局域網選單

1企業經營模擬課程中現場選單狀況

企業經營模擬課程一般是將受訓者分為若干小組,在同一市場環境中進行競爭博弈。通過模擬企業運行狀況,讓受訓者在做中學,學后用,調動受訓者的主觀能動性,激發學生受訓者的學習潛能,讓他們身臨其境地感受一個企業經營者直面市場競爭的精彩與殘酷。

其中,企業每年的訂單獲得是靠廣告費的多少來排序選單。當每年投完廣告費后,就由老師在黑板上或EXCEL上進行排序。排序的規則如下:

按某市場某產品廣告投入量,高者優先;若該市場該產品廣告投入相同,則比較該產品所有市場廣告投入之和;若該產品所有市場廣告投放相同,則比較所有產品,所有市場兩者的廣告總投入;若所有產品,所有市場兩者的廣告總投入也相同,則時間優先。

排序完成后,就是各組選單。此時,現場氣氛熱烈,幾乎所有人都擠在屏幕前,討論、爭論、問詢,場面混亂,難以控制。選單時,會出現猶豫不決,組員相互討論,在老師的多次催促下仍無法選單的情況時有發生。這就顯得場面混亂,而且也浪費時間,如果是比賽的話,無疑,思考和考慮得最久的組將得利最大,這勢必會造成整個比賽時間的延長。

2網絡選單的實現

2.1Delphi簡介

由Borland公司推出的Delphi是全新的可視化編程環境,是一種方便、快捷的應用程序開發工具。它使用了MicrosoftWindows圖形用戶界面的許多先進特性和設計思想,采用了彈性可重復利用的完整的面向對象程序語言。

2.2SQL的簡介

SQL是高級的非過程化編程語言,允許用戶在高層數據結構上工作。它不要求用戶指定對數據的存放方法,也不需要用戶了解具體的數據存放方式,所以具有完全不同底層結構的不同數據庫系統可以使用相同的SQL語言作為數據輸入與管理的接口。它以記錄集合作為操作對象,所有SQL語句接受集合作為輸入,返回集合作為輸出,這種集合特性允許一條SQL語句的輸出作為另一條SQL語句的輸入,所以SQL語句可以嵌套,這使他具有極大的靈活性和強大的功能,在多數情況下,在其他語言中需要一大段程序實現的功能只需要一個SQL語句就可以達到目的,這也意味著用SQL語言可以寫出非常復雜的語句。

2.3CS網絡模式的結構、工作原理和特點

CS模式是一種兩層結構的系統:第一層是在客戶機系統上結合了表示與業務邏輯;第二層是通過網絡結合了數據庫服務器。首先,交互性強是CS固有的一個優點。在CS中,客戶端有一套完整應用程序,在出錯提示、在線幫助等方面都有強大的功能,并且可以在子程序間自由切換。其次,CS模式提供了更安全的存取模式。由于CS配備的是點對點的結構模式,采用適用于局域網、安全性可以得到可靠的保證。由于客戶端實現與服務器的直接相連,沒有中間環節,因此響應速度快。同時由于開發是針對性的,因此,操作界面漂亮,形式多樣,可以充分滿足客戶自身的個性化要求。

2.4實現

按照競單排序流程,服務器將客戶機的信息收集后,實現如下:

Ifcbyears.itemindex=-1then

Begin

Showmessage("請先選擇年度!“)

Exit;

End;

Qry,active:=true

Ifnotqry1.isemptythen

Begin

Showmessage(cbyears.text+’的選單已經開始!);

Exit;

End;

Str:=’確認開始‘+cbyears.text+’的競單嗎?’;

Ifapplication.messagebox(pchar(str),’提示’,mb_okcancel)=2then

Exit

Qyr,sql.text:=’updatesysparamssetvalue=”1”wherekind=”contestbill”andparam=”+inttostr(cbyeara.itemindex)+;

Qry1.execsql;

Showmessage(現在可以進行‘+cbyears.text+’的競單了!);

Time1,enabled:=true;

Bbrefresh.enabled;=true;

3測試

設定為六組,進行了兩輪,每輪6年的測試。用現場選單的方式來驗證網絡選單,是正確的。

參考文獻

[1]劉建永,運籌學算法與編程實踐—Delphi實現[M].北京:清華大學出版社,2004.

[2]羅鴻,王忠民.ERP原理、設計、實施[M].北京:電子工業出版社,2003