Index: DOM/PM/impl/ProductTypeAPIimpl.cls.xml
===================================================================
diff -u -r65830 -r66878
--- DOM/PM/impl/ProductTypeAPIimpl.cls.xml	(.../ProductTypeAPIimpl.cls.xml)	(revision 65830)
+++ DOM/PM/impl/ProductTypeAPIimpl.cls.xml	(.../ProductTypeAPIimpl.cls.xml)	(revision 66878)
@@ -470,8 +470,7 @@
 <FormalSpec>ProductID:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim IsLanggoed As %Boolean =$P($G(^KPR(ProductID,2)),"\",15)=3 ; Opslagzone is langgoed?
-	Set:'IsLanggoed IsLanggoed=$P($G(^KPR(ProductID,1)),"\")=3 ; Productgroep is langgoed?
+	#dim IsLanggoed As %Boolean = $P($G(^KPR(ProductID,1)),"\")=3 ; Productgroep is langgoed?
 	Set:'IsLanggoed IsLanggoed=$E($P($G(^KPR(ProductID,0)),"\"),1,4)="RAI." ; Test korttekst
 	Quit IsLanggoed
 ]]></Implementation>