Index: vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml =================================================================== diff -u -r2256 -r2262 --- vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml (.../TestVerwachteUitvoerAPI.cls.xml) (revision 2256) +++ vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml (.../TestVerwachteUitvoerAPI.cls.xml) (revision 2262) @@ -323,7 +323,7 @@ Set Reservatie.DueOut = "2011-09-29 11:05:40" Set Reservatie.Aantal = 5 Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux() - Set Reservatie.IsTransferReservatie = 0 + Set Reservatie.IsTransferReservatie = 1 Set ReservatieVoorVerwachteUitvoer.Reservatie = Reservatie @@ -351,15 +351,22 @@ Set VerwachteUitvoer3 = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer) - Set Aantal = VerwachteUitvoerAPI.GeefAantalGereserveerd("Unittest product 3",##class(DOM.common.enu.Bedrijf).VanHoecke(),##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.ProdRes.enu.ReservatieFase).InOrder()),"2011-09-29 11:05:41") + Set InclusiefTransferReservaties = 1 + + Set Aantal = VerwachteUitvoerAPI.GeefAantalGereserveerd("Unittest product 3",##class(DOM.common.enu.Bedrijf).VanHoecke(),##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.ProdRes.enu.ReservatieFase).InOrder()),InclusiefTransferReservaties,"2011-09-29 11:05:41") Do $$$AssertEquals(Aantal,8+7+5,"Er zijn 20 producten gereserveerd die voldoen aan de eisen") - Set Aantal = VerwachteUitvoerAPI.GeefAantalGereserveerd("Unittest product 3",##class(DOM.common.enu.Bedrijf).VanHoecke(),##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.ProdRes.enu.ReservatieFase).InOrder())) + Set Aantal = VerwachteUitvoerAPI.GeefAantalGereserveerd("Unittest product 3",##class(DOM.common.enu.Bedrijf).VanHoecke(),##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.ProdRes.enu.ReservatieFase).InOrder()),InclusiefTransferReservaties) Do $$$AssertEquals(Aantal,8+7+5+6,"Er zijn 26 producten gereserveerd die voldoen aan de eisen") - Do VerwachteUitvoer1.%DeleteId(VerwachteUitvoer1.%Id()) - Do VerwachteUitvoer2.%DeleteId(VerwachteUitvoer2.%Id()) - Do VerwachteUitvoer3.%DeleteId(VerwachteUitvoer3.%Id()) + Set InclusiefTransferReservaties = 0 + + Set Aantal = VerwachteUitvoerAPI.GeefAantalGereserveerd("Unittest product 3",##class(DOM.common.enu.Bedrijf).VanHoecke(),##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.ProdRes.enu.ReservatieFase).InOrder()),InclusiefTransferReservaties,"2011-09-29 11:05:41") + Do $$$AssertEquals(Aantal,8+7,"Er zijn 15 producten gereserveerd die voldoen aan de eisen") + + Do VerwachteUitvoer1.Delete() + Do VerwachteUitvoer2.Delete() + Do VerwachteUitvoer3.Delete() ]]> Index: DOM/ProdRes/VerwachteUitvoerAPI.cls.xml =================================================================== diff -u -r2221 -r2262 --- DOM/ProdRes/VerwachteUitvoerAPI.cls.xml (.../VerwachteUitvoerAPI.cls.xml) (revision 2221) +++ DOM/ProdRes/VerwachteUitvoerAPI.cls.xml (.../VerwachteUitvoerAPI.cls.xml) (revision 2262) @@ -59,7 +59,7 @@ 1 -ProductID:%String,Bedrijf:DOM.common.enu.Bedrijf,ReservatieFases:%ListOfDataTypes(ELEMENTTYPE="DOM.ProdRes.enu.ReservatieFase"),MaxDueOut:%TimeStamp=##class(TECH.DateTime).MaxTimeStamp() +ProductID:%String,Bedrijf:DOM.common.enu.Bedrijf,ReservatieFases:%ListOfDataTypes(ELEMENTTYPE="DOM.ProdRes.enu.ReservatieFase"),InclusiefTransferReservatie:%Boolean=1,MaxDueOut:%TimeStamp=##class(TECH.DateTime).MaxTimeStamp() %Float Index: DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml =================================================================== diff -u -r2252 -r2262 --- DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (.../VerwachteUitvoerAPIimpl.cls.xml) (revision 2252) +++ DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (.../VerwachteUitvoerAPIimpl.cls.xml) (revision 2262) @@ -89,14 +89,14 @@ -ProductID:%String,Bedrijf:DOM.common.enu.Bedrijf,ReservatieFases:%ListOfDataTypes(ELEMENTTYPE="DOM.ProdRes.enu.ReservatieFase"),MaxDueOut:%TimeStamp=##class(TECH.DateTime).MaxTimeStamp() +ProductID:%String,Bedrijf:DOM.common.enu.Bedrijf,ReservatieFases:%ListOfDataTypes(ELEMENTTYPE="DOM.ProdRes.enu.ReservatieFase"),InclusiefTransferReservatie:%Boolean=1,MaxDueOut:%TimeStamp=##class(TECH.DateTime).MaxTimeStamp() %Float