【正文】 cl on pack set excl off use endif 本段代碼功能是當(dāng)單擊“退出”按鈕時，關(guān)閉表緩沖區(qū)，并關(guān)閉表單返回主介面。 按數(shù)量統(tǒng)統(tǒng)計計表單（ pos_sltj） : 設(shè)計介面： 程序分析： 表單初始化（ ）： 本段的功能是當(dāng)啟動表單時，對視力 pos_jefl 進(jìn)行篩選，并使表單中的表格不顯示任何數(shù)據(jù)。 local czy1,mm1 public yg,qxl czy1=alltrim() mm1=alltrim() select pos_yg locate for alltrim()=mm1 .and. alltrim()=czy1 if .not. eof() yg= qxl= if qxt=0 do form pos_qmenu *調(diào)用菜單表單 endif qxt=1 else =+1 =messagebox(密碼錯誤 !,48+0+0,警告 ) if =3 endif = endif “退出”／“返回”按鍵（ ）： 本段代碼功能為：當(dāng)初次登錄時點(diǎn)擊將退出本系統(tǒng)，在系統(tǒng)中以“重新登錄”時點(diǎn)擊則返回主介面。 qxt=1 *表示可刷新可用功能。 在這次畢業(yè)設(shè)計中，從確定系統(tǒng)的目標(biāo)、功能，到上機(jī)設(shè)計，以及之后調(diào)試、連編、優(yōu)化，我都盡力做得更好。 ２、對貨倉的存貨進(jìn)行管理，以及進(jìn)貨、貨倉維護(hù)。 ４、對大客戶、職工、供應(yīng)商資料進(jìn)行管理和 維護(hù)。從而加深了我對 Visual FoxPro 6 基本概念，基本操作命令和語法等知識的認(rèn)識。 “工作結(jié)束”按鈕（ ）： 以下代碼的功能為，恢復(fù)系統(tǒng)環(huán)境，然后清除事件循環(huán)，最后退出小型商場管理系統(tǒng)。 設(shè)計介面： 注：由于二階菜單在設(shè)計時全為可見，為避免重疊，于實(shí)際執(zhí)行時位置不同。 define item0_Loc(無 ) define item1_Loc100 件以下 define item2_Loc100 件 300 件 define item3_Loc300 件 500 件 define item4_Loc500 件 1000 件 define item5_Loc1000 件以上 (item0_Loc) (item1_Loc) (item2_Loc) (item3_Loc) (item4_Loc) (item5_Loc) =1 *打開時默認(rèn)選項(xiàng)為“無” “數(shù)量類別”組合框（ ）： 以下代碼功能是當(dāng)在下拉列表框中選擇了所需的項(xiàng)目后，對 pos_jefl 視圖按所選項(xiàng)的分類進(jìn)行篩選，并使資料在表格中顯示。 “合計”（ ） : =.f. =.t. =.f. =.f. =.f. =.t. 本段代碼的功能是：當(dāng) 單擊此鍵時本宗交易商品輸入完畢，設(shè)商品編碼和商品數(shù)量文本框不可用，并設(shè) VIP 選項(xiàng)和付款數(shù)文本框?yàn)榭捎谩? 無該商品 按“合計” 否 是 是否 VIP 商品計價 否 是 總價 *= 打印收據(jù) 是 打印報表 收款和退錢 否 繼續(xù)？ 是 結(jié)束 27 表單介面： 數(shù)據(jù)環(huán)境： 28 程序分析： select pos_xsk public xhbm2 xhbm2=0 go top do while NOT eof() if (xhbm2) xhbm2= endif skip enddo xhbm2=xhbm2+1 set filter to =xhbm2 本段為表單的初始化和對 pos_xsk 表進(jìn)行過濾，使表單中的表格控件在剛啟動時不顯示任何數(shù)據(jù)。 我在這次設(shè)計中負(fù)責(zé)銷售模塊、銷售統(tǒng)計模塊、報表打印模塊等。 （３） 按下“確定”按鈕，這時會出現(xiàn)一個“另存為”對話框。 在選擇編譯操作的選項(xiàng)時，為了確保所有引用的完整，并加入上次連編之后更新的一些組件，應(yīng)對整個 項(xiàng)目進(jìn)行重新編譯。 2. 用“快速報表”從單表中創(chuàng)建一個簡單報表。視圖和查詢對數(shù)據(jù)庫中的數(shù)據(jù)進(jìn)行篩選、排序和分組，而報表布局定義了報表的打印格式。 － 在視力中需要什么記錄。之后就可以進(jìn)行表單的設(shè)計了?？梢栽诒韱沃羞M(jìn)行輸入數(shù)據(jù)、查詢數(shù)據(jù)以及控制應(yīng)用程序的運(yùn)行等交互操作。 （２） 在出現(xiàn)的“新建數(shù)據(jù)庫”對話框中，單擊“新建數(shù)據(jù)庫”按鍵。 銷售表： kh 普通索引， sh普通索引， bm 普通索引， xhbm 普通索引；通過 bm字段和pos_spk 表中的 bm 字段建立永久關(guān)系，通過 sh 字段和 pos_yg 表中的 bm字段建立關(guān)系，通過 kh字段和 pos_khk 表中的 kh字段建立關(guān)系。 開始頁面（ pos_begin） 本系統(tǒng)的初始頁面，可以選擇登錄或退出。 更改密碼（ pos_ggmm） ： 對員工的登錄密碼進(jìn)行修改。 按金錢分類（ pos_jetj）： 能對以銷售的同類商品進(jìn)行按銷售總金額分類顯示，有“ 1 千以下”、“ 1 千到 3 千”、“ 3 千到 5 千”、“ 5 千到 1 萬”、“ 1 萬以上”這 5 個類型。所有商品輸入完成后，計算出總金額，對持有 VTP 卡的客戶，只要輸入 VIP 卡號就能享有 9 折的優(yōu)惠。 有時 編譯后的程序運(yùn)行時，屏幕一閃就退出了 ，要解決這種問題應(yīng)該在程序中建立‘等待狀態(tài)’。表格控件是唯一具有 RecordSource 屬性的控件，但是沒有 ControlSource 屬性。 應(yīng)該用 LostFocus 事件作為替代。和 SEEK 不同 , LOCATE 是可進(jìn)行 Rushmore優(yōu)化的 . 當(dāng)一個可優(yōu)化的 filter 起作用時， LOCATE FOR CustId= 通常比 SEEK 更快。在模式表單中，菜單不能使用 （從而避免了重復(fù)打開表單的沖突） 。關(guān)閉所有數(shù)據(jù)庫的命令是： close databases all，關(guān)閉所有表的命令是： close tables all。操作時可能使用鼠標(biāo)，也可使用鍵盤。單索引文件可以有效地減少索引文件所需的磁盤空間。這兩類版本各有一個32位增強(qiáng)型版本。數(shù)據(jù)庫邏輯結(jié)構(gòu)通常由層次、網(wǎng)狀和關(guān)系的數(shù)據(jù)模型表示。 數(shù)據(jù)庫設(shè)計有兩個重要的目標(biāo)，既滿足應(yīng)用功能和好的數(shù)據(jù)庫性能。 2）軟件系統(tǒng) 軟件系統(tǒng)包括了數(shù)據(jù)庫管理系統(tǒng) DBMS、操作系統(tǒng)、應(yīng)用程序開發(fā)工具及應(yīng)用程序。所以在通俗的意義上，數(shù)據(jù)庫不妨理解為存儲數(shù)據(jù)的 基地或倉庫。 6 Summary This design the book is detailed to record the usage to design the small scaled market to manage the system to apply the procedure39。這個系統(tǒng)主要由六個模塊組成，分別是銷售、進(jìn)貨、銷售統(tǒng)計、系統(tǒng)維護(hù)、報表打印、退出系統(tǒng)。在生活中有 很多復(fù)雜的數(shù)據(jù)，單靠人腦來記憶是很困難的事，但計算機(jī)的出現(xiàn)給人類帶來了很多方便。為了方便人們充分利用信息資源，經(jīng)過不斷發(fā)展，逐漸形成了數(shù)據(jù)庫技術(shù)。 首先介紹數(shù)據(jù)庫技術(shù)的發(fā)展及基本理論和本次設(shè)計外遇問題及其解決方法，然后介紹 Visual 程序設(shè)計基礎(chǔ)和表、表單、控件、視圖、報表的設(shè)計方法。s small scaled market to manage system application procedure, and make use of the form and list to design , and design out the good sense of vision interface. Afterward is in the design inside of this group, my an inside is then to sell with press quantity classification statistics two form and lists are for the example, analysis way of thinking of my design gave introduce, and as to it39。 2. 數(shù)據(jù)庫系統(tǒng)的組成： 數(shù)據(jù)庫系統(tǒng)由數(shù)據(jù)庫、軟件系統(tǒng)、硬件系統(tǒng)、數(shù)據(jù)管理員四個要素組成。應(yīng)用程序開發(fā)工具用來開發(fā)數(shù)據(jù)庫相關(guān)的應(yīng)用程序，本次用來設(shè)計的 就是一種優(yōu)秀的工具，它功能全，有極高的處理數(shù)據(jù)速度。 數(shù)據(jù)庫設(shè)計的好壞，不僅影響到當(dāng)前的應(yīng)用，也影響以后的維護(hù)工作。 數(shù)據(jù)庫的設(shè)計過程 一、 FoxPro 概述： FoxPro 是美國 Fox Software 公司推出的用于微機(jī)平臺的關(guān)系數(shù)據(jù)庫管理系統(tǒng)，可以幫助用戶收集、恢復(fù)和描述數(shù)據(jù)。例如 FoxPro 比 FoxBASE 增加了 200 9 余條命令和函數(shù)，增加了系統(tǒng)內(nèi)部變量。用戶還可以使工程文件建立一個在FoxPro 內(nèi)部使用的應(yīng)用程序或程序員感興趣的 .EXE 文件。不過很多時候都沒什么幫助。 2. 模式表單 的應(yīng)用 在運(yùn)行表單時，往往因?yàn)榇蜷_了另一個表單，而造成一些庫文件的使用沖突。 3. 在應(yīng)用程序中避免出現(xiàn) VFP的窗口標(biāo)題 在生成 EXE 文 件 后 ， 進(jìn) 行 程 序 時 ， 程 序 的 標(biāo) 題 默 認(rèn) 為MicrosoftVisualFOXPRO，改為自定義標(biāo)題的方法如下： 在 文件中，加 TITLE = 你的標(biāo)題 行。要執(zhí)行 GO BOTTOM, 設(shè)置當(dāng)前索引標(biāo)識的降序然后 LOCATE, 在將索引設(shè)置為原來的升序。它包含了對連接到 ODBC 數(shù)據(jù)文件名稱的引用，并且必須指向一個通過 ODBC 管理程序定義 的有效的 數(shù)據(jù)源。 例如，當(dāng)表單對象選中時，在屬性窗口中 按下 Ctrl+Alt+C 將快速移動到 Caption屬性。如果你只有一個屏幕，把表單的 WindowState屬性設(shè)置為 Modal。交易完成后可以選擇打印收據(jù)。并可進(jìn)行打印。 月統(tǒng)計（ pos_ytj）： 通過視圖打印本月銷售的貨品。永久關(guān) 系是數(shù)據(jù)庫間的關(guān)系，它們存儲在數(shù)據(jù)庫文件中，并且不必在每次使用表時重新創(chuàng)建（本系統(tǒng)以永遠(yuǎn)關(guān)系為主）。其中包括文件、數(shù)據(jù)、文檔和對象，項(xiàng)目文件的擴(kuò)展名為 .PJX。 （２） 在對話框中單擊“新建表”按鈕。 － 表單中使用的控件。視圖可以用來從一個或 多個相關(guān)聯(lián)的表中提取有用信息。 （３） 在“新建本地視圖”對話框中選擇“新建視圖”按鈕 （４） 再按需要輸入需要的字段，聯(lián)接條件，篩選條件，排序條件，以及分組條件就可以了。使用“報表設(shè)計器”我們可以設(shè)計復(fù)雜的列表、總結(jié)摘要或數(shù)據(jù)的特定集合，比如銷售統(tǒng)計表。） 創(chuàng)建報表的步驟 ： （１） 在“項(xiàng)目管理器”中選定“報表”，然后單擊“新建”按鈕。 （３） 按下“確定”按鈕，系統(tǒng)將開始對整個項(xiàng)目文件進(jìn)行編譯。在用屏幕來設(shè)計時，只要為屏幕設(shè)置它的大小、位置、顏色以及添加一些必要的對話框即可。所有商品輸入完成后，計算出總金額，對持有 VTP 卡的客戶，只要輸入 VIP 卡號就能享有 9 折的優(yōu)惠。 rollback =.f. =.f. =.f. 29 =.f. =.f. =.t. =.t. =.f. = = = =.f. =.f. =.f. =.f. endif 本段程序?yàn)槿鲣N操作，點(diǎn)擊后放棄輸入的記錄，將表單中的“合計”、“付款數(shù)”和“應(yīng)退款”的值設(shè)為空，并使“開始”和“退出”按鈕可用，其余按鈕為不可用。 付款數(shù)文本框（ ） : local ytk ytk= ytk=val()hjs if ytk=0 end transaction =ytk =.t. =.t. =.t. =.f. else =messagebox(金額不足 ,請重新輸入 !,48+0+0,警告 ) 33 return endif 本 段程序作用為在本文本框中輸入客戶付款的金額，并計算出應(yīng)退款數(shù)，將“打印收據(jù)”和“繼續(xù)”按鈕設(shè)為可用。 登錄表單（ pos_dl）： 設(shè)計介面： 表單初始化（ ）： 本段代碼功能當(dāng)非初次登錄系統(tǒng)時，“退出”鍵改為“返回”鍵，以便系統(tǒng)中重新登錄時使用。 local i if qxt=1 *有否重新登錄。cmenuval clear events quit endif 其余按鈕的功能多數(shù)用于調(diào)用功能表單，和控件顯示（可見／不可見）功能，在此不給予詳細(xì)介紹。這使將走出社會的我得到一次很好的鍛