CREATE TRIGGER [dbo].[TI_Row_Make] ON [dbo].[TmpHavaleh]
For Insert
AS 
 Declare @Make_Anbar        Varchar(5)
 Set     @Make_Anbar        ='09999'
 Declare @msg_num           Numeric(18,0)
 Declare @Last_AutoId       BigInt
 Declare @TmpIdHavaleh      Numeric(18,0)
 Declare @TmpK_Code         varchar(15)
 Declare @TmpQty            Real
 Declare @Link_Record       bigint
 Declare @Auto_Id           Bigint
 Declare @TotPriceTolid     Money

----------------------------------------------------------------------------------------------------------------
--  ݍ 

 Declare @F_Sender           Varchar(5)
 Declare @F_K_Code           Varchar(15)
 Declare @F_ACC              Real
 Declare @F_EditQty_Flag     Flag
 Declare @F_Make_Flag        Flag
 Declare @KindFactor         Char(1)
 Declare @KindSave           Char(1)

-- ǐ ј       ǐ     
Select @KindFactor = TmpH.Kind_Flag , @KindSave =  TmpH.Kind_Save From TmpHeadH  TmpH Inner Join Inserted I On(TmpH.Id_Havaleh = I.Id_Havaleh)
Where TmpH.Id_Havaleh = I.Id_Havaleh
Group By  TmpH.Kind_Flag, TmpH.Kind_Save
IF (@KindFactor = '1' and @KindSave in('9','8'))
Begin
   IF ((Select Make_Flag From inserted) = 1) and ((Select Len(Sender) From inserted) = 5 or (Select Len(Reciver) From inserted) = 5)
   Begin
      Select @TmpIdHavaleh=Id_Havaleh , @TmpK_Code=K_Code , @TmpQty=K_Qty1 , 
                @Link_Record=Link_Record , @Auto_Id=AutoId  From Inserted

      DECLARE MakeD_Kala  CURSOR  LOCAL FOR
      SELECT    dbo.Make_Kala.Sender, dbo.Make_Kala.K_Code_M, dbo.Make_Kala.Account_unit1,dbo.Make_Kala.EditQty_Flag, dbo.KalaId.Make_Flag
      FROM       dbo.Make_Kala INNER JOIN dbo.KalaId ON dbo.Make_Kala.K_Code_M = dbo.KalaId.K_Code
      WHERE     dbo.Make_Kala.K_Code = @TmpK_Code

      OPEN MakeD_Kala
  
      FETCH NEXT FROM MakeD_Kala  INTO @F_Sender , @F_K_Code , @F_ACC , @F_EditQty_Flag, @F_Make_Flag

      WHILE @@FETCH_STATUS = 0     
       BEGIN 
           IF @F_EditQty_Flag=1  Set @F_ACC= @TmpQty*@F_ACC

           Exec   Add_One_Kala   @msg_num,@Last_AutoId,@TmpIdHavaleh ,    @F_Sender   ,   @Make_Anbar ,  @F_K_Code  ,   @F_ACC  ,  1,   @Auto_Id  , @KindSave
           FETCH NEXT FROM MakeD_Kala INTO @F_Sender , @F_K_Code , @F_ACC , @F_EditQty_Flag,@F_Make_Flag
       End
       CLOSE MakeD_Kala
       DEALLOCATE MakeD_Kala
       
       IF @KindSave = '9'
       Begin
	     Select @TotPriceTolid = (Select Sum(Price_Kharid) From TmpHavaleh 
		  						  Inner Join TmpHeadH on Tmpheadh.Id_Havaleh = TmpHavaleh.Id_Havaleh
								  Where Link_Record = @Auto_Id And kind_Save = @KindSave)
	       
		 Update TmpHavaleh Set Price_KHarid = @TotPriceTolid
		 Where AutoId = @Auto_Id
	       
		 Update Anbar Set Price_Kharid = @TotPriceTolid Where K_Code = @TmpK_Code 
       End

       IF @KindSave = '8'
       Begin
         select  @TotPriceTolid=Price_kharid from TmpHavaleh
         Where AutoId = @Auto_Id

         update  TmpHavaleh 
           Set Price_KHarid=@TotPriceTolid  
           where autoId in   	 
           (Select AutoId from TmpHavaleh 
 	   Inner Join TmpHeadH on Tmpheadh.Id_Havaleh = TmpHavaleh.Id_Havaleh
           Where Link_Record =@Auto_Id And kind_Save = @KindSave)	                	 
								  
         Update Anbar 
           Set Price_Kharid = @TotPriceTolid 
           Where K_Code  in 
           ( Select K_Code from TmpHavaleh 
  	   Inner Join TmpHeadH on Tmpheadh.Id_Havaleh = TmpHavaleh.Id_Havaleh
	   Where Link_Record =@Auto_Id And kind_Save = @KindSave)   
            
       End

   End
End
