畢業(yè)設(shè)計(jì)（論文）-vfp庫(kù)房管理信息系統(tǒng)的設(shè)計(jì)

1、<p>　　江都農(nóng)行庫(kù)房管理信息系統(tǒng)的設(shè)計(jì)</p><p>　　摘 要 本系統(tǒng)是以VFP為開(kāi)發(fā)工具，結(jié)合實(shí)際工作開(kāi)發(fā)而成，它包含七個(gè)模塊：檔案設(shè)置、物資管理、庫(kù)存管理、財(cái)務(wù)管理、系統(tǒng)維護(hù)、輔助功能、退出系統(tǒng)等，其功能基本符合用戶需求，能夠完成入庫(kù)、出庫(kù)、財(cái)務(wù)核算以及相關(guān)報(bào)表的查詢，并提供部分系統(tǒng)維護(hù)功能；由于設(shè)計(jì)時(shí)間較短，該系統(tǒng)還存在許多不盡如人意的地方，比如部分功能模塊的編碼工作還未全部完成，聯(lián)機(jī)

2、文檔比較少，出錯(cuò)處理不夠等多方面的問(wèn)題，還有待完善，另外從長(zhǎng)遠(yuǎn)角度考慮，本系統(tǒng)還應(yīng)支持前臺(tái)開(kāi)單，后臺(tái)管理控制，應(yīng)采用客戶/服務(wù)器的模式用遠(yuǎn)程視圖與數(shù)據(jù)庫(kù)建立連接。</p><p>　　關(guān)鍵字： VFP6.0 庫(kù)房管理信息系統(tǒng)</p><p>　　Abstract This system’s exploitation tool is VFP, it have b

3、een expoldered is according as the fact work, and includes seven modules :File setting 、 Material managing、 Storage managing Finance managing 、 System maintenance 、 Assistant function 、 Exit system and so on, is

4、basic answered for its function, can complete inbase 、outbase、finance managing and inqriring some report forms, and supply part of system mainterancing function; for time is too short to design, the syste&l

5、t;/p><p>　　Keyword : VFP the managing system about the storeroom </p><p>　　目 錄</p><p>　　引言--------------------------------------------------------------------------------

6、---------------------3</p><p>　　系統(tǒng)概述-----------------------------------------------------------------------------------------------3</p><p>　　2.1系統(tǒng)的軟硬件配置 ----------------------------------------

7、-------------------------------------3</p><p>　　2.2系統(tǒng)的功能簡(jiǎn)介-------------------------------------------------------------------------------- -3</p><p>　　2.2.1設(shè)置------------------------------------

8、---------------------------------------------------------3</p><p>　　2.2.2入庫(kù)---------------------------------------------------------------------------------------------3</p><p>　　2.2.3出庫(kù)--------

9、-------------------------------------------------------------------------------------3</p><p>　　2.2.4庫(kù)存---------------------------------------------------------------------------------------------4</p>

10、<p>　　2.2.5財(cái)務(wù)---------------------------------------------------------------------------------------------5</p><p>　　2.2.6綜合----------------------------------------------------------------------------

11、-----------------5</p><p>　　2.3數(shù)據(jù)分析-------------------------------------------------------------------------------------------5</p><p>　　系統(tǒng)的實(shí)現(xiàn) ---------------------------------------------------

12、----------------------------------------6</p><p>　　3.1用戶界面的設(shè)計(jì)與實(shí)現(xiàn)-------------------------------------------------------------------------6</p><p>　　3.1.1 DEFINE MENU|PAD|BAR(定義菜單項(xiàng)命令)------------

13、-------------------------------6</p><p>　　3.1.2 ON PAD(激活當(dāng)前菜單項(xiàng)的一個(gè)彈出式菜單)----------------------------------------- 6 </p><p>　　3.1.3 ON SELECTION MENU|PAD|BAR(指定選中一個(gè)對(duì)象以后需執(zhí)行的操作)-----6</p>&l

14、t;p>　　3.2數(shù)據(jù)庫(kù)及相關(guān)系統(tǒng)功能模塊的設(shè)計(jì)簡(jiǎn)介----------------------------------------------------7</p><p>　　3.2.1建立項(xiàng)目-------------------- ------------------------------------------------------------------ 7 </p><

15、p>　　3.2.2建立數(shù)據(jù)庫(kù)模型-------------------------------------------------------------------------------7</p><p>　　3.2.3建立應(yīng)用程序窗體----------------------------------------------------------------------------8</p&g

16、t;<p>　　3.2.3.1可視類庫(kù)的設(shè)計(jì)--------------------------------------------------------------------------8</p><p>　　3.2.3.2菜單的設(shè)計(jì)--------------------------------------------------------------------------------9

17、</p><p>　　3.2.3.3報(bào)表的設(shè)計(jì)-------------------------------------------------------------------------------14</p><p>　　系統(tǒng)的使用----------------------------------------------------------------------------

18、-----------------14</p><p>　　系統(tǒng)的技術(shù)要點(diǎn)---------------------------------------------------------------------------------------14</p><p>　　體會(huì)與小結(jié)------------------------------------------------------

19、---------------------------------------17</p><p>　　附錄------------------------------------------------------------------------------------------------------17</p><p>　　主要參考資料文獻(xiàn)-------------------

20、-----------------------------------------------------------------20</p><p><b>　　庫(kù)房管理信息系統(tǒng)</b></p><p><b>　　引言</b></p><p>　　伴隨著企業(yè)規(guī)模的不斷擴(kuò)大,原始的、手工的進(jìn)行管理工作已經(jīng)不能適應(yīng)工業(yè)企業(yè)

21、發(fā)展的現(xiàn)狀，更無(wú)法滿足企業(yè)對(duì)管理工作的快速、準(zhǔn)確的要求。而計(jì)算機(jī)信息管理技術(shù)的迅速發(fā)展恰恰解決了這個(gè)問(wèn)題，它使計(jì)算機(jī)技術(shù)與現(xiàn)代的管理技術(shù)相互配合，來(lái)更加準(zhǔn)確、高速的完成工業(yè)企業(yè)日常的倉(cāng)庫(kù)管理工作。使企業(yè)能夠以最少的人員來(lái)完成更多的工作。 </p><p>　　庫(kù)房管理信息系統(tǒng)主要采用Microsoft Foxpro6.0 做為開(kāi)發(fā)工具，應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法，進(jìn)行開(kāi)發(fā)與設(shè)計(jì)的。 它是一個(gè)典型的信息管理系統(tǒng)。

