耗材使用申领 — 业务流程说明

SELECT
  w.id,
  w.supplies_code,
  w.supplies_name,
  w.supplies_specs,
  w.supplies_model,
  w.supplies_made_in,
  w.supplies_brand,
  w.account_book_id AS account_book,
  w.new_price AS purchase_price,
  w.manufacturer_id,
  w.manage_department_id,
  w.data_version,
  IFNULL(w.use_status, '0') AS use_status,
  (SELECT item_text FROM v_sysdict
    WHERE item_value = w.supplies_unit AND dict_code = 'sys_unit' LIMIT 1) AS unit,
  (SELECT manager FROM common_warhouseinfo
    WHERE IFNULL(warhouse_level, 0) = 1
      AND account_book_id = w.account_book_id LIMIT 1) AS manage_department_id_wh,
  1 AS warhouse_level,
  0 AS kcsl
FROM supplies_specification_info w
WHERE IFNULL(w.del_flag, '0') = '0'
  AND IFNULL(w.history_flag, 0) = 0          -- 老：HistoryFlag = 0
  AND IFNULL(w.use_status, '0') = '0';       -- 老：UseState = 0

SELECT ... -- 字段同 6.2
FROM supplies_specification_info w
WHERE IFNULL(w.del_flag, '0') = '0'
  AND IFNULL(w.orthope_flag, 0) = 0
  AND IFNULL(w.history_flag, 0) = 0
  AND IFNULL(w.use_status, '0') = '0'
ORDER BY w.supplies_name, w.supplies_model, w.supplies_specs;

-- 1) 临采计划候选（对应 GetTempPurchaseDt）
SELECT b.id, ...
FROM common_tem_purchase_plan_detail a
LEFT JOIN common_tem_purchase_plan b ON a.request_id = b.id
LEFT JOIN common_tem_purchase_count_of_user c ON c.request_id = b.id
WHERE b.state = '9'
  AND c.request_doctor = :userId
  AND (c.request_count - c.purchased_count - c.purchasing_count) > 0;

-- 2) 可申领档案：编码属于选中临采单剩余明细
SELECT ...
FROM supplies_specification_info w
WHERE IFNULL(w.del_flag, '0') = '0'
  AND IFNULL(w.history_flag, 0) = 0
  AND w.supplies_code IN (
    SELECT a.supp_num
    FROM common_tem_purchase_plan_detail a
    LEFT JOIN common_tem_purchase_plan b ON a.request_id = b.id
    WHERE b.state = '9'
      AND b.id IN (
        SELECT request_id FROM common_tem_purchase_count_of_user
        WHERE (request_count - purchased_count - purchasing_count) > 0
          AND request_doctor = :userId
          AND id = :tmpPurchaseFormId
      )
  );

SELECT
  w.supplies_name, w.supplies_code, w.id,
  IFNULL(w.new_price, 0) AS purchase_price,
  w.supplies_specs, w.entity_type,
  0 AS kcsl
FROM supplies_specification_info w
WHERE IFNULL(w.use_status, '0') = '0'
  AND IFNULL(w.entity_type, 0) = 4;   -- 医用包

SELECT
  IFNULL(a.request_by_hos_area, 0) AS request_by_hos_area,  -- 按院区申请
  a.zero_can_request,                                       -- 零库存可领用
  a.stop_un_request,                                        -- 停用不可领用
  a.account_book_id,
  a.request_lock_stock,                                     -- 申请即锁定库存
  b.warhouse_level
FROM common_warhouseofbookaccount a
LEFT JOIN common_warhouseinfo b ON a.warhouse_info_id = b.id;

SELECT
  a.account_book AS account_book_id,
  w.supplies_name,
  w.supplies_specs,
  w.supplies_code AS supplies_num,
  w.supplies_model,
  a.purchase_price,
  SUM(a.stock_count) AS kcsl,
  a.department_id AS manage_department_id,
  a.warhouse_level,
  a.hos_area,
  -- RequestLockStock=1 时才算在途申领量，否则恒为 0
  IFNULL((
    SELECT SUM(d.supplies_count)
    FROM v_supplies_request_count_detail d
    WHERE d.state <> 9
      AND d.request_reason IN (0, 9)
      AND d.exec_state = 1
      AND d.hos_area = a.hos_area
      AND d.supp_num = a.supp_num
  ), 0) AS requesting_count
