--存放重证评分的数据表
create table ZZPFapache2
(
  ZZ_datetime DATE,   --时间
  ZZ_zongfen INTEGER, --总分
  ZZ_shiwanglui INTEGER, --死亡率 
  ZZ_BINGRENID VARCHAR2(50), --病人ID
  ZZ_h1f1 INTEGER,  --第1行1个分
  ZZ_h1m1 VARCHAR2(40),
  ZZ_h1f2 INTEGER,  --第1行2个分
  ZZ_h1m2 VARCHAR2(40),
  ZZ_h2f1 INTEGER,  --第2行1个分
  ZZ_h2m1 VARCHAR2(40),
  ZZ_h2f2 INTEGER,  --第2行2个分
  ZZ_h2m2 VARCHAR2(40),
  ZZ_h2f3 INTEGER,  --第2行3个分
  ZZ_h2m3 VARCHAR2(40),
  ZZ_h3f1 INTEGER,  --第3行1个分
  ZZ_h3m1 VARCHAR2(40),
  ZZ_h3f2 INTEGER,  --第3行2个分
  ZZ_h3m2 VARCHAR2(40),
  ZZ_h3f3 INTEGER,  --第3行3个分
  ZZ_h3m3 VARCHAR2(40),
  ZZ_h4f1 INTEGER,  --第4行1个分
  ZZ_h4m1 VARCHAR2(40),
  ZZ_h4f2 INTEGER,  --第4行2个分
  ZZ_h4m2 VARCHAR2(40),
  ZZ_h4f3 INTEGER,  --第4行3个分
  ZZ_h4m3 VARCHAR2(40),
  ZZ_h5f1 INTEGER,  --第5行1个分
  ZZ_h5m1 VARCHAR2(40),
  ZZ_h5f2 INTEGER,  --第5行2个分
  ZZ_h5m2 VARCHAR2(40),
  ZZ_h5f3 INTEGER,  --第5行3个分
  ZZ_h5m3 VARCHAR2(40),
  ZZ_h6f1 INTEGER,  --第6行1个分
  ZZ_h6m1 VARCHAR2(40),
  ZZ_h6f2 INTEGER,  --第6行2个分
  ZZ_h6m2 VARCHAR2(40),
  ZZ_h7f1 INTEGER,  --第7行1个分
  ZZ_h7m1 VARCHAR2(40),
  ZZ_h7f2 INTEGER,  --第6行2个分
  ZZ_h7m2 VARCHAR2(40),
  ZZ_h8f1 INTEGER,  --第8行1个分
  ZZ_h8m1 VARCHAR2(40),
  ZZ_h8f2 INTEGER,  --第8行2个分
  ZZ_h8m2 VARCHAR2(40),
  ZZ_f1 INTEGER,  --复选第1个分
  ZZ_f2 INTEGER,  --复选第2个分
  ZZ_f3 INTEGER,  --复选第3个分
  ZZ_f4 INTEGER,  --复选第4个分
  ZZ_f5 INTEGER,  --复选第5个分
  ZZ_GUserID VARCHAR2(40),
  ZZ_GUserName VARCHAR2(40)
)
tablespace TS_IMIS
  pctfree 10
  initrans 1
  maxtrans 255
  storage
  (
    initial 64K
    minextents 1
    maxextents unlimited
  );