22、本系統(tǒng)可以根據(jù)各應(yīng)用單位情況，適當(dāng)加以修改，以便更好應(yīng)用。</p><p>　　庫(kù)房管理信息系統(tǒng)是根據(jù)某企業(yè)所屬倉(cāng)庫(kù)的實(shí)際管理情況進(jìn)行編寫的，主要目的是為了方便企業(yè)對(duì)倉(cāng)庫(kù)來(lái)往業(yè)務(wù)及庫(kù)存情況進(jìn)行集中的查詢與管理工作。在社會(huì)主義經(jīng)濟(jì)高速發(fā)展的今天，如果企業(yè)對(duì)倉(cāng)庫(kù)的各項(xiàng)管理運(yùn)做仍然停滯在以紙、筆為主要工具的階段，就會(huì)因?yàn)樾畔⒘康目焖僭鲩L(zhǎng)而無(wú)法迅速、準(zhǔn)確的完成各項(xiàng)管理工作，這樣，必將成為企業(yè)各方面發(fā)展的一個(gè)瓶頸。而在當(dāng)代

23、這個(gè)以信息時(shí)代為主題的社會(huì)里，將信息技術(shù)應(yīng)用于對(duì)現(xiàn)代企業(yè)的管理，不但可以提高信息的處理速度和提高信息處理的準(zhǔn)確性，更重要的是，可以解放勞動(dòng)力，將他們分配到更需要人力資源的崗位上去，從而加快其現(xiàn)代化、綜合化的建設(shè)步伐。這樣，不但為企業(yè)管理部門節(jié)省了不必要的開(kāi)支，更重要的是提高了它的工作效率。 </p><p>　　金融系統(tǒng)的分、支行的庫(kù)房管理承擔(dān)著全行重要空白憑證、一般憑證、計(jì)算機(jī)耗材等物資的進(jìn)貨、領(lǐng)用、庫(kù)存統(tǒng)計(jì)與

24、核銷、財(cái)務(wù)核算工作。但長(zhǎng)期以來(lái)一直是手工操作和管理，經(jīng)常導(dǎo)致帳、實(shí)不符，同時(shí)手工結(jié)帳繁瑣、報(bào)表匯總速度慢，嚴(yán)重加重了庫(kù)房管理人員的工作負(fù)擔(dān)。因此設(shè)計(jì)適合金融系統(tǒng)的庫(kù)房管理信息系統(tǒng)迫在眉捷。設(shè)計(jì)庫(kù)房管理信息系統(tǒng)的目標(biāo)除了要實(shí)現(xiàn)上述提出的庫(kù)房管理的基本要求外，應(yīng)著重解決對(duì)重要空白憑證的先進(jìn)先出、按份、按本靈活核算，自動(dòng)生成重要空白憑證月報(bào)表；財(cái)務(wù)核算方式靈活，既可單筆結(jié)帳又可批量劃帳;報(bào)表格式自定義，分類查詢、打印靈活方便，界面相對(duì)統(tǒng)一。為

25、了實(shí)現(xiàn)這些目標(biāo)，我從可行性研究、需求分析開(kāi)始，對(duì)庫(kù)房管理信息系統(tǒng)進(jìn)行了總體設(shè)計(jì)和詳細(xì)設(shè)計(jì)，實(shí)現(xiàn)了部分的編碼工作，較好地實(shí)現(xiàn)了系統(tǒng)目標(biāo)。</p><p><b>　　系統(tǒng)概述 </b></p><p>　?。ㄒ唬?、系統(tǒng)的軟硬件配置</p><p>　　由于庫(kù)房管理信息系統(tǒng)(MIS)相對(duì)獨(dú)立于大集中模式的門市業(yè)務(wù)系統(tǒng)，應(yīng)納入機(jī)關(guān)辦公自動(dòng)化系統(tǒng)的范疇

26、。我之所以選擇基于windows98的vfp6.0數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)工具,是為了利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具、強(qiáng)大的表單設(shè)計(jì)器和報(bào)表設(shè)計(jì)器功能快速地建立應(yīng)用程序窗體和系統(tǒng)應(yīng)用原型，然后對(duì)系統(tǒng)進(jìn)行不斷修正和改進(jìn),形成用戶滿意的可行系統(tǒng)，同時(shí)VISUAL FOXPRO6繼承了VISUAL FOXPRO3/5的所有功能，進(jìn)一步強(qiáng)化了數(shù)據(jù)庫(kù)引擎、設(shè)計(jì)界面、客戶服務(wù)器結(jié)構(gòu)，提供了多種可視化編程工具，支持最新的internet技術(shù)、WWW數(shù)據(jù)庫(kù)

27、設(shè)計(jì)及ActiveX等。硬件環(huán)境為：CPU：PII以上，內(nèi)存：32M以上，硬盤：1G以上。</p><p>　?。ǘ?、系統(tǒng)功能簡(jiǎn)介</p><p>　　庫(kù)房管理信息系統(tǒng)主要包括以下六個(gè)功能模塊。（系統(tǒng)結(jié)構(gòu)總圖如下( 圖一 )）</p><p>　　設(shè)置：設(shè)置主要包括物資屬性、物資、供方、領(lǐng)用單位、操作員、倉(cāng)庫(kù)、密碼權(quán)限、單據(jù)初始化、系統(tǒng)初始化、數(shù)據(jù)整理、數(shù)據(jù)備份、

28、數(shù)據(jù)恢復(fù)等功能。物資屬性的設(shè)置主要區(qū)分物資是重要空白憑證、一般憑證還是計(jì)算機(jī)耗材，便于分類統(tǒng)計(jì)、核算。物資中單位數(shù)量的設(shè)置是為了解決一本重要空白憑證價(jià)格無(wú)法劃為按份計(jì)價(jià)的矛盾。倉(cāng)庫(kù)的設(shè)置是為了分倉(cāng)庫(kù)存放物資。密碼權(quán)限的設(shè)置是為不同的操作員設(shè)置不同級(jí)別的操作權(quán)限。數(shù)據(jù)整理是物理性地刪除數(shù)據(jù)表中己作刪除標(biāo)志的記錄并且重建索引。</p><p>　　入庫(kù)：入庫(kù)主要包括入庫(kù)單的錄入、修改以及相應(yīng)的查詢、打印功能。單位是本

29、的輸入本數(shù)，是份的輸入份數(shù)。入庫(kù)單中物資屬性是重要空白憑證的還要輸入起始號(hào)碼，同時(shí)根據(jù)單位數(shù)量自動(dòng)生成終止號(hào)碼。同一重要空白憑證不同號(hào)碼段，按入庫(kù)時(shí)間順序排列。其它非重要空白憑證物資根據(jù)物資屬性無(wú)需輸入號(hào)碼段。在入庫(kù)單的下方按入庫(kù)物資的屬性的分類產(chǎn)生各物資屬性的匯總金額，便于分類核算的需要。在操作功能排列中提供存盤\新建、查找、刪除行、復(fù)制單、作廢單、打印、退出等命令按鈕。</p><p>　　出庫(kù)：出庫(kù)主要包括

