/*******************************************************************************
Description             Delimit a string and return specified segment
Author:                     Peter Yates
Example usage:        exec delimiter 'te~st~in~g1~23', '~', 5
Modifications:
*******************************************************************************/

if exists  (select * 
            from dbo.sysobjects 
            where id = object_id(N'[dbo].[delimiter]') 
            and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[delimiter]
go

create procedure delimiter(
 @str nvarchar (4000), --delimited string
 @del nvarchar (10), --delimiter
 @sect int --section of string wanted
 )
as
begin
 declare @nextstr nvarchar(4000)
 declare @pos int
 declare @nextpos int
 create table #valuetable (id int identity, value varchar(500))
 set @nextstr = ''
 set @str = @str + @del
 set @pos = charindex(@del,@str)
 set @nextpos = 1
 while (@pos <>  0)  
 begin
  set @nextstr = substring(@str,1,@pos - 1)
     insert into #valuetable 
      ([value]) 
      values 
      (@nextstr)
  set @str = substring(@str,@pos +1,len(@str))
  set @nextpos = @pos
  set @pos  = charindex(@del,@str)
 end
   select value 
   from #valuetable
   where id = @sect
 return
end

INSERT INTO test_table
SELECT 62
UNION
SELECT 91
UNION
SELECT 95
UNION 
SELECT 98
UNION 
SELECT 99

CREATE TABLE test
(
	val1 VARCHAR(10), 
	val2 VARCHAR(10), 
	val3 VARCHAR(10), 
	val4 VARCHAR(10)
)
GO

INSERT INTO test
(val1, val2, val3, val4)
(SELECT 'a1', 'a2', 'a3', 'a4')
UNION
(SELECT 'b1', 'b2', 'b3', 'b4')
UNION
(SELECT 'c1', 'c2', 'c3', 'c4')
GO