固定資產(chǎn)管理系統(tǒng)畢業(yè)論文設(shè)計(jì)

編號(hào)畢業(yè)設(shè)計(jì)〔論文〕題目固定資產(chǎn)管理系統(tǒng)二級(jí)學(xué)院應(yīng)用技術(shù)學(xué)院專業(yè)會(huì)計(jì)學(xué)〔會(huì)計(jì)信息化方向〕指導(dǎo)教師李金職稱時(shí)間2013年6月畢業(yè)論文寫作聲明畢業(yè)論文題目：固定資產(chǎn)管理系統(tǒng)本人聲明所呈交的畢業(yè)論文是本人在導(dǎo)師指導(dǎo)下進(jìn)展的。據(jù)我所知，除了文中特別加以標(biāo)注和致謝的地方外，論文中不包含其它人已經(jīng)發(fā)表或撰寫過的研究成果，也不包含為獲得某某工學(xué)院或其它教育機(jī)構(gòu)的學(xué)位或證書而使用過的材料。與我一同工作的同志對(duì)本研究所做的任何貢獻(xiàn)均已在論文中作了明確的說明并表示謝意。畢業(yè)論文簽字日期：年月摘要隨著信息技術(shù)在管理上越來越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的實(shí)施在技術(shù)上已逐步成熟。管理信息系統(tǒng)是一個(gè)不斷開展的新型學(xué)科，企業(yè)要生存要開展，要高效率地把企業(yè)活動(dòng)有機(jī)地組織起來，就必須加強(qiáng)企業(yè)管理，即加強(qiáng)對(duì)企業(yè)內(nèi)部的各種資源〔人、財(cái)、物等〕的有效管理，建立與自身特點(diǎn)相適應(yīng)的管理信息系統(tǒng)隨著企業(yè)規(guī)模的逐步擴(kuò)大，其固定資產(chǎn)的投資規(guī)模相應(yīng)擴(kuò)大。目前，固定資產(chǎn)管理很多仍然停留在手工管理模式，其運(yùn)作機(jī)制已和企業(yè)的業(yè)務(wù)開展規(guī)模不相適應(yīng)。如何對(duì)固定資產(chǎn)進(jìn)展有效的管理，是目前企業(yè)十分關(guān)注的問題。由于數(shù)據(jù)庫技術(shù)與開發(fā)工具的不斷開展，開發(fā)一套企業(yè)規(guī)模的固定資產(chǎn)管理系統(tǒng)，實(shí)現(xiàn)計(jì)算機(jī)化管理，在技術(shù)上已經(jīng)變得非常容易實(shí)現(xiàn)。本次畢業(yè)設(shè)計(jì)的題目是開發(fā)一個(gè)固定資產(chǎn)管理系統(tǒng)。本固定資產(chǎn)管理系統(tǒng)功能包括用戶管理、密碼修改、部門管理、資產(chǎn)來源、使用情況、變動(dòng)情況、計(jì)量單位、卡片管理、卡片查詢、報(bào)廢管理、報(bào)廢資產(chǎn)查詢、資產(chǎn)折舊、資產(chǎn)統(tǒng)計(jì)表、部門匯總、幫助和退出系統(tǒng)等功能。系統(tǒng)用戶界面十分簡潔、實(shí)用，操作簡單。關(guān)鍵詞固定資產(chǎn)；管理系統(tǒng)；PowerBuilder10.0；SQLAnywhereAbstractAsinformationtechnologyinthemanagementofmorein-depthandwiderangeofapplications,managementinformationsystemsimplementation,technologyhasgraduallymatured.Managementinformationsystemisacontinuousdevelopmentofnewdisciplines,businesstosurviveanddevelop,tothehighefficiencyoforganicandorganizedcorporateevents,wemuststrengthenenterprisemanagement,namelytostrengtheninternalresources(human,financial,materialetc.)foreffectivemanagement,andestablishitsowncharacteristicssuitedtothemanagementinformationsystemsaspaniesgraduallyexpandthescale,thescaleofinvestmentinfixedassetsexpandedaccordingly.Currently,manyofthemstillremainfixedassetmanagementinthemanualmanagementmode,anditsoperationmechanismisinpatiblewiththepany'sbusinessdevelopmentscale.Howeffectivemanagementoffixedassets,isofgreatconcerntoenterprises.Becausedatabasetechnologyanddevelopmenttoolscontinuestoevolve,developanenterprise-scalefixedassetsmanagementsystem,puterizedmanagement,technicallyhasbeeveryeasytoimplement.Thegraduationprojecttopicistodevelopafixedassetmanagementsystem.TheFixedAssetsManagementSystemfeaturesincludeusermanagement,passwordchanges,departmentalmanagement,assetsources,usagechanges,unitsofmeasurement,cardmanagement,cardcheck,scrapmanagement,retirementassetsinquiries,assetdepreciation,assettables,departmentsummaryHelp,andExitsystemfunctions.Systemuserinterfaceisverysimple,practical,easytooperate.Keywords：fixedassets;managementsystem;PowerBuilder10.0;SQLAnywhere目錄摘要IAbstractII第一章緒論6課題背景6畢業(yè)設(shè)計(jì)的意義6研究的目的6開發(fā)工具簡介7簡介71.2.2AdaptiveServerAnywhere簡介8第二章系統(tǒng)分析與可行性分析10系統(tǒng)分析10系統(tǒng)可行性分析102.3業(yè)務(wù)流程分析11數(shù)據(jù)流程分析12第三章系統(tǒng)總體設(shè)計(jì)13體系結(jié)構(gòu)13實(shí)體分析與局部E-R圖13實(shí)體之間的聯(lián)系與E-R圖14系統(tǒng)功能說明15管理員登錄15系統(tǒng)設(shè)置15根本信息15固定資產(chǎn)卡片管理16固定資產(chǎn)折舊16固定資產(chǎn)報(bào)表16幫助16退出16第四章數(shù)據(jù)字典17變動(dòng)情況表17報(bào)廢信息表17部門信息表17計(jì)量單位表17卡片信息表17使用情況表18用戶信息表18資產(chǎn)來源表19折舊信息表19第五章人機(jī)界面與實(shí)現(xiàn)20庫說明20系統(tǒng)登錄21系統(tǒng)主界面22密碼修改24部門管理27資產(chǎn)來源28使用情況30變動(dòng)情況32計(jì)量單位34卡片管理36卡片管理數(shù)據(jù)流程圖38卡片查詢38報(bào)廢管理40報(bào)廢資產(chǎn)查詢42資產(chǎn)折舊44資產(chǎn)統(tǒng)計(jì)表46部門匯總48第6章系統(tǒng)實(shí)現(xiàn)50用戶管理窗口的設(shè)計(jì)說明50密碼修改窗口的設(shè)計(jì)說明53部門窗口的設(shè)計(jì)說明55資產(chǎn)來源窗口的設(shè)計(jì)說明58資產(chǎn)使用情況窗口的設(shè)計(jì)說明60資產(chǎn)變動(dòng)情況窗口的設(shè)計(jì)說明63計(jì)量單位窗口的設(shè)計(jì)說明65卡片管理窗口的設(shè)計(jì)說明68資產(chǎn)折舊窗口的設(shè)計(jì)說明71資產(chǎn)統(tǒng)計(jì)表窗口的設(shè)計(jì)說明73第7章系統(tǒng)測試77開發(fā)環(huán)境以與測試環(huán)境77內(nèi)容與結(jié)果77參考文獻(xiàn)78第一章緒論課題背景在人類社會(huì)已經(jīng)邁入21世紀(jì)的今天，信息技術(shù)的飛速開展和普與使得全社會(huì)對(duì)計(jì)算機(jī)應(yīng)用技術(shù)的需求日益增加。時(shí)至今日，計(jì)算機(jī)已經(jīng)深入到人們?nèi)粘９ぷ鳎瑢W(xué)習(xí)，生活，娛樂的各個(gè)方面。眾所周知，計(jì)算機(jī)的主要功能是進(jìn)展信息處理，而基于數(shù)據(jù)庫技術(shù)的數(shù)據(jù)組織與處理如此是其中一個(gè)非常重要的領(lǐng)域。畢業(yè)設(shè)計(jì)的意義AdaptiveServerAnywhere數(shù)據(jù)庫平臺(tái)有了更加深入的學(xué)習(xí)和認(rèn)識(shí)，并且能夠熟練運(yùn)用此開發(fā)工具進(jìn)展更加深入的開發(fā)研究。同時(shí)，這次畢業(yè)設(shè)計(jì)對(duì)設(shè)計(jì)者也是一次非常好的鍛煉機(jī)會(huì)。一方面，進(jìn)一步明確了開發(fā)研究一個(gè)管理信心系統(tǒng)的方法和思想，加深對(duì)管理信息系統(tǒng)的認(rèn)識(shí)，鞏固以前學(xué)習(xí)的信息系統(tǒng)開發(fā)方面的知識(shí)，另一方面，設(shè)計(jì)者對(duì)所使用的編程語言有了很好的掌握，提高了程序設(shè)計(jì)和程序調(diào)試的能力，并對(duì)一般軟件設(shè)計(jì)的步驟流程有了深刻的體會(huì)，為今后在工作崗位上學(xué)好用好計(jì)算機(jī)打下了堅(jiān)決的根底。研究的目的固定資產(chǎn)管理系統(tǒng)是財(cái)務(wù)管理中的一個(gè)重要組成局部，固定資產(chǎn)具有價(jià)值高，使用周期長、使用地點(diǎn)分散、管理難度大等特點(diǎn)。隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。作為計(jì)算機(jī)應(yīng)用的一局部,使用計(jì)算機(jī)對(duì)固定資產(chǎn)進(jìn)展管理,具有著手工管理所無法比擬的優(yōu)點(diǎn).例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、某某性好、壽命長、本錢低等。這些優(yōu)點(diǎn)能夠極大地提高固定資產(chǎn)管理的效率,也是科學(xué)化、正規(guī)化管理的重要條件。固定資產(chǎn)管理系統(tǒng)通過采集固定資產(chǎn)日常工作中所產(chǎn)生的各種原始數(shù)據(jù)，根據(jù)資產(chǎn)管理的要求，對(duì)數(shù)據(jù)進(jìn)展分類、統(tǒng)計(jì)、匯總、分析，建立程序化、制度化、規(guī)X化的固定資產(chǎn)計(jì)算機(jī)軟件管理系統(tǒng)，包括了固定資產(chǎn)的一般特性、固定資產(chǎn)狀態(tài)數(shù)據(jù)和固定資產(chǎn)能力數(shù)據(jù)，與時(shí)準(zhǔn)確地報(bào)出各種報(bào)表，為固定資產(chǎn)管理提供了一個(gè)現(xiàn)代化的管理手段，這一手段可以強(qiáng)化和規(guī)X對(duì)固定資產(chǎn)的管理。便于計(jì)劃、財(cái)務(wù)、審計(jì)等管理部門的介入，形成嚴(yán)格的監(jiān)視、約束機(jī)制。開發(fā)工具簡介在本畢業(yè)設(shè)計(jì)中所使用的編程開發(fā)語言是PowerBuilder10.0開發(fā)平臺(tái)，數(shù)據(jù)庫為AdaptiveServerAnywhere。PowerBuilder10.0是由著名數(shù)據(jù)庫廠商Sybase公司推出的數(shù)據(jù)庫應(yīng)用快速開發(fā)工具，其早期版本主要用于數(shù)據(jù)庫前端應(yīng)用開發(fā)。PowerBuilder10.0以其高效快捷的集成開發(fā)環(huán)境，簡介友好的用戶界面，功能強(qiáng)大的數(shù)據(jù)窗口技術(shù)以與性能優(yōu)越的數(shù)據(jù)庫訪問能力，越來越受到眾多數(shù)據(jù)庫開發(fā)人員的青瞇成為當(dāng)前最為流行的數(shù)據(jù)庫前端開發(fā)工具之一。PowerBuilder10.0是一款功能強(qiáng)大的數(shù)據(jù)庫系統(tǒng)開發(fā)工具，它主要具有以下特點(diǎn)：PowerBuilder簡稱PB,屬于客戶端產(chǎn)品，不僅是數(shù)據(jù)庫前端開發(fā)工具，也是專業(yè)的客戶/服務(wù)器開發(fā)工具。PB是面向?qū)ο蟮木幊坦ぞ?，它提供了窗口，菜單，?shù)據(jù)窗，命令按鈕，單行編輯框，多行編輯框，列表框等各種根本對(duì)象，并且允許開發(fā)人員自定義新對(duì)象。將各種對(duì)象按照某種邏輯結(jié)合起來，就構(gòu)成了PB的應(yīng)用程序。PB支持多種關(guān)系型數(shù)據(jù)庫管理系統(tǒng)。支持多種大型數(shù)據(jù)庫，并可通過數(shù)據(jù)庫專用接口連接數(shù)據(jù)庫。所有數(shù)據(jù)庫都可以通過ODBC建立連接?？梢酝瑫r(shí)訪問多個(gè)DBMS〔數(shù)據(jù)庫管理系統(tǒng)〕。PB提供了最具特色的數(shù)據(jù)窗〔DataWindow〕DataWindow〔數(shù)據(jù)窗，簡稱DW〕控件是PB的核心控件，是PB提供的使用戶訪問數(shù)據(jù)庫的最簡捷，有效的方式。對(duì)于用戶而言，通過DW可以很只管地觀看數(shù)據(jù)與其相互關(guān)系，而不必關(guān)心數(shù)據(jù)在數(shù)據(jù)庫的哪個(gè)表中，以與各個(gè)表之間的相互關(guān)系；對(duì)于開發(fā)人員而言，DW可以快速地進(jìn)展表與表之間的，自動(dòng)生成DML〔數(shù)據(jù)操縱語言〕，這極大地提高了系統(tǒng)開發(fā)的效率。DW提供了多種形式的數(shù)據(jù)顯示格式，用戶可以根據(jù)需要選擇不同表現(xiàn)形式的數(shù)據(jù)窗。是一種現(xiàn)代的、類型安全的、面向?qū)ο蟮拈_發(fā)平臺(tái)，它使得開發(fā)人員能夠快速而容易的開發(fā)解決方案，且具有強(qiáng)大的設(shè)計(jì)、開發(fā)和處理圖形、圖像的功能。AdaptiveServerAnywhere簡介AdaptiveServerAnywhere關(guān)系數(shù)據(jù)庫管理系統(tǒng)是SQLAnywhereStudio的核心。AdaptiveServerAnywhere是為要求功能完備的SQL數(shù)據(jù)庫的任務(wù)而專門設(shè)計(jì)的。根據(jù)設(shè)計(jì)，它可以在不同的環(huán)境下工作。它充分利用可用內(nèi)存和CPU資源，在具有充足資源的環(huán)境中提供極佳的性能。它還可以在具有有限物理和數(shù)據(jù)庫管理資源的環(huán)境下很好地工作，包括移動(dòng)計(jì)算環(huán)境、嵌入式數(shù)據(jù)庫使用，并可用作中小型業(yè)務(wù)的數(shù)據(jù)庫服務(wù)器。AdaptiveServerAnywhere的特點(diǎn)包括：完全SQL關(guān)系數(shù)據(jù)庫管理系統(tǒng)。AdaptiveServerAnywhere是事務(wù)處理關(guān)系數(shù)據(jù)庫管理系統(tǒng)(RDBMS)，它具備多種功能，包括：完全恢復(fù)功能、聯(lián)機(jī)備份、參照完整性動(dòng)作、存儲(chǔ)過程、觸發(fā)器、行級(jí)并發(fā)控制、時(shí)間表和事件、豐富的SQL語言以與在完整SQLRDBMS中應(yīng)提供的所有功能。經(jīng)濟(jì)合算的硬件要求。與其它數(shù)據(jù)庫管理系統(tǒng)相比，AdaptiveServerAnywhere要求的內(nèi)存和磁盤資源更少。易于使用AdaptiveServerAnywhere可以自我調(diào)節(jié)并易于管理。您可以方便地使用AdaptiveServerAnywhere，而無需像其它關(guān)系數(shù)據(jù)庫管理系統(tǒng)那樣進(jìn)展大量的數(shù)據(jù)庫管理工作。獨(dú)立和網(wǎng)絡(luò)使用。AdaptiveServerAnywhere可以以獨(dú)立的方式使用，例如在以數(shù)據(jù)為中心的應(yīng)用程序中作為嵌入式數(shù)據(jù)庫，或者在多用戶客戶/服務(wù)器或三層環(huán)境中作為網(wǎng)絡(luò)服務(wù)器。作為嵌入式數(shù)據(jù)庫系統(tǒng)，它可以根據(jù)需要由應(yīng)用程序自動(dòng)啟動(dòng)。高性能。盡管AdaptiveServerAnywhere在設(shè)計(jì)上強(qiáng)調(diào)簡單的管理和適度的資源要求，但它依然是可伸縮的高性能DBMS。AdaptiveServerAnywhere可在多個(gè)CPU上運(yùn)行，具有高級(jí)查詢優(yōu)化程序，并且提供性能監(jiān)控和調(diào)節(jié)工具。第二章系統(tǒng)分析與可行性分析系統(tǒng)分析本系統(tǒng)其研究主要包括以下幾點(diǎn)：系統(tǒng)管理：用戶信息輸入、密碼修改。根本信息：主要包括對(duì)部門信息、資產(chǎn)來源、使用情況、變動(dòng)情況、計(jì)量單位等信息的增加、刪除、修改、查詢等功能。固定資產(chǎn)卡片管理：主要包括對(duì)固定資產(chǎn)卡片信息的增加、查詢、修改等功能。固定資產(chǎn)折舊：主要包括對(duì)報(bào)廢資產(chǎn)信息以與資產(chǎn)折舊信息的管理。固定資產(chǎn)報(bào)表：主要對(duì)固定資產(chǎn)信息后成報(bào)表以方便查詢。本系統(tǒng)主要分為三個(gè)模塊：數(shù)據(jù)庫，內(nèi)容，管理員操作界面。1.數(shù)據(jù)庫：包括原始數(shù)據(jù)庫，同時(shí)可增加新的數(shù)據(jù)內(nèi)容并對(duì)齊進(jìn)展設(shè)置和修改。2.內(nèi)容：包括內(nèi)容模板，即所添加內(nèi)容的大體顯示格式，同時(shí)還包括數(shù)據(jù)的格式和顯示效果。3.管理員操作界面：界面要求美觀合理，使用方便，數(shù)據(jù)精準(zhǔn)。系統(tǒng)可行性分析本此系統(tǒng)具備功能齊全、管理模式多且靈活合理、穩(wěn)定實(shí)用、易安裝、易維護(hù)、易學(xué)易用等特點(diǎn)，可滿足各類中小企業(yè)的信息化管理需求。1.高可靠性和安全性：

