《数据库论文.docx》由会员分享,可在线阅读,更多相关《数据库论文.docx(46页珍藏版)》请在课桌文档上搜索。
1、数据库论文西南大学网络教育学院毕业论文论文题目:商品销售管理系统学生朱良辰学号200810414086专业计算机层次本科通讯地址江苏省沛县职教中心邮政编码221600指导教师牟山群商品销售管理系统摘要本系统是为了习惯企业进销存管理的信息化建设需要而设计的,使用ViSUalFoxpro6.0面向对象编程语言设计而成,能够稳固而快捷地完成企业的进销存管理的信息化任务,从而取代了以往繁杂的人工劳动,提高了工作效率。关键词:数据库,编码,信息系统SummaryThissystemistoentertoselltheinformationconstructionneedwhichdeposittedma
2、nagementanddesignformeetingenterprises,adoptVisualFoxpro6.0tofacetarget,sprogramminglanguagetodesign,canfinishtheenteringandsellingandstoringtheinformation-basedtaskofmanagementofenterprisessteadilyandswiftly,thusreplacedmiscellaneousartificialworkinthepast,hasimprovedworkingefficiency.Keyword:Datab
3、ase,code,informationsystem摘要1第一章引言3Ll本课题的研究意义3L2本课题的设计目的与内容3第二章研究现状及设计目标32. 1设计目标33. 2系统设计中存在的问题及解决办法3第三章软、硬件环境43.1 软件环境44. 2硬件平台7第四章可行性分析7第五章系统的功能8第六章数据库设计11第七章系统设计14第八章性能测试与分析45第九章结束语48参考文献48第一章引言1.1 本课题的研究意义随着经济的高速进展,企业的信息化工作也在如火如荼地进行,由于企业规模的不断扩大与商务往来的日益增多,企业对进销存信息的掌握与使用就越来越多,因此往常的原始的手工操作方式就不能习惯企
4、业快速进展的需要,在计算机科学技术日益进展与成熟的今天,运用其先进的技术性来管理日常工作中的各类客户信息数据,就能够极大地提高企业的工作效率。因此,本人结合已学过的知识及在指导老师的帮助下,运用MicrosoftVisualFoxpro6.0中文版,在WirldoWSXP中文版环境下开发成功本系统,通过在实践中的运行验证,本系统能够正常与稳固地运行,为企业制造了较大的商业机会,保证了公司对进销存的管理信息化工作的顺利进行。1.2 本课题的设计目的与内容设计目的:帮助企业对进销存信息进行快速、准确的录入、修改、查询等工作,并可将信息导入与导出,从而可将有关人员从以往烦琐的工作解脱出来,充分体验到
5、信息时代的企业信息化工作给企业的日常工作所带来的便利与快捷,体会到计算机的快速、准确、智能的强大功能。但由于本人软件设计方面的经验不足,因此本系统在设计过程中出现了许多的困难,我查阅了许多的资料,并参考了别人的程序,才最终完成了本系统的设计。第二章研究现状及设计目标2.1设计目标本系统的开发,是以VisualFoxpro6.0中文版作为开发语言,以WindowsXP中文版为开发平台。本系统的界面比较美观、友好,操作简单、方便,比较具有人性化,同时,系统运行速度较快,对计算机的硬件环境要求不高。能够完成公司进销存管理的大部分工作。2.2系统设计中存在的问题及解决办法在设计过程中,由于受到本人知识
6、面所限,考虑不周,数据分析不全面、全面,对软件工程的认识不足,也缺乏设计经验,因此曾出现过一些问题与错误,但是通过本人查询有关的资料,参考有关软件的设计思想,并在指导老师的细心帮助下,这些问题后来基本上得到熟悉决,使用单位也比较满意。第三章软、硬件环境3.1、 软件环境:操作系统选用目前较稳固的WindoWS98中文版;数据库系统使用关系型数据库系统MicrosoftVisualFoxPro6.0中文版;由Windows98与MicrosoftVisualFoxPro6.0共同构成系统的开发环境。(1)中文操作系统WindOWS98的特点:首先,操作系统使用完全图形化的用户界面。将使软件用户的
7、培训大大简化,提高了工作效率。其次,Windows98的设备无关性使本系统软件开发时无须固定使用设备,有利于软件的移植与硬件设备的更新换代。再次,WindOWS98系统中文版支持信息交换用汉字编码字符集,完善的中文支持使二者紧密结合,构成一个功能完备的软件开发环境。(2) VFP6.0中文版概述A:概述VFP6.0中文版,它是运行于Windows95与WindowsNT平台的32位数据库系统,充分发挥了32位微处理器强大的32位数据处理性能。它功能强大,直观易用,支持客户/服务器结构与面向对象编程,提供多种可视化编程工具,支持最新Internet技术,WWW数据库的设计,最新流行的ACtiVe
8、X等。VFP6.0中文版完全支持OOP(面向对象)的应用程序设计方法,VFP使用了真正的类,包含继承性,封装性与多态性。用可视方式创建类、查看类及类代码;利用表单向导进行专业级界面设计;对表关系进行可视化查看;可利用OLE自动化来包含其他软件(如Excel、Word)中的对象并使用这些软件。通过ViSUalFoXPrO对象与事件模型,用户能够快速创建与实现无模式(modeless)的应用程序;利用生成器与工具栏,开发人员能够快速开发应用程序,而省去编写大量的代码、定义繁多的属性。总之,VFP6.0中文版是一种适用于专业人员的开发工具。B:概念的进展在FoxPro2.X中一个表就是数据库,实际上
9、是真正的数据库中表的概念,在VisualFoXPrO中,数据库指的是能够存储一个或者者多个表(.DBF)及视图的关系数据库,这才是真正的关系型数据库的概念。关于一个大型的信息管理系统,它很可能需要对不一致的用户各自创建一个大型的文件系统,它包含许多表,而属于一个用户的一套表与属于另一个用户的一套表实际上是相同的,只是名称是完全不一致的,而在FoXPro2.X中,需要建立大量的代码来区别与保护属于不一致用户的一套表,这套表的数量可能是非常庞大的,保护编码也是非常庞大的。然而ViSUalFOXPrO中引入的真正的数据库的概念,使这一问题的解决变得非常的容易,设计人员只要为不一致的用户创建不一致的数
10、据库,然后在这些数据库下建立用户自己的表就能够很容易对每个用户进行区别与保护了。而且,这样的数据库的关系能力更加强大,更加稳固可靠。CrVisualFoxPro的高效性、可扩展性面向对象程序设计减少了开发时间。VisualFoxPro通过使用面向对象的开发技术简化了开发。它能够通过创建代码类与接口单元类来创建功能强大的、使用灵活的可重用对象库。利用内置工具管理类与类库管理类库资源,在应用程序中用类浏览器与组件集定位、查看、使用类。表面显示器会帮助我们建立更为稳固、更为高效的应用程序。下面的窗口显示代码的每一行,指示其是否执行、执行次数、首次执行时间、平均执行时间。这些数据能够帮助我们快速定位代
11、码中的运行瓶颈,也可验证测试计划。用功能强大的可视化的RAD工具减少开发时间、减少开发工作。用有颜色的代码编辑器与直接跟踪调试器使得写代码的工作比从前简单得多,这一改进来自MiCroSOftVisualC+开发系统。使用MicrosoftVisualSoUrCeSafe?简化了开发小组的开发工作。MicrosoftVisualSourceSafe版本操纵系统与ViSUaIFoXPrO6.0紧密关联,因此能够更好地管理源代码,不论是个人独立编写程序,还是作为开发小组的其中一员编写程序。组件集使得查找与使用诸如类库、表格、报表、代码的组件变得特别简单。仅需要拖动鼠标就能够快速将类从组件集中移出,放
12、置到表格与报表中。D:新特性VisualFoXPrO基本类库VisualFoxPro6.0提供了100多个未编译、可重用的类,开发人员能够利用这些类实现应用程序的基本功能。直接使用这些类,或者者用这些类的继承来实现一定的扩展功能。应用程序向导与构建器VisualFoxPro6.0包含一个完全的面向对象的应用程序框架,它是由一组为应用程序提供基本功能的类构成的。新的应用程序向导就是基于这个框架创建项目的,新的应用程序构建器能够用来添加表格与报表。组件集(ComPonentGallery)组件集(ComPOnentGalICI7)简化了类库的管理,简化了提供可视化工具去组织与使用组件的其他组件的管
13、理。组件能够从组件群中拖出,放置到可视化设计环境中,诸如项目与表单。严格日期检查编译日期信息时,VisualFoxPro6.0将检测会产生误解的日期描述,比如01/01/56。开发人员能够利用这一特性检测现有代码的2000年问题,同时在新代码中避免这一问题的出现。新的严格的日期格式强制日期以清晰形式描述。CoverageProfiler开发人员能够运用表面显示器(COVerageProfiler)检查他们要测试的方案的有效性,这是用执行相应行代码的方式实现的。他们也能够执行ProfiIing以查找瓶颈或者其它执行当中遇到的问题,这是通过检查每一行代码的执行时间实现的。访问与赋值方法访问方法是当
14、访问属性值时运行的代码,赋值方法是当改变属性值时运行的代码。访问操纵方法与访问权限指定方法使属性可用,并使那些内嵌属性容易使用。项目挂钩项目挂钩是一个新的基类,当与一个项目相连时,能够通过它看到项目级事件。开发人员能够写一些当项目打开、关闭、构建、添加文件时运行的代码。在应用程序之间进行拖放从经历字段拖出文本,把它放置到MiCroSOftWOrd中,然后能够对文本进行拼写检查。或者者从WindOWSEXPIorCr中拖出一个文件,把它放置到项目管理器中。文件将被添加到项目中去。活动文档活动文档是一个ViSUalFOXPro应用程序,挂接在InternetExplorero它提供了把Visual
15、FoxPro的强大功能用在浏览器上的一种途径。活动文档同样也提供了一种在分布式应用程序中使用Web的方法。微软传输服务器支持由ViSUaIFoXPro创建的COM组件,这些组件能够由微软传输服务器管理与调整。开发人员能够构建基于数据的组件,充分利用微软传输服务器提供的调整组件的便利条件。企业应用程序开发VisualFoxPro6.0与其它VisualStudio工具能够很好的配合,比如,运用VisualInterDev创建Web应用程序的开发人员能够很容易地使用VisualFoxPro来创建组件。用VisualBaSiC创建的ActiveX控件能够在ViSUalFoxPro应用程序中使用,以实
16、现一些附加功能。购买ViSUalStudio企业版的ViSUalFoxPro开发人员能够得到开发工具所提供的全部好处。3.2、 硬件平台:本系统要紧使用单机操作,投入少,效率高,易于管理与保护,系统升级简单,适合企业信息化管理的需要。基本要求如下:CPU为IntelPentiuinlOO以上;内存为32MB以上;硬盘至少为3.2G以上;配有光驱与软盘。第四章可行性分析本系统的结构图如下:由于本系统管理的对象单一,数据内容基本是一致的,涉及的计算过程不是很复杂。因此,比较适合于使用数据库管理。且由于单位购进的微机的配置较低,在存储量、速度方面都能满足数据库运行的要求。在技术难度方面,由于有指导老
17、师的指导与有关参考文献,特别是网上资料,与有关人员提供的各类要求,完全能够实现。VFP6.O中文版作为一个关系型数据库系统,它提供了面向对象的编程技术,可简化数据库管理,使开发应用程序这项艰辛的工作就象堆积木那样简单方便。另外,用VFP6.0中文版开发的应用程序能够独立运行于windows平台。第五章系统的功能本系统共有如下所述的七大功能模块:A:进货管理模块:界面如下:该模块能够从多方面对供货的各类全面信息进行处理,如品名、规格、单价等,并可对资金情况进行查询与打印。B:进货查询模块:该模块能够根据查询条件对进货的具体情况进行查询,并灵活地使用各类排序方式以便方便地进行查询,并可进行进货资金
18、情况进行打印,以方便对进货的管理。该模块界面如下:C:销售管理模块:该模块的要紧功能是对公司所销货物进行实时的管理,以便及时进行查询,以为公司日后的进货管理提供实际的根据。本模块的界面如下:D:本模块要紧实现了对单位销货的情况进行信息的快速处理,并能够使用排序的方式进行快速的查询。E:库存管理模块:本模块实现了对单位库存情况的快速统计,以方便对货物的及时查询,与是否进行对货物进行补充进货,本模块也使用了排序方式进行管理,并可进行打印。F:系统保护模块:该模块的要紧是对本系统进行管理,如数据的转入转出,系统的密码修改,与其它的诸如供货商等的设置,该模块的要紧功能是为了保证本系统的安全稳固与对一些
19、重要数据的备份处理。G:退出系统:退出本系统的使用,返回机器的原始状态。总体来说,本系统的设计能够完成下列的功能描述:能够对经销商的进货、销与库存统计进行全面管理,程序设计是为了满足下列要求:(D方便用户的进销商品数据输入与修改:(2)简单快捷的进销商品数据的查找(3)完整的进销商品收付资金管理灵活的进销商品库存统计第六章数据库设计根据系统需求分析,需要设计下列数据库表。一、数据表的物理结构:1、进货数据库表:进货数据库表要紧用于存储第一笔进货记录。其结构如下:字段字段名类型宽度小数位1TAG(标志)字符型22NO(进货编号)字符型103RQ(进货日期)日期型84DW(进货单位)字符型305M
20、C(进货名称)字符型206XH(进货规格型号)字符型307PZ(进货配置)字符型208DJ(单价)数值型1029SJ(数量)数值型410YSL(剩余数量)数值型411YR(小计金额)数值型10212JBR(经办人)字符型613BGR(保管人)字符型614FHR(发货人)字符型615YF(已付金额)数值型10216YR(未付金额)数值型1017YXJR(已销金额)数值型10218YSJR(未收金额)数值型1022、销货数据库表:销货数据库用于存储每一笔销货。其结构如下:字段字段名类型宽度小数位1TAG(标志)字符型22NO(进货号)字符型103NOl(销货号)数值型44RQ(销货日期)日期型85
21、DW(销货单位)字符型306MC(销货名称)字符型307XH(销货规格型号)字符型208PZ(销货配置)字符型209DJ(W)数值型10210SL(数量)数值型411JR(小计金额)数值型10212JBR(经办人)字符型613SHR(收货人)字符型614BGR(保管人)字符型615YF(已收金额)数值型10216YR(未收金额)数值型1023、付款数据库:付款数据库是用于对第一笔进货的付款情况。其结构如下:字段字段名类型宽度小数位1NOl(付款号)数值型42NO(进货号)字符型103RQ(付款日期)日期型84JR(付款金额)数值型1025JBR(经办人)字符型66YR(未付金额)数值型1027
22、BZ(情况说明)字符型404、收款数据库表:书款数据库用于对每一笔销货的收款情况;其结构如下:字段字段名类型宽度1NO(进货号)字符型102NOl(销货号)数据值43N02(收款号)数据型44RQ(收款日期)日期型8小数位5JR(收款金额)数值型106JBR(经办人)字符型627YR(未收金额)数值型108BR(情况说明)字符型405、往来单位数据库表:往来数据库用于存储经常往来单位名称。其结构如下:2字段字段名类型宽度1DW字符型306、常用商品数据库表:常用商品数据库用于存储常用商品的名称;其结构如下:小数位字段字段名类型宽度1MC字符型206、经办人数据库表:经办人数据库用于存储经办人姓
23、名,其结构如下:小数位字段字段名类型宽度1JBR(经办人)字符型67、临时表:临时表是一个产生报表中用到的临时表,其结构如下:小数位字段字段名类型宽度1NO字符型102RQ日期型83DW字符型304MC字符型205XH字符型30小数位6PZ字符型207DJ数值型1028SL数值型49JR数值型10210JBR字符型611BGR字符型612FHR字符型613YF数值型10214YR数值型10215RQl日期型816JBl数值型10217JBRl字符型6第七章系统设计销售管理、销售查询、库先检查管理员的合法,避本系统由上述的八个模块构成,分别由进货管理、进货查询、存管理、系统保护、退出系统等6个部
24、分构成。在进入系统之前,免不合法用户进入本系统。系统结构图如下:进货收款本系统的要紧模块的代码如下:1、主文件设计:main6.prgscreen,windowstate=2_screen.CaPtiOn=进销存管理系统_screen.closable=.F._screen.maxbutton=.F._screen.minbutton=.F.closeallclearallcleasetsysmenuoffsetsysmenutosettalkoffsetdateansisetdeleteonsetexactoffsetsafetyoffsetstatusbaroffdoformpasston
25、umifnumdoformmainreadeventendifsetsysmenutodefaultsetsysmenuonsetstatusbaronusejhpackusejhlpackuse珠packusefklpackusemebpackusejbrbpackusedwbpackcloseallclearallreturn2、PaSS表单设计:确认命令代码:IF(N2)=MESSAGEBOX(口令三次输入错误,不能使用本系统,48,信息提示)THISFORM.CONT=.F.THISFORM.RELEASEELSEIFALLTRIM(THISFORM.PASS)=ALLTRIM(THI
26、SFORM.TEXTl.VALUE)THISFORM.CONT=.T.THISFORM.RELEASEELSE=MESSAGEBOXCn令不正确,重新输入,48,信息提示)THISFORM.TEXTl.VALUE=SPACE(10)N=N+1THISFORM.TEXTl.SETFOCUSENDIFENDIF3、进货管理表单设计:进货管理表单不仅包含添加、删除、修改、存储、取消、上一个、第一个、下一个、最后一个等命令,还包含查找进销单、付款、打印付款等命令。查找进销单命令代码:publicfchar(11),fname(11),ftype(11)fchar(D=进货编号fname=no”ftyp
27、e(I)=yzCzzfchar(2)=进货日期fname(2)=rqftype(2)=zDzzfchar(3)二进货单位fname(3)=dwftype(3)=77Czzfchar(4)=品名fname(4)=mc”ftype(4)=zrCzzfchar(5)二单价fname(5)=dj”ftype(5)=*N*fchar(6)=数量fname(6)=sl”ftype(6)=yzN/zfchar(7)=金额fname(7)=*jryzftype(7)=zzN/zfchar(8)=剩余数量fname(8)=yslftype(8)=Nfchar(9)=经办人fname(9)=jbrftype(9)
28、=/zCzzfchar(10)=保管人fname(10)=7zbgr,zftype(10)=yzCyzfchar(11)二发货人fname(Ii)=fhr”ftype(ll)=*Cz,doformjhl2thisform.refresh付款命令代码:?CHR(7)IFTHISFORM.TXTYR.VALUE=O=MESSAGEBOX(本次进货余款已全部付清,不能选择本按钮,48,信息提示)ELSEPUBLICBYRSELECTJHBYR=YR&为本次进货记录的余额SELECTFKSETFILTERTONO=JH.NOCOUNTTOBHDOFORMJHllWITHBHSELECTJHREPLYF
29、WITHYF+BYR,YRWITHYR-BYRTHISFORM.REFRESHENDIF第一个命令代码:?CHR(7)IFTHISFORM.TXTYR.VALUE=O=MESSAGEBoX(本次进货余款已全部付清,不能选择本按钮,48,信息提示)ELSEPUBLICBYRSELECTJHBYR=YR&为本次进货记录的余额SELECTFKSETFILTERTONO=JH.NOCOUNTTOBHDOFORMJHllWITHBHSELECTJHREPLYFWITHYF+BYR,YRWITHYR-BYRTHISFORM.REFRESHENDIF上一个命令代码:skip-1ifbof()gotopend
30、ifthisform.currno=recno()thisform.setall(enabled,.F.,“textbox)thisform.setall(enabled,.F.,“combobox)thisform.refresh下一个命令代码:skipifeof()gobottomendifthisform.currno=recno()thisform.setall(enabled,.F.,“textbox)thisform.setall(enabled,.F.,“combobox)thisform.refresh最后一个命令代码:gobottomthisform.currno=recno
31、()thisform.setall(enabled,.F.,“textbox)thisform.setall(enabled,.F.,“combobox)thisform.refresh添加命令代码:appendblankthisform.jls=thisform.jls+1thisform.dispthisform.setall(enabled,.T.,“textbox)thisform.setall(enabled,.T.,“combobox)thisform.opmode=l&指定操作模式thisform.refreshthisform.txtNo.setfocus删除命令代码:ifIn
32、eSSagCbOx(记录一旦删除便不能恢复,而且涉及很多有关数据删除,确实要删除吗?,48+4,信息提示)=6&回答是deletethisform.jls=thisform.jls-lthisform.opmode=2&指定操作模式selectfkdeleteforno=jh.noselectjhldeleteforno=jh.noselectfkldeleteforno=jh.nothisform.dispthisform.refreshendifselectjh修改命令代码:thisform.setall(enabled,.T.,“textbox)thisform.setall(enabl
33、ed,.T.,“combobox)thisform.opmode=3&指定操作模式thisform.refreshthisform.txtNo.setfocus取消命令代码:ifmessagebox(是否放弃当前操作?“,48+4,“信息提示)二6&回答是=tablerevert(.F.)&将数据恢复this,enabled=.F.ifthisform.opmode=l&添加操作thisform.jls=thisform.jls-lifthisform.jls0&若存在记录,则转向取消操作前的记录gothisform.currnoendifendifthisform.setall(enable
34、d,.F.,“textbox)thisform.setall(enabled,.F.,“combobox)thisform.dispthisform.refresh()endif存储命令代码:iftableupdate(.F.)=.F.=IneSSageboX(数据储存不成功”,48,”信息提示)elsethis,enabled=.F.endif打印命令代码:SELECTJHThisrec=RecnooREPOFORMJH3FORRECNOO=THISRECPREVIEW4、进货付款表单:付款确认命令代码:?CHR(7)IFMESSAGEBOX(输入的付款正确吗一旦付款,不能再改动?,4+32
35、,提示信息)二6SELECTFKAPPENDBLANKREPLNOWITHJHl.TXTNO.VALUEREPLNOlWITHTHISFORM.TEXTl.VALUEREPLRQWITHTHISFORM.TEXT2.VALUEREPLJRWITHTHISFORM.TEXT3.VALUEREPLJBRWITHTHISFORM.TEXT4.VALUEREPLYRWITHTHISFORM.TEXT5.VALUEREPLBZWITHTHISFORM.TEXT6.VALUEBYR=THISFORM.TEXT3.VALUE&为本次付款金额ENDIFTHISFORM.RELEASE5、查询进货单表单:确定命
36、令代码:ifIneSSagebOX(没有设置任何条件,查询所有的记录,48+1,信息提示)二1setfilterto.t.thisform.releaseendifreturnelse=IneSSagebOX(设置的查询条件2不完整,48,信息提示)returnendifendifdocasecasethisform.opgl.value=0IcOperand=casethisform.opgl.value=1COnd=COnd+ANDcasethisform.opgl.value=2COnd=COnd+ORendcaseifthisform.opgl.value0endiftestcond=
37、0onerrortestcond=l&当过滤语句不正确时,执行testcond=lsetfilterto&condiftestcond=l=IneSSagebox(设置的查询条件不正确,48,信息提示)returnendifgotopthisform.release重置命令代码:thisform.textl.VaIUe二thisform.text2.VaIUe二thisform.text2.enabled=.F.thisform.opgl.value=0取消命令代码:thisform.release6、进货查询表单设计:该表单只能用于查找,不能输入、修改与删除进货单查找进货表单命令代码:pub
38、licfchar(11),fname(11),ftype(11)fchar(D=进货编号fname=noftype(l)=z,Czzfchar(2)=进货日期fname(2)=rq”ftype(2)=Dfchar(3)=进货单位fname(3)=dwftype(3)=yzCzzfchar(4)=品名fname(4)=mcftype(4)=zzCzzfchar(5)=单价fname(5)=djftype(5)=zzNzzfchar(6)=数量fname(6)=sl”ftype(6)=yzN7zfchar(7)=金额fname(7)=jrftype(7)=z,N7zfchar(8)=剩余数量fna
39、me(8)=yslftype(8)=yzNzzfchar(9)=经办人fname(9)=jbrftype(9)=z,Czzfchar(10)=保管人fname(10)=7zbgr,zftype(10)=yzCyzfchar(ll)=发货人fname(ll)=*fhr/zftype(ll)=*Czdoformjhl2thisform.refresh打印资金表命令代码:publicfchar(11),fname(ll),ftype(ll)fchar(D=进货编号fname(l)=no”ftype(I)=zzCzfchar(2)H进货日期fname(2)=rq”ftype(2)=Dfchar(3)=
40、进货单位fname(3)=dw”ftype(3)=zzCzzfchar(4)=品名fname(4)=mc”ftype(4)=zzCzzfchar(5)=单价fname(5)=dj”ftype(5)=Nfchar(6)=数量fname(6)=slftype(6)=Nfchar(7)=金额fname(7)=jrftype(7)=Nfchar(8)=剩余数量fname(8)=yslftype(8)=7zN/zfchar(9)=经办人fname(9)=jbrftype(9)=Cfchar(10)=保管人fname(10)=7zbgrzzftype(10)=zzCyzfchar(ll)H发货人fname
41、(1l)=7zfhr,ftype(Il)=yzCzdoformjhl2thisform.refresh排序确认命令代码:SELECTJHSEL=THISFORM.0PTI0NGR0UP1.VALUEDOCASECASESEL=IINDEXONNOTOTEMPIDXCASESEL=2INDEXONRQTOTEMPIDXCASESEL=3INDEXONDWTOTEMPIDXCASESEL=4INDEXONMCTOTEMPIDXCASESEL=5INDEXONXHTOTEMPIDXCASESEL=6INDEXONJBRTOTEMPIDXENDCASEGOTOPTHISFORM.GRIDl.REFRE
42、SH返回命令代码:closedataTHISFORM.RELEASE7、商品销售管理表单设计:确实销售本产品命令代码:ifempty(thisform.txtno.value)=IneSSagebox(没有指定入库商品,不能销售,48,信息提示)elsepublicjhno,jhmc,jhxh,jhpz,jhysljhysl=jh.ysljhno=jh.nojhmc=jh.mejhxh=jh.xhjhpz=jh.pzdoformjh31thisform.txtysl.value=jhyslendif第一个命令代码:SELECTJHGOTOPTHISFORM.REFRESH上一个命令代码:SELECTJHSKIP-1IFBOFOGOTOPWAITWINDOW”第一笔.NOWAITENDIFTHISFORM.REFRESH下一个命令代码:SELECTJHSKIPIFEOF()GOBOTTOMWAITWINDoW最后一笔.NOWAITENDIFTHISFORM.REFRESH最后一个命令代码:SELECTJHGOBOTTOMTHISFORM.REFRESH查询命令代码:PUBLICfchar(11),fname(11),ftype(11)fchar(D=进货编号fname=noftype(I)=yzCzzfchar(2)二进货日期fname(2)=rq