Index: vhConsistency/Checks/DOM/VKP/OrderLijnenHoutCertificaat.cls.xml
===================================================================
diff -u -r29783 -r37646
--- vhConsistency/Checks/DOM/VKP/OrderLijnenHoutCertificaat.cls.xml	(.../OrderLijnenHoutCertificaat.cls.xml)	(revision 29783)
+++ vhConsistency/Checks/DOM/VKP/OrderLijnenHoutCertificaat.cls.xml	(.../OrderLijnenHoutCertificaat.cls.xml)	(revision 37646)
@@ -33,14 +33,7 @@
 		#dim ProductOrderlijnIt As TECH.Iterator = Order.GeefProductOrderLijnIterator()
 		While ProductOrderlijnIt.HasNext(){
 			#dim ProductOrderlijn As DOM.VKP.ProductOrderlijn = ProductOrderlijnIt.Next()
-			#dim ProductID As %String = ProductOrderlijn.GeefProductID()
-			#dim Aantal As %Integer = ProductOrderlijn.GeefAantal()
-			#dim HoutCertificaatInfo As %Stirng = $$GetFSCCodeEnGewicht^PRODUKT2(ProductID, Aantal)
-			If '$IsObject(ProductOrderlijn.GeefHoutCertificaatInfo()) && (HoutCertificaatInfo'="") {
-				Do OrderArray.SetAt(Order.GeefKlantID()_" - "_Order.GeefOorsprong()_" - "_HoutCertificaatInfo,Order.GeefID())
-				Do ProductOrderlijn.BerekenEnZetHoutCertificaat()
-				Do Order.Save()
-			}
+			Do ..ControleerEnFixProduct(ProductOrderlijn, Order, .OrderArray)
 		}
 	}
 	
@@ -51,6 +44,26 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="ControleerEnFixProduct">
+<FormalSpec><![CDATA[ProductOrderlijn:DOM.VKP.ProductOrderlijn,Order:DOM.VKP.Order,&OrderArray:%ArrayOfDataTypes]]></FormalSpec>
+<Implementation><![CDATA[
+	Try {
+		#dim ProductID As %String = ProductOrderlijn.GeefProductID()
+		#dim Aantal As %Integer = ProductOrderlijn.GeefAantal()
+		#dim HoutCertificaatInfo As %String = $$GetFSCCodeEnGewicht^PRODUKT2(ProductID, Aantal)
+		If '$IsObject(ProductOrderlijn.GeefHoutCertificaatInfo()) && (HoutCertificaatInfo'="") {
+			Do OrderArray.SetAt(Order.GeefKlantID()_" - "_Order.GeefOorsprong()_" - "_HoutCertificaatInfo,Order.GeefID())
+			Do ProductOrderlijn.BerekenEnZetHoutCertificaat()
+			Do Order.Save()
+		}
+	}
+	Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ..VoegMeldingToe("Probleem bij product '"_ProductID_"'. Zie log : "_Exception.GeefOmschrijving())
+	}
+]]></Implementation>
+</Method>
 </Class>