/* exec P_ZehuaSavexml 'WQ_STINFO_B,WQ_PHY_D','D:\xx.xml' */ go create proc P_ZehuaSavexml @TableCodeS varchar(8000), @fname varchar(1000)='c:\tmp.xml' --默认保存的XML文件地址 as declare @sql nvarchar(200),@sql1 varchar(400) declare @cnt int,@Table_Name varchar(20) declare @i int,@TableCode varchar(20) declare @err int,@src varchar(255),@desc varchar(255) create table ##t(re nvarchar(4000)) insert ##t select Re='<?xml version="1.0" encoding="gb2312"?>' union all select '<ZehuaTableInfoXml>' set @i=charindex(',',@TableCodeS) while @i>0 begin set @TableCode=left(@TableCodeS,@i-1) set @sql='' set @sql=N'select @cnt=count(*),@Table_Name=max(Table_Name) from ' set @sql=@sql+N'(' set @sql=@sql+N'select top 100 percent * from TB_TABLECOLUMN_T where ' set @sql=@sql+N'TABLE_CODE='''+@TableCode+''' and COLUMNS_ISKEY=''√'' ' set @sql=@sql+N'order by COLUMNS_SORT ' set @sql=@sql+N')' set @sql=@sql+N'A' exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --计算主键的个数,表名
insert ##t select '<'+@TableCode+' TABLE_NAME="'+@Table_Name+'" PK="'+cast(@cnt as varchar)+'">' union all select space(4)+'<COLUMNS COLUMNS_NAME="'+cast(COLUMNS_NAME as varchar)+'" '+space(8)+'TABLE_CODE="'+isnull(@TableCode,'')+'" '+space(8)+'COLUMNS_VISIBLE="'+isnull(COLUMNS_VISIBLE,'')+'"/>' from TB_TABLECOLUMN_T where TABLE_CODE=''+@TableCode+'' union all select '</'+@TableCode+'>' set @TableCodeS=right(@TableCodeS,len(@TableCodeS)-@i) set @i=CHARINDEX(',',@TableCodeS) end if len(@TableCodeS)>0 begin
set @sql='' set @sql=N'select @cnt=count(*),@Table_Name=max(Table_Name) from ' set @sql=@sql+N'(' set @sql=@sql+N'select top 100 percent * from TB_TABLECOLUMN_T where ' set @sql=@sql+N'TABLE_CODE='''+@TableCodeS+''' and COLUMNS_ISKEY=''√'' ' set @sql=@sql+N'order by COLUMNS_SORT ' set @sql=@sql+N')' set @sql=@sql+N'A' exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --计算主键的个数,表名 insert ##t select '<'+@TableCodeS+' TABLE_NAME="'+@Table_Name+'" PK="'+cast(@cnt as varchar)+'">' union all select space(4)+'<COLUMNS COLUMNS_NAME="'+cast(COLUMNS_NAME as varchar)+'" '+space(8)+'TABLE_CODE="'+isnull(@TableCodeS,'')+'" '+space(8)+'COLUMNS_VISIBLE="'+isnull(COLUMNS_VISIBLE,'')+'"/>' from TB_TABLECOLUMN_T where TABLE_CODE=''+@TableCodeS+'' union all select '</'+@TableCodeS+'>' union all select '</ZehuaTableInfoXml>' end