1、會(huì)計(jì)信息化庫(kù)存管理存貨核算系統(tǒng)實(shí)驗(yàn)指導(dǎo)書會(huì)計(jì)學(xué)院會(huì)計(jì)信息化系2005年8月月 PAGE 159目 錄 TOC o 1-3 h z HYPERLINK l _Toc119150466 實(shí)驗(yàn)一 存存貨子系統(tǒng)業(yè)務(wù)務(wù)流程分析 PAGEREF _Toc119150466 h 1 HYPERLINK l _Toc119150467 實(shí)驗(yàn)二 存存貨子系統(tǒng)數(shù)數(shù)據(jù)處理流程程分析 PAGEREF _Toc119150467 h 1 HYPERLINK l _Toc119150468 實(shí)驗(yàn)三 存貨貨子系統(tǒng)功功能分析 PAGEREF _Toc119150468 h 2 HYPERLINK l _Toc11915046

2、9 實(shí)驗(yàn)四 存貨貨子系統(tǒng)數(shù)數(shù)據(jù)字典及數(shù)數(shù)據(jù)庫(kù)設(shè)計(jì) PAGEREF _Toc119150469 h 2 HYPERLINK l _Toc119150470 實(shí)驗(yàn)五 建立立存貨子系系統(tǒng)數(shù)據(jù)庫(kù)庫(kù) PAGEREF _Toc119150470 h 3 HYPERLINK l _Toc119150471 實(shí)驗(yàn)六 存貨貨子系統(tǒng)基基本窗口設(shè)計(jì) PAGEREF _Toc119150471 h 4 HYPERLINK l _Toc119150472 實(shí)驗(yàn)七 存貨貨子系統(tǒng)軟軟件編程碼表處理 PAGEREF _Toc119150472 h 44 HYPERLINK l _Toc119150473 實(shí)驗(yàn)八 存貨貨子系統(tǒng)

3、軟軟件編程單表處理 PAGEREF _Toc119150473 h 47 HYPERLINK l _Toc119150474 實(shí)驗(yàn)九 存貨貨子系統(tǒng)軟軟件編程導(dǎo)入導(dǎo)出處處理 PAGEREF _Toc119150474 h 53實(shí)驗(yàn)一 庫(kù)存存管理存貨核核算系統(tǒng)業(yè)業(yè)務(wù)流程分析析實(shí)驗(yàn)?zāi)康模悍治鰩?kù)存管理理存貨核算系系統(tǒng)的業(yè)務(wù)務(wù)流程，畫出出存貨子系系統(tǒng)業(yè)務(wù)流流程圖。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、Worrd軟件、VVisio軟軟件等。實(shí)驗(yàn)方式：分組進(jìn)行。上機(jī)機(jī)時(shí)： 2機(jī)時(shí)實(shí)驗(yàn)內(nèi)容：1、庫(kù)存管理理存貨核算系系統(tǒng)業(yè)務(wù)流程描描述。為了深入了解存存貨核算與管管理的特點(diǎn)，我我們首先分析析手工條件下下存貨核

4、算與與管理的業(yè)務(wù)務(wù)處理流程，掌掌握存貨出庫(kù)庫(kù)、入庫(kù)、期期末結(jié)賬、對(duì)對(duì)賬以及管理理分析的過程程。存貨包括原材料料、包裝物、低低值易耗品、自自制半成品、產(chǎn)產(chǎn)成品等。在在手工條件下下，當(dāng)存貨到到達(dá)企業(yè)并辦辦理入庫(kù)手續(xù)續(xù)后，除了倉(cāng)倉(cāng)庫(kù)保管員要要登記存貨數(shù)數(shù)量賬外，財(cái)財(cái)會(huì)部門也要要根據(jù)各種憑憑單（如入庫(kù)庫(kù)單、驗(yàn)收?qǐng)?bào)報(bào)告等）登記記存貨明細(xì)賬賬，反映存貨貨增加等經(jīng)濟(jì)濟(jì)業(yè)務(wù)；當(dāng)各各個(gè)部門領(lǐng)用用存貨時(shí)（如如生產(chǎn)車間領(lǐng)領(lǐng)用材料用于于生產(chǎn)、銷售售部門領(lǐng)用產(chǎn)產(chǎn)品用于銷售售），倉(cāng)庫(kù)保保管員又要登登記存貨數(shù)量量賬，財(cái)會(huì)部部門又要根據(jù)據(jù)各種憑單（如如入庫(kù)單等）登登記存貨明細(xì)細(xì)賬，反映存存貨減少等經(jīng)經(jīng)濟(jì)業(yè)務(wù)；定定期編制記賬賬

5、憑證傳遞到到總賬子系統(tǒng)統(tǒng)，登記總賬賬。此外，還還要及時(shí)為管管理提供各種種存貨報(bào)告，如如存貨狀態(tài)報(bào)報(bào)告、ABCC存貨成本分分析報(bào)告、超超儲(chǔ)積壓存貨貨分析報(bào)告等等。下面我們們對(duì)入庫(kù)流程程、出庫(kù)流程程以及期末結(jié)結(jié)賬和管理分分析流程進(jìn)行行分析。（1）存貨核算算與管理入庫(kù)流程分分析當(dāng)采購(gòu)部門或者者供應(yīng)商將存存貨送入倉(cāng)庫(kù)庫(kù)，生產(chǎn)部門門或者物流部部門將生產(chǎn)的的產(chǎn)成品送入入倉(cāng)庫(kù)，入庫(kù)庫(kù)業(yè)務(wù)便開始始進(jìn)行了。倉(cāng)庫(kù)保管員依據(jù)據(jù)采購(gòu)訂單和和計(jì)劃入庫(kù)安安排，檢查供供應(yīng)商送貨及及時(shí)性，根據(jù)據(jù)事先設(shè)定的的送貨接收標(biāo)標(biāo)準(zhǔn)，判定是是否收貨。如果可以收貨，倉(cāng)倉(cāng)庫(kù)保管員編編制收貨憑證證，并將收貨貨憑證和質(zhì)檢檢抽樣存貨移移入質(zhì)檢部門

