會計信息系統(tǒng)報告

1、會計信息系統(tǒng)設(shè)計報告 會計信息系統(tǒng) 目 錄會計信息系統(tǒng)課課程設(shè)計概述述1.1基本概述述1.2系統(tǒng)模塊塊劃分1.3數(shù)據(jù)流圖圖1.4系統(tǒng)分析析、設(shè)計任務(wù)務(wù)的要求二、登錄界面及及主菜單設(shè)計計 2.1.登陸陸界面設(shè)計 2.2登錄程程序2.3主菜單的的程序設(shè)計2.4.退出系系統(tǒng)程序設(shè)計計三、系統(tǒng)基本設(shè)設(shè)置 3.1數(shù)數(shù)據(jù)庫和數(shù)據(jù)據(jù)表3.2科目代碼碼庫設(shè)計3.3摘要庫設(shè)設(shè)計四、憑證處理 4.1.憑證格式設(shè)設(shè)計 4.2科科目代碼查詢詢 4.3憑憑證錄入設(shè)計計 4.4憑憑證查詢設(shè)計計 4.5 憑證修改設(shè)設(shè)計五、各類匯總表表及賬簿設(shè)計計 4.1科科目匯總表設(shè)設(shè)計 4.2總分類賬賬設(shè)計 4.3現(xiàn)現(xiàn)金日記賬輸輸出設(shè)計

2、 4.4銀銀行日記賬輸輸出設(shè)計六、報表輸出設(shè)設(shè)計 6.1利利潤表輸出設(shè)設(shè)計6.2資產(chǎn)負債債表輸出設(shè)計計一、會計信息系系統(tǒng)課程設(shè)計計概述1.1基本概述述根據(jù)會計信息息系統(tǒng)大綱綱及課程開設(shè)設(shè)的要求，我我于20155年6月22日至6月26日參加了學學院為期一周周的會計信息息系統(tǒng)課程設(shè)設(shè)計實習。在在實習過程中中，我根據(jù)系系統(tǒng)生命周期期法，課程設(shè)設(shè)計分為計劃劃、開發(fā)、運運行及維護四四個階段，我我相繼完成了了系統(tǒng)分析任任務(wù)、系統(tǒng)設(shè)設(shè)計任務(wù)，從從最初的系統(tǒng)統(tǒng)設(shè)置，憑證證格式設(shè)計、錄錄入、處理到到各類匯總表表、賬簿的輸輸出。會計課課程設(shè)計讓我學到了很很多東西，由由此編制了此此次會計信息息系統(tǒng)課程設(shè)設(shè)計報告。1

3、.2系統(tǒng)模塊塊劃分賬務(wù)處理系統(tǒng)包包含六大模塊塊：1）系統(tǒng)初始設(shè)設(shè)置模塊：包包含數(shù)據(jù)庫和和數(shù)據(jù)表的建建立、科目代代碼庫的建立立與摘要庫的的建立及各賬賬簿初始余額額的輸入。2）登錄設(shè)計模模塊：包含登登陸界面的設(shè)設(shè)計、相關(guān)代代碼設(shè)計及主主菜單程序設(shè)設(shè)計等。3）憑證處理模模塊：包含憑憑證格式設(shè)計計、科目代碼碼查詢、憑證證錄入、憑證證修改、憑證證查詢等程序序設(shè)計及輸出出。4）匯總表及賬賬簿模塊：包包含科目匯總總表設(shè)計、總總分類賬、現(xiàn)現(xiàn)金日記賬、總總分類賬程序序設(shè)計及輸出出。5）報表輸出模模塊：包含資資產(chǎn)負債表、利利潤表的程序序設(shè)計及輸出出。6）系統(tǒng)規(guī)律模模塊：各種系系統(tǒng)的基本操操作，如剪切切、復(fù)制、窗窗

