--Begin-- 病人预约就诊查询 -- 2011-11-04 11:08:50
 
declare 
  V_TEMPID  T_CTLTEMP.F_TEMPID%TYPE; 
begin 
  SELECT COUNT(*) INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='4' AND F_NAMECN='病人预约就诊查询';
  IF V_TEMPID =0 THEN
    SELECT nvl(MAX(F_TEMPID),0)+1 INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='4';
  ELSE
    SELECT F_TEMPID INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='4' AND F_NAMECN='病人预约就诊查询';
  END IF;
DELETE FROM T_TEMPTYPE WHERE F_SYSID='4' AND F_TYPEID='00001';
INSERT INTO T_TEMPTYPE (F_SYSID,F_TYPEID,F_TYPENAME,F_MEMO) VALUES ('4','00001','自定义报表','');
-- T_TEMPTYPE ------------------------------------------
 
DELETE FROM T_CTLTEMP WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLTEMP1 WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLEDIT WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLLABEL WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLLINE WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLDATE WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLCMB WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLCURR WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLGRID WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLGRIDCOL WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_SQLPARAMS WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
DELETE FROM T_SQLLIST WHERE F_SYSID='4' AND F_TEMPID=V_TEMPID;
-- DELETE ------------------------------------------
 
INSERT INTO T_CTLTEMP (F_SYSID,F_TEMPID,F_TEMPTYPE,F_NAMECN,F_CREATEDATE,F_CREATEPERSON,F_DATASRC,F_PACK,F_SQL,F_MODEL,F_MODELDIRECT,F_MODELCOLCOUNT,F_MODELROWCOUNT,F_PRINTER,F_PAPER,F_WIDTH,F_HEIGHT,F_COLOR,F_BORDERCOLOR,F_LOCK,F_ISSYS,F_ZOOM,F_MENUSHOW,F_ORIENTATION,F_MODELCOUNT) VALUES ('4',V_TEMPID,'00001','病人预约就诊查询','2011-8-5 2','实达巨龙','0','0','','0','0','1','1','','A4','2101','2971','16777215','0','0','0','0.1','1','0','');
--T_CTLTEMP------------------------------------------
 
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1000','LABEL','Label0','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1001','LABEL','Label1','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1003','LABEL','Label3','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1004','LABEL','Label4','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2000','EDIT','Edit0','开始日期');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2001','EDIT','Edit1','结束日期');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2003','EDIT','Edit3','页码');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2004','EDIT','Edit4','医院名称');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2005','EDIT','Edit5','总页码');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'7000','GRID','Grid0','网格0');
--T_CTLTEMP1------------------------------------------
 
INSERT INTO T_CTLEDIT (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_FIELD,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_DATA,F_DECIMAL,F_FORMATFLOAT,F_CAPITAL,F_DIGITAL,F_READONLY,F_PRINT,F_BORDERSTYLE,F_TAB,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_DEFAULT,F_CURRFORMAT,F_FULLPRINT,F_SHOWBTN,F_VISUAL) VALUES ('4',V_TEMPID,'2000','Edit0','开始日期','CS_开始日期','0','2','0','0','0','0','0','0','9','0','1','0','0','235','228','265','56','宋体','0','10','-16777208','','0','0','0','1');
INSERT INTO T_CTLEDIT (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_FIELD,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_DATA,F_DECIMAL,F_FORMATFLOAT,F_CAPITAL,F_DIGITAL,F_READONLY,F_PRINT,F_BORDERSTYLE,F_TAB,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_DEFAULT,F_CURRFORMAT,F_FULLPRINT,F_SHOWBTN,F_VISUAL) VALUES ('4',V_TEMPID,'2001','Edit1','结束日期','CS_结束日期','0','2','0','0','0','0','0','0','9','0','1','0','0','688','225','265','56','宋体','0','10','-16777208','','0','0','0','1');
INSERT INTO T_CTLEDIT (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_FIELD,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_DATA,F_DECIMAL,F_FORMATFLOAT,F_CAPITAL,F_DIGITAL,F_READONLY,F_PRINT,F_BORDERSTYLE,F_TAB,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_DEFAULT,F_CURRFORMAT,F_FULLPRINT,F_SHOWBTN,F_VISUAL) VALUES ('4',V_TEMPID,'2003','Edit3','页码','XT_PAGE','1','2','0','0','0','0','0','0','9','0','1','0','0','1431','225','185','56','宋体','0','10','-16777208','','0','0','0','1');
INSERT INTO T_CTLEDIT (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_FIELD,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_DATA,F_DECIMAL,F_FORMATFLOAT,F_CAPITAL,F_DIGITAL,F_READONLY,F_PRINT,F_BORDERSTYLE,F_TAB,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_DEFAULT,F_CURRFORMAT,F_FULLPRINT,F_SHOWBTN,F_VISUAL) VALUES ('4',V_TEMPID,'2004','Edit4','医院名称','XT_HOSNAME','1','2','0','0','0','0','0','0','9','0','1','0','0','463','95','688','103','宋体','1','14','-16777208','','0','1','0','1');
INSERT INTO T_CTLEDIT (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_FIELD,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_DATA,F_DECIMAL,F_FORMATFLOAT,F_CAPITAL,F_DIGITAL,F_READONLY,F_PRINT,F_BORDERSTYLE,F_TAB,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_DEFAULT,F_CURRFORMAT,F_FULLPRINT,F_SHOWBTN,F_VISUAL) VALUES ('4',V_TEMPID,'2005','Edit5','总页码','XT_TOTALPAGE','0','2','0','0','0','0','0','0','9','0','1','0','0','1699','225','235','56','宋体','0','10','-16777208','','0','0','0','1');
--T_CTLEDIT------------------------------------------
 
