中小企业账务处理系统的设计与实现

©1994-2014ChinaAcademicJournalElectronicPublishingHouse.Allrightsreserved.(,110036):,,..:;;.:F232:A:100025846(2008)032024420411.1,,,,,.,.ERP,.,,.1.2,.,,,..ERP-U8,K/3KIS,,.ERP,.1.3,,,,.,,VisualFoxPro6.0,,.22.1,1.3:(19662),,,,.:2008205219©1994-2014ChinaAcademicJournalElectronicPublishingHouse.Allrightsreserved.:,..:,().:.,:.:,..33.12.3.2,:,,1.211823330485464071228122921081181281381481511683.3,.(3)(4)(5).35423:©1994-2014ChinaAcademicJournalElectronicPublishingHouse.Allrightsreserved.()().,.34,..,,,().5,,,.3.4,,,.3:seleif=messagebox(,,)elsescattoa(20)cc=abs(a(18))thisform.pageframe1.page1.container1.text1.value=a(2)thisform.pageframe1.page1.container1.text2.value=a(3)thisform.pageframe1.page1.container1.text3.value=a(4)thisform.pageframe1.page1.container1.text10.value=a(19)thisform.pageframe1.page1.container1.text5.value=a(5)+’’+a(6)selecounttonifn=0m=1elsegobottm=m=m+1endifthisform.pageframe1.page1.container1.text4.value=mdocasecasea(18)=0ifa(17)0ifa(15)=0thisform.kmbmthisform.yhelsethisform.kmbmthisform.xjthisform.yhendifelsethisform.kmbmthisform.xjendifthisform.pageframe1.page1.container1.text17.value=a(14)thisform.pageframe1.page1.container1.text18.value=a(14)casea(18)0ifa(17)0ifa(15)=0thisform.kmbmthisform.qkthisform.yhelsethisform.kmbmthisform.xjthisform.yhthisform.qkendifendififa(17)=0ifa(15)=0thisform.kmbmthisform.qkelsethisform.kmbmthisform.qkthisform.xjendif6422008©1994-2014ChinaAcademicJournalElectronicPublishingHouse.Allrightsreserved.=a(14)thisform.pageframe1.page1.container1.text18.value=a(14)casea(18)0ifa(17)0anda(15)0thisform.kmbmthisform.yfthisform.xjthisform.yhendififa(17)0anda(15)=0thisform.kmbmthisform.yfthisform.yhendififa(17)=0anda(15)0thisform.kmbmthisform.yfthisform.xjendifthisform.pageframe1.page1.container1.text17.value=a(15)+a(17)thisform.pageframe1.page1.container1.text18.value=a(15)+a(17)endcaseselereplwith.t.endifthisform.refresh4:seleifjfhjdfhj=messagebox(!’,’)elseappefromarrayjzpzforlen(allt())#0forh=1to8jzpz(h,1)=ctod(’//’)jzpz(h,2)=0jzpz(h,3)=spac(30)jzpz(h,4)=spac(8)jzpz(h,5)=spac(4)jzpz(h,6)=spac(40)jzpz(h,7)=0.00jzpz(h,8)=0.00jzpz(h,9)=spac(2)jzpz(h,10)=spac(8)jzpz(h,11)=spac(8)jzpz(h,12)=spac(8)jzpz(h,13)=spac(8)jzpz(h,14)=spac(8)jzpz(h,15)=spac(8)jzpz(h,16)=spac(8)endfforn=5to47m=iif(n10,str(n,1),str(n,2))thisform.text&m..value=iif(n=21.and.n=39.and.n37,0,’’)endforjfhj=0dfhj=0thisform.text38.value=0thisform.text39.value=0pzbh=pzbh+1thisform.text4.value=pzbhendif4,,,,.,.:[1].[M].:,2008.[2].[M].:,2007.[3],.[M].:,2006.[4],.[M].,2007.[5],.[M].:,2006.DesignsandRealizationoftheFinance-ProccessingSystemfortheSmallandMediumEnterprisesLIFeng2yan(CollegeofBusinessAdministration,LiaoningUniversity,Shenyang110036,China)Abstract:Takingthesmallandmediumenterprisesastheresearchobjectandwiththeuseofthecurrentfinance-proccessingsystemsoftwares,asetofmuchsaferandswifterfinance-proccessingsystemforthesmallandmediumenterprisesisdeveloped.Suchthreeaspectsastheintroductiontothesystem,thedesignsofthesystemandtherealizationofthesystemarefocusedoninthispaper.Keywords:smallandmediumenterprises;finance-proccessingsystem;designsandrealization.()7423: