Index: zTryout/WV/PM/Test.cls.xml
===================================================================
diff -u -r61416 -r62831
--- zTryout/WV/PM/Test.cls.xml	(.../Test.cls.xml)	(revision 61416)
+++ zTryout/WV/PM/Test.cls.xml	(.../Test.cls.xml)	(revision 62831)
@@ -452,6 +452,54 @@
 	Kill ^PRBS("IP",KindProductID,MoederProductID)
 ]]></Implementation>
 </Method>
+
+<Method name="CheckSpaceStepMetIK">
+<Description>
+Do ##class(zTryout.WV.PM.Test).%New()CheckSpaceStepMetIK() </Description>
+<FormalSpec>ProductId:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim mdReport As %String
+	Kill mdReport
+	
+	Set ProductIdIterator = ##class(DOM.PM.impl.DataM.DataMProductIDIterator).%New()
+	While (ProductIdIterator.HasNext())
+	{
+		Do ..CheckProductSpaceStepMetIK(ProductIdIterator.Next(), .mdReport)
+	}
+	
+	zw mdReport
+]]></Implementation>
+</Method>
+
+<Method name="CheckProductSpaceStepMetIK">
+<Description>
+Voegt product toe aan mdReport wanneer een product afgeleid is van GenProduct LBX-SST, en controleert of dit wel/geen ProductSpecificatie heeft. 
+Oproepen via : 
+   Do ##class(zTryout.WV.PM.Test).%New().CheckProductSpaceStepMetIK(id) </Description>
+<FormalSpec>ProductId:%String,mdReport:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim GenerischProductId = $P($G(^KPR(ProductId,0)),"\",3)
+	#dim ProductSpecificatieID = $P($G(^KPR(ProductId, 15)), "\", 13)
+
+	;Write !,"GenProd Id : "_GenerischProductId
+	
+	If GenerischProductId = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).LBXSSTV1() {
+		#dim Product As DOM.PM.impl.MaatwerkProductImpl = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(ProductId)
+		#dim GNode = $G(^KPR(ProductId,"G"))
+		#dim Korttekst = Product.GeefKorttekst()
+		#dim NonAktief = Product.GeefActiefStatus()
+		
+		#dim SubNodeOK = ""
+		If (ProductSpecificatieID ? 7.9N) {
+			Set SubNodeOK = "OK"
+		}
+		Else {
+			Set SubNodeOK = NonAktief_"-"_$E(Korttekst,1,6)
+		}
+		Set mdReport(SubNodeOK,ProductId) = Korttekst _ "  | NonAct="_NonAktief_ "  GenID=" _ GenerischProductId _ "  ProdSpec=" _ $J(ProductSpecificatieID,8) _ "  G-node: '" _ GNode _ "'"
+	}
+]]></Implementation>
+</Method>
 </Class>