Index: zTryout/THB/TelbaarheidCorrigeerderTAX.cls.xml
===================================================================
diff -u -r51456 -r51471
--- zTryout/THB/TelbaarheidCorrigeerderTAX.cls.xml	(.../TelbaarheidCorrigeerderTAX.cls.xml)	(revision 51456)
+++ zTryout/THB/TelbaarheidCorrigeerderTAX.cls.xml	(.../TelbaarheidCorrigeerderTAX.cls.xml)	(revision 51471)
@@ -31,13 +31,15 @@
 <Implementation><![CDATA[
 	#dim ProductIdIterator As TECH.Iterator = ..ProductApi.GeefProductIDIterator()
 	#dim ProductId As %Integer
-	#dim SamengesteldProduct As DOM.PM.SamengesteldProduct
+	#dim SamengesteldProduct As DOM.PM.Product
+	#dim GenerischId As %String
 	
 	While ProductIdIterator.HasNext() {
 		Set ProductId = ProductIdIterator.Next()
 		If (..ProductRolApi.BestaatAdministratiefProduct(ProductId)) {
 			If (..ProductRolApi.IsSamengesteldProduct(ProductId)) {
-				Set SamengesteldProduct = ..ProductRolApi.GeefSamengesteldProduct(ProductId)
+				Set SamengesteldProduct = ..ProductApi.GeefProduct(ProductId)
+				Set GenerischId = SamengesteldProduct.GeefGenerischProductID()
 			}
 		}
 	}