SELECT alfa.RecordID as A_ID,beta.RecordID B_ID,
alfa.bedrijfsnaam as A_naam, beta.bedrijfsnaam as B_Naam,
alfa.zoekcode as A_zoekcode, beta.zoekcode as B_zoekcode, Naamscore.score,
alfa.bezoek_adres as A_Bezoek_Adres, beta.Bezoek_Adres as B_Bezoek_Adres, AdresScore.score,
alfa.Bezoek_Plaats as A_Bezoek_Plaats, beta.Bezoek_Plaats as B_Bezoek_Plaats, PlaatsScore.score,
alfa.Post_Adres as A_Post_Adres, beta.Post_Adres as B_Post_Adres, PostAdresScore.score,
alfa.Post_Plaats as A_Post_Plaats, beta.Post_Plaats as B_Post_Plaats,PostPlaatsScore.score
 
FROM zeno_bedrijven alfa
cross join zeno_bedrijven beta
cross apply (select score from CompareJaroWinkler(alfa.zoekcode,beta.zoekcode)) as NaamScore
cross apply (select score from comparejarowinkler(alfa.bezoek_adres,beta.bezoek_adres)) as AdresScore
cross apply (select score from comparejarowinkler(alfa.bezoek_plaats,beta.bezoek_plaats)) as PlaatsScore
cross apply (select score from comparejarowinkler(alfa.Post_Adres,beta.Post_adres)) as PostAdresScore
cross apply (select score from comparejarowinkler(alfa.Post_Plaats,beta.Post_Plaats)) as PostPlaatsScore

WHERE alfa.recordid <> beta.recordID
and alfa.zoekcode is not null
and beta.zoekcode is not null
and Naamscore.score > 0.8
and (
	(	
		(AdresScore.score > 0.8 or AdresScore.score is null)
		and (PlaatsScore.score > 0.8 or PlaatsScore.score is null)
		)	
	or (
		(PostAdresScore.score > 0.8 or PostAdresScore.score is null)
		and (PostPlaatsScore.score > 0.8 or PostPlaatsScore.score is null)
		)
	)

procedure [dbo].[Synoniem_Lijst] (@MyQUERY varchar(255))

AS
BEGIN

CREATE TABLE #Tempdb (
  Word VARCHAR(255)
)

CREATE TABLE Synonims
(
  Words NVARCHAR(255),
  Wcount INT,
  Synonim NVARCHAR(255)
)

CREATE TABLE #Countdb (
  Wcount INT,
  Word NVARCHAR(255)
)

-- Do not return rowcount to improve performance with multiple queries
SET NOCOUNT ON

-- declare cursor
DECLARE @colvalue NVARCHAR(255)

insert into #Tempdb
EXEC (@MyQuery)

-- load cursor
DECLARE load_cursor CURSOR FOR
	SELECT word
	FROM #Tempdb

-- open cursor and load resultset	
OPEN load_cursor
FETCH NEXT FROM load_cursor INTO @colvalue

WHILE @@FETCH_STATUS = 0
BEGIN

 INSERT INTO #Countdb
 select * from fn_split2(' ',@colvalue)

 FETCH NEXT FROM load_cursor INTO @colvalue

END

BEGIN
  INSERT INTO Synonims (Words, Wcount)
  SELECT Word, Count(Word) FROM #Countdb GROUP BY Word
END

CLOSE load_cursor
DEALLOCATE load_cursor

DROP TABLE #Tempdb
DROP TABLE #Countdb

RETURN (select * from synonims)

END

ALTER PROCEDURE [dbo].[Zoek_Code]

AS
BEGIN

SET NOCOUNT ON

DECLARE @word VARCHAR(50), 
       @position INT, 
       @ZoekCode VARCHAR(500), 
       @oldBedrijfsnaam VARCHAR(500), 
       @newWord VARCHAR(50),
       @Bedrijfsnaam VARCHAR(500),
       @RecordID NVARCHAR(255)


DECLARE load_cursor CURSOR FOR
	SELECT idcode, name FROM MyTable  

OPEN load_cursor
FETCH NEXT FROM load_cursor INTO @RecordID, @Bedrijfsnaam

WHILE @@FETCH_STATUS = 0
BEGIN
       SET @oldBedrijfsnaam = @Bedrijfsnaam
       SET @Bedrijfsnaam = LTRIM(RTRIM(@Bedrijfsnaam))
       
       SET @ZoekCode = @Bedrijfsnaam

       SET @position = CHARINDEX(' ', @Bedrijfsnaam, 1)

       BEGIN
               WHILE @position > 0
               BEGIN
                       SET @word = LTRIM(RTRIM(LEFT(@Bedrijfsnaam, @position - 1)))
                       IF @word <> ''
                       BEGIN
                               
                               SELECT @newWord = NULL
                               SELECT @newWord = synonym FROM Synonyms WHERE words = @word 
                               IF @newWord IS NOT NULL
                               BEGIN
                                       SET @ZoekCode = REPLACE(@ZoekCode, @word, @newWord)
                               END
                       END
                       SET @Bedrijfsnaam = RIGHT(@Bedrijfsnaam, LEN(@Bedrijfsnaam) - @position)
                       SET @position = CHARINDEX(' ', @Bedrijfsnaam, 1)
               END
               
               SET @word = @Bedrijfsnaam
               SELECT @newWord = NULL
               SELECT @newWord = synonym FROM Synonyms WHERE words = @word
               IF @newWord IS NOT NULL
                       SET @ZoekCode = REPLACE(@ZoekCode, @Bedrijfsnaam, @newWord)
                                            
       END
       
       --IF @oldBedrijfsnaam <> @ZoekCode
       BEGIN
        SET @ZoekCode = REPLACE(@ZoekCode, ' ', '')
        SET @ZoekCode = REPLACE(@ZoekCode, '.', '')
        SET @ZoekCode = REPLACE(@ZoekCode, ',', '')
        SET @ZoekCode = REPLACE(@ZoekCode, '-', '')

	  	UPDATE MyTable set zoekcode=UPPER(@ZoekCode) where idcode=@RecordID
       END

       FETCH NEXT FROM load_cursor INTO @RecordID, @Bedrijfsnaam

END

CLOSE load_cursor
DEALLOCATE load_cursor

RETURN (SELECT * FROM MyTable)

END