6、門，進(jìn)行抽樣樣檢驗(yàn)。如果質(zhì)檢合格，將將質(zhì)檢合格存存貨退返倉(cāng)庫(kù)庫(kù)，進(jìn)行庫(kù)存存移庫(kù)操作，并并編制驗(yàn)收?qǐng)?bào)報(bào)告。將驗(yàn)收?qǐng)?bào)告?zhèn)鬟f遞給倉(cāng)庫(kù)和財(cái)財(cái)務(wù)部門。倉(cāng)庫(kù)保管員根據(jù)據(jù)驗(yàn)收?qǐng)?bào)告和和收貨憑證編編制入庫(kù)單。登記相應(yīng)存貨的的入庫(kù)數(shù)量和和結(jié)存數(shù)量，即即存貨三級(jí)賬賬，并將相應(yīng)應(yīng)的單據(jù)傳遞遞到財(cái)務(wù)部門門。財(cái)務(wù)賁門根據(jù)入入庫(kù)單、驗(yàn)收收?qǐng)?bào)告編制記記賬憑證。存貨核算會(huì)計(jì)審審核憑證，登登記存貨明系系賬，并將憑憑證傳遞到總總賬子系統(tǒng)。總賬會(huì)計(jì)定期根根據(jù)記賬憑證證登記總賬。（2）存貨核算算與管理出庫(kù)、期末末處理與管理理的分析流程程當(dāng)生產(chǎn)部門提出出領(lǐng)料申請(qǐng)、銷銷售部門提出出發(fā)運(yùn)產(chǎn)品時(shí)時(shí)，出庫(kù)業(yè)務(wù)務(wù)便開始進(jìn)行行；到會(huì)計(jì)期期末進(jìn)行相應(yīng)

7、應(yīng)的處理，并并提交各種管管理分析報(bào)告告。倉(cāng)庫(kù)保管員接到到各車間、用用料單位提出出的領(lǐng)料申請(qǐng)請(qǐng)，或者銷售售部門提出的的發(fā)運(yùn)請(qǐng)求，經(jīng)經(jīng)審核單據(jù)后后，編制出庫(kù)庫(kù)單，并發(fā)出出存貨。倉(cāng)庫(kù)保管員登記記相應(yīng)存貨出出庫(kù)數(shù)量和結(jié)結(jié)存數(shù)據(jù)，即即存貨三級(jí)賬賬，并將相應(yīng)應(yīng)的單據(jù)傳遞遞到財(cái)會(huì)部門門。財(cái)會(huì)部門會(huì)計(jì)人人員根據(jù)出庫(kù)庫(kù)單等單據(jù)編編制記賬憑證證，登記存貨貨明細(xì)賬，并并將憑證傳遞遞到總賬子系系統(tǒng)。由于存存貨種類繁多多、數(shù)量大、收收發(fā)業(yè)務(wù)頻繁繁，存貨成本本計(jì)算比較復(fù)復(fù)雜，為了滿滿足不同企業(yè)業(yè)對(duì)核算的需需要，存貨可可以按計(jì)劃成成本計(jì)價(jià)，也也可按實(shí)際成成本計(jì)價(jià)。按按實(shí)際成本計(jì)計(jì)價(jià)時(shí)，存貨貨成本可以按按照加權(quán)平均均、移動(dòng)加

8、權(quán)權(quán)平均、先進(jìn)進(jìn)先出、后進(jìn)進(jìn)先出和個(gè)別別計(jì)價(jià)等方法法進(jìn)行計(jì)算。期末處理。財(cái)務(wù)務(wù)部門期末對(duì)對(duì)存貨進(jìn)行實(shí)實(shí)地盤點(diǎn)，編編制盤盈盤虧虧表，經(jīng)審批批后通知倉(cāng)庫(kù)庫(kù)、財(cái)會(huì)部門門修改相應(yīng)的的存貨一級(jí)、二二級(jí)以及三級(jí)級(jí)賬。由于存存貨數(shù)量賬（三三級(jí)賬）、存存貨明細(xì)賬（二二級(jí)賬）、總總賬（一級(jí)賬賬）是由不同同的人員編制制的，因此，會(huì)會(huì)出現(xiàn)賬賬不不一致的問題題。因此，期期末還需要進(jìn)進(jìn)行三級(jí)賬的的核對(duì)工作，很很多企業(yè)要花花費(fèi)一定的人人力物力每月月必須進(jìn)行對(duì)對(duì)賬。財(cái)務(wù)部部門根據(jù)不同同的計(jì)價(jià)方法法和成本計(jì)算算方法，分別別計(jì)算存貨成成本差異、發(fā)發(fā)出存貨成本本，并進(jìn)行結(jié)結(jié)賬工作。存貨分析。財(cái)務(wù)務(wù)管理人員需需要根據(jù)入庫(kù)庫(kù)單、出庫(kù)

9、單單、存貨數(shù)量量賬等編制包包括超儲(chǔ)積壓壓一覽表、AABC成本分分析表、倉(cāng)庫(kù)庫(kù)存貨匯總表表等內(nèi)容的管管理分析報(bào)告告，并提出存存貨管理的改改進(jìn)意見和評(píng)評(píng)價(jià)信息。2、通過分析存存貨子系統(tǒng)的業(yè)務(wù)流程，利用Visio軟件畫出存貨子系統(tǒng)的業(yè)務(wù)流程圖。業(yè)務(wù)流程圖如圖圖1所示：圖1 存貨貨子系統(tǒng)業(yè)務(wù)務(wù)流程圖實(shí)驗(yàn)二 存貨貨子系統(tǒng)數(shù)數(shù)據(jù)處理流程程分析實(shí)驗(yàn)?zāi)康模和ㄟ^存貨子系系統(tǒng)的業(yè)務(wù)務(wù)流程圖，進(jìn)進(jìn)一步分析優(yōu)優(yōu)化存貨子子系統(tǒng)的數(shù)數(shù)據(jù)處理流程程，畫出存存貨子系統(tǒng)的的數(shù)據(jù)處理流流程圖。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、Worrd軟件、VVisio軟軟件等。實(shí)驗(yàn)方式：分組進(jìn)行。實(shí)驗(yàn)內(nèi)容：1、通過分析存存貨子系統(tǒng)的業(yè)

