本系統(tǒng)不僅能提供以項目方式核算的財務(wù)查詢,而且也能提供以科目余額為分析對象的業(yè)務(wù)查詢。1.數(shù)據(jù)結(jié)構(gòu)在財務(wù)系統(tǒng)中,項目代碼和科目代碼都是唯一的,因此,在用戶信息表中,項目代碼和科目代碼可設(shè)置為查詢的關(guān)鍵字段。在此系統(tǒng)中,每個用戶至多可查詢7個項目和兩個科目,它們的順序?qū)?yīng)著用戶登錄時的下拉列表項(在本表中事先設(shè)置ID=1的記錄為各項目和科目代碼對應(yīng)的類屬名稱),這類用戶在權(quán)限設(shè)置上稱為一般用戶,其登錄時只能按列表項選擇要查詢的項目或科目;用戶名要求為經(jīng)費項目負(fù)責(zé)人的真實姓名,這樣可以用戶名作為關(guān)鍵字段來查詢該項目負(fù)責(zé)人的所有經(jīng)費項目,這類用戶在權(quán)限設(shè)置上稱為主管級用戶,其登錄時不需選擇項目,登錄后直接顯示該用戶負(fù)責(zé)的所有項目;特殊級用戶則顯示所有用戶信息表中已注冊用戶,各非空項目代碼和科目代碼設(shè)為超鏈接,直接點擊查詢。在實際應(yīng)用中通過權(quán)限識別還加入了科研和教務(wù)板塊。(2)項目信息表xmzw(見表2)一般信息管理系統(tǒng)中都要考慮到表結(jié)構(gòu)設(shè)計中的數(shù)據(jù)冗余性,因而以上項目表數(shù)據(jù)是不能直接從財務(wù)系統(tǒng)中取得的,可按照以下公式計算而得:期末項目余額=年初余額+本年項目收入-上年和本年項目往來借方余額之和-項目支出對于預(yù)算事業(yè)類項目,本年項目收入就是當(dāng)年預(yù)算數(shù),其他非預(yù)算類項目則為當(dāng)年取得的收入。因此表2是通過C/S端應(yīng)用程序加工而成的?？紤]到本系統(tǒng)是準(zhǔn)實時的,所以加入項目余額截止時間點字段,以供查詢者參考。(3)科目余額信息表kmzw(見表3)從設(shè)計者角度來說,只要是財務(wù)系統(tǒng)中的會計科目,都能夠進行查詢。就高校具體情況而言,查詢一般的事業(yè)支出科目或資產(chǎn)類科目是沒有意義的,絕大部分信息使用者關(guān)心的還是一些代管類、暫存類和專用基金類科目?？颇啃畔⒈硪才c項目信息表一樣,數(shù)據(jù)是不能直接獲得的,需要加工提煉后才能得到該科目本年度收支余完整的信息。其計算公式按一般的復(fù)式記賬平衡公式計算即可。表3科目余額信息表(4)憑證明細(xì)表pzdmxz記賬憑證明細(xì)表是賬務(wù)系統(tǒng)中記錄最完整、信息最全的一張數(shù)據(jù)表,它是產(chǎn)生其他財務(wù)信息的基礎(chǔ),因此,本表圖2用戶信息表、項目信息表、科目余額信息表、憑證明細(xì)表之間的關(guān)系(E—R實體關(guān)系圖)財務(wù)管理信息化可原封不動獲取過來被ASP應(yīng)用程序調(diào)用,以顯示某項目或某個科目相對應(yīng)的明細(xì)賬信息。(5)表際關(guān)系可以通過E—R實體關(guān)系圖來表示以上幾張表的內(nèi)在邏輯關(guān)系:2.主要代碼(1)C/S端設(shè)計C/S端實際上是一個賬務(wù)數(shù)據(jù)的獲取和再加工程序。財務(wù)系統(tǒng)中的數(shù)據(jù)只能為專業(yè)人員所用,因而財務(wù)數(shù)據(jù)只有提煉成信息,加工成知識才能為更廣泛的使用者充分利用。這一過程可具體分兩個步驟來實現(xiàn),首先是利用VFP(Visual FoxPro)開發(fā)平臺中內(nèi)嵌的SPT技術(shù)實現(xiàn)遠程連接,將遠程財務(wù)數(shù)據(jù)獲取至Web服務(wù)器;其次是利用VFP語言來開發(fā)一個數(shù)據(jù)處理的應(yīng)用程序,加工成客戶端需求的信息。①SPT遠程連接目前主流財務(wù)核算軟件的后臺數(shù)據(jù)庫基本是SQLServer和Oracle(理論上只要提供ODBC接口都可以),其在VFP中通過SPT技術(shù)連接的程序源代碼是:Con_sql=SQLSTRINGCONNECT(DRIVER=SQLSERVER};SERVER=CWC;UID=SA;PWD=JPYE;APP=MI-CROSOFT?VISUAL FOXPRO?;DATABASE=ZW)&&定義連接SQLServer句柄其中:cwc為賬務(wù)服務(wù)器名;SA為SQLServer的用戶名,其口令為JPYE;數(shù)據(jù)庫名為ZW。sqlsetprop(0,displogin,3)con_oracle=sqlstringconnect(DRIVER={MicrosoftODBC for Oracle};UID=CW;PWD=JPYE;SERVER=O-RA_SERVER;)&&定義連接Oracle句柄其中:CW為數(shù)據(jù)庫用戶名;JPYE為數(shù)據(jù)庫口令;O-RA_SERVER為賬務(wù)服務(wù)器名。ifcon_oracle<=0messagebox(連接賬務(wù)服務(wù)器失敗!,48,錯誤信息)returnelsemessagebox(連接賬務(wù)服務(wù)器成功!,64,成功信息)endifcon_exe=SQLEXEC(CON_ORACLE,SELECT*FROM科目余額表,TEMP1)&&取所有月份的科目余額數(shù)據(jù)同理,可以獲取所有需要再加工的各種賬表,如記賬憑證表、項目信息表、項目余額表及科目項目余額表等。②VFP數(shù)據(jù)處理代碼首先是對項目的處理,處理后的信息應(yīng)包括項目的收支余和項目明細(xì)賬,在項目明細(xì)賬中過濾掉已沖銷的往來賬,并把借貸術(shù)語改為支出和收入,這樣即使非專業(yè)人員也能一目了然,財務(wù)信息就變得清晰易懂了;其次是對科目的處理,處理后的信息應(yīng)包含科目的收支余和科目明細(xì)賬,由于科目查詢主要是代管類、暫存類和專用基金類科目,其明細(xì)賬的借貸方也可改為支出和收入方。同理也可以做更復(fù)雜的處理,如某項目用于本科教學(xué)水平評估的4項教學(xué)經(jīng)費數(shù)、若干會計期間的比較等。本文應(yīng)用的是復(fù)旦天翼財務(wù)系統(tǒng),這里的代碼可根據(jù)不同單位的實際情況和需要提供的財務(wù)信息而定,在此僅舉科目余額信息表處理過程以作參考。AMT=AMT+Alltrim(Str(Year(Date())))con_exe=SQLEXEC(CON_ORACLE,SELECT*FROM&AMT,TEMP1)Select*Fromtemp1 IntoDbf&AMT&&將遠程獲取的臨時表保存到本地Use&AMTExclusiveAlter Table&AMTAdd Column AMT00 N(16,2)Replace All AMT00 With(D_AMOUNT)ForSMONTH=0&&計算余額在貸方的期初數(shù)Replace All AMT00 With(J_AMOUNT)ForSMONTH=0 And AMT00=0&&計算余額在借方的期初數(shù)IndexOn Alltrim(Code)Toamtind&&code為科目代碼Total On Alltrim(Code)To kk Fields J_AMOUNT,D_AMOUNTAlter Table kk Add Column rq DatetimeAlter Table kk Add Column d_yek N(16,2)Alter Table kk Add Column j_yek N(16,2)Alter Table kk Add Column amttotal N(16,2)Select kkReplace All amttotal With(D_AMOUNT-J_AMOUNT)For Substr(Code,1,1)=2.Or.;SUBSTR(Code,1,1)=3.Or.Substr(Code,1,1)=4&&計算貸方期末數(shù)Replace All d_yek With(D_AMOUNT-AMT00)ForSubstr(Code,1,1)=2.Or.;SUBSTR(Code,1,1)=3.Or.Substr(Code,1,1)=4&&計算本年收入Replace amttotal With(J_AMOUNT-D_AMOUNT)For SUBSTR(Code,1,1)=1Or Substr(Code,1,1)=5Replace All j_yek With(J_AMOUNT-AMT00)ForSUBSTR(Code,1,1)=1Or Substr(Code,1,1)=5Replace All rq With Datetime()CopyTokmzwType Fox2(2)B/S端設(shè)計B/S端是將信息顯示給最終使用者,由于ASP代碼本身對數(shù)據(jù)處理能力有限,所以其主要作用就是提取C/S端已加工完成的財務(wù)信息進行網(wǎng)絡(luò)發(fā)布。①登錄時部分代碼當(dāng)前年度上一年度‘登錄時選擇項
二、系統(tǒng)模型