30、出庫(kù)單的錄入、修改以及相應(yīng)的查詢打印功能。單位是本的輸入本數(shù)，是份的輸入份數(shù)。出庫(kù)單中物資屬性是重要空白憑證的按入庫(kù)時(shí)間由小到大的順序自動(dòng)跳出起始號(hào)碼，同時(shí)根據(jù)單位數(shù)量自動(dòng)生成終止號(hào)碼。若出庫(kù)數(shù)量大于該段號(hào)碼的自動(dòng)復(fù)制一行跳出下段起始號(hào)碼及需出庫(kù)的數(shù)量；若出庫(kù)數(shù)量大于該品種物資合計(jì)庫(kù)存數(shù)量時(shí)則自動(dòng)提示最大可出庫(kù)數(shù)量并以最大出庫(kù)數(shù)量替換操作人員輸入的出庫(kù)數(shù)量。其它非重要空白憑證物資出庫(kù)數(shù)量大于庫(kù)存數(shù)量時(shí)自動(dòng)提示最大可出庫(kù)數(shù)量，同時(shí)根據(jù)物資

31、屬性是一般物資的則無(wú)需輸入號(hào)碼字段。在出庫(kù)單的下方按出庫(kù)物資的屬性的分類產(chǎn)生各物資屬性的匯總金額，便于領(lǐng)用單位分類核算的需要。在操作功能排列中提供存盤\新建、查找、刪除行、復(fù)制單、作廢單、打印、退出等共性命令按鈕</p><p>　　庫(kù)存：庫(kù)存主要包括庫(kù)存的即時(shí)查詢以及其它查詢，物資的轉(zhuǎn)倉(cāng)、組裝、折分，庫(kù)存的盤點(diǎn)和重要空白憑證的作廢、銷毀。在庫(kù)存的即時(shí)查詢中按“物資＋倉(cāng)庫(kù)代碼”查庫(kù)存明細(xì)，對(duì)于重要空白憑證的則按“

32、入庫(kù)時(shí)間”分段顯示各段數(shù)量。在操作功能排列中有統(tǒng)計(jì)庫(kù)存金額、查找、打印、退出等命令按鈕。在庫(kù)存的盤點(diǎn)中有帳面數(shù)量、盤點(diǎn)數(shù)量、盈虧數(shù)量、盤點(diǎn)單價(jià)、盤點(diǎn)金額、盈虧金額，操作員只需輸入盤點(diǎn)數(shù)量和盤點(diǎn)單價(jià)，其它根據(jù)平衡關(guān)系自動(dòng)生成。盈虧數(shù)量＝盤點(diǎn)數(shù)量－帳面數(shù)量，盤點(diǎn)金額＝盤點(diǎn)數(shù)量＊盤點(diǎn)單價(jià)，盈虧金額＝盤點(diǎn)金額－帳面金額（帳面金額＝帳面數(shù)量＊進(jìn)貨單價(jià)）。對(duì)于物資屬性為重要空白憑證的，如果出現(xiàn)盤點(diǎn)數(shù)量不等于帳面數(shù)量則出現(xiàn)“重要憑證帳實(shí)不符不能繼續(xù)，

33、請(qǐng)查找原因，并請(qǐng)主管授權(quán)?”提示框。功能菜單主要有調(diào)出庫(kù)存、更新庫(kù)存、打印盈虧等菜單。重要空白憑證的作廢、銷毀需主管授權(quán)進(jìn)入，輸入作廢重要空白憑證物資代碼，起始號(hào)碼與數(shù)量。打印作廢、銷毀清單后選擇臨時(shí)存盤，換人復(fù)核輸入復(fù)核作廢、銷毀清單完全正確后才能真正存盤，更新庫(kù)存。</p><p><b>　　( 圖一 )</b></p><p>　　財(cái)務(wù)：財(cái)務(wù)主要包括財(cái)務(wù)應(yīng)收、

34、財(cái)務(wù)應(yīng)付、月終報(bào)表以及各種明細(xì)帳、匯總帳等。</p><p>　　財(cái)務(wù)應(yīng)付主要包括應(yīng)付款查詢（對(duì)應(yīng)入庫(kù)單）、查欠付供方匯總、付款單錄入（對(duì)應(yīng)入庫(kù)單）</p><p>　　財(cái)務(wù)應(yīng)收中包括應(yīng)收款查詢（對(duì)應(yīng)出庫(kù)單）、查欠收客戶匯總、單筆結(jié)帳（對(duì)應(yīng)出庫(kù)單）和批量劃帳（對(duì)應(yīng)欠收單位）。月終重要空白憑證報(bào)表主要是統(tǒng)計(jì)本月各種重要空白憑證的入庫(kù)數(shù)量、出庫(kù)數(shù)量、作廢銷毀數(shù)量以及庫(kù)存結(jié)余。</p>

35、;<p>　　綜合：綜合包括其他報(bào)表的打印以及其它報(bào)表格式的修改和其它一些功能。如：系統(tǒng)的幫助說(shuō)明、版本信息等。</p><p><b>　?。ㄈ?、數(shù)據(jù)分析</b></p><p>　　當(dāng)庫(kù)房管理信息系統(tǒng)中的某種物資庫(kù)存數(shù)量少于庫(kù)存數(shù)量臨界值時(shí)就應(yīng)該定貨,入庫(kù)操作使庫(kù)存數(shù)量增加，同時(shí)產(chǎn)生財(cái)務(wù)應(yīng)付帳。倉(cāng)庫(kù)管理員根據(jù)領(lǐng)用單位的的物資領(lǐng)用申請(qǐng)單進(jìn)行出庫(kù)，出庫(kù)

36、操作使相應(yīng)物資的庫(kù)存數(shù)量減少，同時(shí)產(chǎn)生財(cái)務(wù)應(yīng)收款。因此入庫(kù)、出庫(kù)、財(cái)務(wù)三個(gè)子系統(tǒng)功能的實(shí)現(xiàn)均是圍繞庫(kù)存物資進(jìn)行的。功能級(jí)系統(tǒng)流程圖如下( 圖二 )。</p><p>　　D3 　付款信息</p><p>　　付款單　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　</p><p>　　應(yīng)付日記帳　　　　　　　　　　　

37、　　　　　　付款單</p><p><b>　　入庫(kù)單 </b></p><p>　　送貨單 入庫(kù)單 定貨</p><p><b>　　清單</b></p><p><b>　　領(lǐng)</b

