CREATE FUNCTION
    [dbo].[fOstK_KS](@kod int,@data DATETIME,@kodT int,@Id_shop int)

RETURNS table
AS

RETURN (select top 1 OstK,OstKS 
			from 
					(select kod,kodT,data,ostk1 as OstK,ostks1 as OstKS
						from dbo.jurnal 
							where kod<@kod and kodT=@KodT and Id_shop1=@Id_shop and  data<=@Data
					union 
					select kod,kodT,data,ostk2,ostks2 
						from dbo.jurnal 
							where kod<@kod and kodT=@KodT  and Id_shop2=@Id_shop and data<=@Data)r
			        order by data desc,kod desc)

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go

CREATE trigger [tr_Insert] on [dbo].[Jurnal]
after insert
as
BEGIN
SET NOCOUNT ON


declare @Jurnal table(
	 Kod		int	primary key not null
	,KodAB		int
	,KodT		int
	,Data		datetime
	,Srok		datetime
	,Price		decimal(18,2)
	,Id_shop1	int
	,Id_shop2	int
	,kol		int
	,summa		decimal(18,2)
	,Doc		int
	,ostN1		decimal(18,2)
	,OstNS1		decimal(18,2)
	,OstN2		decimal(18,2)
	,OstNS2		decimal(18,2)
	,ostk1		decimal(18,2)
	,OstkS1		decimal(18,2)
	,Ostk2		decimal(18,2)
	,OstkS2		decimal(18,2)
	,SerNumber	char(50)
) 

insert @Jurnal (
	 Kod
	,KodAB
	,KodT
	,Data
	,Srok
	,Price
	,Id_shop1	
	,Id_shop2	
	,kol		
	,summa		
	,Doc		
	,ostN1		
	,OstNS1		
	,OstN2		
	,OstNS2		
	,ostk1		
	,OstkS1		
	,Ostk2		
	,OstkS2
	,SerNumber
)
select
	 Kod
	,KodAB
	,KodT
	,Data
	,Srok
	,Price
	,Id_shop1	
	,Id_shop2	
	,kol		
	,summa		
	,Doc		
	,ostN1		
	,OstNS1		
	,OstN2		
	,OstNS2		
	,ostk1		
	,OstkS1		
	,Ostk2		
	,OstkS2	
	,SerNumber
from
	inserted

	declare @next_kod	int;
	declare @KodT int;
	
--=======================================================================
	while exists(select * from @Jurnal)
	BEGIN
		select
			@next_kod = min(kod)
		from
			@Jurnal
--=======================================================================
		select 
			@KodT=KodT 
		from 
			@Jurnal
				where 
					Kod=@next_kod
		
--========================================================================
		declare @Data datetime;
		declare @Id_shop1 int;
		declare @Id_shop2 int;
		set @Data=(select top 1 data from @jurnal where kod=@next_kod)
		set @Id_shop1=(select top 1 @Id_shop1 from @jurnal where kod=@next_kod)
		set @Id_shop2=(select top 1 @Id_shop2 from @jurnal where kod=@next_kod)
		
--======fOstK_KS-это табл.функция которя вернет остаток указанного товара для конкретного ответственного
--======в указанной дате(так как приход/расход можно осуществить задним числом) 
--======т.е. вернет (OstK-количество и OstKS-сумма)

		declare @Kol int;
		set @Kol=(select kol from @jurnal where Kod = @next_kod)
	
		declare @Summa decimal(18,2);
		set @Summa=(select summa from @jurnal where Kod = @next_kod)		
	
--======устанавливаем остаток для shop1-т.е. сколько было такого товара до вставки данной строки
		declare @Ostn1 int;
		set @Ostn1=(isnull((select top 1 isnull(OstK,0)d from fOstK_KS(@next_kod,@Data,@KodT,@Id_shop1)),0))

--======устанавливаем остаток для shop1-т.е. сколько стало такого товара после вставки данной строки		
		declare @OstK1 int;
		set @OstK1=@Ostn1-@Kol	

--======устанавливаем сумма товара для shop1-т.е. до вставки данной строки	
		declare @OstNS1 decimal(18,2);
		set @OstNS1=(isnull((select top 1 isnull(OstKS,0)d from fOstK_KS(@next_kod,@Data,@KodT,@Id_shop1)),0))

--======устанавливаем сумму для shop1-т.е. после вставки данной строки		
		declare @OstKS1 decimal(18,2);
		set @OstKS1=@OstNS1-@Summa	

--======устанавливаем остаток для shop2-т.е. сколько было такого товара до вставки данной строки		
		declare @Ostn2 int;
		set @Ostn2=(isnull((select top 1 isnull(OstK,0)d from fOstK_KS(@next_kod,@Data,@KodT,@Id_shop2)),0))

--======устанавливаем остаток для shop2-т.е. сколько стало такого товара после вставки данной строки		
		declare @OstK2 int;
		set @OstK2=@Ostn2+@Kol
---------сумма до вставки 	Id_shop2	
		declare @OstNS2 decimal(18,2);
		set @OstNS2=(isnull((select isnull(OstKS,0) from fOstK_KS(@next_kod,@Data,@KodT,@Id_shop2)),0))	
---------сумма после вставки	Id_shop2
		declare @OstKS2 decimal(18,2);
		set @OstKS2=@OstNS2+@Summa

--===========================================================================================================
		update Jurnal
			set	ostN1=@Ostn1,OstNS1= @OstNS1,OstN2=@Ostn2,OstNS2= @OstNS2,
				ostk1=@OstK1,OstkS1= @OstKS1,Ostk2= @OstK2,OstkS2= @OstKS2	
			where Kod = @next_kod

--===========================================================================================================

		DELETE
			@Jurnal
		WHERE
			Kod = @next_kod	
				
	END

END