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