10、務(wù)流程圖，利用Visio軟件畫出存貨子系統(tǒng)的數(shù)據(jù)處理流程圖。根據(jù)前面對(duì)存貨貨子系統(tǒng)業(yè)務(wù)務(wù)流程圖的分分析，運(yùn)用系系統(tǒng)分析法，可可以繪出存貨貨子系統(tǒng)的數(shù)數(shù)據(jù)流程圖。依依據(jù)模塊結(jié)構(gòu)構(gòu)設(shè)計(jì)的原則則，通過對(duì)存存貨子系統(tǒng)的的數(shù)據(jù)流程圖圖進(jìn)行模塊劃劃分，存貨子子系統(tǒng)可以劃劃分為入庫(kù)管管理、出庫(kù)管管理、存管理理、損管理和和調(diào)撥管理等等功能模塊。數(shù)數(shù)據(jù)流程圖如如圖2所示：圖2 存貨貨子系統(tǒng)數(shù)據(jù)據(jù)流程圖實(shí)驗(yàn)三 存存貨子系統(tǒng)功功能分析實(shí)驗(yàn)?zāi)康模和ㄟ^分析 存存貨子系統(tǒng)的的業(yè)務(wù)流程與與數(shù)據(jù)處理流流程圖，進(jìn)一一步分析存存貨子系統(tǒng)的的功能。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、Worrd軟件、VVisio軟軟件等。實(shí)驗(yàn)

11、方式：分組進(jìn)行。實(shí)驗(yàn)內(nèi)容：1、通過分析存存貨子系統(tǒng)的業(yè)務(wù)流程與數(shù)據(jù)處理流程圖，畫出存貨子系統(tǒng)的功能圖。根據(jù)業(yè)務(wù)流程圖圖和數(shù)據(jù)流程程圖，存貨子子系統(tǒng)基本可可以劃分為入入庫(kù)管理、出出庫(kù)管理、盤盤點(diǎn)管理、報(bào)報(bào)損管理、調(diào)調(diào)撥管理等五五個(gè)功能模塊塊。每個(gè)功能能模塊又可以以繼續(xù)劃分為為若干個(gè)功能能模塊，直到到每個(gè)功能模模塊都能夠表表示相當(dāng)獨(dú)立立的功能為止止。我們的存存貨子系統(tǒng)側(cè)側(cè)重于核算模模塊的設(shè)計(jì)。主主要的功能結(jié)結(jié)構(gòu)有入庫(kù)管管理、出庫(kù)管管理、盤點(diǎn)管管理模塊。功功能結(jié)構(gòu)圖如如圖3所示：圖3 存存貨子系統(tǒng)功功能結(jié)構(gòu)圖實(shí)驗(yàn)四 存存貨子系統(tǒng)數(shù)數(shù)據(jù)字典及數(shù)數(shù)據(jù)庫(kù)設(shè)計(jì)實(shí)驗(yàn)?zāi)康模和ㄟ^分析存貨貨子系統(tǒng)的的數(shù)據(jù)流程圖圖，

12、進(jìn)一步寫寫出存貨子子系統(tǒng)的數(shù)數(shù)據(jù)字典。利用PowerrDesiggner軟件件，建立存存貨子系統(tǒng)的的PDM。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、Worrd軟件、VVisio軟軟件、PowwerDessignerr軟件等。實(shí)驗(yàn)方式：分組進(jìn)行。實(shí)驗(yàn)內(nèi)容：通過分析存貨貨子系統(tǒng)的的數(shù)據(jù)流程圖圖，寫出存存貨子系統(tǒng)的數(shù)據(jù)字典。數(shù)據(jù)流的描述數(shù)據(jù)流編號(hào)數(shù)據(jù)流名稱簡(jiǎn)述數(shù)據(jù)流來源數(shù)據(jù)流去向F1庫(kù)存產(chǎn)品信息表表庫(kù)存部門記錄存存貨信息的表表庫(kù)存模塊其他各模塊F2庫(kù)存盤點(diǎn)表庫(kù)存部門記錄存存貨期末盤點(diǎn)點(diǎn)情況的表庫(kù)存模塊賬務(wù)模塊F3入庫(kù)單庫(kù)存部門開出的的入庫(kù)單庫(kù)存模塊采購(gòu)模塊F4出庫(kù)單庫(kù)存部門開出的的出庫(kù)單庫(kù)存模塊銷

13、售模塊F5銷售退貨入庫(kù)單單庫(kù)存部門開出的的銷售退貨入入庫(kù)單庫(kù)存模塊銷售模塊F6采購(gòu)申請(qǐng)單庫(kù)存不足時(shí)庫(kù)存存部門開出的的采購(gòu)申請(qǐng)單單庫(kù)存模塊采購(gòu)模塊F7報(bào)損單庫(kù)存部門開出的的報(bào)損單庫(kù)存模塊質(zhì)管模塊F8部門用途表各部門領(lǐng)用存貨貨類別表庫(kù)存模塊賬務(wù)模塊F9流水賬單存貨出入情況的的賬單庫(kù)存模塊信息使用者F10期初余額表庫(kù)存期初余額庫(kù)存模塊信息使用者處理邏輯的描述述處理邏輯編號(hào)處理邏輯名稱簡(jiǎn)述輸入的數(shù)據(jù)流輸出的數(shù)據(jù)流P1驗(yàn)收貨物對(duì)采購(gòu)入庫(kù)的貨貨物進(jìn)行檢驗(yàn)驗(yàn)采購(gòu)單驗(yàn)收單P2出庫(kù)處理對(duì)銷售的貨物進(jìn)進(jìn)行出庫(kù)檢驗(yàn)驗(yàn)銷售單銷售檢驗(yàn)單P3審核調(diào)撥單對(duì)調(diào)撥單申請(qǐng)進(jìn)進(jìn)行審核調(diào)撥單（申請(qǐng)）調(diào)撥單（審核）P4盤點(diǎn)庫(kù)存對(duì)庫(kù)存中

