IF OBJECT_ID('AddResult') IS NOT NULL
      DROP PROCEDURE AddResult
    GO
     
    --запись результата в таблицу ResValues
    CREATE PROCEDURE AddResult
      @k int
    AS
      BEGIN
        DECLARE @i int
        DECLARE @tmpstr varchar(255)
        SET @i = 1
        SET @tmpstr = ''
            
        WHILE @i <= @k
        BEGIN
          SET @tmpstr = @tmpstr + (SELECT CAST (Value as varchar(255)) FROM TmpValues WHERE id = @i)
          SET @i = @i + 1
        END
        
        INSERT INTO ResValues VALUES (@tmpstr)
      END
    GO
     
    IF OBJECT_ID('Generate') IS NOT NULL
      DROP PROCEDURE Generate
    GO
     
    --геренация перестановок
    CREATE PROCEDURE Generate
      @n int,
      @k int
    AS
      BEGIN
     
        IF OBJECT_ID('TmpValues') IS NOT NULL
          DROP TABLE TmpValues
        --создание таблицы для хранения временных значений
        CREATE TABLE TmpValues (
          id int IDENTITY(1,1),
          Value int,
          CONSTRAINT PK_TmpValuesId PRIMARY KEY (id)
        )
     
        IF OBJECT_ID('ResValues') IS NOT NULL
          DROP TABLE ResValues
        --создание таблицы для хранения результата
        CREATE TABLE ResValues (
          id int IDENTITY(1,1),
          Result varchar(255),
          CONSTRAINT PK_ResValuesId PRIMARY KEY (id)
        )
     
        DECLARE @i int
        SET @i = 1
        --генерация первой последовательности (перестановки)
        WHILE @i <= @k
        BEGIN
          INSERT INTO TmpValues VALUES (@i)
          SET @i = @i+1
        END
        
        WHILE @i<>0
        BEGIN
          --запись результата в таблицу ResValue
          EXEC AddResult @k      
          
          SET @i = @k
          WHILE (SELECT Value FROM TmpValues WHERE id = @i) = @n - @k + @i
          BEGIN
            SET @i = @i-1
          END
          
          UPDATE TmpValues SET Value = (SELECT Value FROM TmpValues WHERE id = @i) + 1 WHERE id = @i
          
          DECLARE @j int
          DECLARE @tmp int
          SET @j = @i + 1
          
          WHILE @j <= @k
          BEGIN
            SET @tmp = (SELECT Value FROM TmpValues WHERE id = (@j-1)) + 1
            UPDATE TmpValues SET Value = @tmp WHERE id = @j
            SET @j = @j+1
          END
        END
      END