38、></p><p><b>　　用</b></p><p>　　申 　庫(kù)存清單 定貨信息 定貨信息</p><p>　　請(qǐng) 出庫(kù)單</p><p>　　單

39、 D1 　庫(kù)存清單 D2 定貨信息</p><p><b>　　應(yīng)收日記帳</b></p><p>　　出庫(kù)單 收款單 收款單 </p><p>　　D4 收款信息</p><p&

40、gt;　　系統(tǒng)功能流程圖（ 圖二 ）</p><p><b>　　系統(tǒng)的實(shí)現(xiàn)</b></p><p>　?。ㄒ唬?、用戶界面的設(shè)計(jì)與實(shí)現(xiàn)</p><p>　　庫(kù)房管理信息系統(tǒng)用戶界面的設(shè)計(jì)力求相對(duì)統(tǒng)一，操作簡(jiǎn)單。主菜單采用的流行的主菜單嵌套下拉式菜單形式，并且提供熱鍵快擊功能。會(huì)用鍵盤鼠標(biāo)即可操作。下面簡(jiǎn)單介紹菜單程序使用的菜單命令的語(yǔ)法結(jié)構(gòu)。&

41、lt;/p><p>　　DEFINE　MENU|PAD|BAR　(定義菜單項(xiàng)命令)</p><p>　　DEFINE　PAD?。疾藛雾?xiàng)名1＞OF　<菜單名>　PROMPT <expC1>　[SKIP [FOR <expL>]] [COLOR 　SCHEME <expN2>] KEY <熱鍵標(biāo)簽＞[,<expC2>]<

42、/p><p>　　示例：DEFINE　PAD　JXCMENU1　OF?。進(jìn)SYSMENU PROMPT ‘設(shè)置(\<S)’ COLOR SCHEME 3 KEY ALT+S , ' '</p><p>　　示例：DEFINE BAR 1 OF 設(shè)置S PROMPT '\<A. 物資屬性' SKIP FOR .NOT. SUPER KEY AL

43、T+A , 'ALT+A'</p><p>　　ON PAD (激活當(dāng)前菜單項(xiàng)的一個(gè)彈出式菜單)</p><p>　　ON PAD ＜菜單項(xiàng)名1＞　OF ＜菜單名＞　ACTIVATE　POPUP　<expC1></p><p>　　示例：ON PAD JXCMENU1 OF _MSYSMENU ACTIVATE POPUP 設(shè)置S&l

44、t;/p><p>　?。?）ON SELECTION MENU|POPUP|PAD|BAR (指定選中一個(gè)對(duì)象以后需要執(zhí)行的操作) </p><p>　　ON SELECTION BAR 1 OF 設(shè)置S DO dm_sx（物資屬性定義程序）</p><p>　　根據(jù)庫(kù)房管理信息系統(tǒng)主要功能模塊設(shè)計(jì)系統(tǒng)主菜單如下( 圖三 )。</p><p>&

45、lt;b>　?。?圖三 ）</b></p><p>　?。ǘ?、數(shù)據(jù)庫(kù)及相關(guān)系統(tǒng)功能模塊的設(shè)計(jì)簡(jiǎn)介</p><p>　　Vfp6.0是一種典型的關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)，利用它可以對(duì)一系列數(shù)據(jù)項(xiàng)目進(jìn)行建立和維護(hù)。同時(shí)Vfp6.0利用數(shù)據(jù)庫(kù)容器（DBC）文件來(lái)控制數(shù)據(jù)庫(kù)表格（DBF）文件的各種關(guān)系。下面我們利用項(xiàng)目管理器可視化地創(chuàng)建庫(kù)房管理系統(tǒng)的數(shù)據(jù)庫(kù)容器Njxc1.dbc。&l

46、t;/p><p><b>　　第一步：建立項(xiàng)目</b></p><p>　　啟動(dòng)Vfp6.0,然后單擊“文件”菜單，選擇“新建…”，選中“項(xiàng)目”單擊“新項(xiàng)目”按鈕。</p><p>　　項(xiàng)目命名為kfgl,并保存在d:\kfgl目錄下，單擊“保存”按鈕，這樣就建立了一個(gè)“項(xiàng)目管理器”窗口，以后所有的操作都圍繞kfgl這個(gè)項(xiàng)目管理器進(jìn)行。</p

47、><p>　　第二步：建立數(shù)據(jù)庫(kù)模型</p><p>　　在項(xiàng)目管理器中，選擇“數(shù)據(jù)”選項(xiàng)卡，單擊“新建…”，彈出“創(chuàng)建”對(duì)話框，在對(duì)話框的“數(shù)據(jù)庫(kù)名”欄中，填入數(shù)據(jù)庫(kù)名Njxc1,單擊“保存”按鈕。</p><p>　　在“數(shù)據(jù)庫(kù)設(shè)計(jì)器”窗口中右擊鼠標(biāo)，在彈出的快捷菜單中選擇“新表”進(jìn)一步選擇“新表”按鈕，在“輸入表名”處填寫表名如：dm_wz。單擊“保存”按鈕。&l

48、t;/p><p>　　進(jìn)入到“表設(shè)計(jì)器”窗口，輸入字段名、類型、寬度、小數(shù)位等信息如下( 圖四 ) </p><p><b>　?。?圖四 ）</b></p><p>　　各字段名的定義如下表格：</p><p>　　在“顯示”項(xiàng)的“標(biāo)題”一欄內(nèi)分別填寫上對(duì)應(yīng)字段的中文含義如下表格：</p><p>

49、　　在“索引”選項(xiàng)卡，在mc欄選擇升序，確定后可不輸入數(shù)據(jù)退出。</p><p>　　每三步：建立應(yīng)用程序窗體</p><p>　　這里我們利用Vfp6.0強(qiáng)大的表單設(shè)計(jì)器功能為應(yīng)用程序可視化地建立和修改各種表單和表單集。利用Vfp6.0的表單控件（Form Controls）將各種所需的控件（如：標(biāo)簽控件、正文框控件、編輯框控件、命令按鈕控件、組合框控件、網(wǎng)格控件等等）放置到表單設(shè)計(jì)器的

50、布局（Layout）里面，再對(duì)相應(yīng)控件的屬性進(jìn)行編緝，建立相應(yīng)事件和方法的代碼即可設(shè)計(jì)出交互式的應(yīng)用程序窗體。在Vfp6.0面向?qū)ο蟮某绦蛟O(shè)計(jì)中我們可以設(shè)計(jì)類（class）以便在不同的應(yīng)用程序窗體中引用它們，并且把它們加到可視類庫(kù)里。</p><p><b>　　可視類庫(kù)的設(shè)計(jì)</b></p><p><b>　　語(yǔ)法結(jié)構(gòu)：</b></p&

