Find some value in all Columns of all Tables

SET NOCOUNT ON

if object_id('tempdb..#TABLEALEX') is not null

drop table #TABLEALEX

create table #TABLEALEX (A nvarchar(5))

DECLARE @X VARCHAR(10)

DECLARE @TableName nvarchar(256), @ColumnName nvarchar(128), @SearchStr2 nvarchar(110), @SQL nvarchar(4000), @RCTR int

SET  @TableName = ''

SET @SearchStr2 = QUOTENAME('%' + 'Antioquia' + '%','''')

SET @RCTR = 0

WHILE @TableName IS NOT NULL

BEGIN

SET @ColumnName = ''

SET @TableName = 

(

SELECT MIN(QUOTENAME(TABLE_SCHEMA) + '.' + QUOTENAME(TABLE_NAME))

FROM INFORMATION_SCHEMA.TABLES

WHERE TABLE_TYPE = 'BASE TABLE'

AND QUOTENAME(TABLE_SCHEMA) + '.' + QUOTENAME(TABLE_NAME) > @TableName

AND OBJECTPROPERTY(

OBJECT_ID(

QUOTENAME(TABLE_SCHEMA) + '.' + QUOTENAME(TABLE_NAME)

), 'IsMSShipped'

      ) = 0

)

WHILE (@TableName IS NOT NULL) AND (@ColumnName IS NOT NULL)

BEGIN

SET @ColumnName =

(

SELECT MIN(QUOTENAME(COLUMN_NAME))

FROM INFORMATION_SCHEMA.COLUMNS

WHERE TABLE_SCHEMA = PARSENAME(@TableName, 2)

AND TABLE_NAME = PARSENAME(@TableName, 1)

AND DATA_TYPE IN ('char', 'varchar', 'nchar', 'nvarchar')

AND QUOTENAME(COLUMN_NAME) > @ColumnName

)

IF @ColumnName IS NOT NULL

BEGIN

SET @SQL= 'SELECT CASE WHEN COUNT(*) > 0 THEN ''A'' ELSE ''B'' END FROM ' + @TableName + '

WHERE ' + @ColumnName + ' LIKE ' + @SearchStr2 

INSERT INTO #TABLEALEX

execute sp_executesql @SQL 

SELECT @X = A FROM #TABLEALEX

IF(@X = 'A')

BEGIN

SELECT 'Tabla ' + @TableName + ' Columna ' + @ColumnName

END

delete from #TABLEALEX

SET @RCTR = @RCTR + @@ROWCOUNT

END

END

END

drop table #TABLEALEX

--SELECT 'Replaced ' + CAST(@RCTR AS varchar) + ' occurence(s)' AS 'Outcome'