14、的存貨貨進(jìn)行盤點(diǎn)實(shí)物清單庫(kù)存盤點(diǎn)單P5審核報(bào)損單對(duì)報(bào)損單申請(qǐng)進(jìn)進(jìn)行審核報(bào)損單報(bào)損單（審核） 數(shù)據(jù)存儲(chǔ)的描述述數(shù)據(jù)存儲(chǔ)編號(hào)數(shù)據(jù)存儲(chǔ)名稱簡(jiǎn)述S1庫(kù)存賬目存貨入庫(kù)、出庫(kù)庫(kù)、退貨、報(bào)報(bào)損后修改當(dāng)當(dāng)前庫(kù)存量外部實(shí)體的描述述外部實(shí)體編號(hào)外部實(shí)體名稱簡(jiǎn)述輸入的數(shù)據(jù)流輸出的數(shù)據(jù)流E1倉(cāng)庫(kù)部門對(duì)存貨保管、增增減變化進(jìn)行行管理的部門門驗(yàn)收單、銷售單單入庫(kù)單、出庫(kù)單單E2采購(gòu)部門采購(gòu)存貨的部門門入庫(kù)單采購(gòu)單E3銷售部門銷售商品的部門門出庫(kù)單銷售單E4財(cái)務(wù)部門進(jìn)行賬務(wù)處理的的部門庫(kù)存盤點(diǎn)單、報(bào)報(bào)損單帳簿、報(bào)表利用PowerrDesiggner軟件件，建立存存貨子系統(tǒng)的的PDM。實(shí)驗(yàn)五 建立存存貨子系統(tǒng)數(shù)數(shù)據(jù)庫(kù)實(shí)驗(yàn)?zāi)康?/p>

15、：建立存貨子系系統(tǒng)的SQQL Anyywheree數(shù)據(jù)庫(kù)。刪除所建數(shù)據(jù)庫(kù)庫(kù)的trannsactiion loog fille文件。建立存貨子系系統(tǒng)的ODDBC。通過存貨子系系統(tǒng)的PDDM，生成 存貨子系統(tǒng)統(tǒng)數(shù)據(jù)庫(kù)中中的各張表。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、PowwerDessignerr軟件、PoowerBuuilderr軟件、SQQL Anyywheree數(shù)據(jù)庫(kù)等。實(shí)驗(yàn)方式：分組進(jìn)行。實(shí)驗(yàn)內(nèi)容：1、在PoweerBuillder中，建建立存貨子子系統(tǒng)的SSQL Annywherre數(shù)據(jù)庫(kù)。2、在Sybaase 中心心Sybasse Cenntral中中，利用Uttilitiies

16、 工具具中的Chaange LLog Fiile Innformaation功功能，刪除所所建數(shù)據(jù)庫(kù)的的transsactioon logg filee文件。3、在PoweerBuillder中，或或在PoweerBuillder中，建建立存貨子子系統(tǒng)的OODBC。4、在PoweerDesiigner AppMModeleer軟件，連連接存貨子子系統(tǒng)數(shù)據(jù)據(jù)庫(kù)。5、通過存貨貨子系統(tǒng)的的PDM，利利用PoweerDesiigner AppMoodelerr軟件，生成成存貨子系系統(tǒng)數(shù)據(jù)庫(kù)庫(kù)中的各張表表。數(shù)據(jù)庫(kù)設(shè)計(jì)1.碼表設(shè)計(jì)一 倉(cāng)庫(kù)表倉(cāng)庫(kù)表c_ch_ckkb字段名類型長(zhǎng)度是否空含義ckb_codde

17、char(6)NOT NULLL倉(cāng)庫(kù)編號(hào)ckb_nammechar(200)NULL倉(cāng)庫(kù)名稱二 職員表職員表c_ch_zyyb字段名類型長(zhǎng)度是否空含義zyb_coddechar(6)NOT NULLL職員編號(hào)zyb_nammechar(200)NULL職員名稱zyb_szbbmchar(200)NULL所在部門三 部門表部門表c_ch_bmmb字段名類型長(zhǎng)度是否空含義bmb_coddechar(6)NOT NULLL部門編號(hào)bmb_nammechar(200)NULL部門名稱四 貨位表貨位表c_ch_hwwb字段名類型長(zhǎng)度是否空含義hwb_coddechar(6)NOT NULLL貨位編號(hào)hw

18、b_nammechar(200)NULL貨位名稱hwb_szcckchar(200)NULL所在倉(cāng)庫(kù)五 業(yè)務(wù)性質(zhì)表表業(yè)務(wù)性質(zhì)表c_ch_ywwxzb字段名類型長(zhǎng)度是否空含義ywxzb_ccodechar(6)NOT NULLL業(yè)務(wù)性質(zhì)編碼ywxzb_nnamechar(400)NULL業(yè)務(wù)性質(zhì)名稱2.基本表設(shè)計(jì)計(jì)一 庫(kù)存產(chǎn)品信信息表庫(kù)存產(chǎn)品信息表表 T_kcxxx字段名類型長(zhǎng)度是否空含義*chbmChar(100)NOT NULLL存貨編碼chmcchar(500)NULL存貨名稱ggxhChar (55)NULL規(guī)格型號(hào)jldwChar(100)NULL計(jì)量單位chlbChar(100)NU

19、LL存貨類別ChsxChar(200)NULL存貨屬性JhjgChar(100)NULL計(jì)劃價(jià)格ckjgchar(100)NULL參考價(jià)格hwchar(100)NULL貨位shchar(100)NULL審核標(biāo)志qyrqChar(300)NULL啟用日期bzchar(1000)NULL備注二 存貨結(jié)存表表存貨結(jié)存表 T_chjccb字段名類型長(zhǎng)度是否空含義*chbmChar(100)NOT NULLL存貨編碼qcsldecimall(10,22)NULL本月期初數(shù)量qcdjdecimall(10,22)NULL本月期初單價(jià)qcjedecimall(10,22)NULL本月期初金額=本月期初單單價(jià)

20、*本月期期初單價(jià)ssldecimall(10,22)NULL本月收數(shù)量sjedecimall(10,22)NULL本月收金額fsldecimall(10,22)NULL本月發(fā)數(shù)量fjedecimall(10,22)NULL本月發(fā)金額jcsldecimall(10,22)NULL本月結(jié)存數(shù)量jcdjdecimall(10,22)NULL本月結(jié)存單價(jià)jcjedecimall(10,22)NULL本月結(jié)存金額三 入庫(kù)單入庫(kù)單表 T_rkd字段名類型長(zhǎng)度是否空含義*rkdhChar(100)NOT NULLL*入庫(kù)單編號(hào)(自動(dòng)生成)rkrqChar(155)NULL入庫(kù)單日期ywbhChar(155)