51、gt;<p>　　建立VCX可視類庫(kù)　　CREATE　CLASSLIB　類庫(kù)名</p><p>　　在VCX可視類庫(kù)里增加一個(gè)類　　ADD　CLASS　類名TO　類庫(kù)名</p><p>　　例如：我們可以把查找、打印、添加、刪除、復(fù)制、退出等命令按鈕定義為一個(gè)類gridbtns,存儲(chǔ)于wizstyle類庫(kù)中，（如下圖五）類gridbtns的對(duì)象名分別為cmdfind、cmdp

52、rint、cmdadd、cmddelete、cmdcopy、cmdexit。在屬性中修改caption分別為查找（\<F）、打?。╘<R）、添加（\＜A＝、刪除（\<D）、復(fù)制（\<C）、退出（\<X）。然后還要建立相應(yīng)事件的代碼：如cmddelete的過(guò)程Click Event的代碼（code）如下：</p><p><b>　　類的示例圖五</b></

53、p><p>　　IF MESSAGEBOX('是否刪除此記錄？',36,'') = 6</p><p><b>　　DELETE </b></p><p>　　IF THIS.PARENT.UPDATEROWS() &&確定對(duì)行的改動(dòng)</p><p>　　IF .NO

54、T. EOF()</p><p><b>　　SKIP 1</b></p><p><b>　　ENDIF </b></p><p>　　IF EOF() AND .NOT. BOF()</p><p><b>　　SKIP -1</b></p><p&g

55、t;<b>　　ENDIF </b></p><p><b>　　ENDIF </b></p><p><b>　　ENDIF </b></p><p>　　THISFORM.REFRESH()　　　　　　　?。Γλ⑿卤韱?lt;/p><p>　　IF THISFORM.SHOWW

56、INDOW = 2</p><p>　　ACTIVATE WINDOW (THISFORM.NAME)</p><p><b>　　ENDIF</b></p><p>　　這樣我們就可在表單設(shè)計(jì)器中根據(jù)需要引用可視類庫(kù)中的定義的類了。</p><p>　　表單的設(shè)計(jì)：這里我們以入庫(kù)單(ins1.scx)為例:</p

57、><p>　　(1)、在項(xiàng)目管理器中，選擇“文檔”－＞“表單”單擊“新建”按鈕，選擇“新建表單”彈出“表單設(shè)計(jì)器”窗口。</p><p>　?。?）、單擊菜單“顯示”－＞“數(shù)據(jù)環(huán)境”在彈出的“添加表或視圖”對(duì)話框中選擇Njxc1數(shù)據(jù)庫(kù)，in_stru和ins1表，單擊“添加”按鈕，將表添加到數(shù)據(jù)環(huán)境中。然后關(guān)閉對(duì)話框。</p><p>　　In_stru（入庫(kù)臨時(shí)表）和

58、Ins1（入庫(kù)單表）的結(jié)構(gòu)一樣，字段名和中文含義如下表格：</p><p>　?。?）、利用標(biāo)簽控件、正文框控件、命令按鈕控件、列表框控件、網(wǎng)格控件等控件畫出下（圖六）的表單界面。并在屬性框中修改相應(yīng)的Caption 、ControlSource、Readonly為相應(yīng)的值。如在標(biāo)題欄的caption中輸入“入庫(kù)單”并在前加空格把它居中。Readonly選擇“T”的，其相應(yīng)的backcolor的值設(shè)為192，19

59、2，192（灰色）。</p><p><b>　?。?圖六 ）</b></p><p>　　如圖：在表單對(duì)象INS1的過(guò)程Init Event中定義</p><p>　　THISFORM.COMMAND5.ENABLED = .F.　　　?。Γ?fù)制單（K）初始隱成灰按鈕</p><p>　　THISFORM.COMMAN

60、D8.ENABLED = .F.　　　?。Γψ鲝U單（C）初始隱成灰按鈕</p><p>　　在Load Event過(guò)程中我們定義了內(nèi)存變量的初值和相應(yīng)的工作區(qū)</p><p><b>　　PRIVATE I</b></p><p>　　M_SAVE = .F.</p><p>　　M_IN_NO = '新 單&#

61、39;</p><p>　　M_BEGINREC = 1 &&開(kāi)始記錄為1</p><p>　　M_ENDREC = 80　　　 &&最大記錄為80，即一次入庫(kù)品種不超過(guò)80</p><p>　　IF USED('dm_gf')　　　 &&dm_gf為供方表</p><p&

62、gt;　　SELECT DM_GF　　　 &&選定工作區(qū)</p><p><b>　　ELSE </b></p><p><b>　　SELECT 0</b></p><p>　　USE SHARED dm_gf　?。Γσ怨蚕矸绞酱蜷_(kāi)</p><p><b>　　ENDIF

63、 </b></p><p>　　SET ORDER TO DM</p><p>　　IF USED('dm_ck')　　　&&dm_ck為倉(cāng)庫(kù)表</p><p>　　SELECT DM_CK</p><p><b>　　ELSE </b></p><p>

64、;<b>　　SELECT 0</b></p><p>　　USE SHARED dm_ck</p><p><b>　　ENDIF </b></p><p>　　SET ORDER TO DM</p><p>　　IF USED('dm_yw')　　　　?。Γm_yw為業(yè)務(wù)員表&

65、lt;/p><p>　　SELECT DM_YW</p><p><b>　　ELSE </b></p><p><b>　　SELECT 0</b></p><p>　　USE SHARED dm_yw</p><p><b>　　ENDIF </b>&l

66、t;/p><p>　　SET ORDER TO DM</p><p>　　IF USED('dm_wz')　　　　?。Γm_wz為物資表</p><p>　　SELECT DM_WZ</p><p><b>　　ELSE </b></p><p><b>　　SELECT

67、0</b></p><p>　　USE SHARED dm_wz</p><p><b>　　ENDIF </b></p><p>　　SET ORDER TO DM</p><p>　　IF USED('dm_sx')　　　　?。Γm_sx為屬性表</p><p>

68、　　SELECT DM_SX</p><p><b>　　ELSE </b></p><p><b>　　SELECT 0</b></p><p>　　USE SHARED dm_sx</p><p><b>　　ENDIF </b></p><p>　

69、　SET ORDER TO DM</p><p>　　IF USED('cun')　　　　　　&&cun為庫(kù)存表</p><p>　　SELECT CUN</p><p><b>　　ELSE </b></p><p><b>　　SELECT 0</b></p

70、><p>　　USE SHARED cun</p><p><b>　　ENDIF </b></p><p>　　SET ORDER TO wzck</p><p>　　IF USED('in_stru')　　　?。Γn_stru為入庫(kù)臨時(shí)表</p><p>　　SELECT IN_