FROM common_normal_supplies_stock a
LEFT JOIN supplies_specification_info w
  ON a.supp_num = w.supplies_code AND IFNULL(w.history_flag, 0) = 0
WHERE IFNULL(a.high_supplies_flag, 0) = 0
  AND a.account_book = :accountBookId
  AND a.warhouse_level = :warhouseLevel
  -- RequestByHosArea=1 时追加：
  -- AND a.hos_area = :hosArea
GROUP BY
  w.supplies_code, w.supplies_name, w.supplies_specs, w.supplies_model,
  a.purchase_price, a.account_book, a.department_id, a.warhouse_level, a.hos_area, a.supp_num;

SELECT *
FROM (
  -- 上面各账簿 UNION ALL 结果 + 高值柜外库存段 ...
) t
WHERE (IFNULL(t.kcsl, 0) - IFNULL(t.requesting_count, 0)) > 0
ORDER BY t.supplies_name, t.supplies_specs, t.supplies_model;

SELECT *
FROM supplies_specification_info
WHERE supplies_code = :suppliesCode
  AND IFNULL(history_flag, 0) = 0
  AND IFNULL(del_flag, '0') = '0'
LIMIT 1;

SELECT
  account_book_id AS account_book,
  stop_un_request
FROM common_warhouseofbookaccount;
-- 老：GetWarhosueAccountBookList

-- 伪逻辑
-- IF archive.use_status = '1'
--    AND EXISTS (
SELECT 1
FROM common_warhouseofbookaccount a
WHERE a.account_book_id = :accountBookId
  AND IFNULL(a.stop_un_request, '0') = '1'
-- ) THEN 拒绝：已停用不可申领

SELECT
  a.account_book_id,
  a.type,
  a.request_lock_stock,
  a.request_by_hos_area,
  a.zero_can_request,
  a.stop_un_request,
  a.can_request_have_no_recv_supplies,   -- 有未接收配送时是否禁止再申领
  a.dpt_accept_flag,
  a.logic_flag
FROM common_warhouseofbookaccount a
LEFT JOIN v_sysdict d
  ON CAST(a.account_book_id AS CHAR) = d.item_value
 AND d.dict_code = 'account_book'
WHERE a.account_book_id = :accountBookId
LIMIT 1;

-- 老代码调用：HaveNoRecvSupplies(accountBook, sectionId)
-- 输出 ResultCode='1' 表示「有配送未接收」
-- MySQL 等价示意（具体以库内过程/配送表为准，可迁为函数或查询）：
SELECT CASE WHEN COUNT(1) > 0 THEN 1 ELSE 0 END AS has_no_recv
FROM common_supplies_deliver_record r   -- 表名按实际配送/接收表对齐
WHERE r.account_book = :accountBookId
  AND r.request_department = :deptOrgCode
  AND IFNULL(r.recv_flag, '0') = '0'    -- 未接收
  AND IFNULL(r.state, '0') <> '9';

-- 当 can_request_have_no_recv_supplies = '1' 且 has_no_recv = 1
-- → 提示：有配送没有接收的耗材，接收之前无法申请新耗材

SELECT COUNT(1)
FROM supplies_warehouse_use_request_detail d
WHERE d.purchase_request_id = :headerId
  AND IFNULL(d.state, '0') <> '9'
  AND (
    d.supp_num = :suppliesCode
    OR d.supplies_entity_id = :entityId
  );
-- COUNT > 0 → 申请单中已存在该耗材，请修改数量

-- 选中行展示/写入时：
-- available = kcsl - requesting_count
-- requesting_count 来自账簿 RequestLockStock=1 时的在途申领汇总（见 6.3）
SELECT
  IFNULL(kcsl, 0) - IFNULL(requesting_count, 0) AS available_qty
FROM (
  -- 库存查询结果行
) t;

