Index: DOM/PR/FSC.cls.xml
===================================================================
diff -u -r1075 -r8456
--- DOM/PR/FSC.cls.xml	(.../FSC.cls.xml)	(revision 1075)
+++ DOM/PR/FSC.cls.xml	(.../FSC.cls.xml)	(revision 8456)
@@ -21,7 +21,7 @@
 		Continue:'BSPRNr
 		Set FSCCode=$P($G(^KPR(BSPRNr,3)),"\",5)
 		Continue:'$L(FSCCode)  ; Geen hout
-		Set FSCRes=^RES("PRODUKT","PI","FSC","D",FSCCode)
+		Set FSCRes=^RES("PRODUKT","PI","HoutCertificaat","D",FSCCode)
 		Set:FSCKwalificatie>$P(FSCRes,"`",3) FSCKwalificatie=$P(FSCRes,"`",3),MinimumFSCCode=FSCCode
 	}
 	Quit MinimumFSCCode
@@ -44,10 +44,10 @@
 <Implementation><![CDATA[
 	Quit:"GEEN"[FSCCode ""
 	If $G(Taal)="" { ; intern
-	  Set Oms=$P($G(^RES("PRODUKT","PI","FSC","D",FSCCode),"`"_FSCCode),"`",2)
+	  Set Oms=$P($G(^RES("PRODUKT","PI","HoutCertificaat","D",FSCCode),"`"_FSCCode),"`",2)
 	}
 	Else {
-	  Set Oms=$G(^RES("PRODUKT","PI","FSC","D",FSCCode,Taal))
+	  Set Oms=$G(^RES("PRODUKT","PI","HoutCertificaat","D",FSCCode,Taal))
 	  Set:(Oms="")&&(Taal'="N") Oms="{"_..TranslateCode(FSCCode,"N")_"}"
 	  Set:(Oms="")&&(Taal="N") Oms="{"_..TranslateCode(FSCCode)_"}"
 	}
@@ -60,7 +60,7 @@
 <FormalSpec>FSCCode</FormalSpec>
 <Implementation><![CDATA[
 	Quit:"GEEN"[FSCCode ""
-	Set ImageRef=$P($G(^RES("PRODUKT","PI","FSC","D",FSCCode),"`"_FSCCode),"`",4)
+	Set ImageRef=$P($G(^RES("PRODUKT","PI","HoutCertificaat","D",FSCCode),"`"_FSCCode),"`",4)
 	Quit:ImageRef="" ""
 	set ImageURL = ##class(BL.Prod.ImageLink).Instantiate().GetImageURL("LOGO", ImageRef, "LABEL")
 	Quit ImageURL
@@ -116,7 +116,7 @@
 	   Set FSCCode=$P($G(^KPR(PRNr,3)),"\",5)
 	   Quit:'$L(FSCCode)  ; Geen hout -> dus telt niet mee
 	   ; minimum FSC code
-	   Set FSCRes=^RES("PRODUKT","PI","FSC","D",FSCCode)
+	   Set FSCRes=^RES("PRODUKT","PI","HoutCertificaat","D",FSCCode)
 	   Set:MinKwalificatie>$P(FSCRes,"`",3) MinKwalificatie=$P(FSCRes,"`",3),MinimumFSCCode=FSCCode
 	   ; Gewicht
   	   Set CumulGewicht=CumulGewicht+($P($G(^KPR(PRNr,1)),"\",13)*Aantal)