71、STRU</p><p><b>　　ELSE </b></p><p><b>　　SELECT 0</b></p><p>　　USE EXCLUSIVE in_stru　　　?。Γσ元?dú)占方式打開(kāi)</p><p><b>　　ENDIF </b></p>&l

72、t;p>　　IF .NOT. FILE('IN_STRU.CDX')</p><p>　　INDEX ON WZDM TAG WZDM</p><p><b>　　ENDIF </b></p><p>　　SET ORDER TO</p><p>　　THISFORM.CLEARBUFFER　　　

73、?。Γη宄彺?lt;/p><p>　　GO M_BEGINREC</p><p>　　SET RELATION ADDITIVE TO GFDM INTO DM_GF　　&&保留工作區(qū)關(guān)系的同</p><p>　　SET RELATION ADDITIVE TO CKDM INTO DM_CK　　&&時(shí)與相應(yīng)表建立關(guān)系</p>

74、;<p>　　SET RELATION ADDITIVE TO SX INTO DM_SX</p><p>　　SET RELATION ADDITIVE TO YWMAN INTO DM_YW</p><p>　　SET RELATION ADDITIVE TO WZDM INTO DM_WZ</p><p>　　SET RELATION ADDIT

75、IVE TO WZDM + CKDM INTO CUN</p><p>　　在Unload Event過(guò)程中定義</p><p>　　SELECT IN_STRU</p><p>　　SET FILTER TO　　　?。Γ?duì)當(dāng)前活動(dòng)文件內(nèi)需要處理的文件記錄進(jìn)行選擇</p><p>　　SET RELATION OFF INTO DM_GF　　

76、　?。Γ﹃P(guān)閉工作區(qū)與相應(yīng)文件的聯(lián)系</p><p>　　SET RELATION OFF INTO DM_CK</p><p>　　SET RELATION OFF INTO DM_SX</p><p>　　SET RELATION OFF INTO DM_YW</p><p>　　SET RELATION OFF INTO DM_WZ<

77、;/p><p>　　SET RELATION OFF INTO CUN</p><p><b>　　USE </b></p><p>　　SELECT DM_GF</p><p><b>　　USE </b></p><p>　　SELECT DM_CK</p>&

78、lt;p><b>　　USE </b></p><p>　　SELECT DM_SX</p><p><b>　　USE </b></p><p>　　SELECT DM_YW</p><p><b>　　USE </b></p><p>　　SE

79、LECT DM_WZ</p><p><b>　　USE </b></p><p>　　SELECT CUN</p><p><b>　　USE </b></p><p>　　EXITSY_ = .T.</p><p><b>　　RETURN</b>&

80、lt;/p><p>　　同時(shí)在clearbuffer過(guò)程中定義了一些初始值</p><p>　　OLDREC = RECNO()　　　　　　?。Γτ涗洍l數(shù)</p><p>　　SCATTER BLANK MEMVAR 　?。Γ⒖招袀鬏斨羶?nèi)存變量</p><p>　　M.CZDM = M_CZDM</p><p>　　M.

81、IN_DATE = M_DATE</p><p>　　M.FKDM = '轉(zhuǎn)帳'</p><p>　　FOR I = M_BEGINREC TO M_ENDREC</p><p><b>　　GO I</b></p><p>　　M.NO_ = I - M_BEGINREC + 1　?。Γπ蛱?hào)數(shù)遞增<

82、;/p><p>　　IF RLOCK()　　　　　　　?。Γ︽i定表格頭，防止其它用戶在表格內(nèi)增加新記錄</p><p>　　GATHER MEMVAR 　?。Γ?nèi)存變量的內(nèi)容傳送到當(dāng)前表格的記錄的字段里面</p><p>　　UNLOCK 　　　　　　　　?。ΓΥ蜷_(kāi)鎖</p><p><b>　　ENDIF </b><

83、;/p><p><b>　　ENDFOR </b></p><p>　　M_JINE = 0</p><p>　　M_IN_NO = '新 單'</p><p>　　M_YFJINE = 0</p><p><b>　　GO OLDREC</b></p>

84、;<p>　　THISFORM.REFRESH</p><p>　　Text1的 ControlSource值為in_stru.czdm、txtIn_date的ControlSource為in_stru.in_date、并且在valid Event選擇用戶自定義過(guò)程如下：</p><p>　　M_OLDREC = RECNO()</p><p>　　M

85、_IN_DATE = IN_DATE　　　　　　　?。Γ_IN_DATE為全局內(nèi)存日期變量　　</p><p>　　FOR I = M_BEGINREC TO M_ENDREC　?。Γ_BEGINREC和M_ENDREC為全局</p><p>　　GO I　　　　　　　　　　　　　　　　　內(nèi)存記錄范圍變量</p><p>　　IF RLOCK()</p&g

86、t;<p>　　REPLACE IN_DATE WITH M_IN_DATE</p><p><b>　　UNLOCK </b></p><p><b>　　ENDIF </b></p><p><b>　　ENDFOR </b></p><p>　　GO M_O

87、LDREC</p><p>　　THISFORM.REFRESH</p><p>　　對(duì)于其它的的對(duì)象的過(guò)程不再一一介紹，這里給出入庫(kù)單的數(shù)據(jù)流程圖如下( 圖七 )：</p><p>　　是否重要空白憑證 入庫(kù)金額是否相同</p><p>　　否 是</p>

88、;<p><b>　　是</b></p><p><b>　　否</b></p><p>　　是 　與庫(kù)存是否重號(hào)</p><p><b>　　否</b></p><p><b>　　是</b></p><

89、p><b>　　是否繼續(xù)錄入</b></p><p><b>　?。?圖七 ）</b></p><p>　　這樣為相應(yīng)的過(guò)程添加程序代碼的工作就占據(jù)著了編碼的大部分工作。</p><p><b>　　報(bào)表的設(shè)計(jì)：</b></p><p>　　利用　VFP6.0強(qiáng)大的報(bào)表設(shè)

90、計(jì)器功能我們能方便、靈活地設(shè)計(jì)出我們所需的各種報(bào)表。這里我們以入庫(kù)單為例說(shuō)明報(bào)表的設(shè)計(jì)過(guò)程。</p><p>　?。?）、點(diǎn)擊“文件”下的“新建”菜單，在彈出的菜單中選擇“報(bào)表”，單擊“新建報(bào)表按鈕”就打開(kāi)了報(bào)表設(shè)計(jì)器窗口。</p><p>　?。?）、點(diǎn)擊“顯示”菜單下的“報(bào)表控件工具欄”彈出控件按鈕，主要有：選定對(duì)象、標(biāo)簽、域控件、線條等。點(diǎn)擊數(shù)據(jù)環(huán)境，點(diǎn)擊右鍵“添加”把所需的表如dm