--存放重症评分竖排数据视图
create or replace view zzpfdy as
select "ZZ_BINGRENID","ZZ_DATETIME","SUBJECT1","RESULT" from
(
  select 1 line,ZZ_BINGRENID,ZZ_DATETIME ,  '得分' SUBJECT1, ZZ_ZONGFEN result from zzpfapache2
  union all
  select 2 line,ZZ_BINGRENID,ZZ_DATETIME ,  '死亡率'SUBJECT1, ZZ_SHIWANGLUI result from zzpfapache2
  union all
  select 3 line,ZZ_BINGRENID,ZZ_DATETIME ,  '年龄'SUBJECT1, ZZ_H1F1 result from zzpfapache2
    union all
  select 4 line,ZZ_BINGRENID,ZZ_DATETIME ,  '有严重慢性器官系统功能不全'SUBJECT1,ZZ_H1F2 result from zzpfapache2
    union all
  select 5 line,ZZ_BINGRENID,ZZ_DATETIME ,  '睁眼反应' SUBJECT1 ,ZZ_H2F1 result from zzpfapache2
    union all
  select 6 line,ZZ_BINGRENID,ZZ_DATETIME ,  '言语反应' SUBJECT1,ZZ_H2F2 result from zzpfapache2
    union all
  select 7 line,ZZ_BINGRENID,ZZ_DATETIME ,  '运动反应' SUBJECT1,ZZ_H2F3 result from zzpfapache2
    union all
  select 8 line,ZZ_BINGRENID,ZZ_DATETIME ,  '体温'SUBJECT1,ZZ_H3F1 result from zzpfapache2
    union all
  select 9 line,ZZ_BINGRENID,ZZ_DATETIME ,  '平均血压(mmHg)'SUBJECT1, ZZ_H3F2 result from zzpfapache2
    union all
  select 10 line,ZZ_BINGRENID,ZZ_DATETIME , '心率(次/分)'SUBJECT1 , ZZ_H3F3 result from zzpfapache2
    union all
  select 11 line,ZZ_BINGRENID,ZZ_DATETIME , '呼吸(次/分)'SUBJECT1 ,ZZ_H4F1 result from zzpfapache2
      union all
  select 12 line,ZZ_BINGRENID,ZZ_DATETIME , 'FIO2' SUBJECT1,ZZ_H4F2 result from zzpfapache2
    union all
 select 13 line,ZZ_BINGRENID,ZZ_DATETIME ,  '血清HCO3(无ABGs)(mmol/L)' SUBJECT1,ZZ_H4F3 result from zzpfapache2
   union all
  select 14 line,ZZ_BINGRENID,ZZ_DATETIME , '血清Na(mmol/L)' SUBJECT1,ZZ_H5F1 result from zzpfapache2
    union all
  select 15 line,ZZ_BINGRENID,ZZ_DATETIME , '血清K(mmol/L)' SUBJECT1,ZZ_H5F2 result from zzpfapache2
    union all
  select 16 line,ZZ_BINGRENID,ZZ_DATETIME , '动脉血PH' SUBJECT1 ,ZZ_H5F3 result from zzpfapache2
    union all
  select 17 line,ZZ_BINGRENID,ZZ_DATETIME , '血细胞比容(%)' SUBJECT1,ZZ_H6F1 result from zzpfapache2
     union all
  select 18 line,ZZ_BINGRENID,ZZ_DATETIME , 'WBC(*1000/mm3)' SUBJECT1,ZZ_H6F2 result from zzpfapache2
     union all
  select 19 line,ZZ_BINGRENID,ZZ_DATETIME , 'Pa02(mmHg...KPa)' SUBJECT1,ZZ_H7F1 result from zzpfapache2
     union all
  select 20 line,ZZ_BINGRENID,ZZ_DATETIME , 'A-aD02(mmHg...KPa)' SUBJECT1,ZZ_H7F2 result from zzpfapache2
    union all
  select 21 line,ZZ_BINGRENID,ZZ_DATETIME , '血清肌酐(mg/dl..micromol/l)' SUBJECT1,ZZ_H8F1 result from zzpfapache2
    union all
  select 22 line,ZZ_BINGRENID,ZZ_DATETIME , '急性肾功能衰竭' SUBJECT1,ZZ_H8F2 result from zzpfapache2
    union all
  select 23 line,ZZ_BINGRENID,ZZ_DATETIME , '有无功能不全免疫损害:肝' SUBJECT1,ZZ_F1 result from zzpfapache2
    union all
  select 24 line,ZZ_BINGRENID,ZZ_DATETIME , '有无功能不全免疫损害:心血管' SUBJECT1,ZZ_F2 result from zzpfapache2
    union all
  select 25 line,ZZ_BINGRENID,ZZ_DATETIME , '有无功能不全免疫损害:呼吸系统' SUBJECT1,ZZ_F3 result from zzpfapache2
    union all
  select 26 line,ZZ_BINGRENID,ZZ_DATETIME , '有无功能不全免疫损害:肾' SUBJECT1,ZZ_F4 result from zzpfapache2
    union all
  select 27 line,ZZ_BINGRENID,ZZ_DATETIME , '有无功能不全免疫损害:免疫抑制状态' SUBJECT1,ZZ_F5 result from zzpfapache2
 ) t
