Index: HADWIZ.mac.rou
===================================================================
diff -u -r68655 -r71049
--- HADWIZ.mac.rou	(.../HADWIZ.mac.rou)	(revision 68655)
+++ HADWIZ.mac.rou	(.../HADWIZ.mac.rou)	(revision 71049)
@@ -165,8 +165,7 @@
 	
 	Quit:'##class(Res.ImageLink).HasImage("PR",PRNr)&&'(IsOrgal&&$L(##class(cspBasis.ProductList).DataDefValueURL("N",$$$OLGroep,KenmID,"InfoSleutel","LB")))
 	New R,K,FP,FilePath,ID
-	set Qstring = $system.Encryption.Base64Encode($system.Encryption.AESEncode("PRNR="_PRNr_"&Taal=N","1q2gg34l5U6p789Q"))
-	Set FilePath="http://res.vanhoecke.be/Catalog/Product.aspx?"_Qstring
+	Set FilePath = ##class(BL.Legacy.HADWIZ).GeefProductInfoUrlAspx(PRNr,"N")
 	Set Url=FilePath
 	Do:$L(FilePath)
 	. Do STORE^vhTERMINA()