IF (OBJECT_ID(N'[dbo].[GetDataFromCSV]', N'P') IS NULL) 
  BEGIN
	  EXEC (N'CREATE PROCEDURE [dbo].[GetDataFromCSV] AS RETURN 0');
  END 

GO
/*
Павлов А.М. 

Процедура получает на вход CSV файл в виде строки, и делает из него SELECT * 

*/ 
 
ALTER PROCEDURE [dbo].[GetDataFromCSV] 
  @CSV  varchar(MAX)    
, @Separator    char       = ';'
, @Terminator   Varchar(4) = 'CRLF' /* CR - Carriage Return ;  LF - Line Feed  ; CRLF - both*/
, @SkipN        Int        =  0 
, @GetRowOrder bit = 0 /* !!!Значимо просаживает быстродействие!!! Если мне не принципиален порядок возвращаемых строк, т.е. на входе плоский файл, то 0. Если некая иерархическая структура, включаем механизм нумерации строк.
@GetRowOrder = 1  добавит на выход стольбец XML_ROW_NUMBER , который содежит номера нод по порядку следования */ 
, @ColumnsCount int = 0
AS
BEGIN 
  SET NOCOUNT ON 
  DECLARE @ErrorMessage Varchar(2000) = '' 

 
  SET @Terminator = CASE 
                      WHEN @Terminator = 'CR'   THEN CHAR(13) 
                      WHEN @Terminator = 'LF'   THEN CHAR(10) 
                      WHEN @Terminator = 'CRLF' THEN CHAR(13) + CHAR(10) 
                    END
 -- PRINT REPLACE(REPLACE(@Terminator,CHAR(13),'#13'), CHAR(10), '#10')

 
 
  /* пропускаем N первых строк */ 
  WHILE @SkipN <> 0 
  BEGIN 
    SET @CSV = RIGHT(@CSV, LEN(@CSV) - CHARINDEX(@Terminator,@CSV))       
    SET @SkipN  = @SkipN - 1 
  END
  
  IF CHARINDEX(@Terminator, @CSV) = 1 
  BEGIN 
    SET @CSV = RIGHT(@CSV, LEN(@CSV) - 1) 
  END    
  
  IF CHARINDEX(CHAR(10), @CSV) = 1 
  BEGIN 
    SET @CSV = RIGHT(@CSV, LEN(@CSV) - 1) 
  END    
  
  IF CHARINDEX(CHAR(13), @CSV) = 1 
  BEGIN 
    SET @CSV = RIGHT(@CSV, LEN(@CSV) - 1) 
  END    
   
 
  /* скриним плохие знаки чтоб собрать XML*/ 
  SET @CSV = REPLACE (@CSV, '<', '&lt;')
  SET @CSV = REPLACE (@CSV, '>', '&rt;')
  
  /* превращаем CSV в XML*/ 
  DECLARE @MyData xml
  DECLARE @Buff varchar(MAX) 
  SET @Buff   = LEFT(@CSV, CHARINDEX(CHAR(13),@CSV)) 
  SET @CSV = '<row>' + REPLACE('<col>' + REPLACE(@CSV, @Separator, '</col><col>') + '</col>', @Terminator, '</col></row><row><col>')  
  SET @CSV = '<data>' + LEFT(@CSV, LEN(@CSV) - 16) + '</data>'
   
  /*собираем дин. эскуль т.к. мы не знаем количества столбцов в указанном файле*/  
  DECLARE 
    @MyQuery      NVarchar (MAX) = N'SELECT '
  , @XMLBuff      XML 
  , @Counter      Tinyint 
  , @Iterator     Tinyint = 1 
  , @IteratorChar NVarChar(4) 

  SET @XMLBuff = (SELECT CAST('<a>' + REPLACE(REPLACE (@Buff, ';', '</a><a>'),@Terminator,'') + '</a>' AS XML)) 
  SET @Counter = (SELECT COUNT(SS.a) FROM (SELECT [a] = Q.W.value('.', 'Varchar(1000)') FROM @XMLBuff.nodes('a')Q(W))SS) 
   
  IF @ColumnsCount > 0
    BEGIN 
      SET @Counter = @ColumnsCount 
    END 
  /*удаляем пустые строки */
  SET @CSV = REPLACE(@CSV, '<row>' + REPLICATE ('<col></col>', @Counter)+ '</row>' , '')  

  /* скриним плохие знаки чтоб конвертнуть строку в XML*/ 
  SET @CSV = REPLACE (@CSV, '&', '&amp;')
  SET @CSV = REPLACE (@CSV, '''', '&apos;')
  SET @CSV = REPLACE (@CSV, '''''', '&qout;')

  SET @MyData =  CAST(@CSV AS XML)  

 
  WHILE @Iterator <= 20-- @Counter 
  BEGIN 
    SET @IteratorChar = CAST(@Iterator AS NVarchar (4))
    SET @MyQuery      = @MyQuery  + ' [Col' + @IteratorChar + '] =  X.R.value(''col[' + @IteratorChar + ']'',''NVarchar (1000)'') ' + ','  
    SET @Iterator     = @Iterator + 1
  END
  
  SET @MyQuery = LEFT(@MyQuery, LEN(@MyQuery) - 1)
  SET @MyQuery = @MyQuery  
   +  CASE WHEN @GetRowOrder = 1 THEN ', [XML_ROW_NUMBER] =  X.R.value(''count(for $s in /data/row where $s << . return("1"))'', ''int'')  '  ELSE '' END 
   + ' FROM @MyData.nodes(''/data/row'') X(R)'   


PRINT @MyQuery
  EXEC SP_EXECUTESQL @MyQuery, N'@MyData XML', @MyData 
   

END