|
1． 供应商管理模块 实现药品供货商的管理，能提供供货商的供应商编号、供应商全称、简称、地址 、所属地区、邮政编码、电话、传真、开户银行、银行帐号、纳税人登记信息，以便与供货商的保持联系，实现药品销售中的进退货要求，向供货商定货。可根据不同供货商对药品进行有效分类。 http://www.paper51.com 业务流程图如图所示： paper51.com http://www.paper51.com 图5-2 业务流程图 http://www.paper51.com
该模块分为以下几部分： http://www.paper51.com （1）供应商查询 内容来自www.paper51.com 根据所提供的供货商的供应商编号、供应商全称、简称、地址 、所属地区、邮政编码 、 电话、传真 、开户银行 、银行帐号 、纳税人登记信息的任一条件，查询供应商相关信息。 内容来自www.paper51.com （2）供应商基本信息 copyright paper51.com
（3）供应商辅助信息 http://www.paper51.com
用于提供供应商银行、帐号、所付金额、所欠金额、实际欠款、地址 内容来自www.paper51.com 或邮箱等相关信息。 paper51.com （4）供应商列表 paper51.com
运行界面如图所示： paper51.com 图 5-3供应商列表 http://www.paper51.com 2． 客户管理模块 http://www.paper51.com
实现客户信息的管理，能提供客户编号、简称、地址、所属地区、邮政编码、电话、传真、开户银行、银行帐号、纳税人登记信息等相关信息，以便与客户保持联系，实现药品销售中对客户进行登记，对销售信息进行准确有效的归纳汇总。 http://www.paper51.com 该模块又分为以下几部分： paper51.com （1）客户查询 paper51.com 根据所提供的客户的编号 、全称、简称 、地址 、所属地区 、邮政编码 、 电话、传真、开户银行 、银行帐号 、纳税人登记信息的任一条件，查询客户相关信息。 copyright paper51.com （2）客户基本信息 内容来自www.paper51.com
（3）客户辅助信息 内容来自www.paper51.com 用于提供客户银行、帐号、所付金额、所欠金额、实际欠款、地址 内容来自论文无忧网 www.paper51.com 或邮箱等相关信息。 copyright paper51.com （4）客户列表 paper51.com 运行界面如图所示： copyright paper51.com copyright paper51.com 图5-4 客户模块 copyright paper51.com 3． 业务员管理模块 内容来自论文无忧网 www.paper51.com 包含业务员姓名，编号，年龄，性别，住址，联系方式等信息，该模块能够对员工进行有效管理，更易于业绩的考核。系统管理员拥有这个权限对所有职工的资料进行修改。 http://www.paper51.com 运行界面如图所示： 内容来自www.paper51.com
内容来自www.paper51.com 图5-5 业务员信息 内容来自论文无忧网 www.paper51.com
4．仓库管理 内容来自论文无忧网 www.paper51.com 为方便药品的分类存取，本系统设置了仓库管理模块，对仓库进行编号，添加相应的备注信息，还可对仓库进行添加、删除、修改信息操作。 http://www.paper51.com 运行界面如图所示： http://www.paper51.com
paper51.com 图5-6 仓库管理信息 paper51.com 5.3系统设置 copyright paper51.com 初期建帐 http://www.paper51.com 密码设置 http://www.paper51.com 数据备份 内容来自www.paper51.com 数据恢复 paper51.com
初期建帐主要代码如下： copyright paper51.com If Check1.Value = 1 Then http://www.paper51.com '删除全部库存信息 内容来自www.paper51.com sql = "delete * from kc " 内容来自www.paper51.com
db.Execute sql 内容来自论文无忧网 www.paper51.com If Check2.Value = 1 Then 内容来自论文无忧网 www.paper51.com
'删除全部供应商信息 http://www.paper51.com sql = "delete * from gys " http://www.paper51.com
db.Execute sql 内容来自论文无忧网 www.paper51.com
If Check3.Value = 1 Then 内容来自论文无忧网 www.paper51.com '删除全部客户信息 copyright paper51.com sql = "delete * from kh" copyright paper51.com
db.Execute sql 内容来自www.paper51.com If Check4.Value = 1 Then copyright paper51.com '删除全部入库信息 paper51.com sql = "delete * fromrkd" copyright paper51.com db.Execute sql paper51.com If Check5.Value = 1 Then paper51.com '删除全部入库退货信息 内容来自论文无忧网 www.paper51.com sql = "delete * fromrktd" 内容来自www.paper51.com
db.Execute sql copyright paper51.com If Check6.Value = 1 Then 内容来自论文无忧网 www.paper51.com
'删除全部销售信息 http://www.paper51.com sql = "delete * from xsd" 内容来自论文无忧网 www.paper51.com db.Execute sql copyright paper51.com If Check7.Value = 1 Then http://www.paper51.com '删除全部销售退货信息 copyright paper51.com sql = "delete * from xstd" http://www.paper51.com
db.Execute sql paper51.com 初期建帐主要实现的是将数据库中的数据库表清空，利用Check的属性值来识别要删除哪些数据库表，然后用Delete语句实现删除。 内容来自www.paper51.com 运行界面如图所示： paper51.com http://www.paper51.com 图5-7 初期建帐 内容来自论文无忧网 www.paper51.com 5.4其他支出 内容来自论文无忧网 www.paper51.com 药品报损 内容来自www.paper51.com 流通费用 内容来自www.paper51.com |