select b.姓名 患者名,
d.编码 药品代码,
d.名称 药品名称,
(select 住院号
from 病案主页
where 病人id = h.病人ID
and 主页id = h.主页Id) 病案号,
a.审核日期 发药日期,
a.已发数量 数量,
a.零售价 销售单价,
a.零售金额 收费金额,
d.住院单位 计价单位,
(select 名称
from 部门表
where id = a.对方部门ID) 领药科室, d.规格, d.产地 生产商, '' as 管制分类,
decode(h.收费类别, 5, '西药', 6, '成药', 7, '草药') 药品大类, a.no 处方号, '' as 招标药否,
a.批次 药批次号 from (SELECT A.NO, A.药品ID,
A.费用ID,
A.零售价,
max(a.审核日期) 审核日期,
SUM(NVL(A.付数,1) * A.实际数量) 已发数量,
sum(a.零售金额) 零售金额,
A.对方部门ID,
a.批次
FROM 药品收发记录 A
WHERE nvl(a.发药方式, -999) <> -1
and A.审核人 IS NOT NULL --AND (A.记录状态 = 1 OR MOD(A.记录状态, 3) = 0)
And A.审核日期 Between /*B0*/
TO_DATE('2018-10-31 00:00:00',
'YYYY-MM-DD HH24:MI:SS') /*E0*/
and /*B1*/
TO_DATE('2023-10-31 23:59:59',
'YYYY-MM-DD HH24:MI:SS') /*E1*/
And A.单据 In (9,10)
group by A.NO,
A.药品ID,
A.费用ID,
A.零售价,
A.对方部门ID,
a.批次
having SUM(NVL(A.付数, 1) * A.实际数量) <> 0) a, 住院费用记录 H, 病人信息 B, 部门表 c, 药品目录 d
WHERE a.药品id = d.药品id
AND H.病人ID = B.病人ID(+)
AND A.费用ID = H.ID
and a.对方部门id = c.id
and h.收费类别 in ('5', '6', '7')
门诊发药明细
最新推荐文章于 2024-08-16 18:39:05 发布