产品信息管理模块

《产品信息管理模块》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、企业库存管理系统的开发———产品信息管理（信息2000级五班第二小组叶绥波09100146）一、需求分析1.实现产品按分类的查询，修改；2.实现产品信息的查询，修改；3.在主界面的“产品管理”菜单下进行“产品类目”和“产品信息”的相关添加，删除和查询，并且能过退回到主界面下。二、功能模块划分本系统可以实现5个完整的功能。根据这些功能，设计出的功能模块如图所示。企业库存管理系统基本信息管理产品信息管理库存操作管理客户信息管理用户信息管理仓库信息管理产品类目管理产品信息管理入库操作管理出库操作管理库存盘点管理失效报警管理数量报警管理产品出入库统计表输出订货单统计查

2、询管理库存警示管理企业库存管理系统功能模块示意图在上功能示意图的树状结构中，每一个叶子结点都是一个最小的功能模块。每一个功能模块需要针对不同的表完成相同的数据库操作，添加、修改、查询和删除功能。三、系统开发的软硬件环境4.1.1编程环境的选择采用VisualBasic6.04.1.2关系型数据库的实现采用SQLServer20004.1.3两者的连接VisualBasic提供了与底层数据库系统紧密的连接。VisualBasic支持不同的关系数据库管理系统并充分发挥每一个数据库的特长。生成独立应用或脱离服务器运行的服务以上的应用，VisualBasic连接数据库

3、的方式有两种：·通过使用VisualBasic的DATA控件。·通过使用由VisualBasic提供的专用的直接与数据库相连的接口。-16-四、数据库设计1.产品类目标ProType编号字段名称数据结构说明（用途）CREATETABLEProType(TypeIdIntPrimaryKeyIDENTITY,TypeNameVarchar(50)NOTNULL,UpperIdInt)1TypeIdInt产品编号2TypeNameVarchar50产品名称3UpperIdInt上级产品目录2.产品信息表Product编号字段名称数据结构说明（用途）CREATETA

4、BLEProduct(ProIdIntPrimaryKeyIDENTITY,ProNameVarchar(50)NOTNULL,TypeIdInt,ProStyleVarchar(50),ProUnitVarchar(10),ProPriceDecimal(15,2),ProLowInt,ProHighInt,ValidInt,AlarmDaysInt)1ProIdInt产品编号2ProNameVarchar50产品名称3TypeIdInt产品类型编号4ProStyleVarchar50产品规格5ProUnitVarchar10计量单位6ProPriceDec

5、imal15,2参考价格7ProLowInt产品数量下限8ProHighInt产品数量上限9ValidInt有效期（天）10AlarmDaysInt提前几天警告五、应用程序开发1．产品类目窗口FrmProTypeMan具体代码：产品类目管理DimId1,Id2AsIntegerPrivateSubLoad_Type1()List1.ClearMyProType.Load_by_Upper(0)i=0DoWhileArr_ProType(i)<>""-16-List1.AddItemArr_ProType(i)i=i+1LoopIfList1.ListCount

6、>0ThenList1.ListIndex=0EndIfEndSubPrivateSubLoad_Type2()List2.ClearMyProType.Load_by_Upper(Id1)i=0DoWhileArr_ProType(i)<>""List2.AddItemArr_ProType(i)i=i+1LoopIfList2.ListCount>0ThenList2.ListIndex=0EndIfEndSubPrivateSubCmd_Add_Click()IfOption1.Value=FalseAndList1.ListIndex<0ThenMsg

7、Box"请选择上级类目"ExitSubEndIfIfOption1.Value=TrueThenFrmProTypeEdit.OriUpper=0FrmProTypeEdit.lblUpper=""ElseFrmProTypeEdit.OriUpper=Id1FrmProTypeEdit.lblUpper=List1.TextEndIfFrmProTypeEdit.Modify=FalseFrmProTypeEdit.Show1Load_Type1Load_Type2EndSubPrivateSubCmd_Back_Click()UnloadMeEndSubP

8、rivateSubCmd_Del_Cl