SELECT
  id AS purchase_request_id, request_department, request_time, check_time, check_man,
  arrival_time, purchase_request_num, operate_man, request_man, request_submit,
  create_time, request_reason, request_state, warhouse_department,
  (SELECT realname FROM sys_user WHERE username = request_man LIMIT 1) AS request_man_name,
  `type`,
  (SELECT depart_name FROM sys_depart WHERE org_code = request_department LIMIT 1) AS sqks,
  remark, account_book, IFNULL(borrow_flag, 0) AS borrow_flag
FROM supplies_warehouse_use_request
WHERE request_department = :dept
  AND request_state = :state;

INSERT INTO supplies_warehouse_use_request (
  request_department, request_time, operate_man, request_man, request_submit, create_time,
  request_reason, request_state, `type`, id, hos_area, request_out_type, ...
) VALUES (
  :dept, NOW(), :operateMan, :requestMan, '0', NOW(),
  :reason, 0, :type, :snowId, :hosArea, :outType, ...
);

INSERT INTO supplies_warehouse_use_request_detail (
  purchase_request_id, supplies_count, supplies_entity_id, create_user, create_time,
  state, request_price, id, supp_num, supp_out_count, manager_department_id, ...
) VALUES (
  :headerId, :qty, :entityId, :user, NOW(),
  0, :price, :snowId, :suppNum, 0, :managerDept, ...
);

INSERT INTO common_entity_update_record (table_name, record_id, operate_type, operate_user)
VALUES ('supplies_warehouse_use_request_detail', :snowId, 1, :user);

SELECT MAX(lsh) FROM supplies_warehouse_use_request WHERE YEAR(request_time) = YEAR(NOW());

DELETE FROM supplies_warehouse_use_request WHERE id = :draftId;

INSERT INTO supplies_warehouse_use_request (
  request_department, request_time, check_time, check_man, purchase_request_num,
  request_man, request_submit, create_time, request_reason, request_state, `type`,
  id, lsh, account_book, hos_area, warhouse_department, ...
) VALUES (
  :dept, NOW(), NOW(), :checkMan, CONCAT(YEAR(NOW()), LPAD(:lsh, 6, '0')),
  :man, '1', NOW(), :reason, 1, 1,
  :newId, :lsh, :book, :hosArea, :whDept, ...
);

UPDATE supplies_warehouse_use_request_detail
SET supp_request_count = :qty, supplies_count = :qty, state = 0,
    purchase_request_id = :newId, check_state = 1, exec_state = 1
WHERE id = :detailId;

-- 软删主单
UPDATE supplies_warehouse_use_request_detail SET state=9, del_user=:u, del_time=NOW() WHERE purchase_request_id=:id;
UPDATE supplies_warehouse_use_request SET request_state=9, del_user=:u, del_time=NOW() WHERE id=:id;

-- 科室撤销提交（仅 request_state=1）
UPDATE supplies_warehouse_use_request SET request_submit=0, request_state=0 WHERE id=:id;
UPDATE supplies_warehouse_use_request_detail SET exec_state=0 WHERE purchase_request_id=:id;

-- 库房出库
UPDATE supplies_warehouse_use_request
SET request_state=4, out_exec_man=:u, out_exec_time=NOW() WHERE id=:id;
UPDATE supplies_warehouse_use_request_detail
SET state = CASE WHEN supplies_count <= :outQty THEN 3 WHEN :outQty = 0 THEN 1 ELSE 2 END,
    supp_out_count = :outQty
WHERE id = :detailId;
INSERT INTO supplies_inwarehouse_out_record
  (id, supplies_id, out_count, state, supp_num, entity_id, hos_area, purchase_price)
VALUES (:snowId, :detailId, :outQty, 0, :suppNum, :entityId, :hosArea, :price);

-- 库房撤单
UPDATE supplies_warehouse_use_request SET request_state=9, check_time=NOW(), check_man=:u WHERE id=:id;
INSERT INTO common_cancel_request_record (request_id, cancel_user, cancel_time, cancel_remark, `type`)
VALUES (:id, :u, NOW(), :remark, :type);
UPDATE supplies_warehouse_use_request_detail SET exec_state=0 WHERE purchase_request_id=:id AND state <> 9;