Select '住院发生' As 性质, Trunc(a.登记时间, 'yyyy') As 年度, c.住院号 就诊号, a.姓名, d.身份证号, c.医疗付款方式 人员类型, nvl(Nvl(c.工作单位, d.工作单位),c.家庭地址) As 工作单位, /*d.医保号 个人编号, */
decode(h1.诊断描述,Null,Null,'1.'||h1.诊断描述)||decode(h2.诊断描述,Null,Null,';2.'||h2.诊断描述) ||decode(h3.诊断描述,Null,Null,';3.'||h3.诊断描述)||decode(h4.诊断描述,Null,Null,';4.'||h4.诊断描述)||decode(h5.诊断描述,Null,Null,';5.'||h5.诊断描述) 门诊诊断,
decode(i1.诊断描述,Null,Null,'1.'||i1.诊断描述)||decode(i2.诊断描述,Null,Null,';2.'||i2.诊断描述) ||decode(i3.诊断描述,Null,Null,';3.'||i3.诊断描述)||decode(i4.诊断描述,Null,Null,';4.'||i4.诊断描述)||decode(i5.诊断描述,Null,Null,';5.'||i5.诊断描述) 入院诊断,
decode(j1.诊断描述,Null,Null,'1.'||j1.诊断描述)||decode(j2.诊断描述,Null,Null,';2.'||j2.诊断描述) ||decode(j3.诊断描述,Null,Null,';3.'||j3.诊断描述)||decode(j4.诊断描述,Null,Null,';4.'||j4.诊断描述)||decode(j5.诊断描述,Null,Null,';5.'||j5.诊断描述)||
decode(j6.诊断描述,Null,Null,'6.'||j6.诊断描述)||decode(j7.诊断描述,Null,Null,';7.'||j7.诊断描述) ||decode(j8.诊断描述,Null,Null,';8.'||j8.诊断描述)||decode(j9.诊断描述,Null,Null,';9.'||j9.诊断描述)||decode(j10.诊断描述,Null,Null,';10.'||j10.诊断描述) 出院诊断,
c.入院日期, c.出院日期, f.收费时间 结算时间, b.编码 项目编码, b.名称 项目名称, a.标准单价 项目单价, Nvl(a.付数, 1) * 数次 项目数量, a.结帐金额 收费金额,
a.登记时间 计费时间, e.名称 开单科室, a.开单人 开单医生, g.记录id As 医保结算id, 支付顺序号, g.就诊流水号, g.医疗类别, g.冲销时间,
Case When g.记录id Is Null Then '未通过医保结算' End As 医保
From 住院费用记录 a,(Select Id, 编码, 名称 From 收费项目目录 Where 名称 Like '%穴位埋线%' Or 名称 Like '%配镜费%') b, 病案主页 c, 病人信息 d, 部门表 e, 病人结帐记录 f, 保险结算记录 g,
病人诊断记录 H1,病人诊断记录 H2,病人诊断记录 H3,病人诊断记录 H4,病人诊断记录 H5,
病人诊断记录 i1,病人诊断记录 i2,病人诊断记录 i3,病人诊断记录 i4,病人诊断记录 i5,
病人诊断记录 j1,病人诊断记录 j2,病人诊断记录 j3,病人诊断记录 j4,病人诊断记录 j5,病人诊断记录 j6,病人诊断记录 j7,病人诊断记录 j8,病人诊断记录 j9,病人诊断记录 j10
Where a.收费细目id = b.Id And a.病人id = c.病人id And a.主页id = c.主页id And a.病人id = d.病人id And a.开单部门id = e.Id
And a.结帐id = f.Id(+) And f.Id = g.记录id(+) And g.冲销id(+) Is Null
And a.病人id = H1.病人id(+) And a.主页id = H1.主页id(+) And H1.记录来源(+) = 3 And H1.诊断类型(+) = 1 And H1.诊断次序(+) = 1 And H1.编码序号(+) = 1
And a.病人id = h2.病人id(+) And a.主页id = h2.主页id(+) And h2.记录来源(+) = 3 And h2.诊断类型(+) = 1 And h2.诊断次序(+) = 2 And h2.编码序号(+) = 1
And a.病人id = h3.病人id(+) And a.主页id = h3.主页id(+) And h3.记录来源(+) = 3 And h3.诊断类型(+) = 1 And h3.诊断次序(+) = 3 And h3.编码序号(+) = 1
And a.病人id = h4.病人id(+) And a.主页id = h4.主页id(+) And h4.记录来源(+) = 3 And h4.诊断类型(+) = 1 And h4.诊断次序(+) = 4 And h4.编码序号(+) = 1
And a.病人id = h5.病人id(+) And a.主页id = h5.主页id(+) And h5.记录来源(+) = 3 And h5.诊断类型(+) = 1 And h5.诊断次序(+) = 5 And h5.编码序号(+) = 1
And a.病人id = i1.病人id(+) And a.主页id = i1.主页id(+) And i1.记录来源(+) = 3 And i1.诊断类型(+) = 2 And i1.诊断次序(+) = 1 And i1.编码序号(+) = 1
And a.病人id = i2.病人id(+) And a.主页id = i2.主页id(+) And i2.记录来源(+) = 3 And i2.诊断类型(+) = 2 And i2.诊断次序(+) = 2 And i2.编码序号(+) = 1
And a.病人id = i3.病人id(+) And a.主页id = i3.主页id(+) And i3.记录来源(+) = 3 And i3.诊断类型(+) = 2 And i3.诊断次序(+) = 3 And i3.编码序号(+) = 1
And a.病人id = i4.病人id(+) And a.主页id = i4.主页id(+) And i4.记录来源(+) = 3 And i4.诊断类型(+) = 2 And i4.诊断次序(+) = 4 And i4.编码序号(+) = 1
And a.病人id = i5.病人id(+) And a.主页id = i5.主页id(+) And i5.记录来源(+) = 3 And i5.诊断类型(+) = 2 And i5.诊断次序(+) = 5 And i5.编码序号(+) = 1
And a.病人id = j1.病人id(+) And a.主页id = j1.主页id(+) And j1.记录来源(+) = 3 And j1.诊断类型(+) = 3 And j1.诊断次序(+) = 1 And j1.编码序号(+) = 1
And a.病人id = j2.病人id(+) And a.主页id = j2.主页id(+) And j2.记录来源(+) = 3 And j2.诊断类型(+) = 3 And j2.诊断次序(+) = 2 And j2.编码序号(+) = 1
And a.病人id = j3.病人id(+) And a.主页id = j3.主页id(+) And j3.记录来源(+) = 3 And j3.诊断类型(+) = 3 And j3.诊断次序(+) = 3 And j3.编码序号(+) = 1
And a.病人id = j4.病人id(+) And a.主页id = j4.主页id(+) And j4.记录来源(+) = 3 And j4.诊断类型(+) = 3 And j4.诊断次序(+) = 4 And j4.编码序号(+) = 1
And a.病人id = j5.病人id(+) And a.主页id = j5.主页id(+) And j5.记录来源(+) = 3 And j5.诊断类型(+) = 3 And j5.诊断次序(+) = 5 And j5.编码序号(+) = 1
And a.病人id = j6.病人id(+) And a.主页id = j6.主页id(+) And j6.记录来源(+) = 3 And j6.诊断类型(+) = 3 And j6.诊断次序(+) = 6 And j6.编码序号(+) = 1
And a.病人id = j7.病人id(+) And a.主页id = j7.主页id(+) And j7.记录来源(+) = 3 And j7.诊断类型(+) = 3 And j7.诊断次序(+) = 7 And j7.编码序号(+) = 1
And a.病人id = j8.病人id(+) And a.主页id = j8.主页id(+) And j8.记录来源(+) = 3 And j8.诊断类型(+) = 3 And j8.诊断次序(+) = 8 And j8.编码序号(+) = 1
And a.病人id = j9.病人id(+) And a.主页id = j9.主页id(+) And j9.记录来源(+) = 3 And j9.诊断类型(+) = 3 And j9.诊断次序(+) = 9 And j9.编码序号(+) = 1
And a.病人id = j10.病人id(+) And a.主页id = j10.主页id(+) And j10.记录来源(+) = 3 And j10.诊断类型(+) = 3 And j10.诊断次序(+) = 10 And j10.编码序号(+) = 1
And a.登记时间 Between /*B0*/ to_date('2023/01/01 23:59:59','yyyy/mm/dd hh24:mi:ss') /*E0*/ And /*B1*/ to_date('2025/12/31 23:59:59','yyyy/mm/dd hh24:mi:ss') /*E1*/
Union All
Select '门诊收费' As 性质, Trunc(a.登记时间, 'yyyy') As 年度, c2.门诊号 就诊号, a.姓名, d.身份证号, Null 人员类型, nvl(d.工作单位,d.家庭地址) As 工作单位, /*d.医保号 个人编号, */
decode(h1.诊断描述,Null,Null,'1.'||h1.诊断描述)||decode(h2.诊断描述,Null,Null,';2.'||h2.诊断描述) ||decode(h3.诊断描述,Null,Null,';3.'||h3.诊断描述)||decode(h4.诊断描述,Null,Null,';4.'||h4.诊断描述)||decode(h5.诊断描述,Null,Null,';5.'||h5.诊断描述) 门诊诊断,Null 入院诊断,
null 出院诊断,Null 入院日期, Null 出院日期, a.登记时间 结算时间, b.编码 项目编码, b.名称 项目名称, a.标准单价 项目单价, Nvl(a.付数, 1) * 数次 项目数量, a.结帐金额 收费金额,
a.登记时间 计费时间, e.名称 开单科室, a.开单人 开单医生, g.记录id As 医保结算id, 支付顺序号, g.就诊流水号, g.医疗类别, g.冲销时间,
Case When g.记录id Is Null Then '未通过医保结算' End As 医保
From 门诊费用记录 a,(Select Id, 编码, 名称 From 收费项目目录 Where 名称 Like '%穴位埋线%' Or 名称 Like '%配镜费%') b, 病人医嘱记录 c1,病人挂号记录 c2, 病人信息 d, 部门表 e, 保险结算记录 g,
病人诊断记录 H1,病人诊断记录 H2,病人诊断记录 H3,病人诊断记录 H4,病人诊断记录 H5
Where a.收费细目id = b.Id And a.病人id = c1.病人id And a.医嘱序号 = c1.Id And c1.病人id =c2.病人id(+) And c1.挂号单=c2.No(+) And a.病人id = d.病人id And a.开单部门id = e.Id
And a.结帐id = g.记录id(+) And g.冲销id(+) Is Null
And c2.病人id = H1.病人id(+) And c2.Id = H1.主页id(+) And H1.记录来源(+) = 3 And H1.诊断类型(+) = 1 And H1.诊断次序(+) = 1
And c2.病人id = h2.病人id(+) And c2.Id = h2.主页id(+) And h2.记录来源(+) = 3 And h2.诊断类型(+) = 1 And h2.诊断次序(+) = 2
And c2.病人id = h3.病人id(+) And c2.id = h3.主页id(+) And h3.记录来源(+) = 3 And h3.诊断类型(+) = 1 And h3.诊断次序(+) = 3
And c2.病人id = h4.病人id(+) And c2.id = h4.主页id(+) And h4.记录来源(+) = 3 And h4.诊断类型(+) = 1 And h4.诊断次序(+) = 4
And c2.病人id = h5.病人id(+) And c2.id = h5.主页id(+) And h5.记录来源(+) = 3 And h5.诊断类型(+) = 1 And h5.诊断次序(+) = 5
And a.记录性质 = 1 And a.记录状态 <> 0 And Nvl(a.执行状态, 0) <> 9 And a.登记时间 Between /*B0*/to_date('2023/01/01 23:59:59','yyyy/mm/dd hh24:mi:ss') /*E0*/ And /*B1*/ to_date('2025/12/31 23:59:59','yyyy/mm/dd hh24:mi:ss') /*E1*/
最新发布