order by ZZ_DATETIME ,line;

--打印时为多列,所以又加入一个多列视图
CREATE OR REPLACE VIEW ZZPFDY2 AS
SELECT
a.subject1,
a.ZZ_DATETIME,a.n, A.ZZ_BINGRENID, A.result,
b.n bn, b.ZZ_BINGRENID bp,b.ZZ_DATETIME bt, B.result as result1,
c.n cn, c.ZZ_BINGRENID cp,c.ZZ_DATETIME ct, c.result as result2,
d.n dn, d.ZZ_BINGRENID dp,d.ZZ_DATETIME dt, d.result as result3,
e.n en, e.ZZ_BINGRENID ep,e.ZZ_DATETIME et, e.result as result4,
f.n fn, f.ZZ_BINGRENID fp,f.ZZ_DATETIME ft, f.result as result5
FROM

(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME,subject1
FROM (SELECT ROWNUM N, result, ZZ_BINGRENID,ZZ_DATETIME,subject1 FROM zzpf
 )
WHERE MOD(FLOOR((N - 1) / 27), 6) = 0
) A,
(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME
FROM (SELECT ROWNUM N, result,ZZ_BINGRENID,ZZ_DATETIME FROM zzpf
 )
WHERE MOD(FLOOR((N - 1) / 27), 6) = 1
) B,
(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME
FROM (SELECT ROWNUM N, result, ZZ_BINGRENID,ZZ_DATETIME FROM zzpf
)
WHERE MOD(FLOOR((N - 1) / 27), 6) = 2
) C,
(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME
FROM (SELECT ROWNUM N, result, ZZ_BINGRENID,ZZ_DATETIME FROM zzpf
)
WHERE MOD(FLOOR((N - 1) / 27), 6) = 3
) D,
(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME
FROM (SELECT ROWNUM N, result, ZZ_BINGRENID,ZZ_DATETIME FROM zzpf
)
WHERE MOD(FLOOR((N - 1) / 27), 6) = 4
) E,
(SELECT N, result, ZZ_BINGRENID,ZZ_DATETIME
FROM (SELECT ROWNUM N, result, ZZ_BINGRENID,ZZ_DATETIME FROM zzpf
)
WHERE MOD(FLOOR((N - 1) / 27), 6) = 5
) F

WHERE A.N + 27  = B.N(+)  and b.N + 27  = c.N(+) and
      c.N + 27  = D.N(+)  and D.N + 27  = E.N(+) and
      e.n + 27  = f.N(+);

--竖排视图与打印视图的中间视图
create or replace view ZZPF as (select * from zzpfdy where ZZ_BINGRENID='1545187')

