--增加分类
GO
IF not EXISTS(SELECT * FROM SYS_ScriptCategories WHERE id=1)
insert into SYS_ScriptCategories(ID,Code,Name,ComponentID,xRowNum,ParentID,xLevel,Description)  Values(1, 'SC1', 'HOMaster 基础管理', 1, 0, 0, 0, Null)
else
print 'SYS_ScriptCategories.id=1 已经存在.'

GO


--删除旧记录
delete from SYS_Scripts where id=5225 --删除脚本内容
GO


GO
IF not EXISTS(SELECT * FROM SYS_Scripts WHERE id=5225)
insert into SYS_Scripts(ID,CategoryID,Code,Name,Description,xType,DatasourceID,DisplayNames,xRowNum,xText,UpdateDate,UpdateUser,UpdateMode)  Values(5225, 85, 'SQL_挂号类别预约', '检索挂号类别(预约)', '检索挂号类别(预约)', 1, 0, '<?xml version="1.0"?>
<Configs Ver="1"><Win SZ="1"/><Grid Head="1" UseW="1"><Sql>Declare @Date datetime ,
        @ltime varchar(10) ,
        @CurrTime Datetime,
        @DateNum int    
 
SET @CurrTime = ''%s''      
If @CurrTime =''''
  SET @CurrTime =getdate()  

SELECT @DateNum =datediff(day,''2000-01-02'', @CurrTime) %% 7 + 1
SELECT @ltime = convert(varchar(10),@CurrTime , 108)
--当天取当前时间
If @ltime =''00:00:00'' and DATEDIFF(DAY , @Currtime ,getdate()) = 0  
  SELECT @ltime = convert(varchar,GetDate() , 108)
SET @Date = CONVERT(datetime, CONVERT(varchar(10), @CurrTime, 120)) 
IF object_id(''tempdb..#tmpBCONew'') is not null 
BEGIN
  drop table #tmpBCONew
END

Create TABLE #tmpBCONew
(
  BCO01 int ,
  BCO02 varchar(20) ,
  BCO03 varchar(8) ,
  BCO04 varchar(8)
)
If @ltime =''00:00:00''
BEGIN
  INSERT INTO #tmpBCONew(BCO01 , BCO02 , BCO03 , BCO04) 
  SELECT BCO01 , BCO02 , BCO03 , BCO04 from BCO1 
END ELSE BEGIN
  INSERT INTO #tmpBCONew(BCO01 , BCO02 , BCO03 , BCO04)
  
  select BCO01 , BCO02 , BCO03 , BCO04
  from BCO1
  where BCO03 &lt;= BCO04
  and (BCO03 &lt;= @ltime and BCO04 &gt;= @ltime) 
  union all
  select BCO01 , BCO02 , BCO03 , BCO04
  from BCO1
  where BCO03 &gt; BCO04
  and (BCO03 &lt;= @ltime or BCO04 &gt;= @ltime )
 
 END
 
SELECT a.BCB01, a.BCB02, a.BCB03, a.BAO02, a.BCK01, a.BBY01, a.BCE01, a.BCE03, a.BCB12,  
    a.ABBRP, a.ABBRW ,b.BCK03 ,d.BBY05  , e.BCE02 , f.BGG05 , f.BGG06 ,f.BGG01 
FROM BCB1 a
  JOIN BBY1 d on a.BBY01 = d.BBY01
  JOIN BGG1 f on a.BCB01 = f.BCB01 
  JOIN BGH1 m ON f.BGG01 = m.BGG01 
  JOIN #tmpBCONew n ON m.BGH04 = n.BCO02 
  LEFT JOIN BCK1 b ON a.BCK01 = b.BCK01 
  LEFT JOIN BCE1 e ON a.BCE01 = e.BCE01
where m.BGH03 = @DateNum  AND BGG03 &lt;= @Date and BGG18 &gt;= @Date</Sql><HD><Ie FD="BCB02" CA="编码" WD="100"/><Ie FD="BCB03" CA="名称" WD="100" SZ="1"/><Ie FD="BAO02" CA="号类" WD="100" SZ="1"/><Ie FD="BCK03" CA="科室" WD="100" SZ="1"/><Ie FD="BCE03" CA="医生" WD="100" SZ="1"/><Ie FD="BBY05" CA="项目" WD="100" SZ="1"/></HD><QF><Ie FD="BCB02" WE="7"/><Ie FD="BCB03" WE="7"/><Ie FD="a.ABBRP" WE="7"/><Ie FD="a.ABBRW" WE="7"/></QF></Grid></Configs>
', 1, Null, '2016-09-05 09:13:03', '(8065)冯义强', 0)
else
print 'SYS_Scripts.id=5225 已经存在.'

GO