07EX-供应链物品管理服务算法.docxVIP

1、1.1.物品查询服务(HIS服务)参数：组织、部门、物品数组返回值：明细数据物品主键、物品编码、物品名称、规格、剂型、毒麻分类、生产厂商、物品批号、医疗含量单位、医疗单位与基本单位关系、主单位、数量(数量+单位)、单价、结存数量(数量+单位)、预留数量(数量+单位)、可用量(数量+单位)详细说明：1、查找部门对于的仓库关系表bd_stordoc2、过滤物品属性“医生可开立”为否的物品参考SQL:SELECTPD.PK_PD,BM.CODE,BM.NAME,BM.MATERIALSPEC,(SELECTNAMEFROMBD_DEFDOCWHEREPK_DEFDOC=PD.PK_DOSAGE)AS

2、JX,(SELECTNAMEFROMBD_DEFDOCWHEREPK_DEFDOC=PD.PK_POIS)ASPOIS,(SELECTNAMEFROMBD_DEFDOCWHEREPK_DEFDOC=PD.PK_FAC)ASFAC,BL.BATCHCODE,(SELECTNAMEFROMBD_MEASDOCWHEREPK_MEASDOC=PD.PK_MEASDOC_MED)ASMEASDOCMED,PD.FACTOR_MB,(SELECTNAMEFROMBD_MEASDOCWHEREPK_MEASDOC=BM.PK_MEASDOC)ASMEASDOC,BL.PRICE_S,TO_CHAR(BL.

3、QUAN_BASE)I|(SELECTNAMEFROMBD_MEASDOCWHEREPK_MEASDOC=PD.PK_MEASDOC_BASE)ASQUAN,TO_CHAR(BL.RESERVE_BSE)|(SELECTNAMEFROMBD_MEASDOCWHEREPK_MEASDOC=PD.PK_MEASDOC_BASE)ASRESERVEQUAN,TO_CHAR(BL.QUAN_BASE-BL.RESERVE_BSE)|(SELECTNAMEFROMBD_MEASDOCWHEREPK_MEASDOC=PD.PK_MEASDOC_BASE)ASUSEQUANFROMBD_MATERIALBM

4、,BD_UH_PDPD,UH_PD_BLBLWHEREBM.PK_MATERIAL=PD.PK_PDANDBL.PK_PD=PD.PK_PDANDBL.PK_DEPT=?ANDBL.PKPD12物品预留处理（HIS服务）预留服务传入参数：部门、物品主键、基本单位、当前单位、当前/基本换算关系、当前数量，处方主键返回成功：物品主键、物品批号、当前单位成本价、当前单位零侈价失败：返回失败原因执行过程：判断是否需要预留否查询并返回相关信息是，则执行预留（修改uh_pd_bl.resen-e_base）,按照处方为最小粒度，执行预留，同一处方有任何一种物品预留不成功则整个处方不预留，返回对应处方及物品错误信息，能预留成功的处方仍让预留取消预留取消预留，用于逆操作。参数：部门、物品主键、基本单位、当前单位、当前/基本换算关系、当前数量，处方主键操作过程：取消预留（uh_pd_bl.reserve_base）未发药退费取消预留，用于逆操作。参照1.2.2医嘱服务出库参数：部门、物品主键、基本单位、当前单位、当