List2TableFunction

USE [DatabaseName]
GO
/****** Object:  UserDefinedFunction [dbo].[udf_List2Table]    Script Date: 8/15/2013 2:09:47 PM ******/
SET QUOTED_IDENTIFIER ON
GO

ALTER  FUNCTION [dbo].[udf_List2Table]    
(    
@List VARCHAR(5000),    
@Delim CHAR    
)    
RETURNS   
@ParsedList TABLE    
(    
item VARCHAR(50)    
)    
AS    
BEGIN    
DECLARE @item VARCHAR(8000), @Pos INT    
SET @List = LTRIM(RTRIM(@List))+ @Delim    
SET @Pos = CHARINDEX(@Delim, @List, 1)    
WHILE @Pos > 0    
BEGIN    
SET @item = LTRIM(RTRIM(LEFT(@List, @Pos - 1)))    
IF @item <> ''    
BEGIN    
INSERT INTO @ParsedList (item)    
VALUES (CAST(@item AS VARCHAR(50)))    
END    
SET @List = RIGHT(@List, LEN(@List) - @Pos)    
SET @Pos = CHARINDEX(@Delim, @List, 1)    
END    
RETURN    
END