21、NULL業(yè)務(wù)編號(hào)ywyxmChar(100)NULL業(yè)務(wù)員姓名chbmChar(100)NULL存貨編碼sldecimall(10,22)NULL數(shù)量djdecimall(10,22)NULL單價(jià)jedecimall(10,22)NULL金額cdChar(100)NULL產(chǎn)地gysChar(100)NULL供應(yīng)商ckChar(100)NULL倉(cāng)庫(kù)hwChar(100)NULL貨位shbzChar(2)NULL審核標(biāo)志clbzChar(2)NULL處理標(biāo)志shbzChar(2)NULL收貨標(biāo)志zdrChar(100)NULL制單人shrChar(100)NULL審核人四 出庫(kù)單出庫(kù)單表 T_ck

22、d字段名類型長(zhǎng)度是否空含義*ckdhChar(100)NOT NULLL*出庫(kù)單編號(hào)(自動(dòng)生成)ckrqChar(155)NULL出庫(kù)單日期ywbhChar(155)NULL業(yè)務(wù)編號(hào)ywyxmChar(100)NULL業(yè)務(wù)員姓名chbmChar(100)NULL存貨編碼sldecimall(10,22)NULL數(shù)量djdecimall(10,22)NULL單價(jià)jedecimall(10,22)NULL金額ytChar(100)NULL用途bmChar(100)NULL部門ckChar(100)NULL倉(cāng)庫(kù)hwChar(100)NULL貨位shbzChar(2)NULL審核標(biāo)志clbzChar(

23、2)NULL處理標(biāo)志shbzChar(2)NULL收貨標(biāo)志zdrChar(100)NULL制單人shrChar(100)NULL審核人bzchar(1000)NULL備注五 銷售退貨入入庫(kù)單銷售退貨入庫(kù)單單 T_xsthhrkd字段名類型長(zhǎng)度是否空含義*ckthdhhChar(100)NOT NULLL*銷售退貨單編編號(hào)(自動(dòng)生成)ckthdrqqChar(155)NULL銷售退貨單日期期ywbhChar(155)NULL業(yè)務(wù)編號(hào)ywyxmChar(100)NULL業(yè)務(wù)員姓名chbmChar(100)NOT NULLL存貨編碼sldecimall(10,22)NULL數(shù)量djdecimall(

24、10,22)NULL單價(jià)jedecimall(10,22)NULL金額bmChar(100)NULL部門ckChar(100)NULL倉(cāng)庫(kù)hwChar(100)NULL貨位shbzChar(2)NULL審核標(biāo)志clbzChar(2)NULL處理標(biāo)志shbzChar(2)NULL收貨標(biāo)志zdrChar(100)NULL制單人shrChar(100)NULL審核人thyyChar(1000)NULL退貨原因六 采購(gòu)申請(qǐng)單單采購(gòu)申請(qǐng)單ch_cgsqqd字段名類型長(zhǎng)度是否空含義*sqdbhChar(100)NOT NULLL*申請(qǐng)單編號(hào)(自動(dòng)生成)rqChar(155)NULL日期chbmChar(1

25、00)NULL存貨編碼chmcChar(200)NULL存貨名稱ggxhChar(100)NULL規(guī)格型號(hào)jldwChar(4)NULL計(jì)量單位chlbChar(100)NULL存貨類別chsxChar(100)NULL存貨屬性xqsldecimall(10,22)NULL需求數(shù)量chrChar(100)NULL制單人shrChar(100)NULL審核人七 報(bào)損單入庫(kù)退貨單 T_rktth字段名類型長(zhǎng)度是否空含義*bsbhChar(100)NOT NULLL*報(bào)損單編號(hào)(自動(dòng)生成)bsrqChar(155)NULL報(bào)損單日期ywyxmChar(100)NULL業(yè)務(wù)員姓名chbmChar(10

26、0)NULL存貨編碼sldecimall(10,22)NULL數(shù)量djdecimall(10,22)NULL單價(jià)jedecimall(10,22)NULL金額cdChar(100)NULL產(chǎn)地gysChar(100)NULL供應(yīng)商ckChar(100)NULL倉(cāng)庫(kù)hwChar(100)NULL貨位shbzChar(2)NULL審核標(biāo)志clbzChar(2)NULL處理標(biāo)志shbzChar(2)NULL收貨標(biāo)志zdrChar(100)NULL制單人shrChar(100)NULL審核人bsyyChar(1000)NULL報(bào)損原因八 部門用途表表部門用途表 T_bmyytb 字段名類型長(zhǎng)度是否空含

27、義*bmbmChar(100)NOT NULLL*部門編碼bmmcChar(200)NULL部門名稱ytdmChar(100)NULL用途代碼ytmcChar(100)NULL用途名稱xmfy Char(100)NULL項(xiàng)目費(fèi)用九 流水賬單流水賬單ch_lszdd字段名類型長(zhǎng)度是否空含義*xhchar(3)NOT NULLL序號(hào)sjChar(155)NULL時(shí)間djhchar(2)NULL單據(jù)號(hào)ywxzchar(4)NULL業(yè)務(wù)性質(zhì)chbmchar(100)NULL存貨編碼chmcchar(200)NULL存貨名稱sldecimall(10,22)NULL數(shù)量djdecimall(10,22)

28、NULL單價(jià)jedecimall(10,22)NULL金額十 期初余額表表期初余額表 T_qcyeeb字段名類型長(zhǎng)度是否空含義chbmChar(100)NULL存貨編碼chmmChar(500) not NUULL存貨名稱sldecimall(10,22)NULL數(shù)量djdecimall(10,22)NULL單價(jià)jedecimall(10,22)NULL金額cdchar(500)null產(chǎn)地gyschar(500)null供應(yīng)商ckChar(100)NULL倉(cāng)庫(kù)hwChar(100)NULL貨位bzchar(1000)NULL備注十一 存貨盤點(diǎn)點(diǎn)表存貨盤點(diǎn)表 T_chpddb字段名類型長(zhǎng)度是否

