--Begin-- 门诊医疗工作情况分析表 -- 2010-09-07 16:12:03
 
declare 
  V_TEMPID  T_CTLTEMP.F_TEMPID%TYPE; 
begin 
  SELECT COUNT(*) INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='B' AND F_NAMECN='门诊医疗工作情况分析表';
  IF V_TEMPID =0 THEN
    SELECT nvl(MAX(F_TEMPID),0)+1 INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='B';
  ELSE
    SELECT F_TEMPID INTO V_TEMPID FROM T_CTLTEMP WHERE F_SYSID='B' AND F_NAMECN='门诊医疗工作情况分析表';
  END IF;
DELETE FROM T_TEMPTYPE WHERE F_SYSID='B' AND F_TYPEID='00003';
INSERT INTO T_TEMPTYPE (F_SYSID,F_TYPEID,F_TYPENAME,F_MEMO) VALUES ('B','00003','自定义报表2','');
-- T_TEMPTYPE ------------------------------------------
 
DELETE FROM T_CTLTEMP WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLTEMP1 WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLEDIT WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLLABEL WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLLINE WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLDATE WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLCMB WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLCURR WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLGRID WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_CTLGRIDCOL WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_SQLPARAMS WHERE F_SYSID='B' AND F_TEMPID=V_TEMPID;
DELETE FROM T_SQLLIST WHERE F_SYSID='B' 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_ORIENTATION,F_MENUSHOW,F_MODELCOUNT) VALUES ('B',V_TEMPID,'00003','门诊医疗工作情况分析表','2009-4-2 2','管理员','0','0','','0','0','1','1','','A4','2101','2971','16777215','0','0','0','0.1','0','1','');
--T_CTLTEMP------------------------------------------
 
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('B',V_TEMPID,'1000','LABEL','Label0','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('B',V_TEMPID,'1001','LABEL','Label1','');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('B',V_TEMPID,'2000','EDIT','Edit0','编辑框0');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('B',V_TEMPID,'2001','EDIT','Edit1','编辑框1');
INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('B',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 ('B',V_TEMPID,'2000','Edit0','编辑框0','CS_开始时间','0','2','0','0','0','0','0','0','9','0','1','0','0','328','214','307','56','宋体','0','12','-2147483640','','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 ('B',V_TEMPID,'2001','Edit1','编辑框1','CS_结束时间','0','2','0','0','0','0','0','0','9','0','1','0','0','709','217','251','56','宋体','0','12','-2147483640','','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 ('B',V_TEMPID,'1000','Label0','','福州经济技术开发区医院','0','2','1','0','1','497','122','1069','77','宋体','00','12','-2147483640','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 ('B',V_TEMPID,'1001','Label1','','（    -    ）门诊医疗工作情况分析表','1','2','1','0','1','265','201','1558','82','宋体','00','12','-2147483640','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 ('B',V_TEMPID,'7000','Grid0','网格0','0','select A.* from ( select   decode(grouping(f.bmmc00),1,''总合计'',decode(grouping(k.zwxm00),1,f.bmmc00||''小计'',f.bmmc00)) bmmc00,   decode(grouping(f.bmmc00),1,'''',0,decode(grouping(k.zwxm00),1,'''',k.zwxm00),k.zwxm00) zwxm00,  decode(grouping(f.bmmc00),1,'''',0,decode(grouping(k.zwxm00),1,'''',m.yslbmc),m.yslbmc) yslbmc,   count(distinct a.ghid00) 门诊人次,SF_MZYLGZQK(:开始时间,:结束时间,''1'',k.ygbh00,f.bmmc00) rczz,  round(sum(decode(c.kdys00,k.ygbh00,c.hjje00,0))/sum(decode(c.kdys00,k.ygbh00,1,0)),2) mzpjfy,  SF_MZYLGZQK(:开始时间,:结束时间,''2'',k.ygbh00,f.bmmc00) pjzz,  round(sum(decode(E.FPXMID,1,C.HJJE00,2,C.HJJE00,3,C.hjje00,0))/count(distinct a.ghid00),2) yppjfy,  SF_MZYLGZQK(:开始时间,:结束时间,''3'',k.ygbh00,f.bmmc00) ypzz,  round(sum(decode(E.FPXMID,1,C.HJJE00,2,C.HJJE00,3,C.hjje00,0))/sum(decode(c.hjje00,0,1,c.hjje00)),4)*100 ypbl,  SF_MZYLGZQK(:开始时间,:结束时间,''4'',k.ygbh00,f.bmmc00) blzz  from sf_brxxb0 a,sf_brfy00 b,sf_fymx00 c,bm_yysfxm d,bm_fpxm00 e, bm_bmbm00 f,bm_ygbm00 k,bm_yslb00 m  where a.ghid00=b.mzid00 and b.djh000=c.djh000 and c.xmbh00=d.sfxmid  and d.mzfpid=e.fpxmid  and c.kdks00=f.bmbh00   and c.kdys00=k.ygbh00  and b.czrq00>=:开始时间   and b.czrq00<=:结束时间 and (m.yslb00=nvl(k.yslb00,3))     GROUP BY rollup(f.bmmc00,k.zwxm00,k.ygbh00,m.yslbmc) having  not (yslbmc is  null and zwxm00 is not null))A order by bmmc00','','1','1','11','-2147483633','-2147483643','536870911','1','140','323','1855','2355','80','50','宋体','0','11','-2147483640','宋体','0','10','-2147483640','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','0','BMMC00','门诊科室','2','201','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','1','ZWXM00','医   生','2','180','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','2','YSLBMC','专业技术职称','1','191','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','3','门诊人次','门诊人次','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','4','RCZZ','同比增长（％）','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','10','BLZZ','同比增长（％）','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','6','PJZZ','同比增长（％）','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','7','YPPJFY','药品平均费用','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','8','YPZZ','同比增长（％）','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','9','YPBL','药品比率（％）','1','159','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_COLPAGETYPE,F_COLDATATYPE,F_COLDATANAME) VALUES ('B',V_TEMPID,'7000','5','MZPJFY','门诊次均费用','1','159','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_DEFAULT,F_DEFAUL1) VALUES ('B',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_DEFAULT,F_DEFAUL1) VALUES ('B',V_TEMPID,'7000','1','结束时间','0','4','','','');
--T_SQLPARAMS------------------------------------------
 
--T_SQLLIST------------------------------------------
 
commit; 
end; 
--End---门诊医疗工作情况分析表