毕业设计（论文）-物流管理系统-医药物流管理系统.doc

电子科技大学毕业设计论文电子科技大学毕业设计论文 第 1 页 共 32 页 物流管理系统物流管理系统 医药物流管理系统医药物流管理系统 摘摘 要要 再现今市场经济条件下，物流管理已被众多公司所采用，使用物流 管理系统来对公司的运营进行管理，已是成为各公司的重要手段。 本文首先阐述了物流管理系统的基本概念，再针对物流管理系统在 医药行业所能发挥的巨大作用，进行此系统的需求分析，接着对系统的 八个部分进行功能上的简单介绍，然后重点介绍了此系统的详细设计与 功能模块的实现，最后分析存在的问题，提出假定的解决方案。 关关键键词词 物流管理 查询 结账 报表 abstract in the condition of the market economy nowadays, the logistics management has already been used by many corporations. using the logistics management system to manage the running of the corporation has been the main measure of the corporations. the paper firstly shows us the concept of the logistics management system. secondly, because the logistics management system has a great effect on the medication industry, it does the analyzing of requirement, thirdly, it has a simple introduction to the eight parts of the system on the function. then it emphatically narrates the design and the function achievement of the system. finally for the problem which existing, it suggest the schema which is solving keywords logistics management search settle accounts statements 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 2 页 共 32 页 目目 录录 一一.引引 言言.3 二二.需求分析需求分析.4 2.1 开发背景开发背景 4 2.2 初步设计初步设计 4 2.3 实现目标实现目标 5 2.4 系统结构图系统结构图 5 2.5 系统流程图系统流程图 6 2.6 开发环境开发环境 6 .1 硬件环境硬件环境 6 .2 软件环境软件环境 6 三三.概要设计概要设计.7 3.1 销售管理销售管理 7 3.2 进货管理进货管理 7 3.3 库房管理库房管理 7 3.4 调货管理调货管理 8 3.5 财务管理财务管理 8 3.6 账目管理账目管理 8 3.7 基础信息管理基础信息管理 9 3.8 系统管理系统管理 10 四四.详细设计及功能实现详细设计及功能实现.10 4.1 数据库设计数据库设计 10 4.2 主程序界面设计主程序界面设计 11 4.3 系统登录界面设计系统登录界面设计 12 4.4 功能模块设计与功能实现功能模块设计与功能实现 13 .1 查询类模块查询类模块 .14 .2 报表类模块报表类模块 .17 .3 登记类模块登记类模块 .19 .4 结账类模块结账类模块 .22 .5 可修改类模块可修改类模块 .25 4.5 其它模块设计其它模块设计 26 .1 操作员管理操作员管理26 .2 权限管理设计权限管理设计27 .3 数据备份与恢复数据备份与恢复 .29 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 3 页 共 32 页 五五.存在问题及解决方案存在问题及解决方案.30 六六.结结 论论.31 七七.参考资料参考资料.31 一一.引引 言言 物流管理是指在社会再生产过程中，根据物质资料实体流动的规律， 应用管理的基本原理和科学方法，对物流活动进行计划、组织、指挥、 协调、控制和监督，使各项物流活动实现最佳的协调与配合，以降低物 流成本，提高物流效率和经济效益。 物流管理的内容包括： （1） 、对物流活动诸要素的管理，包括运输、储存等环节的管理； （2） 、对物流系统诸要素的管理，即对其中人、财、物、设备、方 法和信息等六大要素的管理； （3） 、对物流活动中具体职能的管理，主要包括物流计划、质量、 技术、经济等职能的管理等。 现在物流管理的流程一般分为 10 个阶段: 订单处理作业采购作业进货入库作业库存管理作业补货及 拣货作业流通加工作业出货作业处理配送作业会计作业营运 管理及绩效管理作业 过去物流管理着重在企业内部作业与组织的整合，对下游顾客的对 应，是以服务与品质为主要重心。随着物流业的发展物流管理从物的处 理，提升到物的加值方案设计、解决和管理上。可以为客户提供度身订 造式的，并带有个性化的服务，企业逐渐转向强调跨企业界限的整合， 使得顾客关系的维护与管理变得越来越重要. 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 4 页 共 32 页 二二.需求分析需求分析 2.1 开发背景开发背景 本系统假设为一个医药品的销售公司做物流管理系统。 随着我国市场经济的蓬勃发展和对医药品的需求迅速增加，医药行 业也相应的处于一个飞速发展的时期。行业的快速发展必然导致各企业 之间的竞争更加激烈，为了使自己的企业在竞争中能够站稳脚跟，不被 激烈的竞争环境所压倒，必然要求企业加强对自身的管理，提高企业的 经营效率。 由于医药行业的特殊性，造成医药品的种类繁多，业务量巨大，若 仍然采用人工的记账方式，必然不能满足企业的需求，企业需要利用计 算机来进行医药品的物流管理，因此需要构造一个物流管理系统。 2.2 初步设计初步设计 由于本系统假设为一个医药品的销售公司做物流管理系统。针对医 药品销售的特点，初步设计本系统包含以下几个功能模块： (1)销售管理：包含销售登记，销售退货，销售报表。 (2)进货管理：包含入库登记，入库退货，入库报表。 (3)库房管理：包含库存查询，库存盘点，库存修改，库存报表。 (4)调货管理：包含调货登记，调货查询。 (5)财务管理：包含收款单，收款查询，付款单，付款查询。 (6)账目管理：包含财务结账，当月结账，销售查询统计，入库查 询 统计，销售退货查询，财务报表，月报表。 (7)基础信息管理：包含药品信息，员工信息，客户信息，供应商 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 5 页 共 32 页 信 息，仓库基本信息。 (8)系统管理：包含操作员管理，权限设置，数据备份，数据恢复。 2.3 实现目标实现目标 本医药物流管理系统在完成运行后，需要达到以下效果： (1) 操作简单，易于上手。 (2) 查询方便灵活，浏览简单，明目。 (3) 数据存储安全可靠。 (4) 功能全面，实用性强。 (5) 自动化信息管理。 2.4 系统结构图系统结构图 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 6 页 共 32 页 图图 1. 医药物流管理系统结构图医药物流管理系统结构图 2.5 系统流程图系统流程图 图图 2. 医药物流管理系统流程图医药物流管理系统流程图 2.6 开发环境开发环境 2.6.1 硬件环境硬件环境 主频 50mhz 以上 内存 10mb 以上 240mb 以上的硬盘空间 vga 或更高的分辨率显示器，1mb 以上的显存 2.6.2 软件环境软件环境 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 7 页 共 32 页 本系统是在 windows xp 环境下，采用 microsoft visual foxpro 6.0 数据库开发工具进行构建系统。 microsoft visual foxpro 6.0 是微软公司推出的可视化编程工具，它 的开发效率高，成本低，投资小，见效快。microsoft visual foxpro 6.0 一直是中国台式机数据库的主流，易学，易用，易维护。 三三.概要设计概要设计 通过前面的需求分析可以知道，本系统一共分为了 8 个系统模块， 包括：销售管理，进货管理，库房管理，调货管理，财务管理，账目管 理，基础信息管理，系统管理。每个系统模块下，包含了若干小的功能 模块。每一个系统模块都实现其特定的功能。 3.1 销售管理销售管理 销售管理模块主要实现销售方面的功能，它包含销售登记，销售退 货，销售调查三个功能模块。销售管理主要是针对公司的销售人员而设 计，帮助公司对所销售的药品进行一个系统地记录。 销售登记可以实现日常的销售开票，自动计算金额，多种结算方式。 销售退货用于单据已开出的客户进行退货操作。 销售报表实现按日期查询药品销售信息，可预览和打印销售报表。 3.2 进货管理进货管理 进货管理模块主要实现药品入库的功能，它包括入库登记，入库退 货，入库报表三个功能模块。进货管理主要是针对公司的仓库管理人员 而设计，此系统模块能帮助公司在药品入库的时候，对药品的各项信息 进行系统地记录，可以大大减少进行手工记录时所犯的错误，提高公司 的营运效率。 入库登记实现入库登记操作，并自动计算金额，生成入库票号。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 8 页 共 32 页 入库退货实现调用药品的基本信息，生成退货票号作为退货的凭证。 入库报表实现按日期查询入库药品信息，打印和预览入库报表。 3.3 库房管理库房管理 库房管理模块是对药品在库房中的管理，它包括库存查询，库存盘 点，库存修改，库存报表。此系统模块同样为仓库管理员而设计。由于 同种药品入库有时间上的先后，而药品的信息也会随着时间的推移而不 停的修改。因此库房管理模块就能实现对库存中的药品信息进行系统地 管理。 库存查询实现按不同条件查询库存信息，以页框和列表来浏览 信息。 库存盘点实现以表单的形式显示库存数量大于零的全部药品信 息。 库存修改实现查询和浏览信息功能外，还设置了修改，删除信 息功能。 库存报表实现按条件查询库存信息，预览和打印库存报表。 3.4 调货管理调货管理 调货管理用于实现对库存的药品在不同的仓库之间进行调动的记录。 它包含调货登记，调货查询。与上面两个系统模块一样，此模块仍然为 仓库管理人员设计。药品由于其种类繁多，信息复杂，在进行药品的调 动时，对调动的信息进行记录也就显得尤为关键。 调货登记完成各仓库间药品调货信息记录，自动生成调货票号，日 期，以列表的形式显示调货结果。 调货查询支持条件和日期查询，以页框和列表方式浏览调货信息。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 9 页 共 32 页 3.5 财务管理财务管理 财务管理主要实现收款与付款的记录功能。医药品业务的流通量是 非常巨大的，因此在财务上对收款与付款的信息记录也就非常繁琐。利 用财务管理系统模块可以简化这些操作，使用方便，简洁。财务管理包 含收款单，付款单，收款查询，付款查询。 收款单可实现查询和浏览收款信息，对未付款客户进行结款操作。 收款查询能按不同条件查询收款信息，以页框和列表浏览收款信息。 付款单可对供应商进行结款操作，能查询与浏览付款信息。 付款查询与收款查询相似，可查询与浏览付款信息。 3.6 账目管理账目管理 账目管理所包含的功能模块较多，它主要是为公司的财务人员而设 计。它可以大大简化公司财务人员的工作量，对公司的财务账目信息有 一个系统的管理。账目管理系统模块包含财务结账，当月结账，销售查 询统计，入库查询统计，销售退货查询，入库退货查询，财务报表，查 询月报表。 财务结账可完成日结账操作，可汇总每日结账信息。 当月结账完成月结账操作，统计汇总结账信息 销售查询统计可查询与浏览销售信息，统计汇总销售信息。 入库查询统计可查询与浏览药品入库信息，自动汇总入库药品信息。 销售退货查询可查询与浏览销售退货的信息结果，快速浏览信息。 入库退货查询与销售退货查询的功能实现相似。 财务报表可按时间查询财务报表，以报表形式反映药品的进销存情 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 10 页 共 32 页 况，预览和打印财务报表。 查询月报表可按条件查询该月的药品进销存信息，可预览和打印此 月报表。 3.7 基础信息管理基础信息管理 基础信息管理模块是对公司的常用信息进行管理，如药品，员工， 客户的信息等。这个模块相当于公司的档案管理，有大量的数据信息。 它包含药品信息，员工信息，客户信息，供应商信息，仓库基本信息。 这些信息数据是其它功能模块实现的基础。 药品信息实现浏览查询药品基本信息，可添加，修改，删除信息。 员工信息提供了添加，修改，删除员工信息功能，也可查询浏览。 客户信息实现了客户信息的添、删、改功能。 供应商信息与上述三种功能模块实现的功能相似。 仓库基本信息出了现了信息的添、删、改功能外，还能自动生成 7 位仓库编号。 3.8 系统管理系统管理 系统管理模块是针对系统的保护而设计的。此模块专为系统管理员 而设计。此系统的管理操作可直接影响整个系统的操作管理。它包括操 作员管理，权限管理，数据备份，数据恢复。 操作员管理可以对操作员信息进行增加、删除、修改，可设置操作 员密码。 权限管理能查询操作员级别及使用权限，为一般操作员设置权限。 数据备份可以对库存中的数据信息实现备份功能。 数据恢复可将数据备份的库存信息安原路经恢复。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 11 页 共 32 页 四四.详细设计及功能实现详细设计及功能实现 4.1 数据库设计数据库设计 利用 microsoft visual foxpro 6.0 新建一个数据库，名称为 medicamentmanage ,在此数据库中添加 27 个表：临时登记表 ltabdhdj, 临时日结表 ltabrj，临时入库登记表 ltabrkdj，临时入库退货表 ltabrkth，临时销售登记表 ltabxsdj，临时销售退货表 ltabxsth，临时 月结表 ltabyj，调货登记表 tabdhdj，供应商信息表 tabgys，结算方式 表 tabjsfs，库存表 tabkc，客户信息表 tabkh，权限表 tabpurview， 日结表 tabrj，入库登记表 tabrkdj，入库结账表 tabrkjz，入库票号表 tabrkph，入库退货表 tabrkth，仓库信息表 tabstorage，销售登记表 tabxsdj，销售结账表 tabxsjz，销售票号表 tabxsph，销售退货表 tabxsth，员工信息表 tabyginfo，月结表 tabyj，月结初始化 tabyjcsh，药品信息表 tabypinfo。 4.2 主程序界面设计主程序界面设计 创建一个标准项目，名称为“医药物流管理系统” ，在该项目中添加 一个表单，名称为 fdesktop。在表单中插入名称为 vcxmain 的 toolbar 类。 在各个按钮的 click 事件中添加类代码。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 12 页 共 32 页 图图 3. 主程序界面主程序界面 为了使操作更加简便，将常用的几种操作单独提出来，设计一个 vcxmain 的 toolbar 类。添加代码如下： 在“销售登记”按钮的 click 事件中添加代码：do form formxiaoshoudj 同理，在“入库登记”按钮中添加：do form formrukudj 在“调货登记”按钮中添加：do form formtiaohuodj 在“库存查询”按钮中添加：do form formkcquery 在“销售查询”按钮中添加：do form formxiaoshouquery 在“入库查询”按钮中添加：do form formrukuquery 在“财务结账”按钮中添加：do form formcwjz 在“药品信息”按钮中添加：do form formypmanage 在“退出”按钮中添加：quit 4.3 系统登录界面设计系统登录界面设计 用户进入系统前，必须进入系统登录界面，系统登录界面能够确认 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 13 页 共 32 页 用户的身份及使用权限。 图图 4. 系统登录界面系统登录界面 首先要判断用户输入的用户名是否正确，然后判断用户输入的密码 是否正确，如果正确，这根据用户选择操作员说拥有的权限级别为全局 变量赋值，如果不正确，弹出系统警告。 在进行编码的时候，首先将使用的数据表权限表打开： use databasetabpurview +“ “+alltrim(thisform.text1.value)+“ 上面就是条件查询的几种方式。 当然，除了条件查询的方式外，还可以按时间日期进行查询。 如果是按照时间日期查询，与条件查询相似，时间查询可以分为查 询失败和日期查询两个情况： sdate 与 edate 分别指向了时间查询的日期起止时间，若起止时间 为空，则查询失败 if sdate=/ or edate=/ messagebox(请输入起始时间！,48,操作失败！) 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 18 页 共 32 页 如果日期均不为空，则系统将查找起止日期之间的信息，将信息存 入临时表 lindeping 以供使用。以销售登记查询为例，我们将销售登记表 中的销售日期作为起止日期查询标准，将满足日期的所有数据信息装入 lindeping 。 fff=between(销售日期,sdate,edate) select * from tabxsdj where from medicamentmanage!tabxsdj; where between(出库日期,sdate,edate); order by tabxsdj.销售票号; into cursor lindeping from medicamentmanage!tabkc; where 药品编号=ltabrkdj.药品编号 and 仓库名称=ltabrkdj. 仓库名称; order by tabkc.药品编号; &索引为药品编号 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 23 页 共 32 页 into cursor lindeping &将信息存入临时表中 如果库存表中没有相同的药品，则直接将信息存入到库存表中 if reccount()1 & 没有找到一样的药品 insert into tabkc values(ltabrkdj.药品编号,ltabrkdj.仓库名称,ltabrkdj. 药品名称,ltabrkdj.简称,ltabrkdj.剂型,ltabrkdj.货位,ltabrkdj.产地,ltabrkdj.规 格,ltabrkdj.包装,ltabrkdj.单位,ltabrkdj.商标,ltabrkdj.批准文号,ltabrkdj.批号, ltabrkdj.进价, ltabrkdj.数量,ltabrkdj.金额,ltabrkdj.保质期) &追加新记录 如果找到了一样的药品，则需要将原有的药品信息表更新，使用 update 语句来实现。 update tabkc set 药品名称=ltabrkdj.药品名称,库存数量=库存数 量+ltabrkdj.数量,单价=ltabrkdj.进价,库存金额=库存数量*单价 where 药 品编号=ltabrkdj.药品编号 在执行完操作后需要将临时表清空 use databaseltabrkdj exclusive &以独占方式打开数据表 zap &清空数据表 上述三种功能是登记类模块的核心功能，只要实现了这三种功能， 登记类模块的其他功能也就容易实现。 4.4.4 结账类模块结账类模块 顾名思义，结账类模块所要实现的核心功能就是要结账，本系统主 要实现日结账与月结账功能。在这类模块中，用到最多的是汇总数据 如语句：sum 金额 to xiaoshou 可以实现汇总入库金额 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 24 页 共 32 页 图图 6. 日结账界面图日结账界面图 对于日结账，我们要实现的功能方法与罗列数据到表单中的方法相 似，我们用循环的方法一次加入数据信息： select ltabrj &选择临时日结表作为当前工作区 go top do while !eof() &以循环方式进行数据追加 insert into tabrj values(ltabrj.操作员,ltabrj.销售,ltabrj.销售退货,ltabrj.入 库,ltabrj.入库退货,ltabrj.日期) skip &记录指针向下移动一条记录 enddo 在输入完数据后，我们依然要进行清空表的操作 use databaseltabrj exclusive zap 而对于月结账，在实现上述功能之前还需要对月份进行一次选择 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 25 页 共 32 页 图图 7. 月结账选择界面月结账选择界面 在系统中添加一个名为 yuejie1 的表单，其中需要添加一个 combo 控件，用于提供结账月份的列表，先要定义月结的开始和结束时间，分 别以 startdate 和 enddate 来表示 public startdate,enddate &定义全部变量 在对时间的定义中，开始时间比较容易把握，所选月份的第一天， 但结束时间的把握要复杂一些，分为两种情况：第一种情况为 12 月以外 的月份，则结束时间是在开始时间月份上+1，年份不变： mm=alltrim(str(val(m)+1) yy=y 对于 12 月的结账，则截止时间月份变为 1 月，年份+1： if val(m)=12 mm=alltrim(01) yy=alltrim(str(val(y)+1) 最终时间的确定： enddate=ctod(mm+/+dd+/+yy) 为了不重复对月进行结账，在本系统中，如果月结前发现已经对本 月进行了结账，则不再进行此操作，要实现此项功能，必须以开始日期 作为索引： select tabyjcsh 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 26 页 共 32 页 set order to 开始日期 &指定控制索引文件 seek startdate &快速查询 if found() messagebox(此月已结帐，不能再进行月结操作！,48,操作失败！) 如果没有发现开始日期，月结账进入与日结账相似的表单。 4.4.5 可修改类模块可修改类模块 可修改类模块大部分是各类数据信息系统，这类模块机查询，登记， 保存，修改等功能于一体。其中查询功能与查询类模块所实现的功能相 似，而登记，修改功能与登记类模块所实现的功能相似，这些功能在前 面已实现，这里不再重复，现在最重要的是实现修改功能。 其实，在进行添加和保存功能介绍时，对如何实现这类功能已经有 了介绍，例如要想在表单的 text2 中进行修改，只要系统执行 mandgroup1.text2.enabled=.t.就可以了，同理如果=.f.就 不能实现修改，这种语句可以用在表单中不能修改的控件上。 还有一点要注意，在修改的过程中，表单上的功能件只有保存、取 消能够执行，而修改这个按钮在修改执行以后，就不能再执行了，这一 点很容易搞错： mandgroup1.cmodify.enabled=.f. &设置修改无效 mandgroup1.cdel.enabled=.f. &设置删除无效 mandgroup1.ccancel.enabled=.t. &设置取消有效 mandgroup1.csave.enabled=.t. &设置保存有效 mandgroup1.cadd.enabled=.f. &设置添加无效 由此可以实现修改的功能。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 27 页 共 32 页 4.5 其它模块设计其它模块设计 在本系统中除了上述几种功能模块外，还一些关于系统管理的模块 设计。 4.5.1 操作员管理操作员管理 对于操作员管理系统，主要实现用户的增加，删除，修改以及密码 的设置。其中用户的增加，删除，修改与可修改类模块实现的功能相似， 对于“密码修改确定”功能可以采用以下方法实现： 首先要将权限表置为当前工作区 use databasetabpurview 然后将操作员姓名作为索引 set order to 操作员姓名 在表中查找当前要修改密码的人员是否为表中所含有的人员 seek cname &快速查询 set exact on &字符精确比较 如果所修改的人员不为表中所拥有的，显示错误： if alltrim(tabpurview.操作员姓名)!=cname cmessagetext=操作员错误，请重新输入！ 如果人员的名字无误，则原密码进行比较，同样若密码不正确，同 样显示修改失败 if alltrim(tabpurview.密码)!=ppassword cmessagetext=原密码错误，请重新输入！ 上述功能实现与前面所讲的登陆确认功能相似，当身份的到确认的 时候，下面的功能就实现了密码的修改确认。 mandgroup1.adddel.enabled=.t. 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 28 页 共 32 页 mandgroup1.modify.enabled=.t. mandgroup1.cok.enabled=.f. thisform.text2.enabled=.t. thisform.text3.enabled=.t. thisform.text1.enabled=.f. bo1.enabled=.f. thisform.text2.setfocus 这种语句所实现的功能就是修改 thisform 后面的控件的内容 4.5.2 权限管理设计权限管理设计 为了保护本系统的各用户的利益，保证数据的安全性，本系统采用 了权限管理。也就是不同的用户拥有不同的权限。各自用户只能进入权 限规定的功能模块。 图图 8. 权限管理界面权限管理界面 本系统的权限管理共分四个等级，分别为 1，2，3，4 级别，等级 1 的级别最高，属于系统管理员等级，且只有一个，能使用各种功能系统。 等级 2 不能实现系统管理功能，等级 3 不能使用基础信息管理与系统管 理。这三类等级的人员权限均不可改。等级 4 的人员权限由系统管理员 进行设置，可以设置与等级 1 一样的权限。 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 29 页 共 32 页 因此有可能出现等级为 4 的人员，却能实现等级 2 和 3 都不能使用 的功能模块。 为了系统的安全性，权限等级为 1 的只能有一个，当再设置权限的 时候发现设置成了权限 1，则系统自动提示信息，拒绝操作： case val(alltrim(thisform.text1.value)=1 &设置权限等级 1 thisform.resize &执行表单的 resize 事件 messagebox(级别 1 为系统管理员，不能有多个，请重新输入！ ,48,权限管理) thisform.text1.value= &拒绝操作 对于设置权限为非 1 的人，可以用 update 语句来设置表中的功能模 块的是用权限，设置为 t 为可以使用，设置为 f 为不能使用 locate for 操作员姓名=czyname do case &条件语句 case crand=2 &等级为 2 update tabpurview set 权限级别=crand,销售管理=.t., 进货管理=.t., 库房管理=.t.,调货管理=.t.,财务管理=.t.,帐目管理=.t.,基础信息管理=.t.,系 统管理=.f. where 操作员姓名=czyname case crand=3 &等级为 3 update tabpurview set 权限级别=crand,销售管理=.t., 进货管理=.t., 库房管理=.t.,调货管理=.t.,财务管理=.t.,帐目管理=.t.,基础信息管理=.f.,系 统管理=.f. where 操作员姓名=czyname case crand=4 &等级为 4 update tabpurview set 权限级别=crand,销售管理=cxsgl, 进货管理 =cjhgl,库房管理=ckfgl,调货管理=cthgl,财务管理=ccwgl,帐目管理=czmgl, 基础信息管理=cjcinfo,系统管理=csysgl where 操作员姓名=czyname 电子科技大学毕业设计论文电子科技大学毕业设计论文 第 30 页 共 32 页 endcase 为了能够实现权限改动的功能，表单上列出了各种管理模块的复选 框，只要在所选功能的前面打上勾，就能实现这项功能，而在选择功能 的时候，只有确定和取消按钮有效，由于有 8 个系统功能，若分别写有 效与无效代码太麻烦，可用下列方法简化 在“销售管理”的控件中添加 mand3.enabled=.t. & 取消有效 mand2.enabled=.f. & 权限退出无效 mand1.enabled=.t. & 确定有效 在其他的复选框中添加 eractivechange &执行 xsgl 的 interactivechange 事 件 这样就都实现了按钮的功能有效性。 同在查询选择时