-- 1. ПОДГОТОВКА ТАБЛИЦ К РАБОТЕ
 
 -- а) подготовка рабочей таблицы
 
Alter table РабочаяТаблица
Add ts TimeStamp

 -- б) подготовка архивной таблицы
 
Сreate table АрхивнаяТаблица (<Поле1, Поле2… (кроме поля «ts»)>, ts varbinary( 8 ))


 -- 2. ОБНОВЛЕНИЕ АРХИВНОЙ ТАБЛИЦЫ
 

 -- а) обновление измененных строк
 
update АрхивнаяТаблица
set Поле1 = РабочаяТаблица.Поле1,
    Поле2 = РабочаяТаблица.Поле2,
    ...
    ts = РабочаяТаблица.ts
from РабочаяТаблица
join АрхивнаяТаблица
on РабочаяТаблица.ID = АрхивнаяТаблица.ID
where РабочаяТаблица.ts <> АрхивнаяТаблица.ts

 -- б) вставка добавленных строк
 
insert into АрхивнаяТаблица
select *
from РабочаяТаблица
where not exists 
(
 Select *
 from АрхивнаяТаблица
 where АрхивнаяТаблица.ID = РабочаяТаблица.ID
)

 -- в) удаление удаленных строк
 
delete from АрхивнаяТаблица
where not exists
(
 Select *
 from РабочаяТаблица
 where АрхивнаяТаблица.ID = РабочаяТаблица.ID
)

 -- =====================================
 
 -- СОЗДАЕМ БАЗЫ ДАННЫХ
 
 -- =====================================
 

 -- Для повторения эксперимента:
 
 /*
Use tempdb
Drop database Remont_Test
Drop database Archiv_Remont_Test
*/ 

Create database Remont_Test
Create database Archiv_Remont_Test

 -- =====================================
 
 -- СОЗДАЕМ ТАБЛИЦЫ
 
 -- =====================================
 

Use Remont_Test

Create table Zavod
(
 ID_Plnt bigint identity not for replication not null,
 Zav_isp int not null,
 Zavod char( 10 ) not null,
 ts timestamp not null,
 constraint PK_Zavod primary key clustered(ID_Plnt)
)

Use Archiv_Remont_Test

Create table Zavod
(
 ID_Plnt bigint not null,
 Zav_isp int not null,
 Zavod char( 10 ) not null,
 ts varbinary( 8 ) not null,
 constraint PK_Zavod primary key clustered(ID_Plnt)
)
go


 -- =====================================
 
 -- СОЗДАЕМ ПРОЦЕДУРУ РЕПЛИКАЦИИ
 
 -- =====================================
 


Create procedure UpdateData
as

 -- а) обновление измененных строк
 
update АрхивнаяТаблица
set Zav_isp = РабочаяТаблица.Zav_isp,
    Zavod = РабочаяТаблица.Zavod,
    ts = РабочаяТаблица.ts
from Remont_Test..Zavod РабочаяТаблица
join Zavod АрхивнаяТаблица
on РабочаяТаблица.ID_Plnt = АрхивнаяТаблица.ID_Plnt
where РабочаяТаблица.ts <> АрхивнаяТаблица.ts

 -- б) вставка добавленных строк
 
insert into Zavod
select *
from Remont_Test..Zavod РабочаяТаблица
where not exists 
(
 Select *
 from Zavod АрхивнаяТаблица
 where АрхивнаяТаблица.ID_Plnt = РабочаяТаблица.ID_Plnt
)

 -- в) удаление удаленных строк
 
delete from Zavod
where not exists
(
 Select *
 from Remont_Test..Zavod РабочаяТаблица
 where Zavod.ID_Plnt = РабочаяТаблица.ID_Plnt
)
go


 -- =====================================
 
 -- ПРОБУЕМ, ЧТОТ ПОЛУЧИЛОСЬ
 
 -- =====================================
 


 -- очистка таблиц от предыдущих экспериментов
 
Use Archiv_Remont_Test
Delete from Zavod

Use Remont_Test
Delete from Zavod

 -- вставка строк в рабочую таблицу
 
Use Remont_Test
Insert into Zavod(Zav_isp, Zavod) values( 1 , 'Завод 1')
Insert into Zavod(Zav_isp, Zavod) values( 2 , 'Завод 2')

 -- проверка вставки в архивную таблицу строк, вставленных в рабочую таблицу
 
Use Archiv_Remont_Test
Exec UpdateData
Select * from Zavod

 -- удаление строки в рабочей таблице
 
Use Remont_Test
Delete from Zavod where ID_Plnt =  1 

 -- проверка удаления в архивной таблице строки, удаленной в рабочей таблице
 
Use Archiv_Remont_Test
Exec UpdateData
Select * from Zavod

 -- изменение строки в рабочей таблице
 
Use Remont_Test
Update Zavod
set Zavod = 'Замена'
where ID_Plnt =  2 

 -- проверка изменения в архивной таблице строки, изменения в рабочей таблице
 
Use Archiv_Remont_Test
Exec UpdateData
Select * from Zavod