INSERT INTO T_CTLLABEL (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_FIELD,F_CAPTION,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_PRINT,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_VISUAL) VALUES ('4',V_TEMPID,'1000','Label0','','开始日期','0','2','0','0','1','69','230','151','56','宋体','00','10','-16777208','1');
INSERT INTO T_CTLLABEL (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_FIELD,F_CAPTION,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_PRINT,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_VISUAL) VALUES ('4',V_TEMPID,'1001','Label1','','结束日期','0','2','0','0','1','519','225','156','58','宋体','00','10','-16777208','1');
INSERT INTO T_CTLLABEL (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_FIELD,F_CAPTION,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_PRINT,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_VISUAL) VALUES ('4',V_TEMPID,'1003','Label3','','           /','0','2','0','0','1','1445','225','527','56','宋体','00','10','-16777208','1');
INSERT INTO T_CTLLABEL (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_FIELD,F_CAPTION,F_HALIGN,F_VALIGN,F_DISPERSE,F_MULLINE,F_PRINT,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FONTNAME,F_FONTSTYLE,F_FONTSIZE,F_FONTCOLOR,F_VISUAL) VALUES ('4',V_TEMPID,'1004','Label4','','病人预约就诊情况表','0','2','0','0','1','1151','95','497','98','宋体','10','14','-16777208','1');
--T_CTLLABEL------------------------------------------
 
--T_CTLLINE------------------------------------------
 
--T_CTLDATE------------------------------------------
 
--T_CTLCMB------------------------------------------
 
--T_CTLCURR------------------------------------------
 
INSERT INTO T_CTLGRID (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_NAMECN,F_PACK,F_SQL,F_MASTERFIELD,F_FIXROWS,F_ROWS,F_COLS,F_FIXCOLOR,F_DETAILCOLOR,F_LINECOLOR,F_VISUAL,F_LEFT,F_TOP,F_WIDTH,F_HEIGHT,F_FIXHEIGHT,F_DETAILHEIGHT,F_FONTNAME1,F_FONTSTYLE1,F_FONTSIZE1,F_FONTCOLOR1,F_FONTNAME2,F_FONTSTYLE2,F_FONTSIZE2,F_FONTCOLOR2,F_PRINTHEADER,F_PRINTDETAIL,F_PRINTCOLOR,F_PRINTVLINE,F_PRINTHLINE,F_INTERVAL,F_BORDERSTYLE,F_BORDERCOLOR,F_FILLALL,F_CURRENCY,F_CURRSYMBOL,F_CURRDIGITAL,F_CURRDECIMAL,F_SQL1) VALUES ('4',V_TEMPID,'7000','Grid0','网格0','0',' select * from (select decode(grouping(bb.BMMC00),1,''门诊科室合计'',bb.BMMC00) BMMC00,count(*) YYBRS0,nvl(sum(YYFCBZ),0) as YYFCRS,round(nvl(sum(YYFCBZ),0)*100/decode(count(*),0,1,count(*)),2) YYFCBL from   (select a.BRID00,a.GHKS00,        decode(sign((select count(*) from SF_BRXXB0 where BRID00=a.BRID00 and GHKS00=a.GHKS00 and GHRQ00>=a.YYKBRQ                and GHRQ00<=to_char(to_date(a.YYKBRQ,''YYYYMMDD'')+YYJZTS,''YYYYMMDD'') and rownum=1)),1,1,0) as YYFCBZ  from VW_YS_MZBRYYQKB a where a.GHRQ00>=:开始日期 and a.GHRQ00<=:结束日期 and a.MZZYBZ=0 and 0=:统计方式) aa,BM_BMBM00 bb where aa.GHKS00=bb.BMBH00(+)   group by rollup(bb.BMMC00) order by bb.BMMC00)   union all select * from (select ''住院病人预约'',count(*) YYBRS0,nvl(sum(YYFCBZ),0) as YYFCRS,round(nvl(sum(YYFCBZ),0)*100/decode(count(*),0,1,count(*)),2) YYFCBL from  ( select a.BRID00,        decode(sign((select count(*) from SF_BRXXB0 c,BM_BRXXB0 b where b.BRXM00=a.BRXM00 and b.BRID00=c.BRID00 and c.GHRQ00>=a.YYKBRQ                and c.GHRQ00<=to_char(to_date(a.YYKBRQ,''YYYYMMDD'')+YYJZTS,''YYYYMMDD'') and rownum=1)),1,1,0) as YYFCBZ  from VW_YS_MZBRYYQKB a where a.GHRQ00>=:开始日期 and a.GHRQ00<=:结束日期 and a.MZZYBZ=1 and 1=:统计方式) ) where 1=:统计方式','','1','1','4','-16777201','13428940','536870911','1','56','299','1889','2582','80','50','宋体','0','11','-16777208','宋体','0','10','-16777208','1','1','0','1','1','1','0','0','0','0','','9','2','');
--T_CTLGRID------------------------------------------
 