29、空含義pddbhChar(100) not NUULL盤點(diǎn)單編號(hào)pddrqChar(155)NULL盤點(diǎn)單日期ywyxmChar(100)NULL業(yè)務(wù)員姓名bmChar(100)NULL部門chbmChar(100) not NUULL存貨編碼chmcchar(200)null存貨名稱hwchar(100)null貨位chdjdecimall(10,22)NULL存貨單價(jià)zcsldecimall(10,22)NULL賬存數(shù)量pdsldecimall(10,22)NULL盤點(diǎn)數(shù)量yksldecimall(10,22)NULL盈虧數(shù)量zdrchar(100)NULL制單人 shrchar(100)

30、NULL審核人實(shí)驗(yàn)六 存存貨子系統(tǒng)基基本窗口設(shè)計(jì)計(jì)實(shí)驗(yàn)?zāi)康模捍尕涀酉到y(tǒng)窗窗口設(shè)計(jì)。存貨子系統(tǒng)全局變量設(shè)計(jì)。存貨子系統(tǒng)全局函數(shù)設(shè)計(jì)。實(shí)驗(yàn)環(huán)境：安裝Windoows操作系系統(tǒng)、PowwerBuiilder軟軟件、SQLL Anywwhere數(shù)數(shù)據(jù)庫(kù)、教師師提供的軟件件原型平臺(tái)等等。實(shí)驗(yàn)方式：分組進(jìn)行。實(shí)驗(yàn)內(nèi)容：1、存貨子系系統(tǒng)全局變變量設(shè)計(jì)。全局變量定義string g_opeer_codde,g_ooper_nname,gg_sheeet_codde,g_pprintstring g_datte,g_ddept,gg_deptt_day,g_funnc_coddestring g_deppt_m

31、onnth_daate=22000-001-01string g_oriig,g_wwarehoousestring g_sp_info,g_mennu_nammebooleann gb_ddb_connnecteedstring g_prrice_ppowerdecimall g_deept_inntervaalstring g_collor=880,g_colorr_key=80string g_IPAAddresss,g_MMachinneNameestring g_logg_rec=0 /記記錄日志標(biāo)記記 1：記記錄，0：不記錄string g_syss_namee=重慶工工學(xué)院會(huì)計(jì)學(xué)

32、學(xué)院 實(shí)驗(yàn)案案例string g_commp_namme=重慶慶工學(xué)院 會(huì)會(huì)計(jì)學(xué)院會(huì)計(jì)計(jì)學(xué)院 string g_prooj_codde=,g_prooj_namme=string g_driive=dd:io ,g_pathffilenaame /導(dǎo)入導(dǎo)出出路徑string g_dirr_sc= /自動(dòng)生成路路徑integerr g_shheet_ccode_llen =110 /單單據(jù)長(zhǎng)度integerr g_leen1=3,g_lenn2=7,gg_len33=11,gg_len44=19 /小區(qū)、大大樓、單元、房房間編碼長(zhǎng)度度integerr g_leen4_1=3,g_llen4_22

33、=3 /g_leen4_1樓樓層長(zhǎng)度 gg_len44_2 房間間長(zhǎng)度string g_zthh=0011 /帳套號(hào)string g_nkjjqj=22005 /年會(huì)會(huì)計(jì)期間2、存貨子系系統(tǒng)全局函函數(shù)設(shè)計(jì)。函數(shù)名函數(shù)功能f_oper_checkk判斷操作員輸入入的編碼及密密碼是否合法法gf_dw_ccount顯示數(shù)據(jù)窗口的的行數(shù)f_wheree_exisst判斷有無WHEERE條件f_strinng字符變量的處理理f_sqlsqlca.ssqlcodde判斷，00、100：falsee，-1：ttruegf_ini_tablee碼表初始化f_i_o導(dǎo)入導(dǎo)出初始f_dw_teest_reepea

34、t對(duì)數(shù)據(jù)窗口中的的導(dǎo)入數(shù)據(jù)進(jìn)進(jìn)行重復(fù)性測(cè)測(cè)試f_dw_teest_reepeat_del刪除導(dǎo)入導(dǎo)出中中的重復(fù)數(shù)據(jù)據(jù)函數(shù)名f_oper_checkk返回值類型integerr函數(shù)功能判斷操作員輸入入的編碼及密密碼是否合法法參數(shù)定義r_oper_code:strinngr_pass:strinng腳本string r_opper_paassSELECT pass INTTO :r_oper_pass FROMM c_opperatoor WHHERE oper_code= :r_ooper_ccode;IF sqlcca.sqllcode = 1000 thennmessaggebox(g_sy

35、ss_namee,您提供供的操作員號(hào)號(hào)碼不正確!)returnn 1ELSEIF triim(r_ooper_ppass) trrim(r_pass) THENNmessaageboxx(g_syys_namme,您提提供的密碼和和操作員號(hào)不不符!rr是否沒有有區(qū)分大小寫寫?)returrn 2END IFFEND IFreturn 0函數(shù)名gf_dw_ccount返回值類型無函數(shù)功能顯示數(shù)據(jù)窗口的的行數(shù)參數(shù)定義r_dw_taable: dataawindoowr_sle_ccount: singglelinneeditt腳本long r_row,rr_counntr_countt=r_dww

36、_tablle.ROWWCOUNTT()r_row=rr_dw_ttable.getroow()IF r_roow0 aand r_countt0 THHENr_sle_countt.TEXTT=striing(r_row)+/+sstringg(r_coount)ELSEIF r_coount00 thennr_sle_countt.TEXTT=共+strinng(r_ccount)+條ELSEr_sle_countt.TEXTT=END IFreturn函數(shù)名f_wheree_exisst返回值類型integerr函數(shù)功能判斷有無WHEERE條件參數(shù)定義r_orig_sql: strinn

37、g腳本if pos(r_oriig_sqll,WHEERE)0 orr pos(r_oriig_sqll,wheere)0 theenreturnn 1/有WHHERE條件件elsereturnn 0/無WHHERE條件件end if函數(shù)名f_strinng返回值類型string函數(shù)功能字符變量的處理理參數(shù)定義r:strinng腳本IF ISNUULL(r) OR TTRIM(rr)= THENr=%ELSEr= r+%END IFRETURN r函數(shù)名f_sql返回值類型booleann函數(shù)功能sqlca.ssqlcodde判斷，00、100：falsee，-1：ttrue參數(shù)定義無腳本if