Oracle-数据实现竖排打印的更多相关文章

  1. uniGUI for C++ builder下如何利用FastReport实现数据记录本地打印

    版权声明:本文为博主原创文章,未经博主允许不得转载. https://blog.csdn.net/dlboy2018/article/details/81040260 (中行雷威2018.7.14于杭 ...

  2. Oracle数据泵(Data Dump)错误汇集

    Oracle数据泵(Data Dump)使用过程当中经常会遇到一些奇奇怪怪的错误案例,下面总结一些自己使用数据泵(Data Dump)过程当中遇到的问题以及解决方法.都是在使用过程中遇到的问题,以后陆 ...

  3. [转]Oracle数据块体系的详细介绍

    数据块概述Oracle对数据库数据文件(datafile)中的存储空间进行管理的单位是数据块(data block).数据块是数据库中最小的(逻辑)数据单位.与数据块对应的,所有数据在操作系统级的最小 ...

  4. oracle数据导入/导出

    Oracle数据导入导出imp/exp 功能:Oracle数据导入导出imp/exp就相当与oracle数据还原与备份.   大多情况都可以用Oracle数据导入导出完成数据的备份和还原(不会造成数据 ...

  5. Oracle数据访问组件ODAC的安装方法

    Oracle数据访问组件ODAC(Oracle Data Access Components)顾名思义就是用来访问Oracle数据库的小程序.我们可以编程调用这些组件来实现在没有安装Oracle数据库 ...

  6. oracle表分区、表分析及oracle数据泵文件导入导出开心版

    1.先说oracle表分区是什么吧,这样吧我们来举个桃子,栗子太小,我们就不举了,我们来举个桃子. 你有500万份文件,你要把他存在磁盘上,好嘛,我们就一个文件夹,500万分文件在那儿杵着,我们想找到 ...

  7. Oracle数据访问组件ODAC的安装方法:

    Oracle数据访问组件ODAC(Oracle Data Access Components)顾名思义就是用来访问Oracle数据库的小程序.我们可以编程调用这些组件来实现在没有安装Oracle数据库 ...

  8. Oracle数据导入导出

    Oracle数据导入导出imp/exp 在oracle安装目录下有EXP.EXE与IMP.EXE这2个文件,他们分别被用来执行数据库的导入导出.所以Oracle数据导入导出imp/exp就相当与ora ...

  9. [转]PLSQL Developer备份恢复oracle数据

    本文转自:http://www.cnblogs.com/iampkm/archive/2013/06/09/3128273.html 使用PL sql提供的功能可以快速的备份恢复oracle数据. 1 ...

  10. oracle数据导出工具sqluldr2

    oracle数据导出工具sqluldr2可以将数据以csv.txt等格式导出,适用于大批量数据的导出,导出速度非常快.导出后可以使用oracle loader工具将数据导入.下载完sqluldr2,工 ...

随机推荐

  1. Fetching android sdk component information

    原文地址: Android Studio安装以及Fetching android sdk component information超时的解决方案 - sonyi - 博客园 http://www.c ...

  2. 190. Reverse Bits

    题目: Reverse bits of a given 32 bits unsigned integer. For example, given input 43261596 (represented ...

  3. 最短路径算法之三——Bellman-Ford算法

    Bellman-Ford算法 Dijkstra算法无法判断含负权边的图的最短路. 如果遇到负权,在没有负权回路存在时,即便有负权的边,也可以采用Bellman-Ford算法正确求出最短路径. PS:负 ...

  4. UVA 10041 Vito's Family (中位数)

      Problem C: Vito's family  Background The world-known gangster Vito Deadstone is moving to New York ...

  5. 比nerdtree更好的文件浏览器:vimfiler

    通过:VimFilerExplorer来打开一个文件浏览器 h:收起 t:展开 -:close 回车:进入或展开 空格:收起

  6. JavaScript DOM高级程序设计 3.-DOM2和HTML2--我要坚持到底!

    由一个HTML进行说明,我就不敲了,直接copy <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" " ...

  7. CodeWars题目筛选

    http://www.codewars.com/kata/search/csharp?q=&r%5B%5D=-8&xids=completed&beta=false 语言选择C ...

  8. mysql 幻读

    幻读(Phantom Read) 是指当用户读取某一范围的数据行时,B事务在该范围内插入了新行,当用户再读取该范围的数据行时,会发现有新的“幻影”行.InnoDB和Falcon存储引擎通 过多版本并发 ...

  9. NOI2004 小H的小屋

    还是纯粹不会啊……到底该怎么办 http://blog.sina.com.cn/s/blog_86942b1401016m3g.html http://www.cnblogs.com/datam-cy ...

  10. PHP超大文件下载,断点续传下载

    源代码: <?php $sourceFile = "1.tmp"; //要下载的临时文件名 $outFile = "用户订单.xls"; //下载保存到客 ...