Index: APPS/common/impl/StockNiveauService.cls.xml
===================================================================
diff -u -r1073 -r1118
--- APPS/common/impl/StockNiveauService.cls.xml	(.../StockNiveauService.cls.xml)	(revision 1073)
+++ APPS/common/impl/StockNiveauService.cls.xml	(.../StockNiveauService.cls.xml)	(revision 1118)
@@ -56,6 +56,16 @@
 <Private>1</Private>
 </Property>
 
+<Property name="AantalInReceptie">
+<Type>%Integer</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="AantalInReceptieGestockeerd">
+<Type>%Integer</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="implStockOverKinderen">
 <Type>APPS.common.impl.StockOverKinderen</Type>
 <Private>1</Private>
@@ -81,34 +91,15 @@
 <Implementation><![CDATA[
 	set dtoStock = ##class(APPS.common.dto.StockNiveaus).%New()
 	
-	;d StartTimer^vhLib
 	set dtoStock.Fysisch = ..GeefFysischeStock()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"Fys : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.Praktisch = ..GeefPraktischeStock()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"Pra : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.FysischMinReservaties = ..GeefFysischeStockMinReservaties()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"Fys-Res : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.Theoretisch = ..GeefTheoretischeStock()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"Theo : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.InOrder = ..GeefAantalInOrder()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"InOrder : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.InToelevering = ..GeefAantalInToelevering()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"InToelev : "_$$GetInterval^vhLib())
-	;d StartTimer^vhLib
 	set dtoStock.InReservatie = ..GeefAantalInReservatie()
-	;d StopTimer^vhLib
-	;D WLIP^vhDBG(195,"InReser : "_$$GetInterval^vhLib())
+	set dtoStock.InReceptie = ..GeefAantalInReceptie()
+	set dtoStock.InReceptieGestockeerd = ..GeefAantalInReceptieGestockeerd()
 	
 	quit dtoStock
 ]]></Implementation>
@@ -186,6 +177,43 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAantalInReceptie">
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[
+	quit:$length(..AantalInReceptie) ..AantalInReceptie
+	
+	set lbResult = $$InReceptie^PRODUKT4(..PRNr)
+	set ..AantalInReceptie = $listget(lbResult,1)
+	set ..AantalInReceptieGestockeerd = $listget(lbResult,2)
+	
+	quit ..AantalInReceptie
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalInReceptieGestockeerd">
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[
+	quit:$length(..AantalInReceptieGestockeerd) ..AantalInReceptieGestockeerd
+	
+	set lbResult = $$InReceptie^PRODUKT4(..PRNr)
+	set ..AantalInReceptie = $listget(lbResult,1)
+	set ..AantalInReceptieGestockeerd = $listget(lbResult,2)
+	
+	quit ..AantalInReceptieGestockeerd
+]]></Implementation>
+</Method>
+
+<Method name="IsInReceptie">
+<FormalSpec>ToeleveringNr,ToeleveringLijnNr</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	set LeverancierNr = $piece(^KTO1(ToeleveringNr),"\",1)
+	set TLUNr = $piece(^KTO(LeverancierNr,ToeleveringNr,ToeleveringLijnNr),"\",15)
+	set Result = $data(^RCP("IT",ToeleveringNr,TLUNr))
+	quit Result
+]]></Implementation>
+</Method>
+
 <Method name="GeefAantalInReservatie">
 <ReturnType>%Float</ReturnType>
 <Implementation><![CDATA[