Index: BL/Prod/ImageLinkImport.cls.xml
===================================================================
diff -u -r2589 -r2677
--- BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 2589)
+++ BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 2677)
@@ -626,7 +626,7 @@
 		SELECT ID
 		INTO :ID
 		FROM Res.ImageLink 
-		WHERE ObjType=:ObjType and ObjRef=:ObjRef and ((Oorsprong=:Oorsprong) OR isnull(:Oorsprong,"*")="*") 
+		WHERE ObjType=:ObjType and ObjRef=:ObjRef and ((Oorsprong=:Oorsprong) OR isnull(:Oorsprong,'*')='*') 
 		)
    	&sql(OPEN RemoveOldImages)
  	For  &sql(FETCH RemoveOldImages) Quit:SQLCODE  Do
@@ -700,7 +700,7 @@
  	SELECT ImageLink->%ID,Element_Key,Links_VisueelType,Links_Extensie,Links_Pad,Links_BestandsNaam
  	INTO :ImgID,:Key,:VisueelType,:Extensie,:Pad,:Naam
 	FROM Res.ImageLink_Links 
-	WHERE Links_VisueelType="W")
+	WHERE Links_VisueelType='W')
 	&sql(OPEN ImpPicassa)
  	For  &sql(FETCH ImpPicassa) Quit:SQLCODE  Do
  	. Set Naam=$TR($$$UCase(Naam_"."_Extensie),"#","_")
@@ -742,7 +742,7 @@
  	SELECT ImageLink->%ID,Element_Key,Links_VisueelType,Links_Extensie,Links_Pad,Links_BestandsNaam
  	INTO :ImgID,:Key,:VisueelType,:Extensie,:Pad,:Naam
 	FROM Res.ImageLink_Links 
-	WHERE Links_VisueelType="V" ) ;and Links_Pad=:ChkPad)
+	WHERE Links_VisueelType='V' ) ;and Links_Pad=:ChkPad)
 	&sql(OPEN ClearSVG)
  	For  &sql(FETCH ClearSVG) Quit:SQLCODE  Do
  	. Write:(..OutputToScreen) "DelSVG ",ImgID," ",Pad," ",Naam,!
@@ -792,7 +792,7 @@
  	SELECT ImageLink->%ID,Element_Key,Links_VisueelType,Links_Extensie,Links_Pad,Links_BestandsNaam
  	INTO :ImgID,:Key,:VisueelType,:Extensie,:Pad,:Naam
 	FROM Res.ImageLink_Links
-	WHERE Links_VisueelType="V" and Links_Extensie="SVG")
+	WHERE Links_VisueelType='V' and Links_Extensie='SVG')
 	&sql(OPEN HasSVG)
  	For  &sql(FETCH HasSVG) Quit:SQLCODE  Do
  	. Set Cache("HASSVG",ImgID)=""