INSERT INTO T_CTLGRIDCOL (F_SYSID,F_TEMPID,F_SEQUENCE,F_COLID,F_COLFIELD,F_COLCAPTION,F_COLALIGN,F_COLWIDTH,F_COLFIXED,F_COLVISUAL,F_COLPRINT,F_COLDATANAME,F_COLPAGETYPE,F_COLDATATYPE) VALUES ('4',V_TEMPID,'7000','0','BMMC00','科室名称','0','868','0','1','1','','0','0');
INSERT INTO T_CTLGRIDCOL (F_SYSID,F_TEMPID,F_SEQUENCE,F_COLID,F_COLFIELD,F_COLCAPTION,F_COLALIGN,F_COLWIDTH,F_COLFIXED,F_COLVISUAL,F_COLPRINT,F_COLDATANAME,F_COLPAGETYPE,F_COLDATATYPE) VALUES ('4',V_TEMPID,'7000','3','YYFCBL','复查率(%)','1','270','0','1','1','','0','0');
INSERT INTO T_CTLGRIDCOL (F_SYSID,F_TEMPID,F_SEQUENCE,F_COLID,F_COLFIELD,F_COLCAPTION,F_COLALIGN,F_COLWIDTH,F_COLFIXED,F_COLVISUAL,F_COLPRINT,F_COLDATANAME,F_COLPAGETYPE,F_COLDATATYPE) VALUES ('4',V_TEMPID,'7000','2','YYFCRS','复查人数','1','352','0','1','1','','0','0');
INSERT INTO T_CTLGRIDCOL (F_SYSID,F_TEMPID,F_SEQUENCE,F_COLID,F_COLFIELD,F_COLCAPTION,F_COLALIGN,F_COLWIDTH,F_COLFIXED,F_COLVISUAL,F_COLPRINT,F_COLDATANAME,F_COLPAGETYPE,F_COLDATATYPE) VALUES ('4',V_TEMPID,'7000','1','YYBRS0','预约病人数','1','318','0','1','1','','0','0');
--T_CTLGRIDCOL------------------------------------------
 
INSERT INTO T_SQLPARAMS (F_SYSID,F_TEMPID,F_SEQUENCE,F_PARAMID,F_PARAMNAME,F_VALUETYPE,F_EDITTYPE,F_COMBOSTR,F_DEFAUL1,F_DEFAULT) VALUES ('4',V_TEMPID,'7000','0','开始日期','0','4','','','');
INSERT INTO T_SQLPARAMS (F_SYSID,F_TEMPID,F_SEQUENCE,F_PARAMID,F_PARAMNAME,F_VALUETYPE,F_EDITTYPE,F_COMBOSTR,F_DEFAUL1,F_DEFAULT) VALUES ('4',V_TEMPID,'7000','1','结束日期','0','4','','','');
INSERT INTO T_SQLPARAMS (F_SYSID,F_TEMPID,F_SEQUENCE,F_PARAMID,F_PARAMNAME,F_VALUETYPE,F_EDITTYPE,F_COMBOSTR,F_DEFAUL1,F_DEFAULT) VALUES ('4',V_TEMPID,'7000','2','统计方式','1','3','0|1||门诊|住院','','');
--T_SQLPARAMS------------------------------------------
 
--T_SQLLIST------------------------------------------
 
commit; 
end; 
--End---病人预约就诊查询