CREATE  TRIGGER [dbo].[TI_Cheqe] ON [dbo].[Cheqe]
FOR INSERT
AS 
  Declare    @Id_Cheqe                       BigInt 
  Declare    @msg                                Bigint
  Declare    @Act                                 Smallint 
  Declare    @Guy_Code                      VarChar(20)
  Declare    @Price                               Money
  Declare    @PNote                             NvarChar(100)
  Declare    @Tmp_main_Auto_Sanad Char
  Declare    @Id_Sanad                        Bigint
  Declare    @Guid_Cheqe                   UniqueIdentifier
  Declare    @Ch_Note                         Nvarchar(100)
  Declare    @Acc_Code                      VarChar(20)

--   ݍ       

  Declare Cheqe_Cursor Cursor LOCAL FOR
  SELECT     Hc.Guy_Bank, Round(i.Ch_Price,0), i.Act_Code, Hc.Id_Cheqe,i.Tmp_Main_Auto_Sanad,Hc.Id_Sanad,i.Guid_Cheqe,i.Ch_Note,i.Acc_Code
  FROM         dbo.Headc Hc INNER JOIN
                      Inserted i  ON Hc.Id_Cheqe = i.Id_Cheqe
               
  OPEN Cheqe_Cursor
  
  FETCH NEXT FROM Cheqe_Cursor
       INTO @Guy_Code,@Price,@Act,@Id_Cheqe,@Tmp_Main_Auto_Sanad,@Id_Sanad,@Guid_Cheqe,@Ch_Note,@Acc_Code
 

   WHILE @@FETCH_STATUS = 0     BEGIN 
        --If @TmpOrMainOrAutoSanad=0    Ϙ
        --If @TmpOrMainOrAutoSanad=1         
        --If @TmpOrMainOrAutoSanad=2         
        --     Ϙ  

         If (@Tmp_Main_Auto_Sanad ='0' ) Or (@Tmp_Main_Auto_Sanad ='1' ) Begin
           -- PROCEDURE Create_Sanad_Radif   @msg_num BigInt  OUTPUT, @Act  Smallint ,  @Code  VarChar(20)  ,@Price Money,@PNote NvarChar(100) , @Nu_Sanad Bigint,@TmpOrMainOrAutoSanad Char,@Guid_Cheqe Uniqueidentifier 
           Exec   @Msg= Create_Sanad_Radif        @Msg                                ,         @Act        ,  @Guy_Code        ,@Price            , @Ch_Note                    , @Id_Sanad           ,@Tmp_Main_Auto_Sanad           ,@Guid_Cheqe, @Acc_Code,@Id_Cheqe
--              If @Msg > 0 --  
--                    Insert Into dbo.TmpAcc_Cheqe_Link(AutoId_Cheqe,AutoId_Sanad)
--                                                                 Values(     @AutoId   ,         @Msg)
              --Update Dbo.Cheqe Set Auto_Id_Sanad=@Msg   Where AutoId=@AutoId
--              Else Print @Msg
          End
      FETCH NEXT FROM Cheqe_Cursor
         INTO @Guy_Code,@Price,@Act,@Id_Cheqe,@Tmp_Main_Auto_Sanad,@Id_Sanad,@Guid_Cheqe,@Ch_Note,@Acc_Code
 
  End

  CLOSE Cheqe_Cursor
  DEALLOCATE Cheqe_Cursor




--              Exec         @Msg= Create_Sanad_Auto         @Msg                                ,         @Act        ,  @Guy_Code                      ,@Price            ,@Id_Cheqe












