Alter   TRIGGER [trig_I_tbl3AccountsName] ON [dbo].[tbl3AccountsName] 
FOR  INSERT
AS
set nocount on
SET XACT_ABORT OFF

DECLARE @RC int
DECLARE @param int
DECLARE @id_AccName nvarchar( 100 )
declare @temp as INT
set @temp=(select Count(*) From Inserted)

if @temp= 1  
	begin
		 -- единичное обновление ->
 
		 --print (%af_src_str_0)
 
		select top  1  @param=i.auAccountsName,@id_AccName=i.ID_AccountsName from inserted as i
		 --print %af_src_str_1 + CAST(@param AS nvarchar(50))
 
		 --print %af_src_str_2 + CAST(@id_AccName AS nvarchar(50))
 
		 --EXEC @RC = dbo.xp_TriggerOnAccountsName @param, @id_AccName
 
		 --print %af_src_str_3 + cast(@rc as nvarchar (100))
 
		 -- if @rc=1 rollback tran
 
if @param is null or @param= 0  
	begin
		raiserror ('Переданный параметр не должен быть пустым или равным 0', 16 , 1 )
		rollback tran		
		 --return 1
 
	end
if LEN(@id_AccName)= 0  or @id_AccName is null
	begin
		raiserror ('Номер счета не может быть пустым!', 16 , 1 )
		rollback tran
		 --return 1
 
	end

 --print %af_src_str_6 + cast(@param as nvarchar(255)) + %af_src_str_7+ cast(@id_AccName as nvarchar(255))
 
 -- возвращает полный список всех пар и вставляет его в соответсвующую таблицу
 

INSERT INTO tbl3AccountsBilateral ( auAccountsName_debit, auAccountsName_credit )
SELECT D,C FROM fn_TableAllAccountsBielat (@param)
 
 --print %af_src_str_8 + cast (@@rowcount as nvarchar(255))
 


set @temp= 0   -- Обнуляем
 
 
 -- Дебетовый обороты -его код в таблице dbo.tbl0DataHierachesMain=3
 

 -- определим есть ли в иерархии иерархия с именем равным наименованию кода счета (а именно это имя по умолчанию становится именем иерархии)
 
 -- auDH_Name=3 - дебетовый оборот
 
set @temp=(
SELECT TOP  1  auDH_Main FROM dbo.tbl0DataHieraches
WHERE     (auDH_Name =  3 ) AND 
(ID_Parent_auDH_Main IS NULL) AND 
(NameOfDataHieraches_rus = @id_AccName)
)

 --print %af_src_str_9 + cast(@temp as char(10))
 
if isnull(@temp, 0 )= 0    -- т.е. не обнаружено
 
begin
	 -- нет такого имене в иерархии - создаем такую иерархию с именем @id_AccName
 
	 -- 3 Дебетовый оборот 
 
 --print %af_src_str_10 
 
	INSERT INTO dbo.tbl0DataHieraches 
	(auDH_Name, ID_Parent_auDH_Main,NameOfDataHieraches_rus ,NameOfDataHieraches_ger)
	VALUES ( 3 , NULL,@id_AccName , @id_AccName)
	set @temp=@@IDENTITY  -- номер счетчика и есть значение auDH_Main
 
end
 -- на ELSE не проверяем ибо @temp и так получить свое значение 
 
 --print %af_src_str_11+ cast(@temp as char(50))
 
INSERT INTO dbo.tbl3AccountsDH (auBilateralAccounts,auDH_Main) 
SELECT auBilateralAccounts, @temp FROM dbo.tbl3AccountsBilateral 
WHERE auAccountsName_debit=@param
 --print %af_src_str_12 + cast(@@rowcount as char(50))
 

 -- Кредитовые обороты - его код в таблице dbo.tbl0DataHierachesMain=4
 

 -- определим есть ли в иерархии иерархия с именем равным наименованию кода счета (а именно это имя по умолчанию становится именем иерархии)
 
 -- auDH_Name=4 - кредетовый  оборот
 
set @temp=(
SELECT TOP  1  auDH_Main FROM dbo.tbl0DataHieraches
WHERE     (auDH_Name =  4 ) AND 
(ID_Parent_auDH_Main IS NULL) AND 
(NameOfDataHieraches_rus = @id_AccName)
)

 --print %af_src_str_13 + cast(isnull(@temp,0) as char(10))
 
if isnull(@temp, 0 )= 0    -- т.е. не обнаружено
 
	begin
			 -- нет такого имене в иерархии - создаем такую иерархию с именем @id_AccName
 
			
			INSERT INTO dbo.tbl0DataHieraches 
			(auDH_Name, ID_Parent_auDH_Main,NameOfDataHieraches_rus ,NameOfDataHieraches_ger)
			VALUES ( 4 , NULL, @id_AccName , @id_AccName )
			set @temp=@@IDENTITY  -- номер счетчика и есть значение auDH_Main
 
		 -- print %af_src_str_14 + cast (@temp as char(10))
 
	
	end
 -- на ELSE не проверяем ибо @temp и так получить свое значение 
 

INSERT INTO dbo.tbl3AccountsDH (auBilateralAccounts,auDH_Main) 
SELECT auBilateralAccounts, @temp FROM dbo.tbl3AccountsBilateral 
WHERE auAccountsName_credit=@param

 --print %af_src_str_15 + cast(@@rowcount as char(10))
 
 -- Добавление в dbo.tbl3AccountsDH все возможные значение
 
 -- ****************ДЕБЕТ***********************%af_src_str_16ERROR %af_src_str_17Цикл%af_src_str_18Значение @@ROWCOUN <= 0. Нет обновления!'
 
		end 

SET XACT_ABORT ON

set @temp=(select Count(*) From Inserted)
 -- получили кол-во записей в таблице Inserted
 
if @temp= 1 
...  1  запись - значит можно и TOP  1 
If @temp> 1 
... много записей - буду делать обработку через курсор