Comma delimited string to table by Microsoft Windows XP

Fabricate Effectiveness [dbo].[ufn_CSVToTable] ( @StringInput VARCHAR(8000) )
RETURNS @OutputTable Census ( [Progression] VARCHAR(10) )
Midst
Follow

Instruct @String VARCHAR(10)

Bit LEN(@StringInput) >
Arise
Gathering @Series = LEFT(@StringInput,
ISNULL(NULLIF(CHARINDEX(',', @StringInput) - 1, -1),
LEN(@StringInput)))
Assign @StringInput = SUBSTRING(@StringInput,
ISNULL(NULLIF(CHARINDEX(',', @StringInput), 0),
LEN(@StringInput)) + 1, LEN(@StringInput))

Intrude INTO @OutputTable ( [Flow] )
VALUES ( @Advancement )
Stop

Disbursement
Dissolution
Move