91、_gf(供方表)、in_stru(入庫(kù)臨時(shí)表)添加到數(shù)據(jù)環(huán)境中。</p><p>　?。?）、根據(jù)所需的表格要求分別在不同的帶區(qū)（Band）添加各種標(biāo)簽和域控件，在標(biāo)簽中輸入各種名稱，在數(shù)據(jù)環(huán)境中的表中選擇所需的各種域控件，在大寫表達(dá)式處還需調(diào)用相應(yīng)的表達(dá)式過(guò)程。過(guò)程見(jiàn)第12頁(yè)的系統(tǒng)實(shí)現(xiàn)技術(shù)要點(diǎn)。入庫(kù)單示例如下( 圖八 )</p><p><b>　?。?圖八 ）</b&g

92、t;</p><p>　　通過(guò)上面幾個(gè)方面的介紹，我們已經(jīng)設(shè)計(jì)出了入庫(kù)單這個(gè)功能模塊了。出庫(kù)單功能模塊的設(shè)計(jì)與入庫(kù)單相似。同樣我們可以根據(jù)已有的表，利用表單設(shè)計(jì)器或查詢?cè)O(shè)計(jì)器設(shè)計(jì)出靈活多樣的查詢功能。庫(kù)存的盤點(diǎn)僅僅是對(duì)庫(kù)存中非重要空白憑證的盤點(diǎn)。對(duì)重要空白憑證只能進(jìn)行作廢和銷毀。在作廢和銷毀表單設(shè)計(jì)中應(yīng)該設(shè)計(jì)授權(quán)和換人復(fù)核菜單，加強(qiáng)重要空白憑證的管理。月終處理是把本月的數(shù)據(jù)拷入歷史庫(kù)，便于生成重要空白月報(bào)表所需的

93、本月和上月的銜接數(shù)據(jù)。同時(shí)生成各領(lǐng)用單位批量應(yīng)收特種轉(zhuǎn)帳傳票。同時(shí)修改財(cái)務(wù)應(yīng)收、已收的數(shù)據(jù)。這些功能模塊的實(shí)現(xiàn)就不一一詳細(xì)介紹了。</p><p><b>　　系統(tǒng)的使用。</b></p><p>　　經(jīng)過(guò)近二個(gè)月的的設(shè)計(jì)，我們實(shí)現(xiàn)了系統(tǒng)的部分功能，讓用戶提出再修改、完善意見(jiàn)時(shí)，用戶對(duì)操作界面的簡(jiǎn)潔、易使用表示滿意。用數(shù)據(jù)進(jìn)行測(cè)試時(shí)，亦發(fā)現(xiàn)重要空白憑證按先進(jìn)先出、入庫(kù)

94、，出庫(kù)自動(dòng)跳出號(hào)碼與數(shù)量存在問(wèn)題。這說(shuō)明局部的編碼還存在一定的問(wèn)題。</p><p>　　系統(tǒng)實(shí)現(xiàn)的技術(shù)要點(diǎn)。</p><p>　　庫(kù)房管理系統(tǒng)涉及重要空白憑證和一般憑證、計(jì)算機(jī)耗材等其它物資的集中管理，同時(shí)要實(shí)現(xiàn)自動(dòng)銷號(hào)、自動(dòng)統(tǒng)計(jì)各種歷史數(shù)據(jù)、生成重要空白憑證月報(bào)表。因此工作量很大，程序代碼編寫的工作量和難度都很大。在一個(gè)Njxc1數(shù)據(jù)庫(kù)中包括28個(gè)表，文件有200多個(gè)，同時(shí)在系統(tǒng)實(shí)現(xiàn)中

95、也采用了一些方法和算法。</p><p>　　例如：小寫金額轉(zhuǎn)化為大寫金額的實(shí)現(xiàn)方法見(jiàn)下面的numchg、appedigt、appenum三個(gè)過(guò)程：</p><p>　　PROCEDURE numchg &&過(guò)程函數(shù)為numchg</p><p>　　PARAMETER MONEY</p><p>　　TMP_MON

96、EY = MONEY</p><p>　　IF TMP_MONEY < 0</p><p>　　MONEY = -MONEY</p><p><b>　　ENDIF </b></p><p>　　STRING = ''</p><p>　　POW = LEN(LTRIM(ST

97、R(INT(MONEY),12))) – 1 &&POW為整數(shù)長(zhǎng)度－1</p><p>　　MONBUF = MONEY　　　　　　?。Γθ绯跏紩r(shí)MONKEY＝4320.50　則POW＝3</p><p>　　DO WHILE POW >= 0</p><p>　　DIGIT = INT(MONBUF / 10 ** POW)　　　?。Γ?/p>

98、MOUNBUF除以10的POW次方</p><p>　?。Γθ鏒IGIT＝4</p><p>　　STRING = STRING + APPENUM(DIGIT) + APPEDIGT(POW)?。Γ?－肆　3－仟　</p><p>　　MONBUF = MONBUF - DIGIT * 10 ** POW　?。Γτ嘀禐?20.50</p><p

99、>　　POW = POW – 1　　　　　　　　　　　　　　＆＆POW值減1即為2</p><p>　　ENDDO 　　　　　　　　　　　　　　　　　＆＆循環(huán)　　</p><p>　　IF ROUND(MONBUF,2) <> 0　　　　　＆＆MONBUF＝0.50對(duì)小數(shù)部分作進(jìn)位處理</p><p>　　DIGIT = INT(ROUND(MON

100、BUF * 10,1))</p><p>　　STRING = STRING + APPENUM(DIGIT) + '角'</p><p>　　MONBUF = MONBUF * 10 - DIGIT</p><p>　　IF ROUND(MONBUF,2) <> 0</p><p>　　DIGIT = ROUND

101、(MONBUF * 10,0)</p><p>　　STRING = STRING + APPENUM(DIGIT) + '分'</p><p><b>　　ENDIF </b></p><p><b>　　ENDIF </b></p><p>　　IF TMP_MONEY <

102、 0</p><p>　　STRING = '(負(fù))' + STRING</p><p><b>　　ENDIF </b></p><p>　　RETURN STRING</p><p><b>　　ENDPROC</b></p><p><b>　

103、　*------</b></p><p>　　PROCEDURE appedigt</p><p>　　PARAMETER NUMBUF</p><p><b>　　DO CASE </b></p><p>　　CASE NUMBUF = 0</p><p>　　RETURN '

