从Erp库中把数据导入到 BanChe56 的库。 写一个存储过程。
CREATE proc [dbo].[Dev_MoveTableData]( @ToTable varchar(50), @FromTable varchar(50) , @useId bit , @IDFrom int ,@execute bit ) as begin
declare @sql nvarchar(4000);
declare @columns varchar(500);
if( @FromTable is null) set @FromTable = @ToTable;
set @sql = N‘select * from Erp.dbo.[‘ + @FromTable + ‘]‘ ;
exec sp_executesql @sql;
set @sql = ‘‘;
if( @useId = 1) begin
set @sql = N‘
set identity_insert BanChe56.dbo.[$ToTable$] on
insert into BanChe56.dbo.[$ToTable$] ($AllColumns$)
select $AllColumns$ from Erp.dbo.[$FromTable$] where ID > $IDFrom$
set identity_insert BanChe56.dbo.[$ToTable$] off
‘ ;
select @columns = ‘[‘ + dbo.JoinStr2(name, ‘],[‘) + ‘]‘ from sys.columns where object_id = object_id(@ToTable) and is_computed = 0 ;
set @sql = REPLACE(@sql,‘$AllColumns$‘,@columns) ;
end else begin
set @sql = N‘
insert into BanChe56.dbo.[$ToTable$] ($Columns$)
select $Columns$ from Erp.dbo.[$FromTable$] where ID > $IDFrom$
‘ ;
select @columns = ‘[‘ + dbo.JoinStr2(name, ‘],[‘) + ‘]‘ from sys.columns where object_id = object_id(@ToTable) and is_computed = 0 and is_identity = 0;
set @sql = REPLACE(@sql,‘$Columns$‘,@columns) ;
end
set @sql = replace(@sql,‘$FromTable$‘,@FromTable);
set @sql = replace(@sql,‘$ToTable$‘,@ToTable);
set @sql = replace(@sql,‘$IDFrom$‘, cast( @IDFrom as varchar(50)) );
print @sql ;
if( @execute =1 ) begin
exec sp_executesql @sql ;
end ;
end ;
GO
检查有数据的表：
SELECT a.name FROM sys.sysobjects AS a
WHERE EXISTS(
SELECT 1 FROM sys.sysindexes AS x
WHERE x.id=a.id AND x.rows>0 )
AND a.type=‘U‘
时间： 2024-08-29 02:50:36