采用大型數(shù)據(jù)庫軟件AdaptiveServerAnywhere，其固有的安全性能，保障系統(tǒng)有一個(gè)穩(wěn)定的運(yùn)行環(huán)境。

2.穩(wěn)定性好：

AdaptiveServerAnywhere數(shù)據(jù)庫與IC卡技術(shù)的無縫結(jié)合，高度的某某性、安全性以與先進(jìn)性；3.易學(xué)、易用性：

人性化的界面設(shè)計(jì)，快捷的在線幫助，易安裝、易管理、易維護(hù)、易拓展。2.3業(yè)務(wù)流程分析業(yè)務(wù)流程圖符號(hào)說明：系統(tǒng)業(yè)務(wù)流程圖如圖2-1所示：固定資產(chǎn)系統(tǒng)業(yè)務(wù)流程圖2-1數(shù)據(jù)流程圖符號(hào)說明：系統(tǒng)總體設(shè)計(jì)本系統(tǒng)的總功能模塊圖用戶管理用戶管理部門管理使用情況資產(chǎn)來源變動(dòng)情況計(jì)量單位固定資產(chǎn)折舊卡片管理固定資產(chǎn)管理系統(tǒng)退出系統(tǒng)密碼修改系統(tǒng)管理根底信息資產(chǎn)卡片管理幫助資產(chǎn)統(tǒng)計(jì)表部門匯總固定資產(chǎn)報(bào)表卡片查詢報(bào)廢管理報(bào)廢資產(chǎn)查詢資產(chǎn)折舊圖3-1總功能模塊圖3-1通過需求分析得知，固定資產(chǎn)管理系統(tǒng)的研究對(duì)象有固定資產(chǎn)、部門和操作員三個(gè)對(duì)象，也就是三個(gè)實(shí)體，但由于系統(tǒng)的主要功能是管理固定資產(chǎn)〔固定資產(chǎn)的增加和報(bào)廢〕，所以在實(shí)際處理中將固定資產(chǎn)分為固定資產(chǎn)增加和固定資產(chǎn)報(bào)廢，也就是說，為了處理問題的方便，將系統(tǒng)的實(shí)體對(duì)象分為部門、操作員、固定資產(chǎn)增加和固定資產(chǎn)報(bào)廢。對(duì)于固定資產(chǎn)管理系統(tǒng)來說，比擬重要的部門信息是部門編號(hào)、部門名稱、部門負(fù)責(zé)人。其中部門編號(hào)能夠唯一確定某個(gè)部門的所有信息，故在該實(shí)體中定義部門編號(hào)為實(shí)體標(biāo)識(shí)符。部門ER圖如下:部門ER圖3-2〔1〕固定資產(chǎn)報(bào)廢 在固定資產(chǎn)減少實(shí)體中，包含資產(chǎn)編號(hào)、資產(chǎn)名稱、部門編號(hào)、資產(chǎn)類別、操作員編號(hào)五個(gè)屬性。其中，資產(chǎn)編號(hào)能夠唯一標(biāo)識(shí)每一項(xiàng)固定資產(chǎn)，故定義資產(chǎn)編號(hào)為固定資產(chǎn)減少實(shí)體的標(biāo)識(shí)符。固定資產(chǎn)減少實(shí)體的ER圖如下：固定資產(chǎn)報(bào)廢ER圖3-3與E-R圖1〕固定資產(chǎn)與部門聯(lián)系的ER圖企業(yè)中的固定資產(chǎn)都分別分配到不同的部門，由不同部門來管理，同一部門可以管理多項(xiàng)固定資產(chǎn)，故固定資產(chǎn)和部門之間聯(lián)系類型是m：1的聯(lián)系。固定資產(chǎn)和部門聯(lián)系的ER圖如下實(shí)體ER圖3-4系統(tǒng)通過管理員的用戶名與密碼進(jìn)展系統(tǒng)的登錄，如果用戶名或密碼有一方錯(cuò)誤將無法登錄到系統(tǒng)此功能完成系統(tǒng)的用戶管理等根底信息的增加、刪除、修改、查詢等功能。此功能完成對(duì)部門信息、資產(chǎn)來源、使用情況、變動(dòng)情況、計(jì)量單位等信息的增加、刪除、修改、查詢等功能。此功能完成對(duì)固定資產(chǎn)卡片信息的增加、查詢、修改等功能。此功能完成對(duì)報(bào)廢資產(chǎn)信息以與資產(chǎn)折舊信息的管理。此功能完成對(duì)固定資產(chǎn)信息后成報(bào)表以方便查詢。系統(tǒng)的幫助信息。提供退出系統(tǒng)功能。第四章數(shù)據(jù)字典列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)BDBHVARCHAR(20)20否變動(dòng)編號(hào)BDMCVARCHAR(50)50否變動(dòng)名稱MEMOVARCHAR(50)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)BFBHVARCHAR(20)20否報(bào)廢編號(hào)KPBHVARCHAR(20)20否卡片名稱BFRQDATE是報(bào)廢日期BFYYVARCHAR(100)100是報(bào)廢日期MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)CODEVARCHAR(20)20否部門編號(hào)CODENAMEVARCHAR(50)50否部門名稱MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)CODEVARCHAR(20)20否編號(hào)CODENAMEVARCHAR(50)50否名稱MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)KPHVARCHAR(20)20否卡片號(hào)KPMCVARCHAR(50)50否卡片名稱CFDDVARCHAR(100)100是存放地點(diǎn)BMVARCHAR(20)20是使用部門JLDWVARCHAR(20)20是計(jì)量單位SLDECIMAL(10,2)10是數(shù)量ZCLYVARCHAR(20)20是資產(chǎn)來源SYQKVARCHAR(20)20是使用狀況BDQKVARCHAR(20)20是變動(dòng)情況CDVARCHAR(100)100是產(chǎn)地GZRQDATE是購置日期SCRQDATE是生產(chǎn)日期QERQDATE是啟用日期MEMOVARCHAR(255)255是備注ZCJEDECIMAL(10,2)10是資產(chǎn)金額BFBZVARCHAR是報(bào)廢標(biāo)志列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)SYBMVARCHAR(20)20否編號(hào)SYMCVARCHAR(50)50否名稱MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IdINTEGER是否編號(hào)USERCODEVARCHAR(20)20否用戶名USERNAMEVARCHAR(50)50是用戶某某PWDVARCHAR(50)50是密碼XBVARCHAR是性別BMVARCHAR(20)20是部門LXDHVARCHAR(20)20是聯(lián)系EMAILVARCHAR(50)50是電子MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IDINTEGER是否編號(hào)ZCLYVARCHAR(20)20否編號(hào)LYMCVARCHAR(50)50否名稱MEMOVARCHAR(255)255是備注列名數(shù)據(jù)類型長度主鍵允許空說明IDINTEGER是否編號(hào)KPHVARCHAR(20)20否卡片號(hào)NXINTEGER否預(yù)計(jì)使用年限EZJLDECIMAL(10,2)10是月折舊率EZJDECIMAL(10,2)10是月折舊額SYESINTEGER是已使用月數(shù)LJZJDECIMAL(10,2)10是累計(jì)折舊ZYJEDECIMAL(10,2)10是折余價(jià)值ZJFFVARCHAR是折舊方法ZHVARCHAR(20)20是折舊編號(hào)人機(jī)界面與實(shí)現(xiàn)如圖5-1所示：圖5-1管理員的用戶名與密碼是否正確進(jìn)展登錄，如果有一方錯(cuò)誤系統(tǒng)將禁止其登錄到系統(tǒng)中。系統(tǒng)登錄界面如圖5-2圖5-2登陸界面圖5-3登陸數(shù)據(jù)流程圖系統(tǒng)主界面管理員通過用戶名與密碼進(jìn)入到系統(tǒng)的主界面，在主界面管理員可以通過菜單來完本錢系統(tǒng)的相關(guān)功能。主界面如圖5-4：圖5-4系統(tǒng)主界面對(duì)系統(tǒng)用戶信息的添加、刪除等功能。如圖5-5所示：圖5-5用戶信息界面圖5-6用戶信息數(shù)據(jù)流程圖修改密碼修改的界面如圖5-7，所示通過輸入原密碼、新密碼以與確認(rèn)密碼來進(jìn)展密碼修改。如果用戶輸入了錯(cuò)誤的原密碼系統(tǒng)將給予提示；如果用戶所輸入的新密碼與確認(rèn)密碼不一致，系統(tǒng)也將給予提示，將不能完成密碼的修改。密碼修改成功以后將會(huì)在下一次登錄系統(tǒng)時(shí)生效。圖5-7密碼修改界面圖5-8密碼修改數(shù)據(jù)流程圖部門管理功能實(shí)現(xiàn)了管理員對(duì)部門信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)部門信息的添加；單擊【刪除】按鈕可以將部門信息刪除；單擊【保存】按鈕可以將部門信息進(jìn)展保存。界面如圖5-9所示：圖5-9部門管理界面圖5-10部門管理數(shù)據(jù)流程圖資產(chǎn)來源功能實(shí)現(xiàn)了管理員對(duì)資產(chǎn)來源信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)資產(chǎn)來源信息的添加；單擊【刪除】按鈕可以將資產(chǎn)來源信息刪除；單擊【保存】按鈕可以將資產(chǎn)來源信息進(jìn)展保存。界面如圖5-11所示：圖5-11資產(chǎn)來源界面圖5-12資產(chǎn)來源數(shù)據(jù)流程圖使用情況功能實(shí)現(xiàn)了管理員對(duì)使用情況信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)使用情況信息的添加；單擊【刪除】按鈕可以將使用情況信息刪除；單擊【保存】按鈕可以將使用情況信息進(jìn)展保存。界面如圖5-13所示：圖5-13使用情況界面圖5-14使用情況數(shù)據(jù)流程圖變動(dòng)情況功能實(shí)現(xiàn)了管理員對(duì)變動(dòng)情況信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)變動(dòng)情況信息的添加；單擊【刪除】按鈕可以將變動(dòng)情況信息刪除；單擊【保存】按鈕可以將變動(dòng)情況信息進(jìn)展保存。界面如圖5-15所示圖5-15變動(dòng)情況界面圖5-16變動(dòng)情況數(shù)據(jù)流程圖計(jì)量單位功能實(shí)現(xiàn)了管理員對(duì)計(jì)量單位信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)計(jì)量單位信息的添加；單擊【刪除】按鈕可以將計(jì)量單位信息刪除；單擊【保存】按鈕可以將計(jì)量單位信息進(jìn)展保存。界面如圖5-17所示：圖5-17計(jì)量單位界面圖5-18計(jì)量單位數(shù)據(jù)流程圖卡片管理功能實(shí)現(xiàn)了管理員對(duì)卡片管理信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)卡片管理信息的添加；單擊【刪除】按鈕可以將卡片管理信息刪除；單擊【保存】按鈕可以將卡片管理信息進(jìn)展保存。界面如圖5-19所示：圖5-19卡片管理界面圖5-20卡片管理數(shù)據(jù)流程圖卡片查詢功能實(shí)現(xiàn)了管理員對(duì)卡片信息的查詢等功能，管理員可以通過單擊【查詢】按鈕來實(shí)現(xiàn)卡片信息的查詢；單擊【刷新】按鈕來實(shí)現(xiàn)卡片信息數(shù)據(jù)窗口與查詢條件清空。界面如圖5-21所示：圖5-21卡片查詢界面圖5-22卡片查詢數(shù)據(jù)流程圖2報(bào)廢管理報(bào)廢管理功能實(shí)現(xiàn)了管理員對(duì)報(bào)廢信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)報(bào)廢信息的添加；單擊【刪除】按鈕可以將報(bào)廢信息刪除；單擊【保存】按鈕可以將報(bào)廢信息進(jìn)展保存。界面如圖5-23所示圖5-23報(bào)廢管理界面圖5-24報(bào)廢管理數(shù)據(jù)流程圖報(bào)廢資產(chǎn)查詢功能實(shí)現(xiàn)了管理員對(duì)報(bào)廢資產(chǎn)信息的查詢功能，單擊【查詢】按鈕來實(shí)現(xiàn)報(bào)廢資產(chǎn)信息的查詢；單擊【刷新】按鈕可以將數(shù)據(jù)窗口信息與查詢條件清空；單擊【查看明細(xì)】按鈕可以查詢報(bào)廢明細(xì)信息。界面如圖5-25所示圖5-25報(bào)廢資產(chǎn)查詢界面圖5-26報(bào)廢資產(chǎn)查詢數(shù)據(jù)流程圖資產(chǎn)折舊管理功能實(shí)現(xiàn)了管理員對(duì)資產(chǎn)折舊信息的增加、刪除、等功能，單擊【新增】按鈕來實(shí)現(xiàn)資產(chǎn)折舊信息的添加；單擊【刪除】按鈕可以將資產(chǎn)折舊信息刪除；單擊【保存】按鈕可以將資產(chǎn)折舊信息進(jìn)展保存。界面如圖5-27所示：圖5-27資產(chǎn)折舊界面圖5-28資產(chǎn)折舊數(shù)據(jù)流程圖資產(chǎn)統(tǒng)計(jì)表功能實(shí)現(xiàn)了管理員對(duì)資產(chǎn)信息的綜合查詢，管理員通過單擊【查詢】按鈕查詢到相關(guān)信息。界面如圖5-29所示：圖5-29資產(chǎn)統(tǒng)計(jì)表界面圖5-30資產(chǎn)統(tǒng)計(jì)表數(shù)據(jù)流程圖部門匯總功能實(shí)現(xiàn)了管理員對(duì)部門資產(chǎn)信息的綜合查詢等功能。界面如圖5-31所示：圖5-31部門匯總界面圖5-32部門匯總數(shù)據(jù)流程圖第6章系統(tǒng)實(shí)現(xiàn)窗口的設(shè)計(jì)說明表6-1項(xiàng)目說明窗口名w_user功能操作員信息增加父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_5&C查詢查詢數(shù)據(jù)窗口中的數(shù)據(jù)命令按鈕cb_6&S刷新刷新數(shù)據(jù)窗口中的數(shù)據(jù)命令按鈕cb_1&Z增加增加數(shù)據(jù)行命令按鈕cb_2&S刪除刪除輸入數(shù)據(jù)事件腳本cb_5stringls_code,ls_nameStringls_sqlls_code=trim(sle_1.text)ls_name=trim(sle_2.text)ifls_code=''andls_name=''then messagebox('提示','請(qǐng)先選擇查詢條件!') returnendififls_code<>''then ls_sql="(usercodelike'%"+ls_code+"%')" endififls_name<>''then ifls_sql=''then ls_sql="(usernamelike'%"+ls_name+"%')" else ls_sql=ls_sql+"and(usernamelike'%"+ls_name+"%')" endifendifdw_1.setfilter(ls_sql)dw_1.filter()ifdw_1.retrieve()=0then messagebox('提示','沒有滿足條件的記錄!')endifcb_6sle_1.text=''sle_2.text=''dw_1.dataobject='dw_user'dw_1.settransobject(sqlca)dw_1.retrieve()cb_1Longll_currentrow//定義長整型ll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_3stringls_code,ls_pwddwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"usercode")) ls_pwd=trim(dw_1.getitemstring(dw_1.getrow(),"pwd")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入用戶名!") return endif ifls_pwd=''orisnull(ls_pwd)then messagebox("提示","請(qǐng)輸入用戶密碼!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_userwheretrim(usercode)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','用戶名【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; //提交數(shù)據(jù) messagebox("提示","數(shù)據(jù)保存成功!") else rollback;//回滾 messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_4close(parent)6.2密碼修改窗口的設(shè)計(jì)說明表6-2項(xiàng)目說明窗口名w_pwd功能密碼修改父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1保存保存密碼命令按鈕cb_2退出退出系統(tǒng)事件腳本cb_1/stringls_old,ls_new,ls_secls_old=trim(sle_1.text)ls_new=trim(sle_2.text)ls_sec=trim(sle_3.text)ifls_old=''then messagebox('提示','請(qǐng)輸入舊密碼!') sle_1.setfocus() returnendififls_new=''then messagebox('提示','請(qǐng)輸入新密碼!') sle_2.setfocus() returnendififls_sec=''then messagebox('提示','請(qǐng)輸入確認(rèn)密碼!') sle_3.setfocus() returnendififls_old<>gs_pwdthen messagebox('提示','輸入的舊密碼不正確，請(qǐng)確認(rèn)!!') sle_1.setfocus() returnendififls_new<>ls_secthen messagebox('提示','兩次輸入的新密碼不一致，請(qǐng)確認(rèn)!!') sle_3.setfocus() returnendifupdatet_usersetpwd=:ls_newwhereusercode=:gs_usercodeusingsqlca;ifsqlca.SQLCode=0then mit; messagebox("提示","密碼修改成功!") Restart()elseifsqlca.SQLCode=-1then rollback; messagebox("錯(cuò)誤",sqlca.SQLErrText,Exclamation!)EndIf表6-3項(xiàng)目說明窗口名w_bm功能部門管理父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增增加部門命令按鈕cb_2刪除刪除部門命令按鈕cb_3保存保存內(nèi)容命令按鈕cb_4退出退出系統(tǒng)事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_3stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"code")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"codename")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入部門編號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入部門名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_bmwheretrim(code)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','部門編號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_4close(parent)表6-4項(xiàng)目說明窗口名w_zcly功能資產(chǎn)來源父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增新增來源命令按鈕cb_2刪除刪除來源命令按鈕cb_3保存保存數(shù)據(jù)命令按鈕cb_4退出退出登錄事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_3stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"zcly")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"lymc")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入來源編號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入來源名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_zclywheretrim(zcly)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','來源編號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_4close(parent)表6-5項(xiàng)目說明窗口名w_syqk功能使用情況查看父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增新增情況命令按鈕cb_2刪除刪除使用情況命令按鈕cb_3保存保存數(shù)據(jù)命令按鈕cb_4退出退出登錄事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_3///stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"sybm")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"symc")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入編號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_syqkwheretrim(sybm)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','編號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_4close(parent)表6-6項(xiàng)目說明窗口名w_bdqk功能資產(chǎn)變動(dòng)情況查看父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增新增變動(dòng)情況命令按鈕cb_2刪除刪除資產(chǎn)變動(dòng)情況命令按鈕cb_3保存保存數(shù)據(jù)命令按鈕cb_4退出退出登錄事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_3stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"bdbh")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"bdmc")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入變動(dòng)編號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入變動(dòng)名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_bdqkwheretrim(bdbh)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','變動(dòng)編號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_4close(parent)表6-7項(xiàng)目說明窗口名w_jldw功能計(jì)量單位的查看父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增新增計(jì)量單位命令按鈕cb_2刪除刪除計(jì)量單位命令按鈕cb_3保存保存數(shù)據(jù)命令按鈕cb_5退出退出登錄事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_3stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"code")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"codename")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入計(jì)量編號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入計(jì)量名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_jldwwheretrim(code)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','計(jì)量編號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_4close(parent)表6-8項(xiàng)目說明窗口名w_kpgl功能固定資產(chǎn)的卡片管理父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_6查詢查詢已添加命令按鈕cb_5刷新刷新數(shù)據(jù)命令按鈕cb_7清空條件清空查詢條件命令按鈕cb_2新增新增資產(chǎn)卡片信息命令按鈕cb_3刪除刪除信息命令按鈕cb_4保存保存數(shù)據(jù)命令按鈕cb_1退出退出系統(tǒng)事件腳本cb_6stringls_code,ls_nameStringls_sqlls_code=trim(sle_1.text)ls_name=trim(sle_2.text)ifls_code=''andls_name=''then messagebox('提示','請(qǐng)先選擇查詢條件!') returnendififls_code<>''then ls_sql="(kphlike'%"+ls_code+"%')" endififls_name<>''then ifls_sql=''then ls_sql="(kpmclike'%"+ls_name+"%')" else ls_sql=ls_sql+"and(kpmclike'%"+ls_name+"%')" endifendifdw_1.setfilter(ls_sql)dw_1.filter()ifdw_1.retrieve()=0then messagebox('提示','沒有滿足條件的記錄!')endifcb_5dw_1.dataobject='dw_kpgl'dw_1.settransobject(sqlca)dw_1.retrieve()cb_7sle_1.text=''sle_2.text=''cb_3ifmessagebox('提示信息','你確定要?jiǎng)h除嗎?',question!,OKCancel!)=1then dw_1.deleteRow(0) ifdw_1.update()=1then mit; messagebox('提示','刪除成功!') else messagebox('提示','刪除失敗!') endifendifcb_4stringls_code,ls_bmmcdwItemStatusl_statusintegerli_tintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"kph")) ls_bmmc=trim(dw_1.getitemstring(dw_1.getrow(),"kpmc")) ifls_code=''orisnull(ls_code)then messagebox("提示","請(qǐng)輸入卡片號(hào)!") return endif ifls_bmmc=''orisnull(ls_bmmc)then messagebox("提示","請(qǐng)輸入卡片名稱!") return endif l_status=dw_1.GetItemStatus(dw_1.getrow(),0,Primary!) ifl_status=NewModified!then selectcount(*)into:li_tfromt_kpglwheretrim(kph)=:ls_codeusingsqlca; ifli_t>0then messagebox('提示','卡片號(hào)【'+ls_code+'】已經(jīng)存在!') return endif endif ifdw_1.modifiedcount()+dw_1.deletedcount()>0then ifdw_1.update()=1then mit; messagebox("提示","數(shù)據(jù)保存成功!") else rollback; messagebox("提示","保存失敗,可能是數(shù)據(jù)填寫不完整!") endif endif dw_1.retrieve()else messagebox("提示","沒有要保存的數(shù)據(jù)!") returnendifcb_2Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.object.bfbz[dw_1.getrow()]='0'dw_1.setfocus()cb_1close(parent)表6-9項(xiàng)目說明窗口名w_zjxx功能資產(chǎn)折舊信息的查看父窗口window界面設(shè)計(jì)控件類型控件名控件名稱說明命令按鈕cb_1新增新增資產(chǎn)折舊命令按鈕cb_2刪除刪除資產(chǎn)折舊信息命令按鈕cb_3保存保存信息命令按鈕cb_4退出退出系統(tǒng)事件腳本cb_1Longll_currentrowll_currentrow=dw_1.InsertRow(0)dw_1.ScrollToRow(ll_currentrow)dw_1.SetColumn(1)dw_1.setfocus()cb_2dw_1.settransobject(sqlca)dw_1.retrieve()cb_3stringls_code,ls_jsff,ls_zhdwItemStatusl_statusintegerli_t,li_nxintli_countdecimalld_sldw_1.accepttext()ifdw_1.rowcount()>0then ls_code=trim(dw_1.getitemstring(dw_1.getrow(),"kph")) li_nx=dw_1.getitemdecimal(dw_1.getrow(),"nx") ls