104、;元'</p><p>　　CASE NUMBUF = 1</p><p>　　RETURN '拾'</p><p>　　CASE NUMBUF = 2</p><p>　　RETURN '佰'</p><p>　　CASE NUMBUF = 3</p><p

105、>　　RETURN '仟'</p><p>　　CASE NUMBUF = 4</p><p>　　RETURN '萬(wàn)'</p><p>　　CASE NUMBUF = 5</p><p>　　RETURN '拾'</p><p>　　CASE NUMBUF = 6

106、</p><p>　　RETURN '佰'</p><p>　　CASE NUMBUF = 7</p><p>　　RETURN '仟'</p><p>　　CASE NUMBUF = 8</p><p>　　RETURN '億'</p><p>

107、　　CASE NUMBUF = 9</p><p>　　RETURN '拾'</p><p>　　CASE NUMBUF = 10</p><p>　　RETURN '佰'</p><p>　　CASE NUMBUF = 11</p><p>　　RETURN '仟'&l

108、t;/p><p>　　CASE NUMBUF = 12</p><p>　　RETURN '萬(wàn)'</p><p><b>　　ENDCASE </b></p><p><b>　　ENDPROC</b></p><p><b>　　*------<

109、/b></p><p>　　PROCEDURE appenum</p><p>　　PARAMETER NUMBUF</p><p><b>　　DO CASE </b></p><p>　　CASE NUMBUF = 0</p><p>　　RETURN '零'</p

110、><p>　　CASE NUMBUF = 1</p><p>　　RETURN '壹'</p><p>　　CASE NUMBUF = 2</p><p>　　RETURN '貳'</p><p>　　CASE NUMBUF = 3</p><p>　　RETURN

111、'叁'</p><p>　　CASE NUMBUF = 4</p><p>　　RETURN '肆'</p><p>　　CASE NUMBUF = 5</p><p>　　RETURN '伍'</p><p>　　CASE NUMBUF = 6</p>&

112、lt;p>　　RETURN '陸'</p><p>　　CASE NUMBUF = 7</p><p>　　RETURN '柒'</p><p>　　CASE NUMBUF = 8</p><p>　　RETURN '捌'</p><p>　　CASE NUMBUF

113、 = 9</p><p>　　RETURN '玖'</p><p><b>　　ENDCASE </b></p><p><b>　　ENDPROC</b></p><p><b>　　體會(huì)和小結(jié)</b></p><p><b>

114、;　　體會(huì)：</b></p><p>　　經(jīng)過(guò)二個(gè)多月的設(shè)計(jì)和開(kāi)發(fā)，金融庫(kù)房管理系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)、用戶界面和主要功能模塊的設(shè)計(jì)基本完成。其功能基本符合用戶需求，能夠完成入庫(kù)、出庫(kù)和財(cái)務(wù)核算和相關(guān)報(bào)表的查詢、并提供部分系統(tǒng)維護(hù)功能,使庫(kù)房管理人員能夠方便地進(jìn)行數(shù)據(jù)備份和恢復(fù)、庫(kù)存的盤點(diǎn)和核銷，對(duì)于數(shù)據(jù)的一致性的問(wèn)題也通過(guò)程序進(jìn)行了有效的解決。</p><p><b>　

115、　存在的問(wèn)題:</b></p><p>　　但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如部分功能模塊的編碼工作還未全部完成，聯(lián)機(jī)文檔比較少，，出錯(cuò)處理不夠等多方面問(wèn)題。這些都有待進(jìn)一步完善。 </p><p><b>　　設(shè)想：</b></p><p>　　為了滿足今后庫(kù)房管理的需要，本系統(tǒng)應(yīng)支持前臺(tái)開(kāi)單、后臺(tái)

116、管理控制。應(yīng)采用客戶機(jī)/服務(wù)器的模式，用遠(yuǎn)程視圖與數(shù)據(jù)庫(kù)建立連接。</p><p><b>　　結(jié)束語(yǔ):</b></p><p>　　在本次畢業(yè)設(shè)計(jì)中，我從江都電大陳秀祥老師等指導(dǎo)老師身上學(xué)到了很多東西。陳老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。他們無(wú)論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到不少的提高。這對(duì)于我以后的工作和學(xué)習(xí)

117、都有一種巨大的幫助，感謝他們耐心的輔導(dǎo)！</p><p><b>　　附錄：</b></p><p><b>　　附錄一：主程序</b></p><p>　　_SCREEN.CAPTION = '江都農(nóng)行庫(kù)房管理信息系統(tǒng)'</p><p>　　_SCREEN.VISIBLE = .F

118、.</p><p><b>　　CLEAR </b></p><p>　　CLOSE ALL　　　　　　　?。Γ﹃P(guān)閉所有工作區(qū)</p><p>　　SET ECHO ON　　　　　　?。ΓΥ蜷_(kāi)跟蹤窗口</p><p>　　SET TALK OFF　　　　　　?。Γ﹃P(guān)閉顯示輸出信息</p><p>

119、　　SET CURRENCY TO '￥'　　?。ΓυO(shè)置貨幣符號(hào)</p><p>　　SET DECIMALS TO 6　　　?。Γ︼@示小數(shù)點(diǎn)后面6位</p><p>　　SET CURRENCY LEFT　　?。Γω泿欧?hào)顯示于數(shù)字的左側(cè)</p><p>　　SET EXACT ON　　　　　?。Γψ址_比較</p><p&

120、gt;　　SET ESCAPE OFF　　　　?。ΓSC屏蔽</p><p>　　SET DATE ANSI　　　　　?。Γθ掌跒閥y.mm.dd</p><p>　　SET SAFETY OFF　　　　?。Γχ苯痈膶懳募惶崾揪?lt;/p><p>　　SET STATUS BAR OFF　　?。Γ顟B(tài)欄不顯示</p><p>　　SET

121、 HELP ON　　　　　　?。Γせ顅fp的幫助功能</p><p>　　SET DELETED ON　　　　?。ΓΣ粚?duì)刪除的記錄訪問(wèn)</p><p>　　SET CENTURY ON　　　　?。Γδ攴菀运奈粩?shù)顯示</p><p>　　SET SYSMENU TO　　　　?。ΓΠ巡藛位謴?fù)為缺省狀態(tài)</p><p>　　SET SYSMENU

122、 AUTOMATIC ?。Γγ顖?zhí)行時(shí)，菜單進(jìn)入活動(dòng)狀態(tài)</p><p>　　PUBLIC M_PATH , M_DEFA　?。ΓυO(shè)置公用變量</p><p>　　OLD_DIR = SET('DEFA') + SYS(2003)　?。ΓΨ祷厝笔‘?dāng)前目錄名</p><p>　　RESTORE FROM am.dat ADDITIVE</p>