--Begin-- 预约挂号收入查询 -- 2011-08-15 08:53:25 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_ORIENTATION,F_MENUSHOW,F_MODELCOUNT) VALUES ('4',V_TEMPID,'00001','预约挂号收入查询','2010-3-29','实达巨龙','0','0','','0','0','1','1','','A4','1802','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 ('4',V_TEMPID,'1005','LABEL','Label5',''); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1006','LABEL','Label6',''); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1007','LABEL','Label7',''); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'1008','LABEL','Label8',''); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2005','EDIT','Edit5','编辑框5'); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2006','EDIT','Edit6','编辑框6'); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2007','EDIT','Edit7','编辑框7'); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2008','EDIT','Edit8','编辑框8'); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'2009','EDIT','Edit9','编辑框9'); INSERT INTO T_CTLTEMP1 (F_SYSID,F_TEMPID,F_SEQUENCE,F_CONTROLTYPE,F_NAMEEG,F_NAMECN) VALUES ('4',V_TEMPID,'3000','LINE','Line0',''); 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,'2005','Edit5','编辑框5','CS_开始日期','0','2','0','0','0','0','0','0','9','0','1','0','0','415','280','265','50','宋体','0','10','-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 ('4',V_TEMPID,'2006','Edit6','编辑框6','CS_截至日期','0','2','0','0','0','0','0','0','9','0','1','0','0','736','275','265','56','宋体','0','10','-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 ('4',V_TEMPID,'2007','Edit7','编辑框7','XT_DAY','0','2','0','0','0','0','0','0','9','0','1','0','0','1159','2394','368','56','宋体','0','10','-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 ('4',V_TEMPID,'2008','Edit8','编辑框8','XT_YGXM','0','2','0','0','0','0','0','0','9','0','1','0','0','452','2394','265','56','宋体','0','10','-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 ('4',V_TEMPID,'2009','Edit9','编辑框9','CS_分院','0','2','0','0','0','0','0','0','9','0','1','0','0','1050','124','257','56','宋体','1','10','-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 ('4',V_TEMPID,'1005','Label5','','门诊预约挂号收入报表','0','2','0','0','1','505','122','545','56','宋体','10','14','-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 ('4',V_TEMPID,'1006','Label6','','统计时间:','0','2','0','0','1','249','280','164','56','宋体','00','10','-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 ('4',V_TEMPID,'1007','Label7','','制表人:','0','2','0','0','1','312','2394','135','56','宋体','00','10','-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 ('4',V_TEMPID,'1008','Label8','','制表日期:','0','2','0','0','1','1000','2394','156','56','宋体','00','10','-2147483640','1'); --T_CTLLABEL------------------------------------------ INSERT INTO T_CTLLINE (F_SYSID,F_TEMPID,F_SEQUENCE,F_NAMEEG,F_FIELD,F_COLOR,F_PRINT,F_LEFT,F_TOP,F_DIRECTION,F_LENGTH,F_THICKNESS,F_VISUAL) VALUES ('4',V_TEMPID,'3000','Line0','','0','1','683','299','1','45','1','1'); --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 yyksmc,yyysxm,yyysbh,count(yyid00) as yyl000 from sf_yybrb0 where yyrq00 between :开始日期 and :截至日期 and yyzt00 in (''1'',''3'') and yyksbh in (select bmbh00 from bm_bmbm00 where yyid00 in (:分院)) group by yyksmc,yyysxm,yyysbh order by yyl000 desc','','1','1','3','16777215','-2147483643','536870911','1','238','344','1336','2016','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 ('4',V_TEMPID,'7000','0','YYKSMC','科室名称','0','426','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 ('4',V_TEMPID,'7000','2','YYL000','预约就诊量','0','431','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 ('4',V_TEMPID,'7000','1','YYYSXM','预约医生','0','466','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 ('4',V_TEMPID,'7000','0','开始日期','2','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 ('4',V_TEMPID,'7000','1','截至日期','2','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 ('4',V_TEMPID,'7000','2','分院','0','3','A'',''B'',''C'',''D|A|B|C|D||全部|本部|二化分院|康复分院|体检中心','',''); --T_SQLPARAMS------------------------------------------ --T_SQLLIST------------------------------------------ commit; end; --End---预约挂号收入查询