38、 sqlcca.sqllcode=-1 thhenmessaageboxx(sqll錯(cuò)誤信息,sqlcca.sqllerrteext)rollbback;returrn truueelsecommiit;returrn fallseend if函數(shù)名gf_ini_tablee返回值類型無函數(shù)功能碼表初始化參數(shù)定義無腳本表 s s(iopomVS1事 s(iopomVS2董 s(iopomVS3務(wù) s(iopomVS4售 c_l ueueduemVS1士; ueueduemVS2士; ueueduemVS3士;碼 _ _(_,_)U _(_,_)U _(_,_)Uqtrn函數(shù)名f_i_o返回值類

39、型無函數(shù)功能導(dǎo)入導(dǎo)出初始參數(shù)定義腳本SetPoinnter(HHourGllass!)delete from save_imporrt ;/導(dǎo)入導(dǎo)出碼碼表delete from c_savve_impport ;insert into c_savve_impport vvaluess (011,導(dǎo)入入);insert into c_savve_impport vvaluess (022,導(dǎo)出出);delete from c_meaan ;insert into c_meaan vallues (01,固定);insert into c_meaan vallues (02,自由);insert

40、into c_meaan vallues (03,生成);delete from c_fille_typpe ;insert into c_fille_typpe vallues (01,dbf);insert into c_fille_typpe vallues (02,txt);insert into c_fille_typpe vallues (03,exceel);insert into c_fille_typpe vallues (04,sql);delete from c_inttervall ;insert into c_inttervall valuues (00,無);ins

41、ert into c_inttervall valuues (01,每日);insert into c_inttervall valuues (02,每周);insert into c_inttervall valuues (03,每月);insert into c_inttervall valuues (04,每季度);insert into c_inttervall valuues (05,每年);delete from c_flaag_codde ;insert into c_flaag_codde vallues (01,成功);insert into c_flaag_codde va

42、llues (02,失敗);if f_sqql() tthen rreturnnINSERT INTO save_imporrt VALLUES (001,c_opperatoor,ddw_c_ooperattor_grrid,01,02,D:ioodataa,c_opeeratorr,011,人員員信息,00,000,20022-01-001,22002-001-01,01,);INSERT INTO save_imporrt VALLUES (001,c_opperatoor,ddw_c_ooperattor_grrid,02,02,D:ioodataa,c_opeeratorr,011,

43、人員員信息,00,000,20022-01-001,22002-001-01,01,);SetPoinnter(aarrow!) if f_sqql() tthen returnnelse/messsageboox(提示示,導(dǎo)入入導(dǎo)出表初始始成功!)end ifreturn函數(shù)名f_dw_teest_reepeat返回值類型long函數(shù)功能對(duì)數(shù)據(jù)窗口中的的導(dǎo)入數(shù)據(jù)進(jìn)進(jìn)行重復(fù)性測(cè)測(cè)試參數(shù)定義r_type:strinngr_dw: ddatawiindowr_sle: singllelineeedit腳本long r_row,rr_rowccount,r_couunt,r_selecct,r_rr

44、eturnn=0string r_priimaryr_rowcoount=rr_dw.rrowcouunt()r_type=lowerr(r_tyype)CHOOSE CASE r_typpeCASE c_opeeratorrr_couunt=1 /關(guān)鍵鍵字段數(shù)r_priimaryr_couunt=FOR rr_row=1 TO r_rowwcounttr_prrimaryy1=rr_dw.ggetiteemstriing(r_row,oper_code) /取取關(guān)鍵字seleect coount(*) intto :r_selecct froom c_ooperattor whhere cc

45、_operrator.oper_code = :r_primaary1 ;if rr_seleect0 then r_ddw.SellectRoow(r_rrow, TTRUE)r_rreturnn=r_reeturn + 1end ifNEXTCASE EELSEEND CHOOOSEreturn r_retturn函數(shù)名f_dw_teest_reepeat_del返回值類型long函數(shù)功能刪除導(dǎo)入導(dǎo)出中中的重復(fù)數(shù)據(jù)據(jù)參數(shù)定義r_type:strinngr_dw: ddatawiindowr_sle: singllelineeedit腳本long r_row,rr_rowccount,r_c

46、ouunt,r_selecct,r_rreturnn=0string r_priimaryr_type=lowerr(r_tyype)r_rowcoount=rr_dw.rrowcouunt()CHOOSE CASE r_typpeCASE c_opeeratorrr_couunt=1r_priimaryr_couunt=FOR rr_row=1 TO r_rowwcounttr_prrimaryy1=rr_dw.ggetiteemstriing(r_row,oper_code)deleete ffrom cc_operrator wheere c_operaator.ooper_ccode

47、= :r_pprimarry1 ;NEXTCASE c_supppr_couunt=1 /關(guān)鍵鍵字段數(shù)r_priimaryr_couunt=FOR rr_row=1 TO r_rowwcounttr_prrimaryy1=rr_dw.ggetiteemstriing(r_row,supp_code) /取取關(guān)鍵字deleete ffrom cc_suppp whhere cc_suppp.suppp_codee = :rr_primmary11 ;NEXTCASE EELSEEND CHOOOSEf_sql()return r_retturn3、通過分析，設(shè)設(shè)計(jì)存貨子子系統(tǒng)的通通用窗口。窗口名

48、窗口功能w_startt登陸窗口W_set系統(tǒng)設(shè)置窗口W_code碼表輸入、修改改窗口w_sheett_inpuut單表輸入窗口W_selecct綜合查詢窗口w_i_o_iini數(shù)據(jù)導(dǎo)入導(dǎo)出初初始窗口w_i_o數(shù)據(jù)導(dǎo)入導(dǎo)出窗窗口窗口名w_starttMessagee參數(shù)無主要功能登陸窗口實(shí)例變量聲明無窗口函數(shù)無控件事件腳本w_startt:open!/居中Environnment aIntegerr w,hGetEnviironmeent(a)w=PixellsToUnnits(aa.screeenwiddth,xppixelsstouniits!)h=PixellsToUnnits(aa.s

49、creeenheiight,yypixellstounnits!)move(ww - wiidth)/2,(h - heiight)/2)this.tiitle= + gg_sys_name + 系系統(tǒng)登錄確定cb_ok :clickedd!string r_funnc_codde,r_mmenu_nname,rr_datee,r_spp_infoolong r_resulltr_resullt=f_ooper_ccheck(sle_ooper_ccode.ttext,ssle_paass.teext)IF r_reesult0 THHENIf r_rresultt=1 Thhensle_oo

50、per_ccode.TText=sle_ooper_ccode.SSetFoccus()ElseIff r_reesult=2 Theensle_ppass.TText=sle_ppass.SSetFoccus()End IffreturnnEnd Ifg_date=strinng(todday()g_oper_code=sle_ooper_ccode.ttextSELECT oper_name ,funcc_codee ,sheeet_coode,DEEPT_COODE,poostionn_codee INNTO :gg_operr_namee,:r_ffunc_ccode,:g_sheee

51、t_coode,:gg_deptt,:r_ssp_inffo FROMM c_opperatoor WHERRE opeer_codde = :g_opeer_codde ;/操作人員的的打印權(quán)限SELECT printt_yn,mmenu_nname INTOO :g_pprint,:g_meenu_naame FROMM c_fuunc WHERRE funnc_codde = :r_funnc_codde ;close(pparentt)open(w_set)退出cb_canccel:clickedd!close(pparentt)窗口名W_setMessagee參數(shù)無主要功能系統(tǒng)設(shè)置窗

52、口實(shí)例變量聲明無窗口函數(shù)wf_channge_meenu(r_menuu_namee)參數(shù)：striing r_menu_name返回值類型：iintegeerstring ls_meenuselect s_mennu intto :lss_menuu from c_menu wheree menuu_grouup=:r_menu_name;choose case ls_meenucase m_crmmw_gennapp_fframe.ChanggeMenuu(m_crrm)f_sett_purvview(rr_menuu_namee,m_crrm)case eelseReturrn 1end

53、 choooseReturn 0控件事件腳本W(wǎng)_set:Open!dw_deptt.SetTTransOObjectt ( sqqlca )dw_deptt.inseertroww(0)dw_deptt.setiitem(11,1,g_dept)em_datee.textt=striing(tooday()g_date=em_daate.teextEnvironnment aIntegerr w,hGetEnviironmeent(a)w=PixellsToUnnits(aa.screeenwiddth,xppixelsstouniits!)h=PixellsToUnnits(aa.scree

54、enheiight,yypixellstounnits!)move(ww - wiidth)/2,(h - heiight)/2)this.tiitle=gg_sys_name + 設(shè)設(shè)置 確定cb_set:clickedd!string r_deppt_dayy,r_daate1string r_datte,r_ddeptstring r_deppt_monnth_daater_date=em_daate.teextr_dept=dw_deept.geetitemmstrinng(1,11)g_dept=r_depptg_date=r_dattesetpoinnter(hhourgllass

55、!)open(w_genappp_fraame)If wf_cchangee_menuu(g_meenu_naame)0 Theenmessaggebox(g_syss_namee,系統(tǒng)沒沒有給您提供供可用的菜單單!r程序序?qū)⒔K止!)haltElseEnd Ifsetpoinnter(aarrow!)close(pparentt) 退出cb_canccel:clickedd!close(pparentt)窗口名W_codeMessagee參數(shù)Messagee.StriingParrm主要功能碼表管理窗口實(shí)例變量聲明string i_typpe,i_ccodeintegerr i_taab30l

56、ong i_row,ii_colstring i_oriig_sqllstring i_strr_preccolumnn= integerr i_innt_cliicktimme=0string i_tittle /窗口的標(biāo)標(biāo)題變量窗口函數(shù)1f_exit()參數(shù)：無返回值類型：無無INTEGERR NET,RTNdw_tablle.accceptteext()IF dw_ttable.ModiffiedCoount( ) 00 OR ddw_tabble.DeeleteddCountt( ) 0 THEEN Net = MesssageBoox(提示示, 是是否需要保存存所修改的信信息?, E

57、xclaamatioon!, YYESNO!, 1) IF NNet = 1 THEENrtn = dw_tablee.Updaate( ) IF rtn = 1 THHEN CCOMMITT USINNG SQLLCA; ELSSE ROLLBBACK UUSING SQLCAA; ENDD IF ENDD IFEND IF窗口函數(shù)2get_tabb_ordeer()參數(shù)：無返回值類型：無無integerr jFOR j=11 TO ii_coli_tabj=dww_tablle.settTabOrrder(jj, 0)NEXT窗口函數(shù)3set_tabb_0()參數(shù)：無返回值類型：無無int

58、egerr jFOR j=11 TO ii_coldw_tabble.SeetTabOOrder(j, 0)NEXTcb_modii.TEXTT=&X不不修改cb_deleete.ennabledd=falssecb_savee.enabbled=ffalse窗口函數(shù)4set_tabb_old()參數(shù)：無返回值類型：無無integerr jFOR j=11 TO ii_coldw_tabble.SeetTabOOrder(j, i_tabjj)NEXTcb_modii.TEXTT=&X可可修改cb_modii.enabbled=ttruecb_savee.enabbled=ttrue控件事件腳

59、本W(wǎng)_code:Open!/確定數(shù)據(jù)窗窗口dw_ttable的的DATAOOBJECTT/確定窗口的的標(biāo)題/將dw_ttable的的數(shù)據(jù)源Seelect描描述賦予實(shí)例例變量 Sttring i_oriig_sqlli_type=Messaage.SttringPParmCHOOSE CASE i_typpeCASE c_funnc dw_taable.DDATAOBBJECT=dw_cc_funcci_tittle=系系統(tǒng)操作功能能碼表CASE c_posstion dw_taable.DDATAOBBJECT=dw_cc_posttioni_tittle=操操作員職位碼碼表CASE c_ed

60、uu_leveel dw_taable.DDATAOBBJECT=dw_cc_edu_levelli_tittle=學(xué)學(xué)歷碼表 CASEE c_ssupp_aattr dw_taable.DDATAOBBJECT=dw_cc_suppp_attrri_tittle=往往來單位屬性性 CASE ELSE messsagebbox(提提示,無無此參數(shù)+i_typpe)returrnEND CHOOOSEdw_tablle.SettTranssObjecct ( ssqlca )sle_couunt.TEEXT=i_orig_sql=ddw_tabble.Deescribbe(DaataWinndo