--增加分类
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=6447 --删除脚本内容
GO


GO
IF not EXISTS(SELECT * FROM SYS_Scripts WHERE id=6447)
insert into SYS_Scripts(ID,CategoryID,Code,Name,Description,xType,DatasourceID,DisplayNames,xRowNum,xText,UpdateDate,UpdateUser,UpdateMode)  Values(6447, 95, 'MEM_查询会员帐号信息', Null, '查询会员帐号信息', 2, 1, '<?xml version="1.0"?>
<Configs Ver="1"><Win CA="检索会员信息" WD="500" SZ="1"/><Grid Head="1" AWS="1"><Sql>DECLARE @VBU21 int
SET @VBU21=%d
select  s.*
from (
SELECT
  A.VAA01, 
  A.VAA02, 
  A.VAA03, 
  A.VAA04, 
  A.VAA05, 
  A.ABW01,case a.ABW01 when ''1'' then ''男'' when ''2'' then ''女'' else ''未知'' end ABW02, 
  A.VAA10,cast(A.VAA10 AS varchar)+C.AAU02 VAA10A, 
  A.ABC02,
  A.VBU01,
  b.VBU03,
  b.VCB04,
  A.VAA15,
  A.VAA34,
  A.VAA35,
  A.VAA33,
  A.ABBRP,
  A.ABBRW 
FROM VAA1 A
join VBU1 b on b.VBU01 = a.VBU01
left join AAU1 c on c.AAU01 = a.AAU01
WHERE b.VBU21=@VBU21 ) s</Sql><HD><Ie FD="VAA03" CA="门诊号" WD="60" SZ="1"/><Ie FD="VAA05" CA="姓名" WD="60" MV="1" SZ="1"/><Ie FD="ABW02" CA="性别" WD="30" SZ="1"/><Ie FD="VAA10A" CA="年龄" WD="30" SZ="1"/><Ie FD="VCB04" CA="卡号" WD="60" SZ="1"/><Ie FD="VAA15" CA="身份证号" WD="100" SZ="1"/><Ie FD="VAA35" CA="移动电话" WD="100" SZ="1"/></HD><QF><Ie FD="s.ABBRP" WE="7"/><Ie FD="s.ABBRW" WE="7"/><Ie FD="s.VAA05" WE="7"/><Ie FD="s.VCB04" WE="6"/><Ie FD="VAA15" WE="7"/><Ie FD="VAA34" WE="7"/><Ie FD="VAA35" WE="7"/></QF><FF><Ie FD="VAA05"/><Ie FD="ABW02"/><Ie FD="VAA10"/><Ie FD="ABC02"/></FF></Grid></Configs>
', 1, 'DECLARE @VBU01 int

SET @VBU01=%d

SELECT a.VAA01, a.VAA02, a.VAA03, a.VAA04, a.VAA05, a.VAA06, a.ABBRP, a.ABBRW, a.ABW01
  ,case a.ABW01 when ''1'' then ''男'' when ''2'' then ''女'' else ''未知'' end ABW02, a.VAA10
  ,cast(A.VAA10 AS varchar)+C.AAU02 VAA10A, a.AAU01, c.AAU02, a.VAA12, a.ACK01, d.ACK02
  , a.VAA14, a.VAA15, a.VAA16, a.BDP02,a.ABC02, a.ACC02, a.ABQ02, a.VAA33, a.VAA34, a.VAA35
  , a.VAA36, a.VAA37, a.VAA38, a.VAA39, a.BAQ01,a.VBU01, a.VAA66, a.VAA67, a.VAA75, a.BEP05
  , a.BEP06, a.VAA76, b.VCB01, b.VBU03, b.VCB03, b.VCB04,b.VBU01A, b.VBU07, b.VBU08, b.VBU09
  , e.BAQ01 BAQ01A,e.BAQ03 BAQ03A, b.VBU11, b.VBU12, b.VBU13, b.VBU14, b.VBU15
  ,b.VBU16, b.VBU17, b.VBU18, b.VBU19, b.VBU20, b.VBU21, b.VBU22, b.VBU23, b.BCE01A, b.BCE03A
  ,b.BCE03B, b.VBU27, b.VBU28, b.VBU30, cast('''' as varchar(64)) Search, b.VBU01B
  , cast('''' AS varchar(64)) VBU01BEx, a.BDX02,a.VAA47 , 0 as IAA01 , cast('''' as varchar(64)) IAK05 
  FROM VAA1 a with(nolock)
  join VBU1 b with(nolock) on b.VBU01 = a.VBU01
  left join AAU1 c on c.AAU01 = a.AAU01
  left join ACK1 d on d.ACK01 = a.ACK01
  left join BAQ1 e on e.BAQ01 = b.BAQ01
  WHERE a.VBU01=@VBU01', '2015-07-21 13:50:38', '(8065)冯义强', 0)
else
print 'SYS_Scripts.id=6447 已经存在.'

GO