4、口間切換等等。1.3數(shù)據(jù)流圖圖：記賬憑證憑憑證輸入憑證審核日常處理記賬結(jié)賬輸出賬簿及及報表1.4系統(tǒng)分析析、設(shè)計任務(wù)務(wù)的要求1.4.1系統(tǒng)統(tǒng)分析任務(wù)1.系統(tǒng)分析的的基本任務(wù)是是得到一個會會計信息系統(tǒng)統(tǒng)的邏輯模型型。系統(tǒng)分析析是整個系統(tǒng)統(tǒng)建設(shè)的關(guān)鍵鍵階段，它闡闡明了各功能能單位之間的的相互聯(lián)系，保保證新系統(tǒng)有有整體性和優(yōu)優(yōu)良的結(jié)構(gòu)，是是系統(tǒng)設(shè)計的的基礎(chǔ)，且系系統(tǒng)分析工作作難度較大，它它要求主持該該項工作的人人員具有熟悉悉計算機技術(shù)術(shù)、熟悉財會會業(yè)務(wù)和協(xié)調(diào)調(diào)的能力。2.采用結(jié)構(gòu)化化系統(tǒng)分析方方法，采用“自頂向下，逐逐層分解，化化大為小，分分而治之”的思想將系統(tǒng)統(tǒng)功能由粗到到細，逐步分分解。3.模塊

5、劃分的的原則：（1）模塊涉及及操作相對集集中，即一個個模塊只模仿仿某一方面的的功能，以提提高系統(tǒng)的可可用性；（2）各模塊相相對獨立，降降低模塊間的的耦合程度，因因為耦合程度度越低，模塊塊間的相互影影響就越小，說說明系統(tǒng)分解解得越好；1.4.2系統(tǒng)統(tǒng)設(shè)計的要求求1.系統(tǒng)設(shè)計應(yīng)應(yīng)遵循系統(tǒng)的的可靠性，系系統(tǒng)的實用性性，系統(tǒng)的運運行效率，系系統(tǒng)的適用性性和系統(tǒng)的經(jīng)經(jīng)濟效益的原原則；2.在系統(tǒng)處理理方式上選擇擇批處理方式式，共享程度度高，一致性性好；3.代碼設(shè)計遵遵循惟一性，標標準化，通用用性，穩(wěn)定性性，可擴充性性和簡單性等等。二.登錄界面及及主菜單設(shè)計計 2.1.登陸界界面設(shè)計 （11）在項目中中打開

