Index: vhUnitTest/APPS/common/impl/StockNiveauViaProdResService/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/common/impl/StockNiveauViaProdResService/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/common/impl/StockNiveauViaProdResService/Test.cls.xml	(revision 33222)
@@ -0,0 +1,124 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.common.impl.StockNiveauViaProdResService.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Parameter name="KlantNummer">
+<Type>%String</Type>
+<Default>1234</Default>
+</Parameter>
+
+<Parameter name="OrderNummer">
+<Type>%String</Type>
+<Default>123457</Default>
+</Parameter>
+
+<Parameter name="ProductNummer">
+<Type>%String</Type>
+<Default>UTPNr</Default>
+</Parameter>
+
+<Property name="StockNiveauService">
+<Type>APPS.common.StockNiveauService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VerwachteUitvoerAPIMock">
+<Type>vhTest.Mock.DOM.ProdRes.VerwachteUitvoerAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Datum">
+<Type>%Date</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Do ##class(zTryout.MVI.KOD.Order).VerwijderOrder(..#OrderNummer, ..#KlantNummer)
+	Do ##class(zTryout.MVI.KPR.Product).VerwijderProduct(..#ProductNummer)
+	
+	Do ##class(zTryout.MVI.KPR.Product).MaakProduct(..#ProductNummer)
+	Do ##class(zTryout.MVI.KOD.Order).MaakOrder(..#OrderNummer, ..#KlantNummer)
+	
+	Set ..Datum = ##class(TECH.DateTime).MaxDate()
+	Set ..StockNiveauService = ##class(APPS.common.impl.StockNiveauViaProdResService).%New(..#ProductNummer, ..Datum)
+	Set ..VerwachteUitvoerAPIMock = ##class(vhTest.Mock.DOM.ProdRes.VerwachteUitvoerAPI).MockInstance()
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Do ##class(zTryout.MVI.KOD.Order).VerwijderOrder(..#OrderNummer, ..#KlantNummer)
+	Do ##class(zTryout.MVI.KPR.Product).VerwijderProduct(..#ProductNummer)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Geef praktische stock met correcte parameters">
+<Implementation><![CDATA[
+	#dim Bedrijf As DOM.common.enu.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
+	#dim MaxDueOut As %TimeStamp = ##class(TECH.DateTime).DateToTimeStamp(..Datum)
+	#dim VerwachteReservatieFasen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	
+	Do VerwachteReservatieFasen.Insert(##class(DOM.ProdRes.enu.ReservatieFase).InOrder())
+	Do VerwachteReservatieFasen.Insert(##class(DOM.ProdRes.enu.ReservatieFase).InUitvoering())
+	
+	#dim ListMatcher As Tools.Mock.ArgumentMatchers.ListMatcher = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(VerwachteReservatieFasen)
+	
+	Do ..VerwachteUitvoerAPIMock.VerwachtMethodCall("GeefAantalGereserveerd", ..#ProductNummer, Bedrijf, ListMatcher, $$$True, MaxDueOut)
+	Do ..StockNiveauService.GeefPraktischeStock()
+	Do ..VerwachteUitvoerAPIMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Geef praktische stock 1">
+<Implementation><![CDATA[	Do ..AssertPraktischeStock(1000, 100, 900)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Geef praktische stock 2">
+<Implementation><![CDATA[	Do ..AssertPraktischeStock(1000, 200, 800)
+]]></Implementation>
+</Method>
+
+<Method name="AssertPraktischeStock">
+<FormalSpec>FysischeStock:%Integer,AantalGereserveerd:%Integer,VerwachtePraktischeStock:%Integer</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ##class(zTryout.MVI.KPR.Product).%New(..#ProductNummer).ZetVoorraad(FysischeStock)
+
+	Do ..VerwachteUitvoerAPIMock.IndienMethodCall("GeefAantalGereserveerd", ..#ProductNummer, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(AantalGereserveerd)
+
+	Do $$$AssertEquals(..StockNiveauService.GeefPraktischeStock(), VerwachtePraktischeStock)
+]]></Implementation>
+</Method>
+
+<Method name="aTest">
+<Implementation><![CDATA[
+	#dim GlobalPersistenceManagerMock As vhTest.Mock.TECH.Persistentie.GlobalPersistenceMgr = ##class(vhTest.Mock.TECH.Persistentie.GlobalPersistenceMgr).%New()
+	Do ##class(vhTest.Mock.TECH.Persistentie.GlobalPersistenceMgr).ZetInstance(GlobalPersistenceManagerMock)
+	
+	//Do GlobalPersistenceManagerMock.IndienMethodCall(
+
+	#dim Bedrijf As DOM.common.enu.Bedrijf = ##class(DOM.common.enu.Bedrijf).Halux()
+	#dim VerwachteUitvoerAPIMock As vhTest.Mock.DOM.ProdRes.VerwachteUitvoerAPI = ##class(vhTest.Mock.DOM.ProdRes.VerwachteUitvoerAPI).MockInstance()
+	#dim StockNiveauService As APPS.common.StockNiveauService = ##class(APPS.common.impl.StockNiveauViaProdResService).%New(..#ProductNummer)
+	
+	//Do VerwachteUitvoerAPIMock.GeefAantalGereserveerd(ProductID,Bedrijf,ReservatieFases,InclusiefTransferReservatie,MaxDueOut)
+	Do VerwachteUitvoerAPIMock.VerwachtMethodCall("GeefAantalGereserveerd", ..#ProductNummer, Bedrijf).DanReturn(100)
+	
+	Do StockNiveauService.GeefPraktischeStock()
+	
+	Do VerwachteUitvoerAPIMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/common/impl/StockNiveauViaProdResService.cls.xml
===================================================================
diff -u -r33085 -r33222
--- APPS/common/impl/StockNiveauViaProdResService.cls.xml	(.../StockNiveauViaProdResService.cls.xml)	(revision 33085)
+++ APPS/common/impl/StockNiveauViaProdResService.cls.xml	(.../StockNiveauViaProdResService.cls.xml)	(revision 33222)
@@ -24,7 +24,7 @@
 	#dim ReservatieFasen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
 	Do ReservatieFasen.Insert(##class(DOM.ProdRes.enu.ReservatieFase).InOrder())
 	Do ReservatieFasen.Insert(##class(DOM.ProdRes.enu.ReservatieFase).InUitvoering())
-	#dim InclusiefTransferReservaties As %Boolean = 1
+	#dim InclusiefTransferReservaties As %Boolean = $$$True
 	#dim TotMoment As %TimeStamp = ##class(TECH.DateTime).DateToTimeStamp(..EindDatumVanBerekeningBereik)
 	#dim AantalInReservatie As %Float = VerwachteUitvoerAPI.GeefAantalGereserveerd(..PRNr, ##class(DOM.common.enu.Bedrijf).VanHoecke(),ReservatieFasen,InclusiefTransferReservaties,TotMoment)