医院药库药房管理子系统的设计与实现 - 图文(12)

图3-5 药品库存管理功能模块数据流程

3、药品库存管理功能模块主流程描述。如表3-4所示。

表3-4药品库存管理功能模块主流程描述

方法调用 方法 说明 处理步骤 初始化 功能描述 数据表初始化 控制参数加载 InitDefaultDataTable InitControlParam InitData InitDeptList InitStopPriv Refresh ShowStorageData PopDrugDetail 基础数据加载 常数信息加载 权限科室加载 权限信息加载 库存汇总信息加载 库存明细信息 库存信息加载 23

山东大学硕士学位论文 库存管理 只处理通过编码检索 组合过滤 快速查询条件保存 获取快速查询条件 删除快速查询设定 自动形成库存上下限 快速查询条件管理 自动警戒线设置 列跳转设置 信息保存 设置列跳转顺序 SetCaution SetColumnJumpOrder 保存库存管理信息 Save 4、药品库存管理功能模块实现方法描述。如表3-5所示。

表3-5药品库存管理功能模块实现方法描述

方法名称 InitStopPriv Refresh isResetDataTable 参数 说明 判断操作员在本科室是否具有管理药品停用的权限 刷新当前库存显示，根据传入参数决定是否需要重置DataTable 根据传入参数加载药品库存信息并显示 保存当前的快速查询条件设定。保存信息进入Com_Dictionary 自动生成警戒线，通过调用ucPhaAlter组件完成库存上、下限的赋值 自动跳转列顺序设置，通过ucColumn组件完成 数据保存 ShowStorageData deptCode SaveQuickQuery SetCaution SetColumnJumpOrder Save 3.4.2 药品盘点功能模块详细设计

1、功能描述。

库存科室对药品库存进行盘点，统计电脑库存与实际库存差额。盘点过程中，首先进行封帐操作(仅用于记录盘点时间点的电脑库存)，之后进行实际库存盘点。根据实际库存与封帐库存进行盘点结存操作。

24

2、类结构图设计。如图3-6所示。

山东大学硕士学位论文

图3-6 药品库存盘点功能模块类设计图

3、数据流程图。如图3-7所示。

图3-7 药品库存盘点功能模块数据流程图

4、药品库存盘点功能模块主流程描述。如表3-6所示。

表3-6 药品库存盘点功能模块主流程描述

方法调用 处理步骤 功能描述 数据表初始化 初始化 数据初始化 盘点数据初始化 封帐初始化 手工选择药品封帐 方法 InitDataTable InitData InitCheckList CheckClose AddCheckData GroupCheckCloseType 封帐 批量封帐 CheckCloseByTotal GroupCheckCloseStencil GroupCheckCloseHistory

说明 初始化 根据药品类别、性质封帐 对本库房所有药品进行封帐 盘点模版批量封帐 根据历史盘点单封帐 25

山东大学硕士学位论文 盘点附加信息 信息显示 显示已封帐盘点信息 对盘点明细数据根据设置进行排序 获取变动数据 数据操作 盘点信息保存 盘点信息增量保存 GroupCheckAdd ShowCheckList ShowCheckDetail NoSort GetModify Save AddSave 加载盘点列表 加载盘点明细 通过实行ICompare接口的NoSort类实行 数据排序

5、药品库存盘点功能模块实现方法描述。如表3-7所示。

表3-7药品库存盘点功能模块实现方法描述

方法名称 参数 说明 加载控制参数、库存药品 1) 根据控制参数决定库存药品加载时是否按批号加载 2) 对于药库停用的药品不参与库存盘点 3) 对于药房停用的药品参与库存盘点 清屏操作，并通过IsShowCheckList属性设置显示待盘点药品 根据通过ucTypeOrQualityChoose选择的药品类别、药品性质进行封帐 根据之前维护的盘点模版数据进行封帐 根据历史盘点单的数据进行盘点封帐。历史盘点单的选择与IsHistoryCStoreState属性设置相关 增加盘点附加信息 通过该类实行盘点明细数据按货位号排序，与IsSortByPlaceCode属性的设置相关 获取当前发生变化的数据，检索标志Modify(增加、更新)、Del(删除) 盘点数据保存，如果首次保存则生成新盘点单号 InitData CheckClose GroupCheckCloseType GroupCheckCloseStencil GroupCheckCloseHistory GroupCheckAdd NoSort GetModify Save flag deptNO checkNO deptNO checkNO AddSave 盘点数据增量保存，此方法不能用于首次保存

26