6、登陸界界面示意圖： (2）登登陸界面設(shè)計計示意圖： 2.2登錄錄程序2.2.1表單單中登錄按鈕鈕commaand1的程程序設(shè)計（1）程序：n=0a=thisfform.ttext1.valueeb=thisfform.ttext2.valueeif a=22012499208011 andd b=77899900thisforrm.labbel13.captiion=歡歡迎使用本系系統(tǒng)！do c:會會計信息系統(tǒng)統(tǒng)-鄭靜金主主菜單設(shè)計.prgelsen=n+1thisforrm.labbel13.captiion=學學號錯誤，請請重新輸入！thisforrm.texxt1.vaalue=this

7、forrm.texxt2.vaalue=thisforrm.texxt1.seetfocuusif n=3thisforrm.labbel13.captiion=對對不起，您無無權(quán)使用本系系統(tǒng)！thisforrm.texxt1.ennabledd=.f.thisforrm.texxt2.ennabledd=.mmand11.enabbled=.f.endifendif （2）運運行的效果示示意圖：2.2.2退出出按鈕commmand22的程序設(shè)計計（1）程序：thisforrm.rellease（2）運行效果果示意圖（退退回到原來界界面）2.3主菜單的的程序設(shè)計2.3.1程序序：set tal

8、lk offfclearset syssmenu todefine pad _pad1 of _mmsysmeenu prrompt 憑證處理理 collor sccheme 3define pad _pad2 of _mmsysmeenu prrompt 賬簿管理理 collor sccheme 3define pad _pad3 of _mmsysmeenu prrompt 會計報表表 collor sccheme 3define pad _pad4 of _mmsysmeenu prrompt 退出系統(tǒng)統(tǒng) collor sccheme 3on pad _pad11 of _msysmme

9、nu aactivaate poopup 憑憑證處理on pad _pad22 of _msysmmenu aactivaate poopup 賬賬簿管理on pad _pad33 of _msysmmenu aactivaate poopup 會會計報表on pad _pad44 of _msysmmenu aactivaate poopup 退退出系統(tǒng)define popupp 憑證處理理 marggin reelativve shaadow ccolor schemme 4define bar 11 of 憑憑證處理 ppromptt 科目代代碼查詢define bar 22 of 憑憑

10、證處理 ppromptt 憑證錄錄入define bar 33 of 憑憑證處理 ppromptt 憑證修修改define bar 44 of 憑憑證處理 ppromptt 憑證查查詢on seleectionn bar 1 of 憑證處理 do c:會計信信息系統(tǒng)-鄭鄭靜金科目目代碼查詢.prgon seleectionn bar 2 of 憑證處理 do c:會計信信息系統(tǒng)-鄭鄭靜金憑證證錄入.prrgon seleectionn bar 3 of 憑證處理 do c:會計信信息系統(tǒng)-鄭鄭靜金憑證證修改.prrgon seleectionn bar 4 of 憑證處理 do c:會計信信息

11、系統(tǒng)-鄭鄭靜金憑證證查詢.prrgdefine popupp 賬簿管理理 marggin reelativve shaadow ccolor schemme 4define bar 11 of 賬賬簿管理 ppromptt 科目匯匯總表define bar 22 of 賬賬簿管理 ppromptt 現(xiàn)金日日記賬define bar 33 of 賬賬簿管理 ppromptt 銀行日日記賬define bar 44 of 賬賬簿管理 ppromptt 總分類類賬on seleectionn bar 1 of 賬簿管理 do c:會計信信息系統(tǒng)-鄭鄭靜金科目目匯總表輸出出.prgon seleect

12、ionn bar 2 of 賬簿管理 do c:會計信信息系統(tǒng)-鄭鄭靜金現(xiàn)金金日記賬輸出出.prgon seleectionn bar 3 of 賬簿管理 do c:會計信信息系統(tǒng)-鄭鄭靜金銀行行日記賬輸出出.prgon seleectionn bar 4 of 賬簿管理 do c:會計信信息系統(tǒng)-鄭鄭靜金總分分類賬輸出.prgdefine popupp 會計報表表 marggin reelativve shaadow ccolor schemme 4define bar 11 of 會會計報表 ppromptt 資產(chǎn)負負債表define bar 22 of 會會計報表 ppromptt 利潤

13、表表on seleectionn bar 1 of 會計報表 do c:會計信信息系統(tǒng)-鄭鄭靜金資產(chǎn)產(chǎn)負債表輸出出.prgon seleectionn bar 2 of 會計報表 do c:會計信信息系統(tǒng)-鄭鄭靜金利潤潤表輸出.pprgdefine popupp 退出系統(tǒng)統(tǒng) marggin reelativve shaadow ccolor schemme 4define bar 11 of 退退出系統(tǒng) ppromptt 退出on seleectionn bar 1 of 退出系統(tǒng) do c:會計信信息系統(tǒng)-鄭鄭靜金退出出系統(tǒng)設(shè)計.prg 2.3.2程序序運行效果示示意圖：2.4.退出系系統(tǒng)程

14、序設(shè)計計2.4.1程序序： set taalk offfclearset syssmenu to deefaulttset tallk onreturn 2.4.2運行程序序的效果示意意圖（退出程程序）三系統(tǒng)基本設(shè)設(shè)置3.1數(shù)據(jù)庫和和數(shù)據(jù)表（完完成效果圖如如下） 3.2.科目目代碼庫（完完成效果圖如如下：）3.3摘要庫（完完成效果圖如如下：）四憑證處理 4.1憑證證格式設(shè)計4.1.1程序序：set tallk offfclearn=13a1= _a2=| | | | |a3=|_|_|_|_|a4=|_|_|_|_|12,10 say aa1do whille n=26n,10 ssay a2

15、2n+1,100 say a3n=n+2enddo27,10 say aa228,10 say aa47,41 ssay 記記賬憑證 font 宋體,2011,12 say 憑證類別： 11,39 say 日期：11,58 say 憑證號：11,82 say 附件張數(shù)：13,25 say 摘要13,48 say 會計科目13,68 say 借方金額13,86 say 貸方金額27,25 say 合計29,10 say 記賬：+spacee(16)+審核：+spacce(14)+出納：+spaace(144)+制單單：4.1.2程序序運行效果示示意圖：4.2.科目代代碼查詢設(shè)計計4.2.1程序序

16、：set tallk offfa=6clea use c:會計信息系系統(tǒng)-鄭靜金金科目代碼碼庫.dbffdo whille a=66cleakmdm1=sspace(6)9,20 ssay 請請輸入科目代代碼：geet kmddm1readlocate for kkmdm=kkmdm1if !fouund()messageebox (代碼不正正確,請重新新輸入)else 10,37 say kkmmcendi a=messaageboxx(是否繼繼續(xù)查詢下一一個?,44)enddouseset tallk on return4.2.2程序序運行效果示示意圖：4.3.憑證錄錄入設(shè)計功能說明：1）

17、具具有可輸入多多借多貸分錄錄的功能，并并可繼續(xù)輸入入下一張憑證證。2）含多種邏輯輯糾錯功能，可可限制憑證類類型，保證輸輸入的摘要、科科目代碼和金金額的有效性性，可檢查借借貸方金額是是否平衡并可可做相應(yīng)的修修改。 4.3.1程程序：set tallk offfclose aallcleardo whille .t.do c:會會計信息系統(tǒng)統(tǒng)-鄭靜金憑證證格式.prrgpzlx1=sspace(2)fjzs1= pzh1=sppace(33)store 00 to jje1,jee2,jfjje1,dffje1rq1=spaace(100)zy1=spaace(3)zy2=spaace(200)k

18、mdm1=sspace(6)kmdm2=sspace(6)kmmc1=sspace(20)kmmc2=sspace(20)11,22 get ppzlx1readdo whille pzllx1收.annd.pzllx1付.annd.pzllx1轉(zhuǎn)messageebox(憑證類型錯錯誤,請重新新輸入!)11,22 get ppzlx1readenddo11,44 get rrq111,65 get ppzh111,92 get ffjzs1readm=6a=15do whille m=66use c:會計信息系系統(tǒng)-鄭靜金金摘要庫.dbfa,12 gget zyy1readlocate for

19、 zzydm=zzy1do whille zyddmzyy1messageebox(找不到符合合條件的摘要要，請重新輸輸入)a,12 gget zyy1readlocate for zzydm=zzy1enddzy2=zynnra,12 ssay zyy2useuse c:會計信息系系統(tǒng)-鄭靜金金科目代碼碼庫.dbffa,48 gget kmmdm1readlocate for kkmdm=kkmdm1do whille kmddmkmmdm1messageebox(輸入的科目目代碼有誤，請請重新輸入)a,48 gget kmmdm1readlocate for kkmdm=kkmdm1end

20、dkmmc1=kkmmca,48 ssay kmmmc1a,68 gget jee1a,86 gget jee2readdo whille je11=0.annd.je22=0messageebox(金額不能為為零)a,68 gget jee1a,86 gget jee2readendduse c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfappend blankkrepl pzzrq wiith rqq1,pzhh withh pzh11,pzlxx withh pzlxx1,zy with zy2,kkmdm wwith kkmdm1,kmmc with kmmc11,jfjee withh

21、je1,dfje with je2usem=messaageboxx(是否輸輸入下一行分分錄,4)a=a+2enddouse c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfsum jfjje to jfje11 for pzh=ppzh1sum dfjje to dfje11 for pzh=ppzh127,68 say jjfje127,86 say ddfje1do whille jfjje1ddfje1messageebox(借貸不平衡衡，輸入金額額有誤)do c:會會計信息系統(tǒng)統(tǒng)-鄭靜金憑證證修改enddusexz= 32,25 say 是否輸入下下一張(y/n) gget xzzread

22、if xz=y orr xz=Yloopelseexitendiendduse c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfdisplayyuseset tallk onreturn 4.3.2運行行效果示意圖圖： 1）當當輸入完一行行分錄時的示示意圖： 2）當輸輸入完一筆業(yè)業(yè)務(wù)時可繼續(xù)續(xù)輸入下一張張的示意圖： 3）當輸輸入多借多貸貸的分錄時的的完成示意圖圖： 4）運行行時借貸方金金額不相等情情況下的示意意圖 5）待待25筆憑證證按上述步驟驟錄入完成之之后，打開數(shù)數(shù)據(jù)庫中的憑憑證庫，顯示示如下： 4.4.憑證證查詢設(shè)計4.4.1程序序：set tallk offfclearuse c:會計信息系

23、系統(tǒng)-鄭靜金金憑證庫.dbfpzrq1=sspace(10)pzh1=sppace(44)pzlx1=sspace(2)4,4 saay 請輸輸入憑證日期期： geet pzrrq16,4 saay 請輸輸入憑證號碼碼： geet pzhh18,4 saay 請輸輸入憑證類型型： geet pzllx1Readlocate for ppzrq=ppzrq1 and ppzh=pzzh1 annd pzllx=pzllx1if founnd()=.t.dispskipdispelsemessageebox(查詢不到符符合條件的憑憑證)endiset tallk onreturn 4.4.22程序

24、運行效效果示意圖 1）當當查詢到相應(yīng)應(yīng)憑證時的運運行效果示意意圖 2）當輸入的憑憑證查詢不到到時的運行效效果示意圖： 4.5.憑憑證修改設(shè)計計4.5.1程序序：set tallk offfclearuse c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfpzrq1=sspace(10)pzh1=sppace(33)2,4 saay 請輸輸入憑證日期期： geet pzrrq14,4 saay 請輸輸入憑證號： get ppzh1Readlocate for aallt(ppzrq)=allt(pzrq11) andd alltt(pzh)=alltt(pzh11) if founnd()disped

25、itelsemessageebox(沒有找到符符合條件的憑憑證)endifset tallk onreturn4.5.2運行行程序的效果果示意圖： 1）當輸入入要查詢的憑憑證時的界面面示意圖：2）對查詢到的的憑證進行修修改時的界面面示意圖：五各類匯總表表與賬簿設(shè)計計 5.1科目匯匯總表設(shè)計5.1.1程序序：set tallk offfclearstore 00 to jjfje1,dfje11,yeselect 1use c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfselect 2use c:會計信息系系統(tǒng)-鄭靜金金科目匯總總表.dbff1,60 ssay 科科目匯總表 fontt 宋體,14g

26、o topdo whille !eoof()kmdm1=kkmdmselect 1sum jfjje to jfje11 for kmdm=kmdm11sum dfjje to dfje11 for kmdm=kmdm11select 2replacee bqjff withh jfjee1,bqddf witth dfjje1skipenddodisplayya1=0b1=0sum bqjjf to a1sum bqddf to b1locate for kkmmc=合計replacee bqjff withh a1,bbqdf wwith bb1listif bqjjf=bqddfmess

27、ageebox(太棒了，恭恭喜您，試算算平衡！)elsemessageebox(試算不平衡衡，請您仔細細檢查！)endiuseselect 1useselect 2set tallk onreturn 5.1.22運行程序時時的效果示意意圖： 5.2.總總分類賬輸出出設(shè)計 5.2.1程程序：set tallk offfclearkmdm1=sspace(4)kmmc1=sspace(10)bqjf1=00bqdf1=00select 1use c:會計信息系系統(tǒng)-鄭靜金金科目匯總總表.dbffselect 2use c:會計信息系系統(tǒng)-鄭靜金金總分類賬賬.dbfgo topdo whille

28、!eoof()kmdm1=kkmdmselect 1locate for kkmdm=kkmdm1if founnd()=.t.kmmc1=kkmmcbqjf1=bbqjfbqdf1=bbqdfendiselect 21,60 ssay 總總分類賬 font 宋體,14ye1=qcjjf+bqjjf1-qccdf-bqqdf1do casee ye1case yee10replacee kmmcc withh kmmcc1,bqjjf witth bqjjf1,bqqdf wiith bqqdf1,ffx witth 借, ye with ye1case yee10replacee kmmcc

29、 withh kmmcc1,bqjjf witth bqjjf1,bqqdf wiith bqqdf1,ffx witth 貸, ye with ye1*(-1)case yee1=0replacee kmmcc withh kmmcc1,bqjjf witth bqjjf1,bqqdf wiith bqqdf1,ffx witth 平, ye with ye1endcaseeskipenddolistj1=0d1=0sum bqjjf to j1sum bqddf to d1replacee kmmcc withh 合計 bqjff withh j1,bbqdf wwith dd1displ

30、ayyuseselect 1useselect 2set tallk onreturn5.2.2程序序運行的效果果示意圖 5.3現(xiàn)金日日記賬輸出程程序設(shè)計5.3.1程序序：set tallk offfcleastor 0 to jffje1,ddfje1,ye1rq1=spaace(100)pzh1=sppace(33)zy1=spaace(200)sele 1Use c :會計信息息系統(tǒng)-鄭靜靜金憑證庫庫.dbfsele 2use c:會計信息系系統(tǒng)-鄭靜金金現(xiàn)金日記記賬.dbffsele 1do whille !eoof()if subsstr(kmmdm,1,4)=11001rq1=pz

31、rrqpzh1=pzzhjfje1=jjfjedfje1=ddfjezy1=zysele 2ye1=yeskip delete resttpackappend blankkrepl rqq withh rq1,pzh wwith ppzh1,zzy witth zy11,sr wwith jjfje1,zc wiith dffje1,yye witth ye11+jfjee1-dfjje1endisele 1skip enddusesele 2zsr=0zzc=0store 00 to zzsr,zzzcsum sr to zssrsum zc to zzzcappe bllanrepl rq

32、q withh 20114/04/30,zzy witth 本月月小計,ssr witth zsrr,zc wwith zzzc,yee withh ye1+jfje11-dfjee11,48 ssay 現(xiàn)現(xiàn)金日記賬 fontt 宋體,14listuseset tallk on return5.3.2程序序運行的效果果示意圖 5.4銀行日日記賬輸出程程序設(shè)計5.4.1程序序：set tallk offfcleastor 0 to jffje1,ddfje,yye1rq1=spaace(100)pzh1=sppace(33)usesele 1use c:會計信息系系統(tǒng)-鄭靜金金憑證庫.dbfse

33、le 2use c:會計信息系系統(tǒng)-鄭靜金金銀行日記記賬.dbffsele 1do whille !eoof()if subss(kmdmm,1,4)=10002rq1=pzrrqpzh1=pzzhjfje1=jjfjedfje1=ddfjezy1=zysele 2ye1=yeskipdele reestpackappe bllanrepl rqq withh rq1,pzh wwith ppzh1,zzy witth zy11,jfjee withh jfjee1,dfjje witth dfjje1,yee withh ye1+jfje11-dfjee1endisele 1skip end

34、dusesele 2a=0b=0sum jfjje to asum dfjje to bappe bllanrepl rqq withh 20114/04/30,zzy witth 本月月小計,jjfje wwith aa,dfjee withh b,yee withh ye1+jfje11-dfjee11,48 ssay 銀銀行日記賬 fontt 宋體,14listuseset tallk on return5.4.2程序序運行的效果果示意圖 六、報表輸出設(shè)設(shè)計6.1利潤表輸輸出設(shè)計6.1.1程序序：set tallk offfclearstore 00 to bbqdf1,bqdf22,b

35、qdff3,bqddf4,bqqdf5,bbqdf6,bqdf77,a1,aa2,a3,a4select 1use c:會計信息系系統(tǒng)-鄭靜金金科目匯總總表select 2use c:會計信息系系統(tǒng)-鄭靜金金利潤表select 1do whille !eoof()if kmdmm=60001bqdf1=bbqdfskipbqdf2=bbqdfskipbqdf3=bbqdfskipbqdf4=bbqdfskipbqdf5=bbqdfskipbqdf6=bbqdfskipbqdf7=bbqdfa1=bqdff1-bqddf3a2=a1+bbqdf2-bqdf44-bqdff5-bqddf6-bqq

36、df7a3=a2a4=a3select 2replacee bqjee withh bqdff1 forr hc=1replacee bqjee withh bqdff3 forr hc=2replacee bqjee withh a1 ffor hcc=4replacee bqjee withh bqdff2 forr hc=5replacee bqjee withh bqdff4 forr hc=7replacee bqjee withh bqdff6 forr hc=8replacee bqjee withh bqdff7 forr hc=9replacee bqjee withh bq

37、dff5 forr hc=10replacee bqjee withh a2 ffor hcc=11replacee bqjee withh 0 foor hc=12replacee bqjee withh 0 foor hc=13replacee bqjee withh a3 ffor hcc=14replacee bqjee withh 0 foor hc=15replacee bqjee withh a4 ffor hcc=161,60 ssay 利利潤表 ffont 宋體,114listexitelseskipendiendduseselect 1set tallk onreturn6

38、.1.2程序序的運行效果果示意圖6.2.資產(chǎn)負負債表輸出設(shè)設(shè)計6.2.1程序序：set tallk offfclearstore 00 to aa1,a2,a3,a44,a5,aa6,a7,a8,a99,a10,a11,aa12,a113,a144,a15,a16,aa17store 00 to bb0,b1,b2,b33,b4,bb5,b6,b7,b88,b9,bb10select 1use c:會計信息系系統(tǒng)-鄭靜金金總分類賬賬select 2use c:會計信息系系統(tǒng)-鄭靜金金資產(chǎn)負債債表select 3select 1do whille !eoof()if kmdmm=10001a1=yeskipa2=yeskipa3=yeskipa4=yeskipa