【正文】 現(xiàn) ERP 之財務(wù)管理系統(tǒng)是一個數(shù)據(jù)庫應(yīng)用系統(tǒng)，所需的所有信息都是保存在數(shù)據(jù)庫中。由于數(shù)據(jù)庫設(shè)計的重要性，人們提出了許多數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的技術(shù)。 通過對財務(wù)管理內(nèi)容和數(shù)據(jù)流程的分析，設(shè)計的主要數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)如下： ? 貨品信息。 ? 收款單信息。 ? 收貨單信息。 ? 應(yīng)付結(jié)帳單信息。包括的數(shù)據(jù)項有日期、會計員、幣種、摘要、金庫代碼、借方、貨方、備注等。包括的數(shù)據(jù)項有大類（大類號、描述）、中類（中類、描述）、小類（小類、描述）、科目代號、科目名稱、借貸率、報表比率等。包括的數(shù)據(jù)項有幣種、幣種描述、本幣、本幣描述、兌換率等。 下面為本系統(tǒng)實體之間關(guān)系的 ER 圖：如圖 所示。 ? 建檔 、修改、查詢、統(tǒng)計快而準(zhǔn)確。 ? 收款單信息表 (receipt)：收款單號碼 (reo)、收款描述 (description)、應(yīng)收結(jié)帳單號碼 (invno)、收款金額 (money)、幣種 (currency)、是否扣結(jié)帳(cinv)、備注 (remaeks)等。 ? 應(yīng)付結(jié)帳單信息表 (pinvoice)：應(yīng)付結(jié)帳單號碼 (pinvno)、應(yīng)付結(jié)帳單日期 (date)、付款條 件 (payment)、其它 (other)、收貨單號碼 (porvno)、幣種(currency)、是否完成 (finish)、備注 (remaeks)等 ? 銀行存款出納簿信息表 (bankkeeping)：日期 (date)、帳戶 (userid)、會計員(accountant)、幣種 (currency)、摘要 (description)、銀行代碼 (bankid)、借方 (dr)、貨方 (cr)、備注 (remaeks)等。 ? 會計期間信息表 (nianfen)：年份 (year)、會計期間 (period)、開始時間(frdate)、結(jié)束時間 (todate)等。 表 貨品信息表 表 送 貨單信息表 基于 Delphi 的財務(wù)管理系統(tǒng)的設(shè)計與開發(fā) 20 表 收款單信息表 表 應(yīng)收結(jié)帳單信息表 表 收貨單信息 表 付款單信息表 表 應(yīng)付結(jié)帳單信息表 表 銀行存款出納簿信息表 表 現(xiàn)金出納簿信息表 表 會計憑證信息表 表 會計科目信息表 表 會計期間信息表 表 貨幣兌換率信息表 表 用戶信息表 數(shù)據(jù)庫的連接 1 數(shù)據(jù)庫建立 在 PowerBuilder 開發(fā)環(huán)境和應(yīng)用程序能夠操作數(shù)據(jù)庫中的數(shù)據(jù)之前，必須首先與數(shù)據(jù)庫建立聯(lián)系，也就是連接到數(shù)據(jù)庫上 。對于每一個可能要用到的數(shù)據(jù)庫，均可以建立一個 Database Profile。在應(yīng)用程序中則一般是在應(yīng)用程序?qū)ο笾袑戇B接數(shù)據(jù)庫的程序代碼，使得應(yīng)用程序開始運(yùn)行并實現(xiàn)與數(shù)據(jù)庫的連接。 首先 選擇 Tool 菜單中的 Database Profile 子菜單，或者單擊 圖標(biāo)，出現(xiàn)“ Database Profile”對話框。單擊“ OK”按鈕 ，返回到“ Database Profile”對話框。 3 程序運(yùn)行時與數(shù)據(jù)庫連接 在程序設(shè)計是和數(shù)據(jù)庫的連接 Database Profile 對話框來實現(xiàn)的，在程序運(yùn)行時，則需要通過應(yīng)用程序?qū)ο髞韺崿F(xiàn)和數(shù)據(jù)庫的連接。每個 PowerBuilder應(yīng)用程序都必須有一個、而且只能有一個應(yīng)用程序?qū)ο?，在該?yīng)用程序?qū)ο笾袑懭肱c數(shù)據(jù)庫連接的程序代碼，從而使得應(yīng) 用程序一開始變實現(xiàn)與數(shù)據(jù)庫的連接。 應(yīng)用程序?qū)ο蟮氖录还灿?6 個，分別是 Open、 Close、 Idle、 SystemError、ConnectionBegin、 ConnectionEnd 事件。 //打開用戶登陸窗口 open(w_denglu) 在應(yīng)用程序?qū)ο蟮淖兞慷x窗口中定義個全局變量， 登陸界面設(shè)計 應(yīng)用程序運(yùn)行后第一個出現(xiàn)的窗口 就是 w_login 登陸窗口，界面如圖 所示，代碼見附錄程序 1。如圖 所示。 參數(shù)設(shè)置界面設(shè)計 參數(shù)界面設(shè)計，主要包括了科目設(shè)置、會計期間設(shè)置和貨幣兌換率設(shè)置。在此系統(tǒng)中均采用數(shù)據(jù)窗口來進(jìn)行對數(shù)據(jù)的處理方法。科目設(shè)置圖如 圖所示。程序代碼如下： int t t=() if t=1 then mit using sqlca。這里就不再作詳細(xì)的解釋了。 兌換率設(shè)置界面設(shè)置 該窗口，主要功能對貨幣兌換率信息進(jìn)行錄入、維護(hù)。 應(yīng)收結(jié)帳單管理界面設(shè)置 該窗口主要功能是進(jìn)行應(yīng)收結(jié)帳單的錄入 本界面按鈕的代碼都同科目界面，詳細(xì)代碼見附錄。應(yīng)收結(jié)帳單查詢界面設(shè)計如圖 所示。+nr+39。+nr+39。%+nr+%39。%+nr+%39。%+nr+%39。這里就不再作詳細(xì)的解釋。 收款單查找界面設(shè)置 該窗口主要功能是對收款單從兩個人口進(jìn)行查找。 收款單報表界面設(shè)置 該窗口主要是根據(jù)財務(wù)管理人員的需要，生成收款單報表，從而清晰的看見貨品的收款情況。同時還設(shè)計了報表窗口。 幫助界面設(shè)置 在幫助模塊中，通過關(guān)于界面的顯示了解到本系統(tǒng)的基本信息 。同時對Delphi數(shù)據(jù)庫開發(fā)系統(tǒng)也有了深入了解。 基于 Delphi 的財務(wù)管理系統(tǒng)的設(shè)計與開發(fā) 33 致 謝 大學(xué)即將結(jié)束，在此，我要感謝所有曾經(jīng)在學(xué)習(xí)上和生活中給予過我?guī)?。其功能基本符合企業(yè)財務(wù)管理的日常業(yè)務(wù)，包括應(yīng)收帳、應(yīng)付帳、資金管理、總帳管理等 。企業(yè)的所有資源簡要地說包括三大流：物流、資金流、信息流， ERP 也就是對這三種資源進(jìn)行全面集成管理的管理信息系統(tǒng)。 總帳管理子系統(tǒng)界面設(shè)置 總帳管理子系統(tǒng)界面設(shè)計，主要包括了憑證輸入界面、日記帳界面、明細(xì)帳界面和總帳界面。應(yīng)付管理子系統(tǒng)共設(shè)計了應(yīng)付結(jié)帳單管理、應(yīng)付結(jié)帳單查詢、應(yīng)付結(jié)帳單報表、付款單、付款單查詢和付款單報表六各界面，其界面設(shè)計和代碼設(shè)計同上述應(yīng)收管理子系統(tǒng)，在此不作詳細(xì)講述，詳細(xì)代碼見附錄。界面在查找的符號上同樣設(shè)計了“ ”、“ ”、“ =”、和“ like”，更方便用戶。收款單是客戶付款的根據(jù) 。這里就不再作 詳細(xì)的解釋。%+nr+%39。%+nr+%39。+nr+39。+nr+39。+nr+39。人口分別有“結(jié)帳單號碼”、“送貨單號碼”、“客戶代號”、“貨號”和“送貨地代號”，多人口設(shè)計方便財務(wù)人員，在需要時能快速，準(zhǔn)確的查找出所需信息。兌換率設(shè)置界面如圖 所示。以方便在憑證錄入時的操作。 end if 4． “退出”按鈕用于關(guān)閉該輸入窗口，其程序代碼如下： close(w_account) 5．當(dāng)信息管理者需要瀏覽科目的基本資料時，可以通過“第一頁”“上一頁”“下一頁”“最后一頁”按鈕來實現(xiàn)這樣的功能。 messagebox(恭喜 :),您已刪除成功！ ) =string(integer()1) else rollback using sqlca。圖 該 數(shù)據(jù)窗口屬于為 Freedom 風(fēng)格。 科目設(shè)置界面設(shè)置 該窗口，主要功能對會計科目信 息進(jìn)行錄入、維護(hù)。 圖 主界面圖 主界面設(shè) 計中主要是菜單 m_main 的設(shè)計，該菜單結(jié)構(gòu)及代碼如下： 1） 系統(tǒng)管理： ? 重新登陸 Clicked 事件程序代碼： opensheet(w_denglu_chongxing,w_main,7,original!) ? 用戶管理 Clicked 事件程序代碼： opensheet(w_yonghu,w_main,7,original!) ? 退出 Clicked 事件程序代碼： close(w_main) 2） 參數(shù)設(shè)置： ? 科目設(shè)置 Clicked 事件程序代碼： opensheet(w_account,w_main,7,original!) ? 會計期間定義 基于 Delphi 的 財務(wù)管理系統(tǒng)的設(shè)計與開發(fā) 24 Clicked 事件程序代碼： opensheet(w_nianfen,w_main,7,original!) ? 兌換率設(shè)置 Clicked 事件程序代碼： opensheet(w_huobi,w_main,7,original!) 3） 應(yīng)收管理子系統(tǒng)： ? 應(yīng)收結(jié)帳單管理 Clicked 事件程序代碼： opensheet(w_rinvoice,w_main,7,original!) ? 應(yīng)收結(jié)帳單查找 Clicked 事件程序代碼： opensheet(w_rinvoice_chaxun,w_main,7,original!) ? 應(yīng)收結(jié)帳單報表 Clicked 事件程序代碼： opensheet(w_rinvoice_biao,w_main,7,original!) ? 收款單管理 Clicked 事件程序代碼： opensheet(w_shoukuandan_guanli,w_main,7,original!) ? 收款單查找 Clicked 事件程序代碼： opensheet(w_shoukuandan_chaxun,w_main,7,original!) ? 收款單報表 Clicked 事件程序代碼： opensheet(w_shoukuandan_biao,w_main,7,original!) 4） 應(yīng)付管理子系統(tǒng)： ? 應(yīng)付結(jié)帳單管理 Clicked 事件程序代碼： opensheet(w_pinvoice,w_main,7,original!) ? 應(yīng)付結(jié)帳單查找 Clicked 事件程序代碼： opensheet(w_pinvoice_chaxun,w_main,7,original!) ? 應(yīng)付結(jié)帳單報表 Clicked 事件程序代碼： opensheet(w_pinvoice_biao,w_main,7,original!) ? 付款單管理 Clicked 事件程序代碼： opensheet(w_fukuandan,w_main,7,original!) ? 付款單查找 Clicked 事件程序代碼： opensheet(w_fukuandan_chaxun,w_main,7,original!) ? 付款單報表 Clicked 事件程序代碼： opensheet(w_fukuandan_biao,w_main,7,original!) 5） 資金管理子系統(tǒng)： ? 現(xiàn)金出納簿管理 Clicked 事件程序代碼： opensheet(w_localkeeping,w_main,7,original!) ? 現(xiàn)金出納簿查找 Clicked 事件程序代碼： opensheet(w_localkeeping_chaxun,w_main,7,original!) 基于 Delphi 的 財務(wù)管理系統(tǒng)的設(shè)計與開發(fā) 25 ? 現(xiàn)金出納簿報表 Clicked 事件程序代碼： opensheet(w_localkeeping_biao,w_main,7,original!) ? 銀行出納簿管理 Clicked 事件程序代碼： opensheet(w_bankkeeping,w_main,7,original!) ? 銀行出納簿查找 Clicked 事件程序代碼： opensheet(w_bankkeeping_chaxun,w_main,7,original!) ? 銀行出納簿報表 Clicked 事件程序代碼： opensheet(w_bankkeeping_biao,w_main,7,original!) 6） 總帳管理子系統(tǒng)： ? 憑證輸入 Clicked 事件程序代碼： opensheet(w_voucher,w_main,7,original!) ? 日記帳 Clicked 事件程序代碼： opensheet(w_glvoucherbyday,w_main,7,original!) ? 明細(xì)帳 Clicked 事件程序代碼： opensheet(w_glvoucherbysub,w_main,7,original!) ? 總帳 Clicked 事件程序代碼： opensheet(w_glvoucherbygl,w_main,7,original!) 7） 幫助： ? 關(guān)于幫助 Clicked 事件程序代碼： opensheet(w_bout,w_main,7,original!) 系統(tǒng)管理界面設(shè)計 系統(tǒng)模塊中主要包括用戶的“重新登錄”、“修改密碼”、“用戶管理”和“退出”。系統(tǒng)登錄窗口主要實現(xiàn)功能是確認(rèn)用戶姓名、編碼及密碼，并根據(jù)用戶級別主界面菜單中該用戶可以進(jìn)行的操作。DSN=caiwu39。將連接數(shù)據(jù)庫的代碼復(fù)制到應(yīng)用程序?qū)ο笾?，即可完成代碼的編寫。 一般數(shù)據(jù)庫的連接是在應(yīng)用程序開始運(yùn)行是建立起來的。選中該配置，單擊該對話框中的“ Connect”按鈕，系統(tǒng)即通過專用接口連接到數(shù)據(jù)庫上。然后，單擊“ New”按鈕，打開“ Database Profile Setup